data got ;
infile cards ;
input string $60. ;
cards;
1234567890123456789012345678901234567890
PLASMA CELLS= 0.13% OF LEUCOCYTES.
MALIGNANT PLASMA CELLS = 0.049%
0.47%
OF WHICH =91% HAVE A NEOPLASTIC 14.2% PHENOTYPE
;
run ;
data want;
set got;
pid=prxparse('/[\d\.]+%/');
s=1;e=length(string);
call prxnext(pid,s,e,string,p,l);
do while(p>0);
want=substr(string,p,l);output;
call prxnext(pid,s,e,string,p,l);
end;
drop pid s e p l;
run;
... View more
