DeleteABCAnalysisWorkFile

Update ABC Analysis Work File

Minor Business Rule

Object Name: B4100770

Parent DLL: COPBASE

Location: Client/Server

Language: C

Functional Description

Purpose
Delete all records from the ABC Analysis Work File (F41UI003) matching Computer ID, Date, and Time.

Setup Notes and Prerequisites
Computer ID, Time, and Date must be retrieved once before calling the WriteABCAnalysisWorkFile.

Special Logic
None

Technical Specifications

This function deletes all records from F41UI003 (ABC Analysis Work File ).


^

Data Structure

D4100770B - Delete ABC Analysis Work File

Data Item Data Structure DescriptionI/ORequired

CTID        Computer ID             I  Y
UPMJ        Date                   I      Y
TDAY        Time                   I  Y

^

Parameter NameData ItemData TypeReq/OptI/O/Both
szComputerIDCTIDcharNONENONE

jdDateUPMJJDEDATENONENONE

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

mnTimeTDAYMATH_NUMERICNONENONE

The computer clock in hours:minutes:seconds.

Related Functions

None

Related Tables

F41UI003 ABC Analysis Detail - Work File
F41UI003CalculateABCCode

F41UI003CalculateABCCode

Update ABC Analysis Work File

Minor Business Rule

Object Name: B4100770

Parent DLL: COPBASE

Location: Client/Server

Language: C

Functional Description

Purpose
Calculate the ABC Analysis Code and Percentage for all records in the ABC Analysis Work File 
(F41UI003) and update the table.

Setup Notes and Prerequisites
Computer ID, Time, and Date must be retrieved once.

Special Logic
None

Technical Specifications

This function determines which ABC percent to use for compare. 
If SalesGrossAvgFlag = '1', the ABCPercents = ABCSalesPercents * 100
If SalesGrossAvgFlag = '2', the ABCPercents = ABCGrossMarginPrcnts * 100
If SalesGrossAvgFlag = '3', the ABCPercents = ABCAvgInvestmentPrcnts * 100

Next, it determines the F41UI003 Keys to retrieve the record.
Keys:   CTID, UPMJ, TDAY, and MCU
(If Consolidating Flag = '1', F41UI003 Keys::MCU =  ' ' 
or else F41UI003 Keys::MCU =  Branch/Plant Passed in)

Then it retrieves all records matching the keys. It calculates the Item Percentage (F41UI003::PCTM = 
( F41UI003::ENTC /  Total Cost ) % 100). 
Then, it calculates the ABC Code:
If   (F41UI003::PCTM <=  ABCPercent1 )
F41UI003::ABC0  = 'A'
End
If   ( ABCPercent1 > F41UI003::PCTM  AND F41UI003::PCTM <=  ABCPercent2 )
F41UI003::ABC0  = 'B'
End
If   ( ABCPercent2 < F41UI003::PCTM )
F41UI003::ABC0  = 'C'
End
If   ( Total Cost == 0)
F41UI003::ABC0  = Blank
End
It updates F41UI003.
^

Data Structure

D4100770C - Calculate ABC Analysis Code From F41UI003

Data Item Data Structure DescriptionI/ORequired

CTID        Computer ID             I   Y
UPMJ        Date                   I   Y
TDAY        Time                   I   Y
ITM        Short Item Number       I   Y
MCU        Branch/Plant             I   Y
ENTC        Total Cost             I   Y
IA1        ABCSalesPercent1       I   Y
IA2        ABCSalesPercent2       I     Y
IA3        ABCSalesPercent3       I   Y
IB1        ABCGrossMarginPercent1       I    Y
IB2        ABCGrossMarginPercent2       I   Y
IB3        ABCGrossMarginPercent3       I   Y
IC1        ABCAvgInvestmentPercent1 I   Y
IC2        ABCAvgInvestmentPercent2 I   Y
IC3        ABCAvgInvestmentPercent3 I   Y
EV01        SalesGrossAvgFlag       I   Y
EV01        ConsolidateFlag             I     Y

^

Parameter NameData ItemData TypeReq/OptI/O/Both
szComputerIDCTIDcharNONENONE

jdDateUPMJJDEDATENONENONE

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

mnTimeTDAYMATH_NUMERICNONENONE

The computer clock in hours:minutes:seconds.

mnShortItemNumberITMMATH_NUMERICNONENONE

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

szBranchPlantMCUcharNONENONE

An alphanumeric code that identifies a separate entity within a business for which you want to track costs. For example, a business unit 
might be a warehouse location, job, project, work center, branch, or plant. You can assign a business unit to a document, entity, or person for 
purposes of responsibility reporting. For example, the system provides reports of open accounts payable and accounts receivable by 
business unit to track equipment by responsible department. Business unit security might prevent you from viewing information about business units 
for which you have no authority.

mnABCSalesPercent1IA1MATH_NUMERICNONENONE

F41001: Inventory System  Constantab 

^

mnABCSalesPercent2IA2MATH_NUMERICNONENONE

F41001: Inventory System  Constantab 

^

mnABCSalesPercent3IA3MATH_NUMERICNONENONE

F41001: Inventory System  Constantab 

^

mnABCGrossMarginPercent1IB1MATH_NUMERICNONENONE

F41001: Inventory System  Constantab 

^

mnABCGrossMarginPercent2IB2MATH_NUMERICNONENONE

F41001: Inventory System  Constantab 

^

mnABCGrossMarginPercent3IB3MATH_NUMERICNONENONE

F41001: Inventory System  Constantab 

^

mnABCAvgInvestmentPrcnt1IC1MATH_NUMERICNONENONE

F41001: Inventory System  Constantab 

^

mnABCAvgInvestmentPrcnt2IC2MATH_NUMERICNONENONE

F41001: Inventory System  Constantab 

^

mnABCAvgInvestmentPrcnt3IC3MATH_NUMERICNONENONE

F41001: Inventory System  Constantab 

^

cSalesGrossAvgFlagEV01charNONENONE

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

cConsolidateFlagEV01charNONENONE

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

mnTotalCostECSTMATH_NUMERICNONENONE

For accounts receivable and accounts payable, the invoice (gross) amount. For sales orders and purchase orders, the unit cost times the 
number of units.

Related Functions

None

Related Tables

F41UI003 ABC Analysis Detail - Work File
UpdateABCAnalysisWorkFile

UpdateABCAnalysisWorkFile

Update ABC Analysis Work File

Minor Business Rule

Object Name: B4100770

Parent DLL: COPBASE

Location: Client/Server

Language: C

Functional Description

Purpose
Write a record to the ABC Analysis Work File (F41UI003).

Setup Notes and Prerequisites
Computer ID, Time, and Date must be retrieved once.

Special Logic
None

Technical Specifications
This function determines the number of Keys to use in the Fetch. 
If the Consolidating Flag (EV01) = '1', then the keys are :   CTID, UPMJ, TDAY, and ITM 
or else the keys are :   CTID, UPMJ, TDAY, ITM, and MCU.
Next, it retrieves the record from ABC Analysis Work File (F41UI003).  
If  record exist in F41UI003, it updates ENTC 
or else if the Consolidating Flag (EV01) = '1', F41UI003::MCU = ' ' 
or else F41UI003::MCU = Branch/Plant passed in
Then, the record is written with all the parameters passed in.
^

Data Structure

D4100770A - Update ABC Analysis Work File

Data Item Data Structure DescriptionI/ORequired

CTID        Computer ID             I   Y
UPMJ        Date                   I   Y
TDAY        Time                   I   Y
MCU        BranchPlant             I   Y
ITM        ShortItemNumber             I       Y
LITM        Second Item Number       I   Y
ENTC        Accumulated Cost       I   Y
EV01        ConsolidateFlag             I   Y
^

Parameter NameData ItemData TypeReq/OptI/O/Both
szComputerIDCTIDcharNONENONE

jdDateUPMJJDEDATENONENONE

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

mnTimeTDAYMATH_NUMERICNONENONE

The computer clock in hours:minutes:seconds.

szBranchPlantMCUcharNONENONE

An alphanumeric code that identifies a separate entity within a business for which you want to track costs. For example, a business unit 
might be a warehouse location, job, project, work center, branch, or plant. You can assign a business unit to a document, entity, or person for 
purposes of responsibility reporting. For example, the system provides reports of open accounts payable and accounts receivable by 
business unit to track equipment by responsible department. Business unit security might prevent you from viewing information about business units 
for which you have no authority.

mnShortItemNumberITMMATH_NUMERICNONENONE

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

cConsolidateFlagEV01charNONENONE

Enter a '1' to set Consolidate (use ITM as  key).ab 


^

mnAccumulatedCostECSTMATH_NUMERICNONENONE

For accounts receivable and accounts payable, the invoice (gross) amount. For sales orders and purchase orders, the unit cost times the 
number of units.

szItemDescriptionDSC1charNONENONE

Brief information about an item; a remark or an explanation.

szPrimaryItemNumberUITMcharNONENONE

A number that the system assigns to an item. It can be in short, long, or third item number format.

Related Functions

None

Related Tables

F41UI003 ABC Analysis Detail - Work File