IBM Mainframe Forum

Hello,

Below is the requirement

I need to take the count from trailer record (position 2 to 11) of my input file and have to write into FB output file

Input file: VB and record length=200

example:
H
D00000010001000GLBEB05*********
T00000000010000000001

I need a out put file as FB (80)

0000000001 (from the trailer record - position 2 to 11)

Can you please provide me the sort syntax for this?

Break your task down into pieces:

First you want to include all the records that you do want (the trailer). You do this with INCLUDE.

Then you want to create the data in your required format. You do this with BUILD.

BUILD can't live on its own, so has to be on INREC, OUTREC, OUTFIL or IFTHEN.



There is a very good DFSORT Getting Started manual. You should locate it, and work through it bit by bit. There are also many examples of Control Cards here and elsewhere. It is very simple to set up some experiments with DD * for your SORTIN and SYSIN.

Hi BillyBoyo,

I am getting error while using this. My input file is VB.

SYSOUT details:
SYNCSORT FOR Z/OS 1.4.1.0R U.S. PATENTS: 4210961, 5117495 (C) 2
Prudential Financial z/OS
SYNCSORT LICENSED FOR CPU SERIAL NUMBER 1D3F7, MODEL 2827 506
SYSIN :
OPTION COPY
INCLUDE COND=(1,1,CH,EQ,C'T')
INREC BUILD=(2,10)
WER276B SYSDIAG= 207369, 3306220, 3306220, 5168775
WER415I DSM FACILITY ACTIVE: STORAGE ADJUSTED BY 0 BYTES
WER164B 9,052K BYTES OF VIRTUAL STORAGE AVAILABLE, MAX REQUESTED,
WER164B 0 BYTES RESERVE REQUESTED, 1,180K BYTES USED
WER146B 20K BYTES OF EMERGENCY SPACE ALLOCATED
WER108I SORTIN : RECFM=VB ; LRECL= 204; BLKSIZE= 32720
WER073I SORTIN : DSNAME=BEJGB2.X186625.CONTROL.D131125.TEST2
WER235A INREC RDW NOT INCLUDED
WER211B SYNCSMF CALLED BY SYNCSORT; RC=0000
WER449I SYNCSORT GLOBAL DSM SUBSYSTEM ACTIVE

You have SyncSort, not DFSORT, so topic moved to correct part of the forum.

Sorry, I missed that your input was VB.

SORTOUT takes its its characteristics from SORTIN, with amendments from Control Cards.

To create an FB from a VB you need to use OUTFIL to convert it. Since a BUILD is needed for that, we shift the whole thing to OUTFIL:



Because a variable-length record has a four-byte RDW pre-pended, the start positions must change by adding four. The VTOF is to convert Variable TO Fixed length.

Hi BillyBoyo,

I am facing the following error:

SYSIN :


Please find my JCL :

sange-sherin

Please use the code tags when posting code/JCL/data and such like that requires a fixed pitch font. If you do not know how then either go into the full editor or search the forum.

What have you tried in order to fix the error? as far as I can see your input file is 204 bytes LRECL (4 rdw + 200 data) and your output file has LRECL= 80.

Hi NicC,

I am not able to understand the error.............

Can you please provide me a solution?

What do you not understand? You have a record of 200 bytes and you are trying to write it to a file with an LRECL of 80. 200 into 80 does not go.

HI NicC,

My output file should be FB 80... thats why i am writing to FB 80.

So you have to tell sort that you only want to build 80 bytes.