F4091GetLevelHeadingDesc

F4091 Get Level Heading Descriptions

Minor Business Rule

Object Name: N3401490

Parent DLL: CMFG

Location: Client/Server

Language: NER

1.Functional Description

1.1Purpose

This function fetches the level values from the F4091 table. Using these level integers, it uses an 
API call to fetch the DD Row Descriptions for the appropriate levels.

1.2Setup Notes and Prerequisites

1.3Special Logic
The function uses the value of the summary code as the key to fetch the values from the F4091 table.

2.Technical Specifications

F4091.Open
F4091.FetchSingle
F4091.Close
VA evt_cLevelFoundFlag_EV01 = 0
VA evt_mnIndex_MATH01 = 1
// 
// 
While VA evt_mnIndex_MATH01 is less than or equal to "10.00" 
If VA evt_mnKC01_KC01 is equal to VA evt_mnIndex_MATH01 
Row/Column Descriptions, Get from Data Dicti
VA evt_cLevelFoundFlag_EV01 = 1
End If
If VA evt_mnKC02_KC02 is equal to VA evt_mnIndex_MATH01 
Row/Column Descriptions, Get from Data Dicti
VA evt_cLevelFoundFlag_EV01 = 1
End If
If VA evt_mnKC03_KC03 is equal to VA evt_mnIndex_MATH01 
Row/Column Descriptions, Get from Data Dicti
VA evt_cLevelFoundFlag_EV01 = 1
End If
If VA evt_mnKC04_KC04 is equal to VA evt_mnIndex_MATH01 
Row/Column Descriptions, Get from Data Dicti
VA evt_cLevelFoundFlag_EV01 = 1
End If
If VA evt_mnKC05_KC05 is equal to VA evt_mnIndex_MATH01 
Row/Column Descriptions, Get from Data Dicti
VA evt_cLevelFoundFlag_EV01 = 1
End If
If VA evt_mnKC06_KC06 is equal to VA evt_mnIndex_MATH01 
Row/Column Descriptions, Get from Data Dicti
VA evt_cLevelFoundFlag_EV01 = 1
End If
If VA evt_mnKC07_KC07 is equal to VA evt_mnIndex_MATH01 
Row/Column Descriptions, Get from Data Dicti
VA evt_cLevelFoundFlag_EV01 = 1
End If
If VA evt_mnKC08_KC08 is equal to VA evt_mnIndex_MATH01 
Row/Column Descriptions, Get from Data Dicti
VA evt_cLevelFoundFlag_EV01 = 1
End If
If VA evt_mnKC09_KC09 is equal to VA evt_mnIndex_MATH01 
Row/Column Descriptions, Get from Data Dicti
VA evt_cLevelFoundFlag_EV01 = 1
End If
If VA evt_mnKC10_KC10 is equal to VA evt_mnIndex_MATH01 
Row/Column Descriptions, Get from Data Dicti
VA evt_cLevelFoundFlag_EV01 = 1
End If
If VA evt_mnKC11_KC11 is equal to VA evt_mnIndex_MATH01 
Row/Column Descriptions, Get from Data Dicti
VA evt_cLevelFoundFlag_EV01 = 1
End If
If VA evt_mnKC12_KC12 is equal to VA evt_mnIndex_MATH01 
Row/Column Descriptions, Get from Data Dicti
VA evt_cLevelFoundFlag_EV01 = 1
End If
If VA evt_mnKC13_KC13 is equal to VA evt_mnIndex_MATH01 
Row/Column Descriptions, Get from Data Dicti
VA evt_cLevelFoundFlag_EV01 = 1
End If
If VA evt_mnKC14_KC14 is equal to VA evt_mnIndex_MATH01 
Row/Column Descriptions, Get from Data Dicti
VA evt_cLevelFoundFlag_EV01 = 1
End If
If VA evt_mnKC15_KC15 is equal to VA evt_mnIndex_MATH01 
Row/Column Descriptions, Get from Data Dicti
VA evt_cLevelFoundFlag_EV01 = 1
End If
If VA evt_mnKC16_KC16 is equal to VA evt_mnIndex_MATH01 
Row/Column Descriptions, Get from Data Dicti
VA evt_cLevelFoundFlag_EV01 = 1
End If
If VA evt_mnKC17_KC17 is equal to VA evt_mnIndex_MATH01 
Row/Column Descriptions, Get from Data Dicti
VA evt_cLevelFoundFlag_EV01 = 1
End If
If VA evt_mnKC18_KC18 is equal to VA evt_mnIndex_MATH01 
Row/Column Descriptions, Get from Data Dicti
VA evt_cLevelFoundFlag_EV01 = 1
End If
If VA evt_mnKC19_KC19 is equal to VA evt_mnIndex_MATH01 
Row/Column Descriptions, Get from Data Dicti
VA evt_cLevelFoundFlag_EV01 = 1
End If
If VA evt_mnKC20_KC20 is equal to VA evt_mnIndex_MATH01 
Row/Column Descriptions, Get from Data Dicti
VA evt_cLevelFoundFlag_EV01 = 1
End If
If VA evt_mnKC21_KC21 is equal to VA evt_mnIndex_MATH01 
Row/Column Descriptions, Get from Data Dicti
VA evt_cLevelFoundFlag_EV01 = 1
End If
If VA evt_mnKC22_KC22 is equal to VA evt_mnIndex_MATH01 
Row/Column Descriptions, Get from Data Dicti
VA evt_cLevelFoundFlag_EV01 = 1
End If
If VA evt_mnKC23_KC23 is equal to VA evt_mnIndex_MATH01 
Row/Column Descriptions, Get from Data Dicti
VA evt_cLevelFoundFlag_EV01 = 1
End If
If VA evt_mnKC24_KC24 is equal to VA evt_mnIndex_MATH01 
Row/Column Descriptions, Get from Data Dicti
VA evt_cLevelFoundFlag_EV01 = 1
End If
If VA evt_mnKC25_KC25 is equal to VA evt_mnIndex_MATH01 
Row/Column Descriptions, Get from Data Dicti
VA evt_cLevelFoundFlag_EV01 = 1
End If
If VA evt_mnKC26_KC26 is equal to VA evt_mnIndex_MATH01 
Row/Column Descriptions, Get from Data Dicti
VA evt_cLevelFoundFlag_EV01 = 1
End If
If VA evt_mnKC27_KC27 is equal to VA evt_mnIndex_MATH01 
Row/Column Descriptions, Get from Data Dicti
VA evt_cLevelFoundFlag_EV01 = 1
End If
If VA evt_mnKC28_KC28 is equal to VA evt_mnIndex_MATH01 
Row/Column Descriptions, Get from Data Dicti
VA evt_cLevelFoundFlag_EV01 = 1
End If
If VA evt_mnKC29_KC29 is equal to VA evt_mnIndex_MATH01 
Row/Column Descriptions, Get from Data Dicti
VA evt_cLevelFoundFlag_EV01 = 1
End If
If VA evt_mnKC30_KC30 is equal to VA evt_mnIndex_MATH01 
Row/Column Descriptions, Get from Data Dicti
VA evt_cLevelFoundFlag_EV01 = 1
End If
If VA evt_mnKC31_KC31 is equal to VA evt_mnIndex_MATH01 
Row/Column Descriptions, Get from Data Dicti
VA evt_cLevelFoundFlag_EV01 = 1
End If
If VA evt_mnKC32_KC32 is equal to VA evt_mnIndex_MATH01 
Row/Column Descriptions, Get from Data Dicti
VA evt_cLevelFoundFlag_EV01 = 1
End If
If VA evt_mnKC33_KC33 is equal to VA evt_mnIndex_MATH01 
Row/Column Descriptions, Get from Data Dicti
VA evt_cLevelFoundFlag_EV01 = 1
End If
If VA evt_mnKC34_KC34 is equal to VA evt_mnIndex_MATH01 
Row/Column Descriptions, Get from Data Dicti
VA evt_cLevelFoundFlag_EV01 = 1
End If
If VA evt_mnKC35_KC35 is equal to VA evt_mnIndex_MATH01 
Row/Column Descriptions, Get from Data Dicti
VA evt_cLevelFoundFlag_EV01 = 1
End If
If VA evt_mnKC36_KC36 is equal to VA evt_mnIndex_MATH01 
Row/Column Descriptions, Get from Data Dicti
VA evt_cLevelFoundFlag_EV01 = 1
End If
If VA evt_mnKC37_KC37 is equal to VA evt_mnIndex_MATH01 
Row/Column Descriptions, Get from Data Dicti
VA evt_cLevelFoundFlag_EV01 = 1
End If
If VA evt_mnKC38_KC38 is equal to VA evt_mnIndex_MATH01 
Row/Column Descriptions, Get from Data Dicti
VA evt_cLevelFoundFlag_EV01 = 1
End If
If VA evt_mnKC39_KC39 is equal to VA evt_mnIndex_MATH01 
Row/Column Descriptions, Get from Data Dicti
VA evt_cLevelFoundFlag_EV01 = 1
End If
If VA evt_mnKC40_KC40 is equal to VA evt_mnIndex_MATH01 
Row/Column Descriptions, Get from Data Dicti
VA evt_cLevelFoundFlag_EV01 = 1
End If
// 
// 
If VA evt_cLevelFoundFlag_EV01 is equal to "1" 
If VA evt_mnIndex_MATH01 is equal to "1.00" 
BF szDescription1Level = VA evt_szNameString_DL01
End If
If VA evt_mnIndex_MATH01 is equal to "2.00" 
BF szDescription2Level = VA evt_szNameString_DL01
End If
If VA evt_mnIndex_MATH01 is equal to "3.00" 
BF szDescription3Level = VA evt_szNameString_DL01
End If
If VA evt_mnIndex_MATH01 is equal to "4.00" 
BF szDescription4Level = VA evt_szNameString_DL01
End If
If VA evt_mnIndex_MATH01 is equal to "5.00" 
BF szDescription5Level = VA evt_szNameString_DL01
End If
If VA evt_mnIndex_MATH01 is equal to "6.00" 
BF szDescription6Level = VA evt_szNameString_DL01
End If
If VA evt_mnIndex_MATH01 is equal to "7.00" 
BF szDescription7Level = VA evt_szNameString_DL01
End If
If VA evt_mnIndex_MATH01 is equal to "8.00" 
BF szDescription8Level = VA evt_szNameString_DL01
End If
If VA evt_mnIndex_MATH01 is equal to "9.00" 
BF szDescription9Level = VA evt_szNameString_DL01
End If
If VA evt_mnIndex_MATH01 is equal to "10.00" 
BF szDescription10Level = VA evt_szNameString_DL01
End If
VA evt_cLevelFoundFlag_EV01 = 0
End If
VA evt_mnIndex_MATH01 = [VA evt_mnIndex_MATH01]+1
End While

^

Data Structure

D3401490 - F4091 Get Level Heading Descriptions

Data Item Data Structure DescriptionI/ORequiredNotes
KVER            SzVersionKeyDefinition            IY
DL01            SzDescription1Level            O
DL01            SzDescription2Level            O
DL01            SzDescription3Level            O
DL01            SzDescription4Level            O
DL01            SzDescription5Level            O
DL01            SzDescription6Level            O 
DL01            SzDescription7Level            O
DL01            SzDescription8Level            O
DL01            SzDescription9Level            O
DL01            SzDescription10Level            O

^

Related Functions

Related Tables