IBM Z and LinuxONE Languages

Languages

Languages

Broad range of supported development languages and tools allows to transform software delivery practices.

 View Only

  • 1.  Enterprise COBOL 6.1 v. 5.1 - 0C7 Error

    Posted Thu May 21, 2020 02:56 AM
    Edited by Dan Zhang Thu May 28, 2020 05:35 AM
    Disclaimer: This post is migrated from IBM Developer Answers that is no longer in use. Its original author is Q3UD_Christopher_Hanks, posted on Jan 19, 2018.

    In the V6.1 migration manual there is a statement that V5 and V6 programs would not require additional testing for invalid data. We are seeing different behavior between 5.1 and 6.1 on 0C7 abends. Was this expected and where can I find documentation of the expected results?

    "Note: You do not have to do this extra testing for programs that have already been compiled with Enterprise COBOL V5 or V6." (Enterprise COBOL for z/OS Migration Guide v6.1)

    Here are some examples.

    Complier Option 6.1 Comments // OPTS1='AWO,DYN,FSRT,MAP,OFF,OPT(2),,', Job ran successfully with MAXCC=0 // OPTS2='NOSEQ,S,,AWO,VLR(C),TEST(SOURCE),NUMCHECK(ABD)',

    // OPTS1='AWO,DYN,FSRT,MAP,OFF,OPT(2),,', USER abend=4038 // OPTS2='NOSEQ,S,,AWO,VLR(C),TEST(SOURCE),NUMCHECK(ZON,PAC,BIN,ABD)'

    // OPTS1='AWO,DYN,FSRT,MAP,OFF,OPT(2),,', Job ran successfully with MAXCC=0 // OPTS2='NOSEQ,S,,AWO,VLR(C),TEST(SOURCE),NUMPROC(NOPFD)',

    // OPTS1='AWO,DYN,FSRT,MAP,OFF,OPT(2),,', S0C7 Abend // OPTS2='NOSEQ,S,,AWO,VLR(C),TEST(SOURCE),NUMPROC(PFD)',

    // OPTS1='AWO,DYN,FSRT,MAP,OFF,OPT(2),,', Job ran successfully with MAXCC=0 // OPTS2='NOSEQ,S,,AWO,VLR(C),TEST(SOURCE),ZONEDATA(PFD)',

    // OPTS1='AWO,DYN,FSRT,MAP,OFF,OPT(2),,', S0C7 Abend // OPTS2='NOSEQ,S,,AWO,VLR(C),TEST(SOURCE),ZONEDATA(NOPFD)',

    Complier Option 5.1 Comments // OPTS1='AWO,DYN,FSRT,MAP,OFF,OPT(2),,', USER abend=4038 // OPTS2='NOSEQ,S,,AWO,VLR(C),TEST(SOURCE),ZONECHECK(ABD)',

    // OPTS1='AWO,DYN,FSRT,MAP,OFF,OPT(2),,', S0C7 Abend // OPTS2='NOSEQ,S,,AWO,VLR(C),TEST(SOURCE),NOZONECHECK'

    // OPTS1='AWO,DYN,FSRT,MAP,OFF,OPT(2),,', S0C7 Abend // OPTS2='NOSEQ,S,,AWO,VLR(C),TEST(SOURCE),NUMPROC(NOPFD)',

    // OPTS1='AWO,DYN,FSRT,MAP,OFF,OPT(2),,', Job ran successfully with MAXCC=0 // OPTS2='NOSEQ,S,,AWO,VLR(C),TEST(SOURCE),NUMPROC(PFD)',

    // OPTS1='AWO,DYN,FSRT,MAP,OFF,OPT(2),,', S0C7 Abend // OPTS2='NOSEQ,S,,AWO,VLR(C),TEST(SOURCE),ZONEDATA(PFD)',

    // OPTS1='AWO,DYN,FSRT,MAP,OFF,OPT(2),,', S0C7 Abend // OPTS2='NOSEQ,S,,AWO,VLR(C),TEST(SOURCE),ZONEDATA(NOPFD)',


    ---------------------------------------------------------------------
    Question asked by Q3UD_Christopher_Hanks on Jan 19, 2018
    ---------------------------------------------------------------------


  • 2.  RE: Enterprise COBOL 6.1 v. 5.1 - 0C7 Error

    Posted Thu May 21, 2020 02:57 AM
    Edited by Dan Zhang Thu May 28, 2020 05:37 AM

    I re-ordered your list matching V5 and V6 compiles. I also delete all of the OPTS1 since they are invariant

    5 USER abend=4038 // OPTS2='NOSEQ,S,,AWO,VLR(C),TEST(SOURCE),ZONECHECK(ABD)',

    6 Job ran successfully with MAXCC=0 // OPTS2='NOSEQ,S,,AWO,VLR

    This pair is explainable: one uses ZONECHECK and one does not

    5 S0C7 Abend // OPTS2='NOSEQ,S,,AWO,VLR(C),TEST(SOURCE),NOZONECHECK'

    6 USER abend=4038 // OPTS2='NOSEQ,S,,AWO,VLR(C),TEST(SOURCE),NUMCHECK(ZON,PAC,BIN,ABD)' This pair is explainable: one does explicit checking and one does not

    5 S0C7 Abend // OPTS2='NOSEQ,S,,AWO,VLR(C),TEST(SOURCE),NUMPROC(NOPFD)',

    6 Job ran successfully with MAXCC=0 // OPTS2='NOSEQ,S,,AWO,VLR(C),TEST(SOURCE),NUMPROC(NOPFD)',

    5 Job ran successfully with MAXCC=0 // OPTS2='NOSEQ,S,,AWO,VLR(C),TEST(SOURCE),NUMPROC(PFD)',

    6 S0C7 Abend // OPTS2='NOSEQ,S,,AWO,VLR(C),TEST(SOURCE),NUMPROC(PFD)',

    5 S0C7 Abend // OPTS2='NOSEQ,S,,AWO,VLR(C),TEST(SOURCE),ZONEDATA(PFD)',

    6 Job ran successfully with MAXCC=0 // OPTS2='NOSEQ,S,,AWO,VLR(C),TEST(SOURCE),ZONEDATA(PFD)',

    5 S0C7 Abend // OPTS2='NOSEQ,S,,AWO,VLR(C),TEST(SOURCE),ZONEDATA(NOPFD)',

    6 S0C7 Abend // OPTS2='NOSEQ,S,,AWO,VLR(C),TEST(SOURCE),ZONEDATA(NOPFD)',

    This pair is expected

    The three pairs in the middle are not expected. You should open a PMR.

    -----------------------------------------------------
    Answered by Allan Kielstra on Jan 22, 2018
    -----------------------------------------------------






    Original Message


Related Content