L21PROR

Last 21 days demand by week.

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         'Buy group ID'                5A
BOTH    IDLOCN         'Location ID'                 5A
BOTH    IDSUPL         'Supplier ID'                10A
BOTH    IDSUPLSUB      'Sub supplier ID'            10A
BOTH    IDSOQSEQN      'Suggest order seq #'         5 0
BOTH    IDPROD         'Product ID'                 25A
BOTH    TYW3DEM        'This year Week 3 Demand'     7 0
BOTH    TYW2DEM        'This year Week 2 Demand'     7 0
BOTH    TYW1DEM        'This year Week 1 Demand'     7 0
BOTH    TYAVG          'This year Average'           9 2
BOTH    TYW2PCT        'This Year Wk 2 % vs. Wk 3'   6A
BOTH    TYW1PCT        'This Year Wk 1 % vs. Wk 3'   6A
BOTH    LYW3DEM        'Last year Week 3 Demand'     7 0
BOTH    LYW2DEM        'Last year Week 2 Demand'     7 0
BOTH    LYW1DEM        'Last year Week 1 Demand'     7 0
BOTH    LYAVG          'Last year Average'           9 2
BOTH    LYW2PCT        'Last Year Wk 2 % vs. Wk 3'   6A
BOTH    LYW1PCT        'Last Year Wk 1 % vs, Wk 3'   6A
Comments