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
 
OC4 in SORT

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL
View previous topic :: :: View next topic  
Author Message
Mohan Kothakota

New User


Joined: 12 Apr 2016
Posts: 12
Location: INDIA

PostPosted: Tue Sep 12, 2017 6:30 pm    Post subject: OC4 in SORT
Reply with quote

Hi All,

My Input file 'DJZB.TRN.MSK.CMP(0)' is on Tape and output file is 'DJZB.MST.MSK.REMOVE.CLOSINGS' is VSAM file.

I am trying to copy Tape GDG into VSAM. Below is my condition

Code:
//JSTEP010 EXEC PGM=SORT,PARM='RESET'               
//SORTIN01 DD  DSN=DJZB.TRN.MSK.CMP(0),             
//                DISP=SHR                             
//SORTOUT  DD  DSN=DJZB.MST.MSK.REMOVE.CLOSINGS,     
//                DISP=SHR                             
//SYSOUT   DD  SYSOUT=*                             
//SYSIN      DD  *                                     
 MERGE FIELDS=(1,27,A),FORMAT=CH                     
 SUM FIELDS=NONE                                     
 RECORD TYPE=F,LENGTH=(91,91)                       
/*                                                   
//*           


I am getting below Abend

Code:
07.48.44 JOB21603  IEA995I SYMPTOM DUMP OUTPUT  600                             
   600             SYSTEM COMPLETION CODE=0C4  REASON CODE=00000004             
   600              TIME=07.48.42  SEQ=36184  CPU=0000  ASID=009F               
   600              PSW AT TIME OF ERROR  078D3000   0000F3CE  ILC 4  INTC 04   
   600                NO ACTIVE MODULE FOUND                                   
   600                NAME=UNKNOWN                                             
   600                DATA AT PSW  0000F3C8 - 18549230  50004150  50109220     
   600                AR/GR 0: 00003FFF/00000000   1: 00000000/00000000         
   600                      2: 00000000/00000000   3: 00000000/00000000         
   600                      4: 00000000/0000008C   5: 00000000/0000008C         
   600                      6: 00000000/000001E0   7: 00000000/00000000         
   600                      8: 00000000/0EF01000   9: 00000000/00000000         
   600                      A: 00000000/0001550C   B: 00000000/0000F088         
   600                      C: 00000000/0000C910   D: 00000000/0000E000         
   600                      E: 00000000/00000000   F: 00000000/0000F088         
   600              END OF SYMPTOM DUMP                                         
07.48.44 JOB21603  IEF450I IDB111LA JSTEP030 - ABEND=S0C4 U0000 REASON=00000004
   601                     TIME=07.48.44       




Thanks,
Mohan Kothakota

Coded - do it yourself next time
Back to top
View user's profile Send private message

Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8154
Location: East Dubuque, Illinois, USA

PostPosted: Tue Sep 12, 2017 6:39 pm    Post subject: Reply to: OC4 in SORT
Reply with quote

Wouldn't you want
Code:
MERGE FIELDS=COPY
as what you have provided REQUIRES you to have at least SORTIN01 AND SORTIN02 DD statements, which your JCL does not show. The lack of the DD statement certainly could cause an ABEND.
Back to top
View user's profile Send private message
Mohan Kothakota

New User


Joined: 12 Apr 2016
Posts: 12
Location: INDIA

PostPosted: Tue Sep 12, 2017 7:23 pm    Post subject: Reply to: OC4 in SORT
Reply with quote

Thanks Robert, I have found the issue it is due to space issue in the certain volume so I have changed first level qualifier the same sort has 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 -> DFSORT/ICETOOL All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Difference in SORT & ICETOOL Mohan Kothakota DFSORT/ICETOOL 5 Fri Sep 22, 2017 4:56 pm
No new posts SORT Trailer Count - LRECL Output co... amorante DFSORT/ICETOOL 5 Tue Aug 29, 2017 8:57 pm
No new posts Changing sort Card Dynamically vickey_dw DFSORT/ICETOOL 5 Sat Aug 19, 2017 2:33 pm
No new posts SORT to unpack a feild shr_amar DFSORT/ICETOOL 7 Fri Jul 07, 2017 4:32 am
No new posts How to write Specific Fields from Mul... Padhu SYNCSORT 6 Thu Jul 06, 2017 10:26 am

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