1.Functional Description
1.1Purpose
This business function will read the cost components file F30026 and determine if a change has
occurred between the frozen and simulated net added costs, or the frozen and simulated total costs. If
there has been a change, then a flag will be returned to indicate this.
1.2Setup Notes and Prerequisites
1.3Special Logic
2.Technical Specifications
2.4Processing
1.0 Set key to F30026
move ds itm into itm, move ds mmcu into mmcu, move blanks into locn, move blanks into lotn,
move ds ledg into ledg.
2.0 Do until (no more F30026 records to read AND $chg equal blank ($chg is just a 1 char work
field))
2.1 fetch to F30026 with key set in step 1.0
2.2 if (fetch was successful)
2.2.1 work field 1 = XSMC - STDC (simulated net added cost minus frozen net
added cost)
2.2.2 work field 2 = XSCR - CSL (simulated total cost minus frozen net added cost)
2.2.3 If (work field 1 OR work field 2 does not equal zero)
then move '1' to $chg flag
end
end
end loop
3.0 Return the value of $chg into ds ev01.
^
D3000920 - Check Costs For Changed Items
Parameter Name | Data Item | Data Type | Req/Opt | I/O/Both |
---|---|---|---|---|
mnShortItemNumber | ITM | MATH_NUMERIC | NONE | NONE |
An inventory item number. The system provides three separate item numbers plus an extensive cross-reference capability to other item
| ||||
szBranchPlant | MMCU | char | NONE | NONE |
A code that represents a high-level business unit. Use this code to refer to a branch or plant that might have departments or jobs, which
| ||||
szCostMethod | LEDG | char | NONE | NONE |
A user defined code (40/CM) that specifies the basis for calculating item costs. Cost methods 01 through 19 are reserved for J.D. Edwards
| ||||
cItemChangedFlag | EV01 | char | NONE | NONE |
An option that specifies the type of processing for an event. | ||||
cSuppressErrorMessage | EV01 | char | NONE | NONE |
An option that specifies the type of processing for an event. | ||||
szErrorMessageID | DTAI | char | NONE | NONE |
A code that identifies and defines a unit of information. It is an alphanumeric code up to 8 characters long that does not allow blanks or
|
None |
F30026 Item Cost Component Add-Ons |