WriteConfigF3215Records

Major Business Rule

Object Name: B3201580

Parent DLL: CMFG

Location: Client/Server

Language: C

1.Functional Description

1.1Purpose
The Business Function will be used to write history or zero records (CFGID = zero) in F3215, based on Cache Job Number and Configuration ID Number.

Note: Configuration ID Number required only for Zero Mode, otherwise do not load this parameter, because it will limit processing only to
specific configuration.

1.2Setup Notes and Prerequisites
AllComponentsCache (B3200370) needs to be loaded prior to running this function.

1.3Special Logic
None

2.Technical Specifications

2.1Parameters:
Data Item Data Structure DescriptionI/ORequiredNotes
JOBSJob NumberIR
CFGIDConfiguration ID IORequired only for Zero Mode
EV01ZeroModeIR'1' Zero Mode ; '0' or ' ' otherwise
PIDProgram IDIO
SUPPSSuppress Error MessageIO
DTAIError Message IDOO
SYSystem CodeIRUsed to sense which system is calling

2.2Related Tables
Table Table Description
F3215Configurator Component Table

2.3Related Business Functions
Source NameFunction Name
B3201570VerifyUinqueConfigIDExists

2.4Processing

Open F3215 Table
If Open F3215 is successful
  Load constant values in OuterB3200370 data structure
   (Return Cache Cursor)
  Decide on Cache index to use and number of keys
  While(OuterB3200370.CacheErorr == 0)
     Read record from cache
     If in Zero Mode
        Destroy LinkList if/as required
        Call N3201570 to find out if Zero record exist
     End If
     If  (No Cache Error and  cZeroRecodExists != 1)
        Load dsF3215 data structure
         If in Zero Mode
            Create LinkList
             Add OuterB3200370.ComponentIDNumber to LinkList
             dsF3215.ComponentID =  OuterB3200370.ComponentIDNumber  OuterB3200370.ParentIDNumber
             dsF3215.ParentID =  0
         Else
             If New CFGID
                 Cal  Subrutine to delete All records from F3211 Matching CFGID
             End If
             dsF3215.ComponentID = OuterB3200370.ComponentIDNumber
             dsF3215.ParentID = OuterB3200370.ParentIDNumber
         End If
         Insert Record into F3215 table
         If Insert failed
              Load Error Message
        Else
              If in Zero Mode
                   Load constant values in InnerB3200370 data structure
    (Return Cache Cursor)
                    While(InnerB3200370.CacheErorr == 0)
                        Read record from cache
          If (No Cache Error)
bSuccess = Check   InnerB3200370.ParentIDNumber against LinkList
If bSuccess

dsF3215.ComponentID = InnerB3200370.ComponentIDNumber OuterB3200370.ParentIDNumber
dsF3215.ParentID = InnerB3200370.ParentIDNumber OuterB3200370.ParentIDNumber

Load dsF3215 data structure
(Use Outer KIT and CFGSID)
Insert Record into F3215 table
End If
          End If
      End While
      Close InnerB3200370 Cache Cursor
              End If
        End If Insert failed
     End If
  End While
  Close OuterB3200370 Cache Cursor
Else
   Open Table Failed Erorr
End If

3.2 Where Used: APPs/UBEs/NERs/BSFNs

Application/Business FunctionApplication/BF Name
N3200700Write Configurator Files at End Doc
N3201620LoadZeroRecordsInAsIsMode

Data Structure

D3201580 - WriteConfigF3215Records

Parameter Name	Data Item	Data Type	Req/Opt	I/O/Both
mnJobNumber	JOBS	MATH_NUMERIC	OPT	NONE
The job number (work station ID) which executed the particular job.
mnConfigurationIDNumber	CFGID	MATH_NUMERIC	OPT	NONE
An identifier that represents a unique configuration. It is generated by a next number value and is the key to the configuration tables.
szProgramId	PID	char	OPT	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.
cZeroMode	EV01	char	OPT	NONE
An option that specifies the type of processing for an event.
cSuppressErrorMessage	SUPPS	char	OPT	NONE
A flag indicating whether or not runtime error messaging will occur when an error message is issued from a business function. 0 = allow runtime error message handling. 1 = suppress runtime error message handling.
szErrorMessageID	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.
szSystemCode	SY	char	OPT	NONE
A user defined code (98/SY) that identifies a system. Valid values include: 01 Address Book 03B Accounts Receivable 04 Accounts Payable 09 General Accounting 11 Multicurrency

Related Functions

None

Related Tables

None