F3102WriteStdVarianceForParent

F3102 Write Std Variance For Parent

Major Business Rule

Object Name: B3100970

Parent DLL: CMFGBASE

Location: Client/Server

Language: C

1.Functional Description

1.1Purpose
This business function will create/update the standard cost variances in the WO Variance table
(F3102) for a given work order.

1.2Setup Notes and Prerequisites
None.

1.3Special Logic
None.

2.Technical Specifications
2.4Processing
The following actions will be performed by the business function:

1. Set the Work fields TSTDC, TCSL, ASTDC equal to zeros.
2. Load ITM, MMCU, LOCN(=blanks), LOTN(=blanks) and  LEDG(='07') into the keys for reading the Cost
Component table (F30026).
3.  Do Until there are no more records,
Read a row from the F30026 table using the above partial keys.
If row found,
TSTDC = TSTDC + IESTDC
TCSL    = TCSL + IECSL
If EV01 (input Type) = 'P' and IECOST = 'A1',
ASTDC = IESTDC.
End If.
If IECOST <> 'A1'
Wk-OPAT = TRQT (input) x IESTDC
If IECOST = 'B2'
Wk OPAT = IESTDC * ACQ (input)
End If.
Load Audit Info.
IGUOM = Input UOM.
IGOPAT = Wk-OPAT
IGOPUN = TRQT(input) / MN29D9 (Input WO Conversion Factor)
Read F3102 table using Input DOCO,ITM and COST(=IECOST)as the key
If row found
Update F3102 row
Else
IGPART = 'P'
IGDOCO = Input DOCO
IGITM  = Input ITM
IGLITM = Input LITM
IGAITM = Input AITM
IGCOST = IECOST
Write F3102 row.
End If.
End If.
End If.
End Do.

4.  If RORN (input) = '        ' or RORN = 0 or STKT (input) <> 'C'and STKT <> 'K',
If TCSL <> 0
Wk-STDC = Wk-TSTDC.
Wk-CSL = Wk-TCSL.
Wk-CSL = Wk-CSL - Wk-STDC.
If EV01 (Input Type) = 'P',
Wk-CSL = Wk-CSL + Wk-ASTDC
End If.
IGOPAT = TRQT (input) x Wk-CSL
IGOPUN = TRQT / MN29D9 (Input WO Conversion Factor)
IGUOM = Input UOM
Load audit information
Read F3102 using input DOCO, ITM, and COST (= 'A1')
If row found,
Update F3102
Else
IGPART = 'P'
IGDOCO = Input DOCO
IGITM = Input ITM
IGLITM = Input LITM
IGAITM = Input AITM
IGCOST = 'A1'
Write F3102 Row
End If
End If.
End If.

If  any errors occur,  the function will return '1' in the Error Code field, and '0' if there are no
errors.

^

Data Structure

D3100970 - F3102 Write Std Variance For Parent

Parameter Name	Data Item	Data Type	Req/Opt	I/O/Both
mnOrderNumber	DOCO	MATH_NUMERIC	NONE	NONE
A number that identifies an original document. This document can be a voucher, a sales order, an invoice, unapplied cash, a journal entry, and so on.
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 numbers (see data item XRT) to accommodate substitute item numbers, replacements, bar codes, customer numbers, supplier numbers, and so forth. The item numbers are as follows: o Item Number (short) - An eight-digit, computer-assigned item number o 2nd Item Number - The 25-digit, free-form, user defined alphanumeric item number o 3rd Item Number - Another 25-digit, free-form, user defined alphanumeric item number
szSecondItemNumber	LITM	char	NONE	NONE
A number that identifies the item. The system provides three separate item numbers plus an extensive cross-reference capability to alternative item numbers. The three types of item numbers are: Item Number (short) An 8-digit, computer-assigned item number. 2nd Item Number A 25-digit, user defined, alphanumeric item number. 3rd Item Number Another 25-digit, user defined, alphanumeric item number. In addition to these three basic item numbers, the system provides an extensive cross-reference search capability. You can define numerous cross-references to alternative part numbers. For example, you can define substitute item numbers, replacements, bar codes, customer numbers, or supplier numbers.
szThirdItemNumber	AITM	char	NONE	NONE
The system provides three separate item numbers plus an extensive cross-reference capability to alternate item numbers. These item numbers are as follows: 1. Item Number (short) - An 8-digit, computer-assigned item number. 2. 2nd Item Number - The 25-digit, free-form, user defined alphanumeric item number. 3. 3rd Item Number - Another 25-digit, free-form, user defined alphanumeric item number. In addition to these three basic item numbers, an extensive cross-reference search capability has been provided (see XRT). Numerous cross references to alternate part numbers can be user defined, such as substitute item numbers, replacements, bar codes, customer numbers, or supplier numbers.
szBranch	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 represent lower-level business units, subordinate to it. For example: o Branch/Plant (MMCU) o Dept A (MCU) o Dept B (MCU) o Job 123 (MCU) Business unit security is based on the higher-level business unit.
szUnitOfMeasure	UOM	char	NONE	NONE
A user defined code (00/UM) that indicates the quantity in which to express an inventory item, for example, CS (case) or BX (box).
mnPrimaryOrderQty	TRQT	MATH_NUMERIC	NONE	NONE
A value that represents the available quantity, which might consist of the on-hand balance minus commitments, reservations, and backorders. You enter this value in the Branch/Plant Constants program (P41001).
mnAcctCostQty	ACQ	MATH_NUMERIC	NONE	NONE
An amount that the system uses in the Cost Rollup program to determine the allocation of setup costs. The system totals the setup costs and divides the sum by this quantity to determine a unit setup cost. The default is 1.
cType	EV01	char	NONE	NONE
An option that specifies the type of processing for an event.
szRelatedOrderNumber	RORN	char	NONE	NONE
A number that identifies a secondary purchase order, sales order, or work order that is associated with the original order. This number is for informational purposes only.
cStockingType	STKT	char	NONE	NONE
A user defined code (41/I) that indicates how you stock an item, for example, as finished goods or as raw materials. The following stocking types are hard-coded and you should not change them: 0 Phantom item B Bulk floor stock C Configured item E Emergency/corrective maintenance F Feature K Kit parent item N Nonstock The first character of Description 2 in the user defined code table indicates if the item is purchased (P) or manufactured (M).
mnWOConversionFactor	MN29D9	MATH_NUMERIC	NONE	NONE
This is a generic field used as a work field in Everest.
szProgramID	PID	char	NONE	NONE
The number that identifies the batch or interactive program (batch or interactive object). For example, the number of the Sales Order Entry interactive program is P4210, and the number of the Print Invoices batch process report is R42565. The program ID is a variable length value. It is assigned according to a structured syntax in the form TSSXXX, where: T The first character of the number is alphabetic and identifies the type, such as P for Program, R for Report, and so on. For example, the value P in the number P4210 indicates that the object is a program. SS The second and third characters of the number are numeric and identify the system code. For example, the value 42 in the number P4210 indicates that this program belongs to system 42, which is the Sales Order Processing system. XXX The remaining characters of the numer are numeric and identify a unique program or report. For example, the value 10 in the number P4210 indicates that this is the Sales Order Entry program.
cErrorCode	ERRC	char	NONE	NONE
This error code indicates if any errors occurred during the creation of the Trip Document Detail (F4914) records by the Delivery Document Set Server program (XT4914).

Related Functions

B9800100 Get Audit Information

Related Tables

F30026 Item Cost Component Add-Ons
F3102 Production Cost