Portal | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Forum Index
 
Register
 
IBM Mainframe Forum 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: 7312

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 Abend deletes last record written julietspringsteen ABENDS & Debugging 10 Fri Aug 21, 2020 7:45 pm
No new posts Problem getting record length of a re... amitc23 COBOL Programming 2 Thu Jul 02, 2020 10:52 pm
No new posts How to fetch the latest record from a... Dinesh Mani DFSORT/ICETOOL 8 Tue Jun 02, 2020 5:34 pm
No new posts Splice multiple records into single r... sarankriya DFSORT/ICETOOL 4 Wed Apr 15, 2020 10:55 pm
No new posts Compare Two datasets and get the 1st ... ArunkumarGanesan DFSORT/ICETOOL 7 Fri Mar 27, 2020 2:00 am

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