HOLD - Hold Outs

APIs For This Group

ADDHOLD - Add 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            IDBUYR            'Buyer ID'                           5A
BOTH            IDLOCN            'Host Location ID'                   5A
BOTH            IDSUPL            'Supplier Number'                   10A
BOTH            IDSUPLSUB         'Supplier Sub Number'               10A
BOTH            IDPROD            'Product ID'                        25A
BOTH            SBBEGIN           'Begin  Date'                       10A
BOTH            SBEND             'Ending Date'                       10A
BOTH            SBHLDPON          'Hold PO #'                         10A
BOTH            SBHLDREAS         'Hold Reason'                       40A
BOTH            SBHLDQTY          'Hold Quantity'                      7 0

DELHOLD - Delete Hold Out

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            IDBUYR            'Buyer ID'                           5A
BOTH            IDLOCN            'Host Location ID'                   5A
BOTH            IDSUPL            'Supplier Number'                   10A
BOTH            IDSUPLSUB         'Supplier Sub Number'               10A
BOTH            IDPROD            'Product ID'                        25A
BOTH            IDBEGIN           'Starting Date'                     10A
BOTH            IDEND             'Ending Date'                       10A
BOTH            IDHLDREAS         'Hold Reason'                       40A
BOTH            IDTIMESTP         'Time Stamp'                        26A

GENHOLD - Generate Hold Out Entries

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            IDBUYR            'Buyer Group'                        5A
BOTH            IDLOCN            'Host Location ID'                   5A
BOTH            SBBUYR            'Buyer Group'                        5A
BOTH            SBLOCN            'Location'                           5A
BOTH            SBREGN            'Region ID'                          5A
BOTH            SBSUPL            'Supplier'                          10A
BOTH            SBSUPLSUB         'Supplier Sub'                      10A
BOTH            SBSUPLUSR         'User Supplier'                     10A
BOTH            SBSUPLUSB         'User Supplier Sub'                 10A
BOTH            SBSUPLG1          'Supplier Group 1'                  10A
BOTH            SBSUPLG2          'Supplier Group 2'                  10A
BOTH            SBSUPLG3          'Supplier Group 3'                  10A
BOTH            SBSUPLG4          'Supplier Group 4'                  10A
BOTH            SBSUPLG5          'Supplier Group 5'                  10A
BOTH            SBPRODG1          'Product Group 1'                   10A 
BOTH            SBPRODG2          'Product Group 2'                   10A
BOTH            SBPRODG3          'Product Group 3'                   10A
BOTH            SBPRODG4          'Product Group 4'                   10A
BOTH            SBPRODG5          'Product Group 5'                   10A  
BOTH            SBHLDREAS         'Hold Reason Code'                  40A
BOTH            SBHLDPER          'Hold Percent Increase'              6 3
BOTH            SBHLDQTY          'Hold Quantity'                      7 0
BOTH            SBBEGIN           'Beginning Date'                    10A
BOTH            SBEND             'Ending Date '                      10A

GPCHOLD - Copy all 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            IDBUYR            'Buyer Group'                        5A
BOTH            IDLOCN            'Host Location ID'                   5A
BOTH            SBBUYR            'Buyer Group'                        5A
BOTH            SBLOCN            'Location'                           5A
BOTH            SBREGN            'Region ID'                          5A
BOTH            SBSUPL            'Supplier'                          10A
BOTH            SBSUPLSUB         'Supplier Sub'                      10A
BOTH            SBSUPLUSR         'User Supplier'                     10A
BOTH            SBSUPLUSB         'User Supplier Sub'                 10A
BOTH            SBSUPLG1          'Supplier Group 1'                  10A
BOTH            SBSUPLG2          'Supplier Group 2'                  10A
BOTH            SBSUPLG3          'Supplier Group 3'                  10A
BOTH            SBSUPLG4          'Supplier Group 4'                  10A
BOTH            SBSUPLG5          'Supplier Group 5'                  10A
BOTH            SBPRODG1          'Product Group 1'                   10A 
BOTH            SBPRODG2          'Product Group 2'                   10A
BOTH            SBPRODG3          'Product Group 3'                   10A
BOTH            SBPRODG4          'Product Group 4'                   10A
BOTH            SBPRODG5          'Product Group 5'                   10A  
BOTH            SBHLDREAS         'Hold Reason Code'                  40A
BOTH            SBHLDPER          'Hold Percent Increase'              6 3
BOTH            SBHLDQTY          'Hold Quantity'                      7 0
BOTH            SBBEGIN           'Beginning Date'                    10A
BOTH            SBEND             'Ending Date '                      10A

GPDHOLD - Delete all 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            IDHLDPON          'Hold PO #'                         10A
BOTH            IDHLDREAS         'Hold Reason Code'                  40A
BOTH            IDBEGIN           'Beginning Date'                    10A
BOTH            IDEND             'Ending Date'                       10A

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

GPDHOLD - Delete 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            'Hold Location ID'                   5A 
BOTH            IDHLDPON          'Hold PO Number'                    10A
BOTH            IDHLDREAS         'Hold Reason'                       40A
BOTH            IDBEGIN           'From Date'                         10A
BOTH            IDEND             'To Date'                           10A
BOTH            IDPROD            'Hold Product'                      25A

GUPHOLD - Update 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            IDBUYR            'Hold Buyer ID'                      5A
BOTH            IDLOCN            'Hold Location ID'                   5A
BOTH            IDHLDPON          'Hold PO #'                         10A
BOTH            IDHLDREAS         'Hold Reason'                       40A
BOTH            IDBEGIN           'From Date'                         10A
BOTH            IDEND             'To Date'                           10A
BOTH            IDPROD            'Hold Product'                      25A
BOTH            SBHLDQTY          'Hold Quantity'                      7 0

GRCHOLD - Copy all Product 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            IDHLDPON          'Hold PO #'                         10A
BOTH            IDHLDREAS         'Hold Reason Code'                  40A
BOTH            IDBEGIN           'Beginning Date'                    10A
BOTH            IDEND             'Ending Date'                       10A
BOTH            SBHLDREAS         'Hold Reason'                       40A
BOTH            SBBEGIN           'Begin  Date'                       10A
BOTH            SBEND             'Ending Date'                       10A
BOTH            SBLOCN            'Location ID'                        5A
BOTH            SBDLTFLG          'Delete Flag'                        1A
BOTH            SBHLDPON          'Hold PO #'                         10A 

GRDHOLD - Delete all Product 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            IDHLDPON          'Hold PO #'                         10A
BOTH            IDHLDREAS         'Hold Reason Code'                  40A
BOTH            IDBEGIN           'Beginning Date'                    10A
BOTH            IDEND             'Ending Date'                       10A

GRAHOLD - Add Product 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            IDBUYR            'Host Buyer ID'                      5A
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

GDRHOLD - Delete Product 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            'Hold Location ID'                   5A
BOTH            IDHLDREAS         'Hold Reason'                       40A
BOTH            IDBEGIN           'From Date'                         10A
BOTH            IDEND             'To Date'                           10A

GURHOLD - Update Product 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            'Hold Location ID'                   5A
BOTH            IDHLDPON          'Hold PO #'                         10A
BOTH            IDHLDREAS         'Hold Reason'                       40A
BOTH            IDBEGIN           'From Date'                         10A
BOTH            IDEND             'To Date'                           10A
BOTH            IDPROD            'Hold Product'                      25A
BOTH            IDTIMESTP         'Time Stamp'                        26A
BOTH            SBBEGIN           'From Date'                         10A
BOTH            SBEND             'To Date'                           10A
BOTH            SBHLDREAS         'Hold Reason'                       40A
BOTH            SBHLDQTY          'Hold Quantity'                      7 0

UPDHOLD - Update 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            IDBUYR            'Host Buyer ID'                      5A
BOTH            IDLOCN            'Host Location ID'                   5A
BOTH            IDSUPL            'Supplier Number'                   10A
BOTH            IDSUPLSUB         'Supplier Sub Number'               10A
BOTH            IDPROD            'Product ID'                        25A
BOTH            IDBEGIN           'Starting Date'                     10A
BOTH            IDEND             'Ending Date'                       10A
BOTH            IDHLDREAS         'Hold Reason '                      40A
BOTH            IDTIMESTP         'Time Stamp'                        26A
BOTH            SBBEGIN           'New Starting Date'                 10A
BOTH            SBEND             'New Ending Date'                   10A
BOTH            SBHLDREAS         'New Hold reason'                   40A                                                
BOTH            SBHLDQTY          'Hold Out Quantity'                  7 0