[GartzenDeHaes]

People aren't getting that it was two characters that need to be added, not two bytes to make a short into an int. COBOL uses a fixed width character format for all data (yes even for COMP). If you want a four digit number, then you have to use 4 character positions. Ten digits? Then ten characters.

These field sizes have to hard coded into all parts of the COBOL program including data access, UI screens, batch jobs, intermediate files, and data transfer files.

[Per_Bothner]

"COBOL uses a fixed width character format for all data (yes even for COMP). If you want a four digit number, then you have to use 4 character positions."

That is incorrect. USAGE COMP will use binary, with the number number of bytes depending on the number of digits in the PIC. COMP-1 specifically takes 4 bytes. COMP-3 uses packed decimal (4 bits per digits).

[GartzenDeHaes]

That's what the specs say, but I found out it actually didn't work that way when I was working on a transpiler, at least for that installation.

[larrik]

yeah, I shouldn't have said "bytes" either, especially as I had AS/400's in mind when I wrote it.