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...
 

DFSORT VB to FB

THIS IS AN ARCHIVE FORUM: CLICK HERE TO GO TO THE ORIGINAL TOPIC

 
       IBMMAINFRAMES.com - IBM Mainframe Support Forums Index -> DFSORT/ICETOOL
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  
 
       IBMMAINFRAMES.com - IBM Mainframe Support Forums Index -> DFSORT/ICETOOL
Page 1 of 1
THIS IS AN ARCIVE FORUM IN READ ONLY MODE. IF YOU WANT TO ASK YOUR DOUBTS USE THE ACTUAL FORUM