Removing the period or dot from the value using cobol logic.

gopinak · New User Joined: 23 Mar 2010 Posts: 1 Location: chennai

One of the column is having decimal point in the value.
E.x 00006.0000

The declaration of the column is COLUMN1 PIC X(10)

This value should get changed or converted to '0000060000' without the decimal point.

Could you please help on the logic using cobol.

Thanks in advance

expat · Posted: Wed May 09, 2018 2:28 pm

What have you tried so far, and what results do you get ?

What did Mr Google suggest ?

Robert Sample · Posted: Wed May 09, 2018 5:11 pm

Depending upon your version of COBOL, FUNCTION NUMVAL might be of assistance.

Rohit Umarjikar · Posted: Wed May 09, 2018 9:03 pm

Also to substitute NUMVAL, logically, you can loop thru by advancing 1 by1 the field value and the moment you hit "." just skip that and move the rest to the target field.

enrico-sorichetti · Posted: Wed May 09, 2018 9:31 pm

Chetan Kumar · New User Joined: 03 Dec 2012 Posts: 46 Location: India

Move this value to array that occurs 10 times. Then read the values 1 by 1 thru perform loop and when you get to '.' , skip this value and write rest of the values from the loop to another array field. Hope this helps..

Rohit Umarjikar · Posted: Fri May 11, 2018 9:35 pm