The following code may get you started: data have; input code $; cards; 72 721 00721 653 667 vb665 V27adfjl adfsjV27 ; data _null_; length var $ 5000; do i=650 to 669; var=catx('|', var,i); end; var=catx('|',var,72,73,74,'V27'); call symputx('var',var); run; data want; set have; prex = prxmatch("/^(&var)/", code)>0; run; Haikuo
... View more