1) Copy the source for these 3 RPGLE programs from library K3S_FRESH into the customer’s 5MOD library and compile:
K3S_FRRSET
K3S_GARC01
K3S_SASA
2) Edit the customer’s existing K3S_1530 program with fresh logic. Compare the customer’s K3S_1530 to K3S_1530 in K3S_FRESH. This program gets called when building a supplier order if the tablecode is turned on. To turn this on, set flag1=1 for this tablecode record:
TA_CODETYP=APP
TA_CODEVAL=CHECK_U U1_U4_EXIT
TA_CODEDS1=Exit to U1 - U4 processing?
Program K3S_1530 is super, duper, uber important to test before you turn it on for the night job.
To test it, recalculate some orders. If that is successful, recalculate an entire buy group.
If all passes and gives the desired results, you are ready for the night job.
3) Edit the customer’s existing K3S_9941 program with logic to display fresh text. Compare the customer’s K3S_9941 to K3S_9941 in K3S_FRESH. The goal is to develop text tells the user what days the SOQ is covering along with the SOQ.
Example: Mon Tue Wed delivery 2,040
4) Edit the customer’s K3S_NIGHT program to call K3S_FRRSET. This will re-set any temporary patterns that were set during the day.
5) Edit the customer’s K3S_X310CL program to call K3S_SASA (passing the COMP parm!) This will force fresh orders due on the proper order days.
6) Edit K3S_POPARM that will default the arrival date for fresh suppliers. For newer customers this may require a simple un-commenting sections of code.
7) Set TA_FLAG1 = 1 for this tablecode; this will display the button for the user to add Fresh Replenishment in Supplier Settings:
Table code type.. BTN
Description…… Button Display in R6
Table code value. FRESH
8) OPTIONAL: If you need to enter the K_FRESH records with a program, you can copy in the source for K3S_FXFRSH from library K3S_FRESH into the customer’s 5MOD library. Edit the COMP/LOCN/SUPL/SUPLSUB values. Edit the ordering pattern details. Compile. Call the program.
