Show Decimal Point in Output

[sahiljethi]

Hi,

Please NOTE the CODE BELOW:

Code: Select all

FILE OUTAUDIT FB(11 110)
OUT-AMT                 1  11  N 2
*--------------------WORKING STORAGE VARIABLES------------
  WS-AMT                  W   11   N 2                    
*----------------------JOB STATEMENT-----------------------------
 JOB INPUT INAUDIT                   
         DISPLAY 'WS-AMT: ' WS-AMT 
         OUT-AMT = WS-AMT          
 GOTO JOB

WS-AMT contains amount 50.00
Same amount is even getting displayed successfully in SYSOUT.

Code: Select all

WS-AMT:          50.00 

But the amount being written to file is:

Code: Select all

00000005000

I want the amount written to file should contain decimal S9(7).99.

Please help me with the same.

Thanks,
Sahil[/code]

[DikDude]

You need to define an edited output field that contains zero suppression and punctuation (the decimal point).