Coding to prevent table overflows withing programs
In this new world of zero tollerance for abends and the goal of 100% production stability, I have been charged with determining the best method to prevent abends due to internal program table overflows.  Our environment has Cobol, Eztrieve and Assembler programs with internal tables.  We are looking to replace hard-coding of occurs clauses with [...]

Answer Question   |  November 9, 2009  5:14 PM
ABEND, Buffer overflow, COBOL, Easytrieve

IKJEFT01 job giving SYSTEM COMPLETION CODE=0C4 REASON CODE=00000011
One of my job is trying to search the reagions which are holding a file and run this step //PSTY0020 EXEC PGM=IKJEFT01,DYNAMNBR=8, // PARM=(‘%ISFSCAN,&INS..PO.STDATM.JOURNAL’, // ‘DD(2&DD),NONCICSABORT’) //SYSPROC DD DSN=CSG.CTLCARD,DISP=SHR //SYSTSIN DD DUMMY //SYSTSPRT DD SYSOUT=* //SYSOUT DD SYSOUT=* //ISFSINFO DD DSN=&FSINFO,DISP=SHR //ISFDADS DD DSN=&SEQ..PB.STDATM.ISFDADS, // DISP=(MOD,CATLG,DELETE), // DATACLAS=SMALL //ISFDADR DD DSN=&SEQ..PB.STDATM.ISFDADR, // DISP=(MOD,CATLG,DELETE), // DATACLAS=SMALL [...]

Answer Question   |  April 14, 2009  5:22 PM
ABEND, IKJEFT01, JCL, Job Control Language, RC=000011