To introduce the RC 4 during the run time of the cobol DB2

This is a Mainframe COBOL forum - you can post your queries on Mainframe COBOL, VS COBOL II, COBOL/370 , Enterprise COBOL

Moderators: dbzTHEdinosauer, Moderator Group

Post Reply
mdashfaq11
Member
Posts: 1
Joined: Sat Sep 10, 2011 10:41 pm

To introduce the RC 4 during the run time of the cobol DB2

Post by mdashfaq11 » Thu Dec 29, 2011 5:12 pm

Hi everyone,

Previously in a paragraph of cobol program, if the abend occurs we were going to exit-paragraph and closing the program. Now, if the abend is occured, we have to drop that particular record and process the remaining items. Till now its ok. But the thing is, when during the run time if for a record abend occurs and processes the next records, then the CC should not be 0. It should be other than 0 some low value. So, how to introduce the CC other than 0 acceptable value in the cobol program. I am not talking about the CC during the compile time, but in the run time.

User avatar
dbzTHEdinosauer
Moderator
Posts: 981
Joined: Mon Oct 02, 2006 8:31 pm

Post by dbzTHEdinosauer » Thu Dec 29, 2011 6:41 pm

look at RETURN-CODE special register in the cobol manual.
Dick Brenholtz
JCL, SQL and code in programs have an irritating habit of doing what you say,
not what you meant.

DikDude
Moderator
Posts: 1001
Joined: Fri Jul 22, 2011 8:39 am
Location: usa

Post by DikDude » Fri Dec 30, 2011 10:35 am

if the abend occurs we were going to exit-paragraph and closing the program.
Was there really an Abend or did the code detect some invalid data and choose to termnate prematurely?

If there was truly an abend that was detected by the system (not the application), and Abend processing invoked, there is probably more that needs to be considered.
Have a good one

Anuj Dhawan
Moderator
Posts: 1625
Joined: Sat Aug 09, 2008 9:02 am
Location: Mumbai, India

Post by Anuj Dhawan » Fri Dec 30, 2011 4:21 pm

Now, if the abend is occured, we have to drop that particular record and process the remaining items.
May be you are not using your words carefully enough - if there is an abend, your program just not have any control on it - you might want to say, that if some certain conditions match -- end the program with different RC other than 0. If so, look what Dick has said.

And steps, in which programs get executed, have RC (return-code) not CC. What is CC, by the way, in this context?
Regards,
Anuj

DikDude
Moderator
Posts: 1001
Joined: Fri Jul 22, 2011 8:39 am
Location: usa

Post by DikDude » Sat Dec 31, 2011 10:51 am

CC = Condition Code. . . :)

tamilselvan.sampath
Member
Posts: 26
Joined: Mon Jan 23, 2012 11:17 pm

Post by tamilselvan.sampath » Fri Jan 27, 2012 7:10 pm

move 4 to returncode in cobol program

Post Reply

FREE TUTORIALS

Tutorials
Free tutorials from mainframegurukul
  • JCL Tutorial
    Covers all important JCL concepts.
  • Cobol Tutorial
    This tutorials covers all Cobol Topics from STRING to COMP-3.
  • DB2 Tutorial
    DB2 Tutorial focuses on DB2 COBOL Programming.
  • SORT Tutorial
    This Tutorial covers all important aspects of DFSORT with examples
  • CICS Tutorial
    This CICS tutorial covers CICS concepts and CICS Basics, CICS COBOL Programming.
Interview
Mainframe Interview questions



Other References
Mainframe Tools and others