Outrec IFTHEN builds data in wrong position

saikarthik94 · New User Joined: 04 Sep 2019 Posts: 12 Location: India

Hi,

I have a record like this.

123456,AAAA,3,,,,AAAA,3
657893,BBBB,1,,,,AAAA,5
213456,CCCC,1,,,DDDD,3

Let's assume AAAA,BBBB,CCCC,DDDD are some identifiers.

My expected output is:

123456,AAAA,1,,,,AAAA,2
657893,BBBB,1,,,,AAAA,5
213456,CCCC,1,,,DDDD,3

ie. after the first occurrence of AAAA, I want '1', at the second occurrence, I want one less than existing data(3-1=2)
I want to reformat the records which have AAAA in position 8 and 17. I want test of the records as same.

I have used OUTREC IFTHEN to achieve this.

OUTREC IFTHEN=(WHEN=INIT, BUILD=(1,250)
IFTHEN=(WHEN=(8,4,CH,EQ,C'AAAA',AND,17,4,CH,EQ,C'AAAA'),
BUILD=(1,11,12:C'1',13,9,23:23,1,ADD,ZD,-1)

But I m getting the subtracted value at 38th position, like shown below.

123456,AAAA,1,,,,AAAA, 2
657893,BBBB,1,,,,AAAA,5
213456,CCCC,1,,,DDDD,3

May i know why it is happening and how to over come this ?

Note: I have used SUB,1 in the build statement, i gave me syntax error, so that i have used ADD,-1 in the build.

saikarthik94 · New User Joined: 04 Sep 2019 Posts: 12 Location: India

This is the output i m getting :

123456,AAAA,1,,,,AAAA,< SPACES > 2
657893,BBBB,1,,,,AAAA,5
213456,CCCC,1,,,DDDD,3

I gave spaces in the previous post also but it dint consider.

Joerg.Findeisen · Posted: Sun Mar 01, 2020 3:44 pm

First of all use Code Tags.

Second, something is fishy with your input and provided SORT statements. The offsets are different to what you use. Assuming you have properly alligned input it could look like that:

Input:

Joerg.Findeisen · Posted: Sun Mar 01, 2020 4:03 pm

Minor Update, instead of BUILD use OVERLAY

Nic Clouston · Posted: Sun Mar 01, 2020 5:52 pm

Nothing to do with JCL. This is a sort question. There are sections in the forum for DFSort and Syncsort questions. Topic moved to DFSort.

saikarthik94 · New User Joined: 04 Sep 2019 Posts: 12 Location: India

Thanks, Mr.Joerg.

I have used OVERLAY as you suggested. I have got the output as expected. I have used TO=ZDF, as TO=ZD gave { in case if the data is 1.

for 22nd position, I used 22:22,1,ZD, SUB,+1, because using 13th position will give the result 0 for all the records as 1(13th position hardcoded)-1 = 0

Sure, I will use the CODE tag next post onwards. Thanks again

Joerg.Findeisen · Posted: Sun Mar 01, 2020 8:24 pm

I noticed the glitch with position myself but could not edit anymore.

Glad it works so far.