Since you cannot use DATALINES, you could still process against _INFILE_ after it has been brought into the PDV. The nested functions become a bit awkward but should not be too bad.
[pre]
* TRYCAP.TXT contains the data line from above.;
filename txtline "c:\temp\trycap.txt";
data a;
infile txtline ;
input ;
aftera = scan(substr(_infile_,index(upcase(_infile_),'A')+1),1);
put _infile_;
put aftera =;
run;
proc print data=a;
run;
[/pre]
This has the advantage of a case insensitive search, but the original case is preserved in the final data set.
... View more