Copy from VB to FB with added sequence number

bommu · New User Joined: 15 Dec 2006 Posts: 3 Location: India

Hi,

I have a input variable file with length of 450(446+4). My requirement is to copy it to a fixed output file with added sequence number for first 8 bytes. I used below code in SORT step, but it is giving me error. Please advise.

INREC BUILD=(SEQNUM,8,ZD,9:1,446)
SORT FIELDS=COPY

Error is below
ICE201I H RECORD TYPE IS V - DATA STARTS IN POSITION 5
ICE251A 2 MISSING RDW OR DATA FOR *INREC : REASON CODE 05, IFTHEN 0

Even I tried with below code, getting same error.

INREC BUILD=(SEQNUM,8,ZD,9:5,446)
SORT FIELDS=COPY

Bill Woodger · Posted: Thu Sep 24, 2015 3:30 am

If your input is variable-length and you want the output fixed, you need to convert it.

This is done on OUTFIL, using VTOF. You can also specify the BUILD there.

bommu · New User Joined: 15 Dec 2006 Posts: 3 Location: India

Thanks for your info.

I tried with below code, still getting error. Kindly advise.

SORT FIELDS=COPY
OUTFIL FNAMES=SORTOUT,VTOF,BUILD=(SEQNUM,8,ZD,1:5,446)

error:
ICE126A 9 INCONSISTENT REFORMATTING FOR SORTOUT : REASON CODE 04, IFTHEN 0

Bill Woodger · Posted: Thu Sep 24, 2015 10:00 pm

Did you look up the message, and see what the reason-code (4) means?

This is what I suggested:

bommu · New User Joined: 15 Dec 2006 Posts: 3 Location: India

Hi Bill, It is working fine now. Thank you.

Previously I was making some changes and I overlooked at your code. My apologies.

Thanks