AUTO - Automated Add Days

APIs For This Group

ADDAUTO - Add Automated Add Days To The Supplier

BOTH    K3SOBJ         'K3S Object Library'         10A
BOTH    COMP           'Company'                     1A
BOTH    COMPCOD        'Company Code                3A
BOTH    USER           'User calling the program'   10
BOTH    ERRORS         'Error indicator'             1A
BOTH    ERRMSG         'Error message'             100A
BOTH    ERRFIELD       'Field in error'             20A
BOTH    IDBUYR         'Buyer ID'                    5A
BOTH    IDLOCN         'Location ID'                 5A
BOTH    SBRECTYPE      'Automated Add Days Type'     2A
BOTH    SBSUPL         'Supplier Code'              10A 
BOTH    SBSUPLSUB      'Sub-Supplier'               10A
BOTH    SBPROD         'Product ID'                 25A
BOTH    SBBEGIN        'Begin Date'                 10A 
BOTH    SBEND          'End Date'                   10A
BOTH    SBADDDAYS      'Add Days'                    2 0
BOTH    SBPERTYPE      'Perd Type{W-Week; M-Month)'  1A
BOTH    SBPERNUM       'Number of Periods'           2 0
BOTH    SBREASON       'Reason Code'                15A

CPYAUTO - Copy Automated Add Days To the Supplier

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            'Location ID'                        5A
BOTH            IDRECTYPE         'Automated Add Days Type'            2A
BOTH            IDSUPL            'Supplier Code'                     10A
BOTH            IDSUPLSUB         'Sub-Supplier'                      10A
BOTH            IDPROD            'Product ID'                        25A
BOTH            SBBUYR            'To Buyer ID'                        5A
BOTH            SBLOCN            'TO Location ID'                     5A
BOTH            SBSUPL            'TO Supplier Code'                   10A
BOTH            SBSUPLSUB         'TO Sub-Supplier'                    10A 
BOTH            SBPROD            'TO Product ID'                      25A
BOTH            SBREASON          'New Reason Code'                    15A

DELAUTO - Delete Automated Add Days To The Supplier

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            'Location ID'                        5A
BOTH            IDRECTYPE         'Automated Add Days Type'            2A
BOTH            IDSUPL            'Supplier Code'                     10A
BOTH            IDSUPLSUB         'Sub-Supplier'                      10A
BOTH            IDPROD            'Product ID'                        25A
BOTH            IDBEGIN           'Starting Date'                     10A
BOTH            IDEND             'Ending Date'                       10A

UPDAUTO - Update Automated Add Days To The Supplier

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            'Location ID'                        5A
BOTH            IDRECTYPE         'Automated Add Days Type'            2A
BOTH            IDSUPL            'Supplier Code'                     10A
BOTH            IDSUPLSUB         'Sub-Supplier'                      10A
BOTH            IDPROD            'Product ID'                        25A
BOTH            IDBEGIN           'Begin Date'                        10A
BOTH            IDEND             'End Date'                          10A
BOTH            SBBEGIN           'Begin Date'                        10A
BOTH            SBEND             'End Date'                          10A
BOTH            SBADDDAYS         'Add Days'                           2 0
BOTH            SBPERTYPE         'Perd Type{W-Week; M-Month)'         1A
BOTH            SBPERNUM          'Number of Periods'                  2 0
BOTH            SBREASON          'Reason Code'                       15A