UPDSUPL

This will update a 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         'ID Buyer'                    5A 
BOTH    IDLOCN         'ID location'                 5A
BOTH    IDSUPL         'ID Supplier'                10A
BOTH    IDSUPLSUB      'ID sub supplier ID'         10A
BOTH    SBBUYR         'Buy group ID'                5A
BOTH    SBREGN         'Region ID'                   5A
BOTH    SBEXCLEAD      'Exclude LT forecasting'      1  0
BOTH    SBCMBTYPE      'Comb. suppliers prod. seq.'  1  0
BOTH    SBNAME         'Name'                       40A
BOTH    SBDISPSEQ      'Display sequence'           20A
BOTH    SBGROUP1       'Supplier group1'            10A
BOTH    SBGROUP2       'Supplier group2'            10A
BOTH    SBGROUP3       'Supplier group3'            10A
BOTH    SBGROUP4       'Supplier group4'            10A
BOTH    SBGROUP5       'Supplier group5'            10A
BOTH    SBHEADCST      'Order header cost'           7  2
BOTH    SBLINECST      'Order line cost'             5  2
BOTH    SBLEADTMQ      'Lead time quoted'            3  0
BOTH    SBLEADTMO      'Lead time orders'            3  0
BOTH    SBLEADTMV      'Lead time variance %'        3  1
BOTH    SBORCYCLE      'Order cycle in days'         3  0
BOTH    SBSERVICE      'Service level target %'      3  1
BOTH    SBMAXDAYS      'Maximum frw buy days'        3  0
BOTH    SBADD_DAY      'Add days order point'        3  0
BOTH    SBPRECISE      'Precise order flag'          1  0
BOTH    SBAUTOPO       'Auto PO flag'                1  0
BOTH    SBREQSPLT      'Required split flag'         1  0
BOTH    SBSPLTYPE      'Order split type'            3A
BOTH    SBPOTYPE       'PO type default'             1A
BOTH    SBBRKOTHR      'Bracket build other'         8A
BOTH    SBCONVPKP      'Convenience pack %'          3  1
BOTH    SBDSPTOT1      'Order total unit 1st'        1  0
BOTH    SBDSPTOT2      'Order total unit 2nd'        1  0
BOTH    SBPROCALT      'Process alt srce flag'       1  0
BOTH    SBREBATE       'Rebate factor %'             3  1
BOTH    SBCASHDSC      'Cash discount %'             3  1
BOTH    SBPREFSEQ      'Preference sequence'         3  0

Comments