Documentation >
MAC-PAC Technical Library >
Manufacturing >
Just-in-Time >
Programs >
Deduct Point Relief - Online - Purpose >
Deduct Point Relief - Online - Calculations
Deduct Point Relief - Online - Calculations
JT140E
A. Housekeeping
1. See the Common Processing Routines - Housekeeping section of this manual for a general discussion of this subroutine. Processing specific to this program is described below.
2. Parameter lists and key lists needed by the program are defined. Work fields and constants are defined and initialized.
3. The following information is retrieved from the Reference file (REFERP).
a. The operating system's file status codes (category 015) are retrieved. If the file access codes are not found, the program terminates.
b. Reference File category 409 is read to determine which plants the user is authorized to.
c. The default plant (category 428) is retrieved from the Reference file.
d. The date format (category 049) is retrieved. If this record is not found, a message is sent to the system operator, the date format defaults to MMDDYY, and processing continues.
e. The quantity field sizes (category 446) are retrieved. If they are not found, the program terminates.
4. The following information is retrieved from the System Control file (CT100M).
a. The Inventory Control control record (ICCTL1) is retrieved to check the Lot Option Parameter. The lot option defaults to Y if this record is not found.
B. Data Entry Screen
1. The data entry screen is displayed initially with all the fields except the plant field blank. If the part number is passed to the program through fast path or another program, the Part Number field is formatted with this value. If the plant is passed to the program through fast path or another program, the plant field is formatted with this value.
2. After all the appropriate fields have been entered and the user presses the ENTER key, the program validates the fields. See the Just-in-Time User Manual for validation rules.
3. If the transaction is invalid, the screen is redisplayed with the appropriate fields highlighted and with the corresponding error messages.
4. If the transaction is valid, it is written out to the Deduct Point Asynchronous Transaction file (JT140DP) and a message is sent to the monitor, which calls the Deduct Point Issues program (JT145E) to process the transaction.