How to use IFTHEN and FIELDS in same the INREC

op · New User Joined: 31 Oct 2006 Posts: 48 Location: Chennai

Hi,

When using inrec in sort, i want to use IFTHEN and INREC fields at the same time.

For example,

If my input file(FB, LRECL=9) is:
UTHHJKADF
GTHMNGAVF
KGHGAJYUN

In the output file it should be as:
1st byte should be:
'1' IF 1,1,CH,EQ,C'U'
'2' IF 2,1,CH,EQ,C'T'
'3' IF 3,1,CH,EQ,C'H'

and the record as in input file will be placed in output file from position 2.
i.e. the output should be
1UTHHJKADF
2GTHMNGAVF
3KGHGAJYUN

The actual conditions i use are so huge, i planned to use
INREC IFTHEN to overlay the TEXT at the 1st position.

Now, HOW can i use INREC to place the input file record from position 2.

Your timely help will be highly appreciated.

Regards,
OP

Frank Yaeger · Posted: Tue Oct 31, 2006 9:25 pm

For each IFTHEN clause, you must use BUILD or OVERLAY to specify the action to be taken when the WHEN condition is satisfied. In your case, you would use BUILD in each IFTHEN clause. Here's a DFSORT job that will do what you asked for:

op · New User Joined: 31 Oct 2006 Posts: 48 Location: Chennai

Hi Yaeger,

Thanks a lot for the reply.

I want to write all the records that are not selected by any IFTHEN condition to other file. How do i do it?

Please help.

Regards,
OP

Frank Yaeger · Posted: Wed Nov 01, 2006 9:43 pm