autotests/folding/test.jcl.fold

0001 //KATEJOB1 JOB (INFO),'TEST for Highlighting',
0002 //   NOTIFY=&SYSUID,
0003 //   MSGCLASS=H,
0004 //   MSGLEVEL=(1,1),
0005 //   REGION=0M
0006 //* Example JCL to be used to test kate syntax highlighting
0007 //* License MIT
0008 //GREP     EXEC PGM=ISRSUPC,
0009 //         PARM=(SRCHCMP,ANYC,IDPFX,NOPRTCC)
0010 //NEWDD    DD DSN=KATE.REXXLIB,DISP=OLD
0011 //* OUTDD    DD SYSOUT=*
0012 //OUTDD    DD PATHOPTS=(ORDWR,OTRUNC,OCREAT),
0013 //             PATHMODE=(SIRWXU,SIRWXO),
0014 //             PATHDISP=(KEEP,DELETE),
0015 //             FILEDATA=TEXT,
0016 //             PATH='/tmp/searched.3'
0017 //SYSIN    DD *
0018  SRCHFOR  'STORAGE'
0019 /*
0020 //RACFSR   EXEC PGM=IKJEFT01
0021 //SYSTSPRT DD DISP=SHR,DSN=&&KATE(SRCHABC)
0022 //SYSOUT   DD SYSOUT=*
0023 //SYSTSIN  DD *
0024  SEARCH CLASS(DATASET) FILTER(**) NOMASK
0025 //LIST     EXEC PGM=IKJEFT01
0026 //SYSTSPRT DD DISP=SHR,DSN=&&REPORT(LISTABC)
0027 //SYSOUT   DD SYSOUT=*
0028 //SYSTSIN  DD DISP=SHR,DSN=&&KATE(SRCHABC)
0029 // IF (RC GT 0) THEN
0030 //CATFILE  EXEC PGM=IEBGENER
0031 //SYSUT1   DD  DSN=&&REPORT(LISTABC)
0032 //         DISP=SHR
0033 //SYSUT2   DD  SYSOUT=*
0034 //SYSPRINT DD  SYSOUT=*
0035 //SYSIN    DD  DUMMY
0036 // ELSE
0037 //UNIXID   EXEC PGM=BPXBATCH,REGION=8M
0038 //STDIN    DD SYSOUT=*
0039 //STDOUT   DD SYSOUT=*
0040 //STDPARM  DD   *
0041 SH id
0042 /*
0043 // ENDIF