data cardiac; input id Text :$200.; infile datalines4 dlm=','; datalines; 1,Physical Exam. Vital Signs. BP: 134/93 2,Patient's physical exam was notable for BP of 142/100 3,Physical Exam. BP: 100/80 ; data strepto; set cardiac; NewString=substr(Text, index(Text, 'BP')); run;
... View more