CostingImplosionBOM

Costing Implosion BOM

Minor Business Rule

Object Name: N3003800

Parent DLL: CMFGBASE

Location: Client/Server

Language: NER

1. Functional Description

1.1. Purpose
The purpose of this business function is to implode BOM by reading its parent(s) directly from Parent
Child CACHE and update total cost to the parent(s). This function replaces UBE R30820 - Costing BOM
implosion.

2. Technical Specifications

2.2 Processing
• Get  first record in Item Information CACHE (B300370) with mode '1'
• While not end of CACHE
•
If (Process CoBy = '1')  AND  (Special handling code = 'R')

•
If  Reference Routing Item is NOT exist

•
Current Process Item = Item Number

•
Else

•
Current Process Item = Reference Routing Item

•
Verify routing

•
If routing is not exist with Item ACQ

•
Using zero BQTY

•
If routing existed, find Coby item in CACHE

•
Call "Initialize CoBy Product CACHE"

•
If (Process CoBy = '1')  AND  (Special handling code = 'R')

•
Call "Calculate Parent Cost Percent" (B3001670)

•
If A1 record does not exist in F30026

•
Write A1 record

•
Call "Update Current Level Cost" (B3001460)
• Clear "Process CoBy Product CACHE" (B3001650)
• If (Special handling code != 'R')

•
Call "Costing Get Where Used" (B3003820)
• Clear "Process CoBy Product CACHE"

•
If (Simulated Print = '2') and (Cost did not update)

•
Delete record in Item Information CACHE with mode '4'

•
Get next record in Item Information CACHE with mode '6'

• End while

Data Structure

D3003800 - Costing Implosion BOM

Parameter Name Data Item Data Type Req/Opt I/O/Both

cSingleLevel EV01 char OPT NONE

An option that specifies the type of processing for an event.

cProcessCobyProducts EV02 char OPT NONE

An option that specifies the type of processing for an event.

cSimulatedPrint EV03 char OPT NONE

A radio button that specifies the level at which trace/track result is to be displayed.  Select the Detail to display all transactions except IB, IX,
and IZ types.  Or, select Derivative Lots Only to display only those transactions that may have created new derivative lot.

szCostMethod LEDG char OPT 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
use.

szPurchaseItemCostMethod PCSM char OPT NONE

A user defined code (40/CM) that indicates the cost method that the system uses to determine the cost of the item for purchase orders. Cost
methods 01-19  are reserved for J.D. Edwards use.

jdAsOfDate ASDE1 JDEDATE OPT NONE

The date used for effectivity checking. Enter a specific date to display documents (orders, bills of material, routings, as applicable) that are
effective on or after that date. The current system date is the default, but you can enter any future or past date.

mnJobnumberA JOBS MATH_NUMERIC OPT NONE

The job number (work station ID) which executed the particular job.

szUserId USER char OPT NONE

The code that identifies a user profile.

mnTimeOfDay TDAY MATH_NUMERIC OPT NONE

The computer clock in hours:minutes:seconds.

jdDateUpdated UPMJ JDEDATE OPT NONE

The date that specifies the last update to the file record.

szWorkStationId JOBN char OPT NONE

The code that identifies the work station ID that executed a particular job.

szOutsideOpCostMethod LEDG char OPT 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
use.

Related Functions

None

Related Tables

None

Parameter Name	Data Item	Data Type	Req/Opt	I/O/Both
cSingleLevel	EV01	char	OPT	NONE
An option that specifies the type of processing for an event.
cProcessCobyProducts	EV02	char	OPT	NONE
An option that specifies the type of processing for an event.
cSimulatedPrint	EV03	char	OPT	NONE
A radio button that specifies the level at which trace/track result is to be displayed. Select the Detail to display all transactions except IB, IX, and IZ types. Or, select Derivative Lots Only to display only those transactions that may have created new derivative lot.
szCostMethod	LEDG	char	OPT	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 use.
szPurchaseItemCostMethod	PCSM	char	OPT	NONE
A user defined code (40/CM) that indicates the cost method that the system uses to determine the cost of the item for purchase orders. Cost methods 01-19 are reserved for J.D. Edwards use.
jdAsOfDate	ASDE1	JDEDATE	OPT	NONE
The date used for effectivity checking. Enter a specific date to display documents (orders, bills of material, routings, as applicable) that are effective on or after that date. The current system date is the default, but you can enter any future or past date.
mnJobnumberA	JOBS	MATH_NUMERIC	OPT	NONE
The job number (work station ID) which executed the particular job.
szUserId	USER	char	OPT	NONE
The code that identifies a user profile.
mnTimeOfDay	TDAY	MATH_NUMERIC	OPT	NONE
The computer clock in hours:minutes:seconds.
jdDateUpdated	UPMJ	JDEDATE	OPT	NONE
The date that specifies the last update to the file record.
szWorkStationId	JOBN	char	OPT	NONE
The code that identifies the work station ID that executed a particular job.
szOutsideOpCostMethod	LEDG	char	OPT	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 use.