Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

SDSF S*001 abend

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
boyti ko

New User


Joined: 03 Nov 2014
Posts: 78
Location: Malaysia

PostPosted: Tue Dec 09, 2014 9:24 am    Post subject: SDSF S*001 abend
Reply with quote

I have a 10 steps like these:

Code:
//STEP0000 EXEC PGM=SDSF,PARM='++30,134',COND=EVEN
//ISFOUT   DD SYSOUT=*                             
//ISFIN    DD *                                                         
PRE JOBA*                                         
ST                                               
FIND JOBA FIRST                                   
++P                                               
END                                               
/*


If the step already purge the current JOBID but the next step still sees the JOBID but tried to purge it, abend occurs because the job to purge no longer exist. Can anybody propose on how to prevent this?

ISFOUT:
Code:
SDSF STATUS DISPLAY ALL CLASSES                         JOB NO LONGER VALID   
COMMAND INPUT ===>                                            SCROLL ===> PAGE
NP   JOBNAME  JobID     .---------------------------------------.  Status     
P    JOBAXXX  JOB98291  |           Confirm Action              |             
     JOBASTAN JOB98304  |                                       |             
     JOBAXXX  JOB98305  |  1  1. Process action character       |             
     JOBAXXX  JOB98333  |     2. Discard action character       |             
                        |     3. Process action character and   |             
                        |        set confirmation off           |             
                        |                                       |             
                        |  Line number: 1      JOBAXXX          |             
                        |                                       |             
                        '---------------------------------------'


JESMSGLG:

Code:
IEC020I 001-5,JOBA001 ,STEP0000,ISFIN   ,JES                                   
IEC020I EROPT IS 'ABE' OR NOT SPECIFIED                                       
ISF037I SDSF SDUMP NOT TAKEN, SUPPRESSED BY DAE                               
ISF012I SDSF ABEND SYSTEM 001 AT 00C6DA16 IN MODULE IGG019AH OFFSET 0003E6     
ISF013I SDSF ABEND R0-R7  80000000 80001000 00007738 00007738 00007670 009C3FD0
ISF014I SDSF ABEND R8-R15 009BF718 000087F8 009BA868 00C6D656 009C3FFC 00007460
IEF450I JOBA001 STEP0000 - ABEND=S001 U0000 REASON=00000000  238               
        TIME=11.25.34                                                         
XXXX        JOBA001       016     STEP0000       S*001
Back to top
View user's profile Send private message

Paul Voyner

New User


Joined: 26 Nov 2012
Posts: 51
Location: Switz

PostPosted: Tue Dec 09, 2014 1:02 pm    Post subject:
Reply with quote

Hi, my guess is that you need to check the SET command. SET CONFIRM OFF ?
But a better way is to use the SDSF-REXX interface. This gives you much more flexibility (though requires some basic rexx skills)

Code:
/*rexx*/
prefx = 'MYJOB*'

rc=isfcalls("ON")

ISFPREFIX = prefx

Address "SDSF"
"ISFEXEC ST"
say ISFROWS" returned"


do ix=1 to JNAME.0 /* Loop for all rows returned */
  Address "SDSF" "ISFACT ST TOKEN('"TOKEN.ix"') PARM(NP P)"
end


rc=isfcalls("OFF")
exit
Back to top
View user's profile Send private message
boyti ko

New User


Joined: 03 Nov 2014
Posts: 78
Location: Malaysia

PostPosted: Tue Dec 09, 2014 1:53 pm    Post subject:
Reply with quote

Nice, Thank you very much Paul..
REXX is not an option.
I just added the SET CONFIRM OFF
Code:
//STEP0000 EXEC PGM=SDSF,PARM='++30,134',COND=EVEN
//ISFOUT   DD SYSOUT=*                             
//ISFIN    DD * 
SET CONFIRM OFF                                                       
PRE JOBA*                                         
ST                                               
FIND JOBA FIRST                                   
++P                                               
END                                               
/*


and the JCL worked.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts SDSF and SAF security danik56 TSO/ISPF 3 Wed Mar 15, 2017 12:51 pm
No new posts IMS region inactive - User abend code... gthmrj IMS DB/DC 5 Tue Mar 07, 2017 12:29 pm
No new posts IMS BMP program causes 878 system abend Artemk IMS DB/DC 7 Tue Nov 22, 2016 8:26 pm
No new posts abend sort based on count records in ... anatol DFSORT/ICETOOL 5 Mon Oct 17, 2016 10:10 pm
No new posts SDSF Command Avtrix CLIST & REXX 4 Fri Sep 30, 2016 11:13 am


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us