Hard code a date value in a comp3 column of a file

raja1128 · New User Joined: 09 Jan 2007 Posts: 17 Location: india

Hi all,

I need to hard code a date value in a comp3 column of a file.
PIC 9(05) COMP-3

i did a 'hex on' and put the values '04111C' : (for 2004 and day 111)
It is abending with soc7. and i found out that the problem is with this date value i hard coded. i dont know if i have entered correct data in correct format. kindly help.

i file manager it look like below:

dick scherrer · Posted: Fri Apr 20, 2007 3:01 am

Hello,

What is abending? The sort or some other program trying to use the file?

Please post the jcl and control statements from the abended run as well as the error output.

Also, please post more of the data record in hex (using the "Code" tab at the top of the reply panel for readability).

This

Frank Yaeger · Posted: Fri Apr 20, 2007 4:32 am

raj,

It's unclear what you're doing or even what program or language you're using.

If you want to insert a P'04111' value with DFSORT, you can do it in a BUILD parameter in a couple of ways. Examples:

prasadvrk · Posted: Fri Apr 20, 2007 1:59 pm

It may be abending due to some other reason. First ascertain whether the format of the data you are supplying is correct. Are you sure it expects 04 for year and 111 for the number of the day,

raja1128 · New User Joined: 09 Jan 2007 Posts: 17 Location: india

hi all,

4111
011
41C

First line is just what we see when hex is off.
Actually soc7 was due to a empty file going to next step from the step which takes my file as input. it is not a sort.

i fixed it.
thank you all for support.

any ways, i am not sure if i had hard coded the s9(5) comp3 value correctly.
is my procedure correct?

regards.

dick scherrer · Posted: Fri Apr 20, 2007 11:46 pm

Hello,

Good to hear the problem is fixed

Yes, the way you manually created the comp-3 data will work for the field you described.