DFTSUPL

This will provide defaults for adding a new 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    LOCN           'Location ID'                 5A
BOTH    EXCLEAD        'Exclude LT forecasting'      1  0
BOTH    CMBTYPE        'Comb. suppliers prod. seq.'  1  0
BOTH    GROUP1         'Supplier group1'            10A
BOTH    GROUP2         'Supplier group2'            10A
BOTH    GROUP3         'Supplier group3'            10A
BOTH    GROUP4         'Supplier group4'            10A
BOTH    GROUP5         'Supplier group5'            10A 
BOTH    HEADCST        'Order header cost'           7  2
BOTH    LINECST        'Order line cost'             5  2
BOTH    LEADTMQ        'Lead time quoted'            3  0
BOTH    LEADTMO        'Lead time orders'            3  0
BOTH    LEADTMV        'Lead time variance %'        3  1
BOTH    ORCYCLE        'Order cycle in days'         3  0
BOTH    SERVICE        'Service level target %'      3  1 
BOTH    MAX_DAYS       'Maximum frw buy days'        3  0
BOTH    BRKOTHR        'Bracket build other'         8A
BOTH    CONVPKP        'Convenience pack %'          3  1
BOTH    DSPTOT1        'Order total unit 1st'        1  0
BOTH    DSPTOT2        'Order total unit 2nd'        1  0
BOTH    PROCALT        'Process alt srce flag'       1  0

Comments