Read the SWM Parts Extension cache and create a new cache row. Also, read through the price history work file and copy
them when the parts line is split via WO Commitments.
-------------------------------
This business function is highly specialized. It is specifically to be used in
the SWM system for when a parts line is split by Work Order Commitments processing.
When splitting the original parts line (F3111), call this function to keep the
SWM extension records (F31171) in synch with the new line.
Without this function call, all pricing data and price history (if used) is not
copied. This function is required to keep the pricing data and any price history
correct for the new line.
Processing:
Read the exiting SWM Parts List Cache (B1702530). Use the job number, order number, and original cache row number. Buffer all returned data.
Save the UKIDP value from the original SWM Parts List Cache (it will be needed later when the price history is copied).
Call X0010 (system code 17 and index 5) to get the next UKIDP value.
Write a new SWM Parts List Cache (B1702530), using the new UKIDP. If the cache row number is not given, the SWM Parts List Cache function
will calculate a new row number based on the last row number. Pass the row number and the last row number back to the calling object. The calling
object will need to store the last row number on the main parts list MBF cache.
Select all price history work file record (F40UI74) based on original UKIDP. Loop through price history work file. For each record, assign the new
UKIDP and incoming line number and write the record back to the price history work file (F40UI74).
D1702870 - SWM Split Parts Extension
Parameter Name | Data Item | Data Type | Req/Opt | I/O/Both |
---|---|---|---|---|
mnJobnumber_JOBS | JOBS | MATH_NUMERIC | OPT | NONE |
The job number (work station ID) which executed the particular job. | ||||
mnOrderNumber_DOCO | DOCO | MATH_NUMERIC | OPT | NONE |
Pass the newly split main parts MBF cache line number. | ||||
mnComponentLineNumber_CPNB | CPNB | MATH_NUMERIC | OPT | NONE |
The calling object must pass the newly split component line number. This line
| ||||
nOriginalSWMCacheRow_INT01 | INT01 | integer | OPT | NONE |
The calling object must pass the original cache row that is to be split. | ||||
nNewSWMCacheRow_INT01 | INT01 | integer | OPT | NONE |
This is the new cache row number. It will be used when adding the new line to
| ||||
cProcessModuleFlag | EV01 | char | OPT | NONE |
An option that specifies the type of processing for an event. |
None |
None |