I do not see "COMP-3" on any of your declarations.
COMP-3 is COBOL-speak for "packed decimal."
All of your fields are either character or zoned decimal.
You need to convert from zoned to packed decimal in order to do any arithmetic using those fields.
