GPAHOLD

 Add P.O. Group Hold Outs 

BOTH            K3SOBJ            'K3S Object library'                10A
BOTH            COMP              'Company'                            1A
BOTH            COMPCOD           'Company code'                       3A
BOTH            USER              'User calling the program'          10A
BOTH            ERRORS            'Error indicator'                    1A
BOTH            ERRMSG            'Error message'                    100A
BOTH            ERRFIELD          'Field in error'                    20A
BOTH            IDLOCN            'Host Location ID'                   5A
BOTH            IDSUPL            'Supplier Number'                   10A
BOTH            IDSUPLSUB         'Supplier Sub Number'               10A
BOTH            SBBEGIN           'Begin  Date'                       10A
BOTH            SBEND             'Ending Date'                       10A
BOTH            SBHLDPON          'Hold PO #'                         10A
BOTH            SBHLDREAS         'Hold Reason'                       40A
BOTH            SBPROD            'Product ID'                        25A 
BOTH            SBHLDQTY          'Hold Quantity'                      7 0

Comments