To shift position of decimal point based on conditions

Vidhya Kalyanasundaram · New User Joined: 19 Jul 2007 Posts: 30 Location: chennai

Hi,

I have a requirement where the position of the decimal point need to vary depending upon the input amount calculated.

Using the EDIT clause, we can only specify a format that would be same throughout the file for all records as given in the below sort card.

OUTREC BUILD=(65:65,16,ZD,EDIT=(SIIIIIIIIT.TTTTTT),
SIGNS=(,-))

But depending on the o/p, Is there any option to vary the formatting fields?

I have attached below a sample o/p expected according to my requirement.

Frank Yaeger · Posted: Fri Oct 02, 2009 9:36 pm

You can use DFSORT's IFTHEN clauses to reformat different records in different ways.

It's not clear what "rules" you want to use to reformat your records one way or the other so I can't give you specifics, but the basic IFTHEN clause syntax would be something like this:

Vidhya Kalyanasundaram · New User Joined: 19 Jul 2007 Posts: 30 Location: chennai

Frank,

Thank you. I was able to solve the issue with the below IFTHEN-WHEN condition, in the sort card.

Escapa · Posted: Mon Oct 05, 2009 10:07 am

Hi Vidhya,
As Frank has suggested... for second ifthen no need to check the value of field, you can use WHEN=NONE