The problem was that I was not able to declare a variable which will store the maximum decimal and integer part privide in the file. the maximum integer can be 13 digits and decimal can be 13 digits. ...
I have an input file which give price in decimal format in a record of PIC X(14). The decimal point in this field can occur in any place Eg: it can be 123.45 or 123456789012.1 or 12.12345678987 etc... ...