Formats the name in 21 spaces for block 31 of the HCFA 1500. IBXSAVE("BOX31") is the name in format Last,first mi^ien in file 200