GetCSMSRespBU

Get S/WM Resp BU

Major Business Rule

Object Name: N1700440

Parent DLL: CCRIN

Location: Client/Server

Language: NER

1.Functional Description

1.1Purpose
The purpose of this NER is to retrieve the Responsible BU for CSMS Billing and Costing.

1.2Setup Notes and Prerequisites
The constants in the F17001 need to be setup.

1.3Special Logic
This NER needs to check the CSMS Constants to find out where it should retrieve the Responsible BU from.
There is a constant to indicate where to retrieve the Responsible BU for Calls.
There is a constant to indicate where to retrieve the Responsible BU for Service Orders.
There is a constant to indicate where to retrieve the Responsible BU for Contracts.
Based on the value of each constant, the NER needs to go to the specified file and return the Responsible BU.

2.Technical Specifications
2.4Processing
VA evt_szErrorMessageID_DTAI = " "
F17001 Check For CSMS
        UNDEFINED X  cFutureYN14
        UNDEFINED X  cFutureYN15
If VA evt_szErrorMessageID_DTAI is not equal to
     And VA evt_szErrorMessageID_DTAI is not equal to
   Set NER Error(VA evt_szErrorMessageID_DTAI, BF szResponsibleBusinessUnit)
Else
   //
   //     Mode is equal to 1
   //
   If BF cMode is equal to "1"
      If VA evt_cRespBULocationCont_RBUCN is equal to "1"
         If BF mnShortItemNumber is equal to
         Or BF mnShortItemNumber is equal to
            If BF cSuppressErrorMessages is not equal to "1"
               Set NER Error("110X", BF mnShortItemNumber)
            End If
            BF szErrorCode = "110X"
         Else
            Get Inventory Extention Information
            If VA evt_szErrorMessageID_DTAI is not equal to
            And VA evt_szErrorMessageID_DTAI is not equal to
               BF szResponsibleBusinessUnit = " "
            End If
         End If
      End If
      If VA evt_cRespBULocationCont_RBUCN is equal to "2"
           F1790.Fetch Single
            BF szProductModel =  TK Product Model
            BF szResponsibleBusinessUnit <- TK Business Unit - Alt
         If SV File_IO_Status is not equal to CO SUCCESS
            If BF cSuppressErrorMessages is not equal to "1"
               Set NER Error("110X", BF szProductModel)
            End If
             BF szErrorCode = "110X"
            BF szResponsibleBusinessUnit = " "
         End If
      End If
      If VA evt_cRespBULocationCont_RBUCN is equal to "3"
         If BF mnEquipmentNumber is equal to
         Or BF mnEquipmentNumber is equal to
            If BF cSuppressErrorMessages is not equal to "1"
               Set NER Error(110X, BF mnEquipmentNumber)
            End If
            BF szErrorCode = "110X"
         Else
F1201.Fetch Single
               BF mnEquipmentNumber =  TK Asset Item Number
               BF szResponsibleBusinessUnit <- TK Business Unit
            If SV File_IO_Status is not equal to CO SUCCESS
               BF szResponsibleBusinessUnit = " "
            End If
         End If
      End If
      If VA evt_cRespBULocationCont_RBUCN is equal to "4"
         If BF mnCustomerNumber is equal to
         Or BF mnCustomerNumber is equal to
            If BF cSuppressErrorMessages is not equal to "1"
               Set NER Error(110X, BF mnCustomerNumber)
            End If
            BF szErrorCode = "110X"
         Else
F0301.Fetch Single
               BF mnCustomerNumber =  TK Address Number
               BF szResponsibleBusinessUnit <- TK Business Unit - A/R Default
            If SV File_IO_Status is not equal to CO SUCCESS
               BF szResponsibleBusinessUnit = " "
            End If
         End If
      End If
      If VA evt_cRespBULocationCont_RBUCN is equal to "5"
         F1793 Get CSMS Line Type Constants
         If VA evt_szErrorMessageID_DTAI is not equal to
         And VA evt_szErrorMessageID_DTAI is not equal to
            If BF cSuppressErrorMessages is not equal to "1"
               Set NER Error(110X, BF szLineType)
            End If
            BF szErrorCode = "110X"
            BF szResponsibleBusinessUnit = " "
         End If
      End If
      If VA evt_cRespBULocationCont_RBUCN is not equal to "1"
      And VA evt_cRespBULocationCont_RBUCN is not equal to "2"
      And VA evt_cRespBULocationCont_RBUCN is not equal to "3"
      And VA evt_cRespBULocationCont_RBUCN is not equal to "4"
      And VA evt_cRespBULocationCont_RBUCN is not equal to "5"
         BF szResponsibleBusinessUnit = " "
      End If
   End If

*Repeat same code for Modes 2 and 3.

Data Structure

D1700440 - Get S/WM Resp BU

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

mnShortItemNumber ITM MATH_NUMERIC REQ 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

szBranch MMCU char REQ 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.

szProductModel PRODM char REQ INPUT

A code that classifies an inventory item into a model for customer service. Some examples include: Laser Printer, Inkjet or Fax.

mnEquipmentNumber NUMB MATH_NUMERIC REQ INPUT

An 8-digit number that uniquely identifies an asset.

mnCustomerNumber AN8 MATH_NUMERIC REQ INPUT

A number that identifies an entry in the Address Book system, such as employee, applicant, participant, customer, supplier, tenant, or
location.

szResponsibleBusinessUnit MCU char OPT OUTPUT

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.

cMode EV01 char REQ INPUT

1 = Service Contracts
2 = Service Orders
3 = Calls
^

szLineType LNTY char REQ INPUT

A code that controls how the system processes lines on a transaction. It controls the systems with which the transaction interfaces, such as
General Ledger, Job Cost, Accounts Payable, Accounts Receivable, and Inventory Management. It also specifies the conditions under
which a line prints on reports, and it is included in calculations. Codes include the following: S Stock item   J Job cost   N Nonstock item   F Freight
T Text information   M Miscellaneous charges and credits   W Work order

cSuppressErrorMessages EV01 char OPT NONE

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

szErrorCode DTAI char OPT 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
special characters such as %, &, or +. You create new data items using system codes 55-59. You cannot change the alias.

Related Functions

None

Related Tables

None

Parameter Name	Data Item	Data Type	Req/Opt	I/O/Both
mnShortItemNumber	ITM	MATH_NUMERIC	REQ	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
szBranch	MMCU	char	REQ	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.
szProductModel	PRODM	char	REQ	INPUT
A code that classifies an inventory item into a model for customer service. Some examples include: Laser Printer, Inkjet or Fax.
mnEquipmentNumber	NUMB	MATH_NUMERIC	REQ	INPUT
An 8-digit number that uniquely identifies an asset.
mnCustomerNumber	AN8	MATH_NUMERIC	REQ	INPUT
A number that identifies an entry in the Address Book system, such as employee, applicant, participant, customer, supplier, tenant, or location.
szResponsibleBusinessUnit	MCU	char	OPT	OUTPUT
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.
cMode	EV01	char	REQ	INPUT
1 = Service Contracts 2 = Service Orders 3 = Calls ^
szLineType	LNTY	char	REQ	INPUT
A code that controls how the system processes lines on a transaction. It controls the systems with which the transaction interfaces, such as General Ledger, Job Cost, Accounts Payable, Accounts Receivable, and Inventory Management. It also specifies the conditions under which a line prints on reports, and it is included in calculations. Codes include the following: S Stock item J Job cost N Nonstock item F Freight T Text information M Miscellaneous charges and credits W Work order
cSuppressErrorMessages	EV01	char	OPT	NONE
An option that specifies the type of processing for an event.
szErrorCode	DTAI	char	OPT	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 special characters such as %, &, or +. You create new data items using system codes 55-59. You cannot change the alias.