//USR0C2CJ JOB (1234),'MaQI-CMC-x6354',
// TIME=1440,MSGLEVEL=(1,1),MSGCLASS=X,REGION=4096K,
// CLASS=M,USER=USR0C2C,NOTIFY=USR0C2C
//STEP1 EXEC PGM=IEFBR14
//SASMULTI DD DISP=(NEW,PASS),UNIT=SYSDA,
// SPACE=(CYL,(2000,0)),VOL=(,,,3)
//STEP2 EXEC SAS8
//WORK DD DISP=(OLD,DELETE,DELETE),DSN=*.STEP1.SASMULTI
//SASUSER DD DISP=SHR,DSN=USR0C2C.SAS8.SASUSER
//SYSIN DD *
options errors=5 missing=0 errorabend mlogic source2 symbolgen nodate
cmpopt sortname=sort;
libname lab 'tests.rst.cmc.montelab.data' disp=shr;
data montelab;
set lab.montelab;
/* identify invalid characters */
unwanted=compress(upcase(memberid),
'1234567890ABCDEFGHIJKLMNOPQRTSUVWXYZ');
/* remove invalid characters */
memberid2=compress(memberid,unwanted);
run;
|