I specialize in IBM z/OS COBOL and MicroFocus OCDS and Server Express non-OOP. Design, coding and performance oriented questions. Also linking to IBM Assembler from COBOL. Because the rules change with version, please state language level, version and platform environment. See CICS for questions about CICS.
Over 35 years working with COBOL on multiple platforms and OS.
Graduate, New York School of Computer Technology.
Major Financial Institutions, State of NC (DHHS), Manufacturing, Financial services, Warehousing, Software developer and others.
|Kevin||08/30/13||10||10||10||Thanks David. The manual had the over .....|
I am not sure what you are asking. See if this addresses what you need. The PROGRAM-ID is specified in the PROGRAM-ID Statement. If you need to pass it to another program you include the name as
The S0CA is Decimal Overflow Exception. While the implied data definition would indicate this should not occur, I am not sure what your specific compiler generates for code. If you define the result larger
There is no COBOL Standard defined limit. Any limits are imposed by the implementers (IBM, Microfocus, FUJITSU,etc.) for a specific compiler version. Limits are normally published as an appendix in
You need to do a numeric EDITed move. You get the results you have because the value is SIGNED and has all the leading zeros. Look in your manual for how to EDIT with ZERO SUPPRESS. (I want you to rely
Exactly what the results are depends on the version of COBOL and platform you are running on. The decimal point is LOGICAL, and will not show in a move you have set. Also. most versions will not convert