| IBM MAINFRAME HELP & SUPPORT FORUMS Technical Forums for IBM Mainframe Applications like COBOL, JCL, CICS, DB2, FileAid, DFSORT, Endevor, Xpediter, CoolGen, CA-7&11, AbendAid, IMS, IDMS, PL/I, MqSeries, SyncSort, Assembler, ChangeMan, Easytrieve, InterTest, REXX, CLIST etc...
|
| View previous topic :: View next topic |
| Author |
Message |
aniceg
Joined: 04 Apr 2008
Posts: 8
Location: chennai
|
| Posted: Tue Jul 08, 2008 3:03 pm Post subject: DFSORT VB to FB |
|
|
This jcl will convert a file of format variable to fixed.
Code:
//JS110 EXEC PGM=SORT
//SYSOUT DD SYSOUT=(,)
//SORTIN DD DSN=INPUT ,DISP=SHR----------------------VB 275
//SORTOF01 DD DSN=OUT,
// DISP=(,CATLG,DELETE),
// UNIT=DISK,MGMTCLAS=AMLYBW,SPACE=(TRK,(100,100),RLSE)
//SYSIN DD *
OPTION COPY
OUTFIL FNAMES=SORTOF01,VTOF,
OUTREC=(5,269)
/*
I get UHGV - ABENDED S000 U0126
following error in spool
RECORD TYPE IS V - DATA STARTS IN POSITION 5
VLSHRT NOT USED FOR SORT, MERGE, INCLUDE, OMIT OR SUM STATEMENT FIELDS
INCONSISTENT *OUTREC IFTHEN 0 REFORMATTING FIELD FOUND
C5-K26318 C6-K90007 C7-K90000 C8-K23476 E9-K90007 E7-K24705
END OF DFSORT |
|
| Back to top |
|
Frank Yaeger
Joined: 15 Feb 2005
Posts: 4613
Location: San Jose, CA
|
| Posted: Tue Jul 08, 2008 9:36 pm Post subject: |
|
|
Something does not add up here. The error message you show does NOT match the control statements you show. I think you've mixed things up.
You are using an OUTFIL statement, but the ICE126A shows *OUTREC. It would only show *OUTREC if you were using an OUTREC statement, not an OUTFIL statement.
You need to go back and check what you're doing. If you got the ICE126A while using an OUTFIL statement, show the JCL and error messages associated with that. If you got the ICE126A while using an OUTREC statement, show the JCL and error messages for that. |
|
| Back to top |
|
| |
THIS IS AN ARCIVE FORUM IN READ ONLY MODE. IF YOU WANT TO ASK YOUR DOUBTS USE THE ACTUAL FORUM
|