How To Set Return Code In Jcl
You can specify the RETURN-CODE special register in a function wherever an integer argument is allowed. An example may be similar to this using the correct device names for your case OPERATOR-CONSOLE IS OUT-OP2 in special-names with DISPLAY "RUN ERROR - NO DETAIL RECORDS, ABORTING" UPON OUT-OP2 RETURN-CODE should not be declared in your program. Clone yourself! http://ibmmainframes.com/about60344.html
How To Set Return Code In Jcl
You can set the RETURN-CODE special register before executing an EXIT PROGRAM, GOBACK, or STOP RUN statement. Besides being just more pleasant, linked to sites tend to not always stay around, especially ones like this. Is This Answer Correct ? 0 Yes 14 No Post New Answer More COBOL Interview Questions db2 variable decimal(15,2) what is the equalent size of cobol variable 2 Answers Syntel,
Click Here to join Tek-Tips and talk with other members! Has something new been added to JCL? Join your peers on the Internet's largest technical computer professional community.It's easy to join and it's free. Jcl If Statement Resources Join | Advertise Copyright © 1998-2016 ENGINEERING.com, Inc.
RE: Set JCL cond code from within COBOL program 3gm (Programmer) 10 May 05 22:34 I believe you can move the value you wish to set to the RETURN-CODE special register Ile Cobol Programmer's Guide by NicC » Tue Apr 12, 2011 5:37 pm in the jcl, u can set return-code= 4Oh yeah? One company I worked at has a very simple program called SYSABND2, which I believe is written in assembler, which is called just to abend the program. by mylavarapuvinay » Thu Jan 06, 2011 10:21 pm how can we pass the return codes from cobol to jcl?
Ile Cobol Programmer's Guide
However, it is recommended that you use the Language Environment CEE3ABD callable service instead. (above quote taken fromEnterprise COBOL for z/OSCompiler and Run-Time Migration GuideVersion 3 Release 3Document Number GC27-1409-02)There's always http://stackoverflow.com/questions/3163639/how-to-abend-job-intentionally For example: DISPLAY 'No Detail Records found in file.' MOVE 16 TO RETURN-CODE GOBACK. How To Set Return Code In Jcl This call abended your program and issued a dump. Ilboabn0 In Cobol The problem I have is that people can explain things quickly but I can only comprehend slowly.RegardsNic NicC Global moderator Posts: 2550Joined: Sun Jul 04, 2010 12:13 amLocation: Down on
I suspect setting a RETURN-CODE, writting a message and then terminating the program via a STOP RUN or GOBACK is all that you really want to do. Are you aComputer / IT professional?Join Tek-Tips Forums! Robert Sample Global moderator Posts: 3144Joined: Sat Dec 19, 2009 8:32 pmLocation: East Dubuque, Illinois Hasthanked: 1 time Beenthanked: 188 times Top Re: how can we pass the return codes Join them; it only takes a minute: Sign up How to abend job intentionally up vote 4 down vote favorite 1 Is it possible to abend your job intentionally through COBOL Cee3abd
For details, see: http://publib.boulder.ibm.com/infocenter/zvm/v6r2/index.jsp?topic=%2Fcom.ibm.zos.r12.ceea300%2Fcee3abd.htm http://publib.boulder.ibm.com/infocenter/zvm/v5r4/index.jsp?topic=/com.ibm.zos.r9.ceea400/ceea4150320.htm share|improve this answer edited Jan 31 '14 at 21:49 answered Sep 10 '13 at 21:52 Abacus 991917 add a comment| up vote 0 down vote One e 01 RETURN-CODE-OUT PIC S9(09) USAGE COMP. 01 RETURN-CODE-IND PIC S9(04) USAGE COMP. Ever onward,jar RE: Set JCL cond code from within COBOL program TERMINATE (Programmer) (OP) 11 May 05 19:48 Thanks to 3gm and jrohrbach for their quick and helpful responses. share|improve this answer edited Jan 28 '13 at 16:33 answered Jul 2 '10 at 17:51 NealB 13.1k22452 add a comment| up vote 3 down vote see the following link on how
You may also issue a program dump from a program run under Language Environment (IBM Mainframe option) using the CEE3DMP--Generate dump utility. It is available as an IBM extention to the language. Most teams will already have an accepted way to deliberately abend a program for a 'logic' reason.
And an external link is not an answer, you should summarize it here.
Note: The RETURN-CODE special-register is not part of the COBOL-85 standard. asked 6 years ago viewed 9081 times active 2 years ago Related 2How can I use IEBGENER?2How can I auto Indent for Cobol and JCl using Notepad ++0VSAM Status code 041COBOL When a COBOL subprogram terminates, the contents of the RETURN-CODE special register of the subprogram are transferred into the RETURN-CODE special register of the calling program. Why Tamron 90mm 2.8 is "marketed" as Macro and not as a "portrait" lens? 8-year-old received tablet as gift, but he does not have the self-control or maturity to own a
Statements about groups proved using semigroups Why does rotation occur? Finally, really old programs might have code in them to generate abends. Question Posted / guest 4 Answers 17427 Views I also Faced E-Mail Answers Answers were Sorted based on User's Feedback Answer / suresh Move a value to RETURN-CODE register. share|improve this answer edited Dec 29 '10 at 15:57 answered Dec 29 '10 at 15:50 Developer 842 add a comment| Your Answer draft saved draft discarded Sign up or log
Need a better layout, so that blank space can be utilized Solve equation in determinant iPhone SE powers on whenever moved, defective? All rights reserved.Unauthorized reproduction or linking forbidden without expressed written permission. first declaration is to define the variable for return code.Second declaration is for defining a Null indicator.