DECCBSP

Delete child 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            'Host Buyer    ID'                   5A
BOTH            IDLOCN            'Host Location'                      5A 
BOTH            IDSUPL            'Host Supplier'                     10A
BOTH            SBBUYR            'Combined Buyer'                     5A
BOTH            SBLOCN            'Combined Location'                  5A  
BOTH            SBSUPL            'Combined Supplier'                 10A
BOTH            SBSUPLSUB         'Combined Supplier Sub'             10A

Comments