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

An Outfile parm I am missing


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

New User


Joined: 25 Jan 2007
Posts: 39
Location: Charleston SC

PostPosted: Fri Jun 01, 2007 4:18 am
Reply with quote

I am overlooking the proper ?outfile' statement when I look through the DFSORT manual. So Frank I need your help.

I am attempting to create a file that contains an 80 byte FB record. The customer number of 001001 should be a constant in columns 1, 6 also the totals from several input records, in columns 7, 12, also in column 25 there should be a 'B' to identify the record type.

I have been successful in totaling the input record totals the total in the output record of 098500 I have verfied is correct; my problem is to place the constant of 001001, in columns 1, 6 of the output record.

The control cards that I am using to generate the file are as follows

Code:
//SYSIN    DD    *
  OPTION COPY
  OUTFIL REMOVECC,NODETAIL,
    BUILD=(1,73,80:X),
    TRAILER1=(5,6,
       TOT=(1,6,ZD,M11,LENGTH=6),C'000000000000',C'B')
/*


I have attempted two/three unsuccessful resolutions. The last output file is as follows

Code:
----+----1----+----2----+----3----+----4----+----5----+----6----+----7--
00    098500000000000000B
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Developer


Joined: 15 Feb 2005
Posts: 7129
Location: San Jose, CA

PostPosted: Fri Jun 01, 2007 4:54 am
Reply with quote

Quote:
my problem is to place the constant of 001001, in columns 1, 6 of the output record.


Not sure what you've tried, but you can put the constant in as a character string like this:

Code:

   TRAILER1=('001001',...)
Back to top
View user's profile Send private message
Bill Ross

New User


Joined: 25 Jan 2007
Posts: 39
Location: Charleston SC

PostPosted: Fri Jun 01, 2007 8:50 pm
Reply with quote

Thank you Sir the resolution worked for me.
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 JCL EXEC PARM data in C Java & MQSeries 2
No new posts Need to specify PARM='POSIX(ON) Java & MQSeries 4
No new posts How to pass the PARM value to my targ... COBOL Programming 8
No new posts Passing parm from JCL to Assembler, b... PL/I & Assembler 2
No new posts Find missing sequence for every key DFSORT/ICETOOL 3
Search our Forums:

Back to Top