Is the program reading INTO variable or not ? If not, double check the FD definition, the length of the record and "normal strange conditions" like empty file.
There're lot of difference in such area between OSVS or Cobol2 and Enterprise compilers. Best regards. Massimo 2017-02-08 16:26 GMT+01:00 Peter Ten Eyck < peter.tene...@americannational.com>: > Job TNCA1300 runs three times on the same LPAR with the same data and id. > > Run 1 – production COBOL program, calls production assembler program, runs > successfully. > > Bring production COBOL program into a development PDS and compile program > without changes. > > Run 2- development program, calls production assembler program, fails with > SOC4 in assembler program. > > Add these two lines of code to COBOL program to bypass header record on > input dataset: > > IF WS-NA-RECORDS-READ EQUAL 1 > GO TO 1200-READ-MASTER. > > Compile COBOL program with change. Compile output messages identical to > first compile. > > Run 3 – development COBOL program (changed), calls production assembler > program, runs successfully. > > Note: No overrides or changes to AMODE, RMODE or DATA during the test. > Using the shops default compile and link settings. > > Program moves from the FD to WORKING-STORAGE before the call to the > assembler program for all “input” parameters. > > I am missing something here; I do not see why this code would resolve the > SOC4. Or has mentioned, missing something else… the unknown unknowns > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
