COBOL

COBOL

COBOL

COBOL is responsible for the efficient, reliable, secure, and unseen day-to-day operations of the world's economy.

 View Only

  • 1.  invalid data handling in Cobol V6.3

    Posted Wed April 14, 2021 04:08 PM
    I hope this isn't a duplicate of another discussion i started.  We are migrating from Cobol 4.2 to Cobol 6.3.   We had NUMPROC(MIG) set in Cobol 4.2.   when we went to Cobol 6.3 we set NUMPROC(NOPFD).  then in our testing we had a program that could get invalid data and under 4.2 it abended with S0C7.  Under 6.3  with NOPFD the invalid data was 'fixed' and the program would run to the end.  The user wanted the S0C7 abend to know they had invalid data.  So we set NUMPROC(PFD) in 6.3 and the program would abend with a S0C7 if it had invalid data.  Then they found another program that was doing a IF ...  NOT NUMERIC and it also had invalid data so the check would fail with NUMPROC(PFD).  however, the NOT NUMERIC check did not fail under 4.2 so the user wanted it to perform that way.   So for this program we set NUMPROC(NOPFD) and ZONEDATA(MIG).  this allowed the NOT NUMERIC check to work as expected.   we would like to compile all programs with one set of compile parms.  any one know of any way to do that?   Also, any ideas on what we should do if we find a program that needs both the NOT NUMERIC check to work with invalid data and get a S0C7 with different invalid data?

    thanks

    ------------------------------
    Brad Wissink
    ------------------------------


  • 2.  RE: invalid data handling in Cobol V6.3

    Posted Wed May 19, 2021 12:04 PM
    Edited by Linda Chui Wed May 19, 2021 12:05 PM
    hi Brad, 

    Please see Mike's response to your other post (if you haven't already). Feel free to post back if that didn't help.

    thanks.

    ------------------------------
    Linda Chui
    Compilation Technology & Enterprise Products
    IBM Canada
    ------------------------------

    Original Message


Related Content