Scribd
Upload
347 views4 pages

Mainframe

1) The maximum number of steps that can be coded in a JCL job is 255. Exceeding this limit will result in error message "IEFC602I EXCESSIVE NUMBER OF EXECUTE STATEMENTS". 2) The IDCAMS LISTCAT command can be used to check if a dataset exists in the system catalog. It will return status codes to indicate existence or non-existence. 3) JCL can be written to first check if a dataset exists using LISTCAT, and if it does not exist, use DEFINE to dynamically create the dataset.

Uploaded by

ramanadhamp
Copyright
© Attribution Non-Commercial (BY-NC)
We take content rights seriously. If you suspect this is your content, claim it here.
Available Formats
Download as TXT, PDF, TXT or read online on Scribd
347 views4 pages

Mainframe

1) The maximum number of steps that can be coded in a JCL job is 255. Exceeding this limit will result in error message "IEFC602I EXCESSIVE NUMBER OF EXECUTE STATEMENTS". 2) The IDCAMS LISTCAT command can be used to check if a dataset exists in the system catalog. It will return status codes to indicate existence or non-existence. 3) JCL can be written to first check if a dataset exists using LISTCAT, and if it does not exist, use DEFINE to dynamically create the dataset.

Uploaded by

ramanadhamp
Copyright
© Attribution Non-Commercial (BY-NC)
We take content rights seriously. If you suspect this is your content, claim it here.
Available Formats
Download as TXT, PDF, TXT or read online on Scribd
You are on page 1/ 4

//**************************//*****************************//

HOW MANY MAX STEPS WE CAN CODE IN A JOB?


255 MAX IF WE EXCEED THEN WE GET JCL ERROR WITH THIS MESSAGE
"IEFC602I EXCESSIVE NUMBER OF EXECUTE STATEMENTS"
//**************************//*****************************//
HOW TO CHECK WHETHER A DATASET EXIST
***EXAMPLE1***>>>>>>>>>>THIS IS NON EXISTING DATASET
//STEPA EXEC PGM=IDCAMS
//SYSIN DD *
LISTCAT ENTRIES('FSS142.RAMANADH.COPY.COPY')
/*
//SYSPRINT DD SYSOUT=*
IT THROWS MAXCC = 4
IDCAMS SYSTEM SERVICES
LISTCAT ENTRIES('FSS142.RAMANADH.COPY.COPY')
IDC3012I ENTRY FSS142.RAMANADH.COPY.COPY NOT FOUND
IDC3009I ** VSAM CATALOG RETURN CODE IS 8 - REASON CODE IS IGG0CLEG-42
IDC1566I ** FSS142.RAMANADH.COPY.COPY NOT LISTED
IDCAMS SYSTEM SERVICES
THE NUMBER OF ENTRIES PROCESSED WAS:
AIX -------------------0
ALIAS -----------------0
CLUSTER ---------------0
DATA ------------------0
GDG -------------------0
INDEX -----------------0
NONVSAM ---------------0
PAGESPACE -------------0
PATH ------------------0
SPACE -----------------0
USERCATALOG -----------0
TAPELIBRARY -----------0
TAPEVOLUME ------------0
TOTAL -----------------0
THE NUMBER OF PROTECTED ENTRIES SUPPRESSED WAS 0
IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 4
IDC0002I IDCAMS PROCESSING COMPLETE. MAXIMUM CONDITION CODE WAS 4
***EXAMPLE2***>>>>>>>>>>THIS IS AN EXISTING DATASET(I.E PDS)
***EXAMPLE3***>>>>>>>>>>THIS IS AN EXISTING DATASET(I.E PS)
//STEPA EXEC PGM=IDCAMS
//SYSIN DD *
LISTCAT ENTRIES('FSS142.RAMANADH.JOBLIB')
/*
//SYSPRINT DD SYSOUT=*

LISTCAT ENTRIES('FSS142.RAMANADH.JOBLIB')
NONVSAM ------- FSS142.RAMANADH.JOBLIB
IN-CAT --- CATALOG.FSS
IDCAMS SYSTEM SERVICES
THE NUMBER OF ENTRIES PROCESSED WAS:
AIX -------------------0
ALIAS -----------------0
CLUSTER ---------------0
DATA ------------------0
GDG -------------------0
INDEX -----------------0
NONVSAM ---------------1
PAGESPACE -------------0
PATH ------------------0
SPACE -----------------0
USERCATALOG -----------0
TAPELIBRARY -----------0
TAPEVOLUME ------------0
TOTAL -----------------1
***EXAMPLE4***>>>>>>>>>>THIS IS AN EXISTING DATASET(I.E VSAM)
//STEPA EXEC PGM=IDCAMS
//SYSIN DD *
LISTCAT ENTRIES('FSS142.RAMANADH.ACCFILE')
/*
//SYSPRINT DD SYSOUT=*

IDCAMS SYSTEM SERVICES


LISTCAT ENTRIES('FSS142.RAMANADH.ACCFILE')
CLUSTER ------- FSS142.RAMANADH.ACCFILE
IN-CAT --- CATALOG.FSS
DATA ------- FSS142.RAMANADH.ACCFILE.DATA
IN-CAT --- CATALOG.FSS
INDEX ------ FSS142.RAMANADH.ACCFILE.INDEX
IN-CAT --- CATALOG.FSS
IDCAMS SYSTEM SERVICES
THE NUMBER OF ENTRIES PROCESSED WAS:
AIX -------------------0
ALIAS -----------------0
CLUSTER ---------------1
DATA ------------------1
GDG -------------------0
INDEX -----------------1
NONVSAM ---------------0
PAGESPACE -------------0
PATH ------------------0
SPACE -----------------0
USERCATALOG -----------0
TAPELIBRARY -----------0
TAPEVOLUME ------------0
TOTAL -----------------3
***EXAMPLE5***>>>>>>>>>>THIS IS AN UNCATALOGED DATASET
//STEPA EXEC PGM=IEFBR14
//SYSUT1 DD DSN=FSS142.RAMANADH.COBOL2.SOURCE
// DISP=(OLD,UNCATALOG,DELETE)
//STEPB EXEC PGM=IDCAMS
//SYSIN DD *
LISTCAT ENTRIES('FSS142.RAMANADH.JOBLIB')
/*
//SYSPRINT DD SYSOUT=*
***EXAMPLE6***>>>>>>>>>LISTCAT WITH ALL OPTION
NONVSAM ------- FSS142.RAMANADH.SAMP.FILE
IN-CAT --- CATALOG.FSS
HISTORY
DATASET-OWNER-----(NULL) CREATION--------2011.067
RELEASE----------------2 EXPIRATION------0000.000
ACCOUNT-INFO-----------------------------------(NULL)
SMSDATA
STORAGECLASS ------SCFSS MANAGEMENTCLASS---(NULL)
DATACLASS --------(NULL) LBACKUP ---0000.000.0000
VOLUMES
VOLSER------------FSSV08 DEVTYPE------X'3010200F'
ASSOCIATIONS--------(NULL)
ATTRIBUTES
IDCAMS SYSTEM SERVICES
THE NUMBER OF ENTRIES PROCESSED WAS:
AIX -------------------0
ALIAS -----------------0
CLUSTER ---------------0
DATA ------------------0
GDG -------------------0
INDEX -----------------0
NONVSAM ---------------0
PAGESPACE -------------0
PATH ------------------0
SPACE -----------------0
USERCATALOG -----------0
TAPELIBRARY -----------0
TAPEVOLUME ------------0
TOTAL -----------------3
//**************************//*****************************//
JCL TO CHECK WHETHER DATASET IS AVAILABLE IF NOT CREATE A DATASET
//STEP1 EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
LISTC ENT(FSS142.RAMANADH.FILE1)
IF LASTCC = 0
DEFINE CLUSTER
-
-
-
ELSE SET MAXCC = 0
/*
//**************************//*****************************//

WHEN A DATASET IS CREATED THE ENTRY IS MADE IN SYSTEM CATALOG


SYSTEM CATALOG IS A VSAM DATASET
EX: CATALOG.FSS

You might also like

pFad - Phonifier reborn

Pfad - The Proxy pFad of © 2024 Garber Painting. All rights reserved.

Note: This service is not intended for secure transactions such as banking, social media, email, or purchasing. Use at your own risk. We assume no liability whatsoever for broken pages.


Alternative Proxies:

Alternative Proxy

pFad Proxy

pFad v3 Proxy

pFad v4 Proxy