Hi All,
i have a requirement to comment out only some particular proc's from myPS file.
Example:-
****** ***************************** Top of Data ******************************
000001 //JOBNAME JOB 12345ABC, , COMMENT JOB
000002 // CLASS=A,MSGCLASS=K,REGION=8000K,COND=(0,NE)
000003 //*
000004 //JOBLIB DD DSN=USID.PGM.OBJLIB,
000005 // DISP=SHR
000006 // DD DSN=USID.PGM1.LOADLIB,
000007 // DISP=SHR
000008 // DD DSN=SYS2.COBLIB,
000009 // DISP=SHR
000010 // step 02 PROC123
00CM11 // DISP=SHR
000012 // DD DSN=SYS2.SUBRLIB,
000013 // DISP=SHR
000014 // DD DSN=SYS3.ABNDIDMS.LOAD,
000015 // DISP=SHR
----------- NEXT PAGE ---------------------
000016 // DD DSN=USID.PGM2.LOAD,
000017 // DISP=SHR
000018 // DD DSN=USID.PGM3.LOAD,
000019 // DISP=SHR
000020 // DD DSN=USID.PGM4.LOAD,
000021 // DISP=SHR
000022 //STEP1 PrcoXYZ
000023 // COND=(0,NE)
000024 //*
000025 //STP01A DD DSN=USID.SYS.FILE1,
000026 // DISP=(NEW,CATLG,DELETE),
000027 // UNIT=SYSDA,SPACE=(TRK,(5,2),RLSE),
00CM28 // DCB=(RECFM=FB,LRECL=80,BLKSIZE=0)
000029 //*
000030 //STP02A DD DSN=USID.SYS.FILE2,
000031 // DISP=(NEW,CATLG,DELETE),
----------- NEXT PAGE ---------------------
000032 // UNIT=SYSDA,SPACE=(TRK,(5,2),RLSE),
000033 // DCB=(RECFM=FB,LRECL=80,BLKSIZE=0)
000034 //*
000035 //STP03A ProcABCD
000000// DD DSN=USID.SYS.FILE3,
000036 // DISP=(NEW,CATLG,DELETE),
000037 // UNIT=SYSDA,SPACE=(TRK,(5,2),RLSE),
000038 // DCB=(RECFM=FB,LRECL=80,BLKSIZE=0)
000039 //*
000040 //STP04A DD DSN=USID.SYS.FILE4,
000041 // DISP=(NEW,CATLG,DELETE),
000042 // UNIT=SYSDA,SPACE=(TRK,(5,2),RLSE),
000043 // DCB=(RECFM=FB,LRECL=80,BLKSIZE=0)
000044 //*
****** **************************** Bottom of Data ****************************
So as per the above example the steps using Procs ABCD, XYZ, 123 should get comment out from my ps file.
Can we use any kind of cond or any sort which will verify the PROC name and comment out all the steps for that PROC.
Thanks.