F1201ComponentSwap

F1201 Component Swap

Minor Business Rule

Object Name: N1702430

Parent DLL: CCRIN

Location: Client/Server

Language: NER

Functional Description

Purpose
The purpose of this function is to perform the changeout when two components are swapped.

Setup Notes and Prerequisites

Special Logic
Required Fields

• NUMB MnReplacedComponent
• NUMB MnNewComponent

Technical Specification
Retrieve original replaced component information from F1201.
Retrieve original new component information from F1201.
Retrieve Audit information.

If input effective date is not blank, assign the update date to be input effective date.
If input effective time is not blank, assign the update time to be input effective time.

// Assign correct values for replaced component to be ready to update F1201
If current customer number of replaced component is not equal to original customer number,
Assign final customer number of replaced component to be current customer number, else
Assign final customer number of replaced component to be original customer number.

If current site number of replaced component is not equal to original site number,
Assign final site number of replaced component to be current site number, else
Assign final site number of replaced component to be original site number.

If current business unit number of replaced component is not equal to original business unit number,
Assign final business unit number of replaced component to be current business unit number, else
Assign final business unit number of replaced component to be original business unit number.

If current equipment status of replaced component is not equal to original equipment status,
Assign final equipment status of replaced component to be current equipment status, else
Assign final equipment status of replaced component to be original equipment status.

// Assign correct values for new component to be ready to update F1201
If current customer number of new component is not equal to original customer number,
Assign final customer number of new component to be current customer number, else
Assign final customer number of new component to be original customer number.

If current site number of new component is not equal to original site number,
Assign final site number of new component to be current site number, else
Assign final site number of new component to be original site number.

If current equipment status of new component is not equal to original equipment status,
Assign final equipment status of new component to be current equipment status, else
Assign final equipment status of new component to be original equipment status.

If current business unit number of new component is not equal to original business unit number,
Assign final business unit number of new component to be current business unit number, else
Assign final business unit number of new component to be original business unit number

// Swap Component
If input new components parent is not equal to itself
Change replaced component's parent to be new component's parent and update parent history
Else change replaced component's parent to be it.

If input replaced components parent is not equal to itself
Change new component's parent to be replaced component's parent and update parent history
Else change new component's parent to be it.

If the flag Move children is not set on
Move children back to their new parent by calling B1702440

// Update Replaced Component data
Update Location of the Replaced Component by calling N1300130
If flag is turned on to update children, then update children.

Update Equipment Status of the Replaced Component by calling B1300020
If flag is turned on to update children, then update children.

Update customer and site of the Replaced Component by calling N1700230
(N1700230 has the logic to check the asset has valid contract)
If flag is turned on to update children, then update children.

Update Responsible business unit of the Replaced Component by calling B1200040
If flag is turned on to update children, then update children.

//Update New Component data
Update Location of the New Component by calling N1300130
If flag is turned on to update children, then update children.

Update Equipment Status of the New Component by calling B1300020
If flag is turned on to update children, then update children.

Update customer and site of the New Component by calling N1700230
(N1700230 has the logic to check the asset has valid contract)
If flag is turned on to update children, then update children.

Update Responsible business unit of the New Component by calling B1200040
If flag is turned on to update children, then update children.

// Update all active contracts of the replaced component
Find all contract of replaced component from F1721
Retrieve information based on the new components inventory number from F4101
Use the data from F4101 to update all contract of replaced component

//Enable component reshipment
If Enable for reshipping flag is turned on, clean the values of F4220 to allow the
Replaced Component to be reshipped.

//Create new work order for replaced component
If the flag is turned on to create new work order, call X4801 to create a new work order
For replaced component and return the new work order number is the work order is
Created successfully

Parameter Name	Data Item	Data Type	Req/Opt	I/O/Both
mnReplacedComponent	NUMB	MATH_NUMERIC	REQ	INPUT
An 8-digit number that uniquely identifies an asset.
mnNewComponent	NUMB	MATH_NUMERIC	REQ	INPUT
An 8-digit number that uniquely identifies an asset.
cMoveChildren	EV01	char	OPT	INPUT
An option that specifies the type of processing for an event.
szCurrentRepBusiUnit	MCU	char	OPT	INPUT
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.
szCurrentNewBusiUnit	MCU	char	OPT	INPUT
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.
mnCurrentNewCustomer	AN8	MATH_NUMERIC	OPT	INPUT
A number that identifies an entry in the Address Book system, such as employee, applicant, participant, customer, supplier, tenant, or location.
cUpdateRepChildStatus	EV01	char	OPT	INPUT
An option that specifies the type of processing for an event.
szCurrentRepLocation	LOC	char	OPT	INPUT
The current physical location of an asset. The location must have a valid business unit or job number in the Business Unit Master table (F0006).
szCurrentNewLocation	LOC	char	OPT	INPUT
The current physical location of an asset. The location must have a valid business unit or job number in the Business Unit Master table (F0006).
mnCurrentRepSite	LANO	MATH_NUMERIC	OPT	INPUT
The address book number for the lessor, renter, or lending institution.
mnCurrentNewSite	LANO	MATH_NUMERIC	OPT	INPUT
The address book number for the lessor, renter, or lending institution.
mnCurrentRepCustomer	AN8	MATH_NUMERIC	OPT	INPUT
A number that identifies an entry in the Address Book system, such as employee, applicant, participant, customer, supplier, tenant, or location.
cUpdateRepChildBusiUnit	EV01	char	OPT	INPUT
An option that specifies the type of processing for an event.
cUpdateRepChildCustomer	EV01	char	OPT	INPUT
An option that specifies the type of processing for an event.
cUpdateRepChildSite	EV01	char	OPT	INPUT
An option that specifies the type of processing for an event.
cUpdateNewChildCustomer	EV01	char	OPT	INPUT
An option that specifies the type of processing for an event.
cUpdateNewChildStatus	EV01	char	OPT	INPUT
An option that specifies the type of processing for an event.
cUpdateNewChildBusiUnit	EV01	char	OPT	INPUT
An option that specifies the type of processing for an event.
cUpdateNewChildSite	EV01	char	OPT	INPUT
An option that specifies the type of processing for an event.
jdDateEffectiveDate	EFTB	JDEDATE	OPT	INPUT
The date that an address, item, transaction, or table record becomes active. The meaning of this field differs, depending on the program. For example, the effective date could represent the following: o When a change of address becomes effective. o When a lease becomes effective. o When a price becomes effective. o When the currency exchange rate becomes effective. o When a tax rate becomes effective.
mnEffectiveTime	UP	MATH_NUMERIC	OPT	INPUT
The list or base price you charge for one primary or pricing unit of this item.
cCreateWO	EV01	char	OPT	INPUT
An option that specifies the type of processing for an event.
szP17714Version	VER1	char	OPT	INPUT
Identifies a group of items that can be processed together such as reports,Business Unit, or subledgers.
szCurrentRepEqSt	EQST	char	OPT	INPUT
A user defined code (12/ES) that identifies the equipment or disposal status of an asset, such as available, down, or disposed.
szCurrentNewEqSt	EQST	char	OPT	INPUT
A user defined code (12/ES) that identifies the equipment or disposal status of an asset, such as available, down, or disposed.
cEnableCompoReshipping	EV01	char	OPT	INPUT
An option that specifies the type of processing for an event.
szNewWOBusinessUnit	MCU	char	OPT	INPUT
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.
szProcessModule	VC04A	char	OPT	INPUT
This is a generic field used as a work field in Everest.
mnParentWONumber	DOCO	MATH_NUMERIC	OPT	INPUT
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.
szOrderType	DCTO	char	OPT	INPUT
A user defined code (00/DT) that identifies the type of document. This code also indicates the origin of the transaction. J.D. Edwards has reserved document type codes for vouchers, invoices, receipts, and time sheets, which create automatic offset entries during the post program. (These entries are not self-balancing when you originally enter them.) The following document types are defined by J.D. Edwards and should not be changed: P Accounts Payable documents R Accounts Receivable documents T Payroll documents I Inventory documents O Purchase Order Processing documents J General Accounting/Joint Interest Billing documents S Sales Order Processing documents
szNewWOBranchPlant	MMCU	char	OPT	INPUT
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.
mnNewWOCreated	DOCO	MATH_NUMERIC	OPT	OUTPUT
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.
mnIdentifierShortItem	ITM	MATH_NUMERIC	OPT	INPUT
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
mnNewIdentifierShortItem	ITM	MATH_NUMERIC	OPT	INPUT
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
szRepProductFamily	PRODF	char	OPT	INPUT
A code that classifies an inventory item into a group for customer service. Some examples include: Laser Printer, Inkjet, or Fax.
szNewProductFamily	PRODF	char	OPT	INPUT
A code that classifies an inventory item into a group for customer service. Some examples include: Laser Printer, Inkjet, or Fax.
szRepProductModel	PRODM	char	OPT	INPUT
A code that classifies an inventory item into a model for customer service. Some examples include: Laser Printer, Inkjet or Fax.
szNewProductModel	PRODM	char	OPT	INPUT
A code that classifies an inventory item into a model for customer service. Some examples include: Laser Printer, Inkjet or Fax.
szDescription	DL01	char	OPT	INPUT
A user defined name or remark.

F1201ComponentSwap