Handle Abend for intrensic functions
Posted: Wed Mar 08, 2017 5:26 pm
Hi ,
Is there a way to avoid hard termination of the program in case of a failure in cobol intrinsic function.
Example , i am trying to use NUMVAL function to validate the given PIC (X) field and move it to a numeric field . But if the given data is alphanumeric , i do not want my program to amend , rather i need to move a default value and continue with my next record. Is this achievable ?
Is there a way to avoid hard termination of the program in case of a failure in cobol intrinsic function.
Example , i am trying to use NUMVAL function to validate the given PIC (X) field and move it to a numeric field . But if the given data is alphanumeric , i do not want my program to amend , rather i need to move a default value and continue with my next record. Is this achievable ?