There are several formats for packing numeric fields in Cobol. Comp, comp-1, comp-2, comp-3, comp-4, comp-5, comp-x and probably more.
Each require their own table for the number of bytes used to store a specified number of digits (signed or unsigned).
My MicroFocus NetExpress Language...