IBM Mainframe Forum

I would like to change value in column B based on the values in column B. Is this possible with sybcsort ?

123 456 789
abc def jhi

if column 1-3 has 'abc' then change column 789 to 'xyz'

Try this:

I dont believe ifthen is supported by syncsort. is there a way to do this using the change command ?

Hello,

Please notice that Alissa is a tech rep from Syncsort. . . .

I dont believe ifthen is supported by syncsort.

If my memory is working, ifthen has been in Syncsort for some time (since release 1.2.x) - which is no longer even the current product release. Release 1.3 became available many months ago.

Did you try the suggested code? What happened? If you've not tried this, do so and post any diagnostic info presented including the message ids.

..oh sorry about that. below is my current sort - I was trying to incorporate the suggested solution to the below sort. I need to chagne UNIT to '09702' only if ACCOUNT is one of '0036' OR '0041' OR '0042'



"Code"ed for readability

blexann,

Which release of SyncSort are you running? Did you try to code the IFTHEN statement? If you tried, but you got an error, what was the error message?

SYNCSORT FOR Z/OS 1.3.0.1R

I tried the below and it seems to do what I want. Please let me know if I am doing it correctly.

INCLUDE COND=((10,5,BI,EQ,X'000001000F'),OR,
(10,5,BI,EQ,X'000001001F'),OR,
(10,5,BI,EQ,X'000001003F'),OR,
(10,5,BI,EQ,X'000001021F'))
INREC IFTHEN=(WHEN=(1262,3,BI,EQ,X'00036F'),OVERLAY=(1271:X'85726F')),
IFTHEN=(WHEN=(1262,3,BI,EQ,X'00041F'),OVERLAY=(1271:X'85726F')),
IFTHEN=(WHEN=(1262,3,BI,EQ,X'00042F'),OVERLAY=(1271:X'85726F')),
IFTHEN=(WHEN=(1262,3,BI,EQ,X'00046F'),OVERLAY=(1271:X'85726F')),
IFTHEN=(WHEN=(1262,3,BI,EQ,X'00047F'),OVERLAY=(1271:X'85726F')),
IFTHEN=(WHEN=(1262,3,BI,EQ,X'00049F'),OVERLAY=(1271:X'85726F')),
IFTHEN=(WHEN=(1262,3,BI,EQ,X'00052F'),OVERLAY=(1271:X'85726F')),
IFTHEN=(WHEN=(1262,3,BI,EQ,X'04399F'),OVERLAY=(1271:X'85726F'))
SORT FIELDS=(1,5,PD,A,10,5,PD,A)
OUTREC FIELDS=(C'1',
2,4,PD,M11,LENGTH=7,
34C' ',
C'000',
10,5,PD,M11,LENGTH=9,
C'A0810',
C' ',
1271,3,PD,M11,LENGTH=5,
1262,3,PD,M11,LENGTH=4, * ACCOUNT
1271,3,PD,M11,LENGTH=5, * UNIT
1265,4,PD,M11,LENGTH=7,
C'0',
C'1 ',
1269,2,PD,M11,LENGTH=3)

blexann,

You can simplify the INCLUDE statement as follows:


You can also simplify the INREC statement as follows:

...waht does the L mean at the end of this statement ? INREC IFTHEN=(WHEN=(1262,3,BI,EQ,L


..thanks for your help

Hello,

The L indicates a List of Literal values follow.