Hi,
I've been away from Cobol for a while and need some advice on how to accomplish something. I'm working on an HP3000, MPEXL OS Using HP CobolII. I have an alphanumeric field which is 7 characters long, Pic x(07). However, the values contained in this field represent numeric dollar amounts such as: 100.00
10.00
1.00
.10
.01
The data is always left-justified and the decimal point can appear anywhere in the first 5 digits of the field. I need to convert this value into its correct numeric representation in the format of Pic 9(04)v99, so it can be added to other totals. I'm looking into Unstring and Inspect commands, but am short on time. Any advice would be greatly appreciated. Thanks
I've been away from Cobol for a while and need some advice on how to accomplish something. I'm working on an HP3000, MPEXL OS Using HP CobolII. I have an alphanumeric field which is 7 characters long, Pic x(07). However, the values contained in this field represent numeric dollar amounts such as: 100.00
10.00
1.00
.10
.01
The data is always left-justified and the decimal point can appear anywhere in the first 5 digits of the field. I need to convert this value into its correct numeric representation in the format of Pic 9(04)v99, so it can be added to other totals. I'm looking into Unstring and Inspect commands, but am short on time. Any advice would be greatly appreciated. Thanks