Re: Have you ever abended IDCAMS?
Marco, You did not mention the platform you are on so, VSE/ESA - IDCAMS - CANCEL STEP or CANCEL JOB z/OS - has a CANCEL but did NOT implement the CANCEL JOB. They claim conditional JCL is the answer - what a waste of key strokes. This lack of function has been on my list of requests to IBM for a long time. Open a PMR or enhancement request. You could write a frontend program to load IDCAMS and test return codes then abend. Suspect there are several examples on the CBT TAPE. Best of luck, Doug Shupe - Original Message - From: Marco Gianfranco Indaco [EMAIL PROTECTED] Newsgroups: bit.listserv.ibm-main To: IBM-MAIN@BAMA.UA.EDU Sent: Thursday, January 26, 2006 4:46 AM Subject: Have you ever abended IDCAMS? Hi to all. Does somebody know if IDCAMS has(inside?) a kind of exit to call to have abend after an error? I mean: for error in a AMS command the maximum return code that we can have is 16 but this error never satisfy the abnormal completition of jcl because it intercept System and User Abend only. De facto, in some cases we need to avoid (i.e.e) the allocation of a set of dataset... Is there a solution or is not possible manage thru jcl idcams errors within the same step? Thanks in advance. -- Marco Indaco MF Consultant Loc: Milan, Italy -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Have you ever abended IDCAMS?
Hi to all. Does somebody know if IDCAMS has(inside?) a kind of exit to call to have abend after an error? I mean: for error in a AMS command the maximum return code that we can have is 16 but this error never satisfy the abnormal completition of jcl because it intercept System and User Abend only. De facto, in some cases we need to avoid (i.e.e) the allocation of a set of dataset... Is there a solution or is not possible manage thru jcl idcams errors within the same step? Thanks in advance. -- Marco Indaco MF Consultant Loc: Milan, Italy -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Have you ever abended IDCAMS?
Answer to the topic question: YES. Answer to message body: In fact I don't understand your intention. What do you want to get ? I believe, that IDCAMS abend is not the goal, rather a way to achive the goal. Maybe there's another way. -- Radoslaw Skorupka Lodz, Poland Marco Gianfranco Indaco wrote: Hi to all. Does somebody know if IDCAMS has(inside?) a kind of exit to call to have abend after an error? I mean: for error in a AMS command the maximum return code that we can have is 16 but this error never satisfy the abnormal completition of jcl because it intercept System and User Abend only. De facto, in some cases we need to avoid (i.e.e) the allocation of a set of dataset... Is there a solution or is not possible manage thru jcl idcams errors within the same step? Thanks in advance. -- Marco Indaco MF Consultant Loc: Milan, Italy -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Have you ever abended IDCAMS?
On Thu, 2006-01-26 at 14:23 +0100, R.S. wrote: Answer to message body: In fact I don't understand your intention. What do you want to get ? I believe, that IDCAMS abend is not the goal, I seem to recall that e.g. SORT and FDR both have options to ABEND in lieu of returning a severe RC. Marco probably wishes for something similar in IDCAMS. This can be useful behavior if you are lazy and don't want to code COND= in all your JCL. Maybe a wrapper program will do the trick: ATTACHX EP=IDCAMS,ECB=ATCHECB, ... STR1,ATCHTCB WAIT ECB=ATCHECB LAR1,ATCHTCB DETACH (1) CLC ATCHECB+1(3),=XL3'00' Subtask terminated well? JNE ABEND No, take action (ABEND?) -- David Andrews A. Duda and Sons, Inc. [EMAIL PROTECTED] -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Have you ever abended IDCAMS?
If I understand the question correctly - yes, and not just IDCAMS. We're going back several decades here, but at one time quite a few programmes (SORT was one) used to signifiy any failure (even fatal I/O errors) with RC=16 rather than an ABEND. I think just about every shop either wrote or got a little routine off a GUIDE or CBT tape that would invoke any programme, test its return code against a parameter, and ABEND U0001 or similar if the return code were unacceptable so as to force ABEND disposition processing. Something like //S1 EXEC PGM=RCTESTER,PARM=SORT,12 There must be something on the current CBT tape? -- Phil Payne http://www.isham-research.co.uk +44 7833 654 800 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Have you ever abended IDCAMS?
Thanks for your reply. I'm not so lazy.. :-) This is not a way to avoid cond in some steps... I try to explain better the concept and apologize if my english is so complicate to understand. In Icetool, for example, we can code ABEND to terminate abnormally the execution of a step(using in this case DFSPARM) avoiding so the allocation of a set of file allowing so a perfect restart from the same step(if we code, i.e. DISP=(,CATLG,DELETE)) When we use idcams and an error occur, result is only a return code, not properly an error... so IDCAMS never satisfy the 3th disposition of cond in jcl. What I'm looking for is a way to pass or code in my step some exit to control the execution to satisfy cond of jcl... and all this using idcams only(I know that with a program is easy) All comment are wellcome... 2006/1/26, David Andrews [EMAIL PROTECTED]: On Thu, 2006-01-26 at 14:23 +0100, R.S. wrote: Answer to message body: In fact I don't understand your intention. What do you want to get ? I believe, that IDCAMS abend is not the goal, I seem to recall that e.g. SORT and FDR both have options to ABEND in lieu of returning a severe RC. Marco probably wishes for something similar in IDCAMS. This can be useful behavior if you are lazy and don't want to code COND= in all your JCL. Maybe a wrapper program will do the trick: ATTACHX EP=IDCAMS,ECB=ATCHECB, ... STR1,ATCHTCB WAIT ECB=ATCHECB LAR1,ATCHTCB DETACH (1) CLC ATCHECB+1(3),=XL3'00' Subtask terminated well? JNE ABEND No, take action (ABEND?) -- David Andrews A. Duda and Sons, Inc. [EMAIL PROTECTED] -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- Marco Indaco MF Consultant Loc: Milan, Italy -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Have you ever abended IDCAMS?
Marco Gianfranco Indaco wrote: Thanks for your reply. I'm not so lazy.. :-) This is not a way to avoid cond in some steps... I try to explain better the concept and apologize if my english is so complicate to understand. In Icetool, for example, we can code ABEND to terminate abnormally the execution of a step(using in this case DFSPARM) avoiding so the allocation of a set of file allowing so a perfect restart from the same step(if we code, i.e. DISP=(,CATLG,DELETE)) When we use idcams and an error occur, result is only a return code, not properly an error... so IDCAMS never satisfy the 3th disposition of cond in jcl. What I'm looking for is a way to pass or code in my step some exit to control the execution to satisfy cond of jcl... and all this using idcams only(I know that with a program is easy) All comment are wellcome... What about next step with COND, let's say IDCAMS DELETE or IEFBR14 and DD with OLD,DELETE ? -- Radoslaw Skorupka Lodz, Poland -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Have you ever abended IDCAMS?
Hi Mr Lodz, you are right but it's a trick. My question regard mainly the association of 3th dispostion and IDCAMS... I'd like to know if it's true that is unuseful. If we cannot use an exit is true else is false...(so... how?) We can write program or use IEFBR14(as you suggest) to solve this problem but I'm interested to know if this is an exception about the usage of jcl disposition. ;-) Regards. 2006/1/26, R.S. [EMAIL PROTECTED]: Marco Gianfranco Indaco wrote: Thanks for your reply. I'm not so lazy.. :-) This is not a way to avoid cond in some steps... I try to explain better the concept and apologize if my english is so complicate to understand. In Icetool, for example, we can code ABEND to terminate abnormally the execution of a step(using in this case DFSPARM) avoiding so the allocation of a set of file allowing so a perfect restart from the same step(if we code, i.e. DISP=(,CATLG,DELETE)) When we use idcams and an error occur, result is only a return code, not properly an error... so IDCAMS never satisfy the 3th disposition of cond in jcl. What I'm looking for is a way to pass or code in my step some exit to control the execution to satisfy cond of jcl... and all this using idcams only(I know that with a program is easy) All comment are wellcome... What about next step with COND, let's say IDCAMS DELETE or IEFBR14 and DD with OLD,DELETE ? -- Radoslaw Skorupka Lodz, Poland -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- Marco Indaco MF Consultant Loc: Milan, Italy -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Have you ever abended IDCAMS?
On Thu, 2006-01-26 at 16:21 +0100, Marco Gianfranco Indaco wrote: I'm not so lazy.. :-) This is not a way to avoid cond in some steps... Sure, but same idea. You want to avoid having to code extra JCL to test the return code from IDCAMS, and conditionally delete your dataset. What I'm looking for is a way to pass or code in my step some exit to control the execution to satisfy cond of jcl... and all this using idcams only(I know that with a program is easy) Back when VSAM was first introduced (~30 years!) IBM said that one of the design points was that VSAM should not ABEND -- unlike the older access methods. You get a return code from every action, so that *you* can decide what to do. They were really proud of that, and mentioned it prominently in the classes of the time. I doubt that you'll get the IDCAMS developers to introduce an optional ABEND, but maybe Mark Thomen will encourage you to submit a requirement. (Maybe not!) I think you should write a wrapper. As you said, it would be easy. Easier than writing a requirement, anyway. -- David Andrews A. Duda and Sons, Inc. [EMAIL PROTECTED] -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Have you ever abended IDCAMS?
Many thanks Mr Andrews... Thanks for this piece of history :-) that I didn't know... I don't want to submit a requirement other than this that I repeat... is useful but mainly fun because using sort I solved this problem... Usually for deldef or other AMS usage I use cond like the great part of people... Many thanks again for your help and effort. Regards 2006/1/26, David Andrews [EMAIL PROTECTED]: On Thu, 2006-01-26 at 16:21 +0100, Marco Gianfranco Indaco wrote: I'm not so lazy.. :-) This is not a way to avoid cond in some steps... Sure, but same idea. You want to avoid having to code extra JCL to test the return code from IDCAMS, and conditionally delete your dataset. What I'm looking for is a way to pass or code in my step some exit to control the execution to satisfy cond of jcl... and all this using idcams only(I know that with a program is easy) Back when VSAM was first introduced (~30 years!) IBM said that one of the design points was that VSAM should not ABEND -- unlike the older access methods. You get a return code from every action, so that *you* can decide what to do. They were really proud of that, and mentioned it prominently in the classes of the time. I doubt that you'll get the IDCAMS developers to introduce an optional ABEND, but maybe Mark Thomen will encourage you to submit a requirement. (Maybe not!) I think you should write a wrapper. As you said, it would be easy. Easier than writing a requirement, anyway. -- David Andrews A. Duda and Sons, Inc. [EMAIL PROTECTED] -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- Marco Indaco MF Consultant Loc: Milan, Italy -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Have you ever abended IDCAMS?
My question regard mainly the association of 3th dispostion and IDCAMS... I'd like to know if it's true that is unuseful. If we cannot use an exit is true else is false...(so... how?) We can write program or use IEFBR14(as you suggest) to solve this problem but I'm interested to know if this is an exception about the usage of jcl disposition. ;-) I'm not quite sure what you are asking. As far as I know, IDCAMS does not ABEND when failures occur, it only passes a return code. There is nothing in the IDCAMS manual which talks about abends. So it is true that in the step JCL for IDCAMS, the third parm of DISP will never be invoked. Is this an exception? There are probably a lot of programs which do not intentionally ABEND when they detect an error. As other messages suggested, it is pretty trivial to write a front-end program which invokes IDCAMS (or any specified program), tests its return code and ABENDs if non-zero. -- Bruce A. Black Senior Software Developer for FDR Innovation Data Processing 973-890-7300 personal: [EMAIL PROTECTED] sales info: [EMAIL PROTECTED] tech support: [EMAIL PROTECTED] web: www.innovationdp.fdr.com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Have you ever abended IDCAMS?
Could the modal commands (IF-THE-ELSE; DO-END; SET MAXCC/LASTCC; CANCEL) be of any use? IIRC the max CC from IDCAMS is 16. Testing the RC in the JCL for some strange value (an odd integer?) could then bypass steps of flush the JOB. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
