Reference
PACK source TO destination.
Obsolete: Packs the numeric content of a source character-type data object in the figures of a packed destination number.