IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

OC4 in SORT


IBM Mainframe Forums -> DFSORT/ICETOOL
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
Mohan Kothakota

New User


Joined: 12 Apr 2016
Posts: 15
Location: INDIA

PostPosted: Tue Sep 12, 2017 6:30 pm
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: 8569
Location: Dubuque, Iowa, USA

PostPosted: Tue Sep 12, 2017 6:39 pm
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: 15
Location: INDIA

PostPosted: Tue Sep 12, 2017 7:23 pm
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 View Bookmarks
All times are GMT + 6 Hours
Forum Index -> DFSORT/ICETOOL

 


Similar Topics
Topic Forum Replies
No new posts Date conversion using SORT SYNCSORT 4
No new posts Which SORT utility can improve the Pe... DFSORT/ICETOOL 16
No new posts Using sort on VB records based on off... DFSORT/ICETOOL 6
No new posts COBOL VS SORT Utility for file format... COBOL Programming 6
No new posts Copying data from prev record using SORT SYNCSORT 19
Search our Forums:

Back to Top