File: test.jcl

package info (click to toggle)
kf6-syntax-highlighting 6.13.0-1
  • links: PTS, VCS
  • area: main
  • in suites: sid, trixie
  • size: 47,568 kB
  • sloc: xml: 197,750; cpp: 12,850; python: 3,023; sh: 955; perl: 546; ruby: 488; pascal: 393; javascript: 161; php: 150; jsp: 132; lisp: 131; haskell: 124; ada: 119; ansic: 107; makefile: 96; f90: 94; ml: 85; cobol: 81; yacc: 71; csh: 62; erlang: 54; sql: 51; java: 47; objc: 37; awk: 31; asm: 30; tcl: 29; fortran: 18; cs: 10
file content (43 lines) | stat: -rw-r--r-- 1,169 bytes parent folder | download | duplicates (10) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
 
//KATEJOB1 JOB (INFO),'TEST for Highlighting',
//   NOTIFY=&SYSUID,
//   MSGCLASS=H,
//   MSGLEVEL=(1,1),
//   REGION=0M
//* Example JCL to be used to test kate syntax highlighting
//* License MIT
//GREP     EXEC PGM=ISRSUPC,
//         PARM=(SRCHCMP,ANYC,IDPFX,NOPRTCC)
//NEWDD    DD DSN=KATE.REXXLIB,DISP=OLD
//* OUTDD    DD SYSOUT=*
//OUTDD    DD PATHOPTS=(ORDWR,OTRUNC,OCREAT),
//             PATHMODE=(SIRWXU,SIRWXO),
//             PATHDISP=(KEEP,DELETE),
//             FILEDATA=TEXT,
//             PATH='/tmp/searched.3'
//SYSIN    DD *
 SRCHFOR  'STORAGE'
/*
//RACFSR   EXEC PGM=IKJEFT01
//SYSTSPRT DD DISP=SHR,DSN=&&KATE(SRCHABC)
//SYSOUT   DD SYSOUT=*
//SYSTSIN  DD *
 SEARCH CLASS(DATASET) FILTER(**) NOMASK
//LIST     EXEC PGM=IKJEFT01
//SYSTSPRT DD DISP=SHR,DSN=&&REPORT(LISTABC)
//SYSOUT   DD SYSOUT=*
//SYSTSIN  DD DISP=SHR,DSN=&&KATE(SRCHABC)   
// IF (RC GT 0) THEN
//CATFILE  EXEC PGM=IEBGENER
//SYSUT1   DD  DSN=&&REPORT(LISTABC)
//         DISP=SHR
//SYSUT2   DD  SYSOUT=*
//SYSPRINT DD  SYSOUT=*
//SYSIN    DD  DUMMY
// ELSE
//UNIXID   EXEC PGM=BPXBATCH,REGION=8M
//STDIN    DD SYSOUT=*
//STDOUT   DD SYSOUT=*
//STDPARM  DD   *
SH id
/*
// ENDIF