Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
IEBGENER step failed with S7F3 abend

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

New User


Joined: 10 Jun 2008
Posts: 24
Location: india

PostPosted: Wed Mar 07, 2012 8:05 pm    Post subject: IEBGENER step failed with S7F3 abend
Reply with quote

Hello! I am trying to overwrite a TAPE file using IEBGENER with OLD disposition.

Code:
//STEP023  EXEC PGM=IEBGENER                                 
//SYSUT1     DD DSN=XXXX.CDROM.YTD,         
//           DISP=SHR                                         
//SYSUT2     DD DSN=TAPE.CDROM.YTD.G0013V00,DISP=OLD
//SYSIN      DD DUMMY                                         
//SYSPRINT   DD SYSOUT=*   


Both are FBA LRECL 133 RECFM files. IEBGENER step fails with the following message.

Code:
IEF233A M 0925,P65603,,S4669PJA,STEP023,  936                                   
TMS007  IEF233A M 0925,P65603(LENC;0009981),,S4669PJA,STEP023,TAPE.CDROM.YTD.G0013V00                                       
IECTMS3 0925,P65603,IS NOT SCRTCH (24)                                         
IEFTMS50 7XX- 04 S4669PJA,STEP023 ,SYSUT2  ,0925,P65603,000A8DROM.YTD.G0013V00X
IEFTMS50 ***** CA 1 ABEND,EX,04 *****                  **                       
+WER999A S4669PJA,STEP023 ,        -  UNSUCCESSFUL SORT 7F3 S REASON=00000004   
IEA995I SYMPTOM DUMP OUTPUT  001                     


What are the possible reasons for this issue?
Back to top
View user's profile Send private message

enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10327
Location: italy

PostPosted: Wed Mar 07, 2012 8:28 pm    Post subject: Reply to: IEBGENER step failed with S7F3 abend
Reply with quote

the possible reasons for any abend are described in the manuals relative to the products being used,
with the action to be taken to prevent/circumvent it

no reason to the manual reading on Your behalf and cut and paste info that You could easily find Yourself
Back to top
View user's profile Send private message
bodatrinadh

Active User


Joined: 05 Jan 2007
Posts: 101
Location: chennai (India)

PostPosted: Wed Mar 07, 2012 9:20 pm    Post subject: Reply to: IEBGENER step failed with S7F3 abend
Reply with quote

pravinj,

Hope this may give you some idea about the error!

Code:

---------- V=CA TECHNOLOGIES P=CA 1 MESSAGES R=R12.6 I=IECTMS3 D=M -----------
 +----+------------------------------------+---------------------------------+
 |Code|Reason                              |Action                           |
 +----+------------------------------------+---------------------------------+
 |04  |The JCL specified LABEL=EXPDT=98000 |The tape is dismounted. The      |
 |    |or ACCODE=xCANORES and the operator |operator indicated that the tape |
 |    |replied M in response to the IECTMS2|is nonresident. Check with the   |
 |    |console message.                    |operator for further information.|
 +----+------------------------------------+---------------------------------+
 



Code:


----------- V=CA TECHNOLOGIES P=CA 1 MESSAGES R=R12.6 I=TMS007 D=M -----------
 TMS007                                                                       
                                                                             
  (modified mount message)                                                   
                                                                             
  Reason:                                                                     
  A specifically requested CA 1 controlled volume is marked out-of-area in the
  TMC. The out-of-area location and slot number is noted in the text of the   
  mount mess age.                                                             
                                                                                                                                                         
Action:                                                                       
The action taken depends on where the volume physically resides at the time   
of the request. Tapes under Vault Management System (VMS) control should be   
checked in before using them for input or they will not appear on the Vault   
Management System (VMS) picking list. Tapes marked out-of-area to a non-vault
location are automatically checked in when read for input. It is possible     
that the volume could be nonresident; however, there is not a way to         
distinguish that at this point in OPEN processing. Use JES                   
'/*SETUP' statements to assist operations for nonresident volumes that happen to
correspond to CA 1 controlled volume serial numbers.             



Thanks
-3nadh
Back to top
View user's profile Send private message
Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7315

PostPosted: Wed Mar 07, 2012 10:16 pm    Post subject: Re: IEBGENER step failed with S7F3 abend
Reply with quote

pravinj wrote:
Hello! I am trying to overwrite a TAPE file using IEBGENER with OLD disposition.

Code:
//STEP023  EXEC PGM=IEBGENER                                 
//SYSUT1     DD DSN=XXXX.CDROM.YTD,         
//           DISP=SHR                                         
//SYSUT2     DD DSN=TAPE.CDROM.YTD.G0013V00,DISP=OLD
//SYSIN      DD DUMMY                                         
//SYSPRINT   DD SYSOUT=*   


Both are FBA LRECL 133 RECFM files. IEBGENER step fails with the following message.

Code:
IEF233A M 0925,P65603,,S4669PJA,STEP023,  936                                   
TMS007  IEF233A M 0925,P65603(LENC;0009981),,S4669PJA,STEP023,TAPE.CDROM.YTD.G0013V00                                       
IECTMS3 0925,P65603,IS NOT SCRTCH (24)                                         
IEFTMS50 7XX- 04 S4669PJA,STEP023 ,SYSUT2  ,0925,P65603,000A8DROM.YTD.G0013V00X
IEFTMS50 ***** CA 1 ABEND,EX,04 *****                  **                       
+WER999A S4669PJA,STEP023 ,        -  UNSUCCESSFUL SORT 7F3 S REASON=00000004   
IEA995I SYMPTOM DUMP OUTPUT  001                     


What are the possible reasons for this issue?


Have to say, I've never tried that. Wouldn't expect it to "work". Fervently hope it wouldn't. It would be a "nightmare waiting to happen".
Back to top
View user's profile Send private message
pravinj

New User


Joined: 10 Jun 2008
Posts: 24
Location: india

PostPosted: Thu Mar 08, 2012 3:21 pm    Post subject: Reply to: IEBGENER step failed with S7F3 abend
Reply with quote

I checked with our tech support - storage management folks on this issue. I was informed, that the step failed as it's using a virtual tape and scratch wasn't possible due to live data on it.

Next steps on our analysis that actually worked was,
1) IEFBR14 step to delete the particular generation tape file

Code:
TAPE.CDROM.YTD.G0013V00,DISP=(MOD,DELETE,DELETE)


2) And then using the IEBGENER step to copy the overwrite content on the same generation file.

Code:
//STEP022  EXEC PGM=IEBGENER                               
//SYSUT1     DD DSN=WORK.CDROM.YTD,       
//           DISP=SHR                                       
//SYSUT2     DD DSN=TAPE.CDROM.YTD.G0013V00,     
//             DISP=(,CATLG,DELETE),                       
//             UNIT=CART,                                   
//             DCB=(MODEL,RECFM=FBA,LRECL=133,BLKSIZE=27930)
//SYSIN      DD DUMMY                                       
//SYSPRINT   DD SYSOUT=*       


Thanks for all your help on this!
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 ASP3 ABEND IN CICS Vedant CICS 0 Fri Oct 20, 2017 3:18 pm
No new posts Execute JCL step based on the content... sprikitik JCL & VSAM 2 Tue Oct 03, 2017 10:03 am
No new posts it is possible output a SET value fro... Martylin JCL & VSAM 5 Fri Sep 22, 2017 7:08 am
No new posts Restart=Step not working ALAK SAHA JCL & VSAM 6 Fri Jun 30, 2017 6:28 pm
No new posts C03 ABEND sjiraga PL/I & Assembler 1 Thu Jun 01, 2017 4:51 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us