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
 
WER027A CONTROL FIELD BEYOND RECORD

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

New User


Joined: 22 Apr 2008
Posts: 42
Location: coimbatore

PostPosted: Thu Jul 24, 2014 10:10 pm    Post subject: WER027A CONTROL FIELD BEYOND RECORD
Reply with quote

Hi,

Can someone say me how I need to change the control card.

SYSIN :
SORT FIELDS=(23,3,CH,A,26,3,CH,A)
INREC FIELDS=(23,3,26,3)
WER276B SYSDIAG= 4549846, 7549468, 7549468, 4196550
WER164B 65,540K BYTES OF VIRTUAL STORAGE AVAILABLE, MAX REQUESTED,
WER164B 0 BYTES RESERVE REQUESTED, 992K BYTES USED
WER146B 32K BYTES OF EMERGENCY SPACE ALLOCATED
WER108I SORTIN : RECFM=FB ; LRECL= 38; BLKSIZE= 27930
WER073I SORTIN : DSNAME=TCV.SMS26D.R070.NEWACTY.MAT
WER257I INREC RECORD LENGTH = 6
WER027A CONTROL FIELD BEYOND RECORD
WER211B SYNCSMF CALLED BY SYNCSORT; RC=0000


Thanks
Jeba
Back to top
View user's profile Send private message

Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7314

PostPosted: Thu Jul 24, 2014 11:15 pm    Post subject: Reply to: WER027A CONTROL FIELD BEYOND RECORD
Reply with quote

INREC operates before SORT. So you are making a six-byte record, then trying to SORT on the original positions. Since you only seem to want those six bytes, SORT on (1,6,CH.A).

Use BUILD on INREC, OUTREC and OUTFIL (instead of FIELDS, FIELDS and OUTREC respectively) anyway. Won't fix your problem, but it'll drag your control cards into the 21st Century.
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 SYNCSORT keep MIN/MAX record Cloink SYNCSORT 16 Mon Sep 17, 2018 3:00 pm
No new posts Replace comp-3 field value to comp-3 ... dharmaraok DFSORT/ICETOOL 5 Fri Sep 14, 2018 3:46 pm
No new posts Extra data in overlay field speermb DFSORT/ICETOOL 2 Thu Sep 13, 2018 6:04 pm
No new posts RPG II Problem with unsigned Packed d... Andi1982 All Other Mainframe Topics 6 Tue Sep 11, 2018 6:11 pm
No new posts Sort card to find duplicates, without... anand1204 DFSORT/ICETOOL 15 Fri Aug 31, 2018 12:13 am

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