AcctNo         ;TXT     REQ IXD ;11 U                  ;0  ;0  ;
pay            ;NUM             ;-$9999999.00          ;1  ;0  ;
when           ;DAT             ;mm/dd/yy              ;2  ;0  ;
chkno          ;TXT             ;20 U                  ;3  ;0  ;
number         ;NUM CON         ;9999999.              ;4  ;0  ;>
SER ("acctpay")
payid          ;TXT CLC     IXD ;10 U                  ;5  ;0  ;>
LEFT$ (AcctNo,3) + STR$ (number,"0000000")
type           ;TXT             ;1 U                   ;6  ;0  ;

