View previous topic :: View next topic
|
Author |
Message |
abhijit.nayak01
Active User
Joined: 22 Mar 2009 Posts: 161 Location: South Africa
|
|
|
|
Hi,
My job is executing a procedure 10 times and that procedure has 25 steps that means a total of 250 steps are present now for the job. Now due to requirement changes i added 2 steps to the procedure and due to this the number of steps for the job is now 270. So due to this the job is abending. Is there any way except splitting the job to handle this abend.
Thanks,
Abhijit. |
|
Back to top |
|
|
expat
Global Moderator
Joined: 14 Mar 2007 Posts: 8797 Location: Welsh Wales
|
|
|
|
Unfortunately not, it has to be split. |
|
Back to top |
|
|
jctgf Currently Banned Active User
Joined: 04 Nov 2006 Posts: 109
|
|
|
|
Sometimes using IDCAMS helps solve this kind of problem.
In order to avoid an abend when creating a sam file that already exists, some installations require you to delete the file before creating it.
If you use a different step to delete each sam file, you can replace all of them for a single Idcams step.
The Idcams will use a card with several scratch commands in it, each one for one sam file you want to delete.
Check the example bellow:
Before:
Code: |
//DELET1 EXEC PGM=SYS000,PARM='DATA-SET-NAME-1'
//DELET2 EXEC PGM=SYS000,PARM='DATA-SET-NAME-2'
//DELET3 EXEC PGM=SYS000,PARM='DATA-SET-NAME-3'
//*
//SORT EXEC PGM=SORT
//SORTIN DD DSN=...
//SORTOF1 DD DSN=DATA-SET-NAME-1,DISP=(NEW,CATLG,)...
//SORTOF2 DD DSN=DATA-SET-NAME-2,DISP=(NEW,CATLG,)...
//SORTOF3 DD DSN=DATA-SET-NAME-3,DISP=(NEW,CATLG,)...
//SYSIN DD DSN=...
|
After:
Code: |
//DELETE EXEC PGM=IDCAMS
//SYSIN DD DSN=CARDPDS(CARDDELE),DISP=SHR
//*
//SORT EXEC PGM=SORT
//SORTIN DD DSN=...
//SORTOF1 DD DSN=DATA-SET-NAME-1,DISP=(NEW,CATLG,)...
//SORTOF2 DD DSN=DATA-SET-NAME-2,DISP=(NEW,CATLG,)...
//SORTOF3 DD DSN=DATA-SET-NAME-3,DISP=(NEW,CATLG,)...
//SYSIN DD DSN=...
|
Content of carddele:
Code: |
SCRATCH DATA-SET-NAME-1
SCRATCH DATA-SET-NAME-2
SCRATCH DATA-SET-NAME-3
SET RETURN-CODE TO 0
|
In the example above, the files were initially deleted with an utility program named SYS000. It's a good program but can only scratch a file at a time.
Then, to reduce the total number of steps in the procedure, delet1/delet2/delet3 were replaced for one Idcams step only.
Please don't take into considerations any syntax mistakes. |
|
Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006 Posts: 19244 Location: Inside the Matrix
|
|
|
|
Hello,
Many (most?) jobs have a "housekeeping" step at the beginning that is either an IEFBR14 (using disp=mod to prevent dataset not found problems) or IDCAMS to delete datasets that will be created durint ghe run. There is no reason for there to be one step per file, unless more than housekeeping is going on.
Quote: |
Please don't take into considerations any syntax mistakes. |
Please don't post "solutions" that you don't have time/inclination to test when it is a solution that is trivial to test. . . |
|
Back to top |
|
|
CICS Guy
Senior Member
Joined: 18 Jul 2007 Posts: 2146 Location: At my coffee table
|
|
|
|
dick scherrer wrote: |
Please don't post "solutions" that you don't have time/inclination to test when it is a solution that is trivial to test. . . |
So if I know the solution but don't have access to a MF or can't find the proper manual I should just keep my mouth shut? |
|
Back to top |
|
|
jctgf Currently Banned Active User
Joined: 04 Nov 2006 Posts: 109
|
|
|
|
this is a proven solution.
we've done this several times.
it works.
I can't post from my work place so I can't provide an answer without syntax errors. |
|
Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006 Posts: 19244 Location: Inside the Matrix
|
|
|
|
Hello,
Quote: |
So if I know the solution but don't have access to a MF or can't find the proper manual I should just keep my mouth shut? |
Some people have earned (by the consistent quality of their contributions over a long period of time) a "pass". . . Even if they don't have an alter-ego
Quote: |
I can't post from my work place so I can't provide an answer without syntax errors. |
Usually, posting "real" things from a system should be avoided. . . This does not mean that it cannot be posted changing anything that would identify the organization or some individual. |
|
Back to top |
|
|
jctgf Currently Banned Active User
Joined: 04 Nov 2006 Posts: 109
|
|
|
|
I can't connect to this site from my work place.
I am aware I don't have the "pass". |
|
Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006 Posts: 19244 Location: Inside the Matrix
|
|
|
|
Hello,
Quote: |
I can't connect to this site from my work place. |
Unfortunate, but possibly you can connect to work from elsewhere? I've been using remote connections for so long i sometimes forget this is not always available. Bummer.
Quote: |
I am aware I don't have the "pass". |
Yet. . .
You probably will
d |
|
Back to top |
|
|
|