Functional Description
Purpose
The purpose of this NER is to retrieve the amount rate values from F08330B tag file where the
effective date is the latest but not future to the effective date passed in for the new enrollment.
Setup Notes and Prerequisites
Special Logic
Technical Specifications
// Attempt to fetch the amounts using the full key, if fetch // is not successful then select all
records with an // effective date prior to the passed in effective date
//
F08330B.Fetch Single - equal to passed in AN8 PLAN AOPT and EFT
If File_IO_Status is not equal to SUCCESS
F08330B.Select - equal to passed in AN8 PLAN AOPT and less than EFT
F08330B.Fetch Next - Fetch all fields - set EFT = EffectiveDateFetch_EFT
While File_IO_Status equal to SUCCESS
If jdEffectiveDateFetch_EFT is greater than jdEffectiveDate_EFT
Set jdEffectiveDate_EFT = jdEffectiveDateFetch_EFT
BF cRecordFoundYN = "Y"
End If
F08330B.Fetch Next
End While
Else record was found using the full key
jdEffectiveDate_EFT = BF jdDateEffectiveRates
BF cRecordFoundYN = "Y"
End If
If BF cRecordFoundYN is equal to "Y"
//
// Pass values back to calling appl.
//
BF mnERPoints = mnERPoints_AMT4
BF mnEEPoints = mnEEPoints_AMT3
BF mnERDbaAmount = mnERDbaAmount_AMT2
BF mnEEDbaAmount = mnEEDbaAmount_AMT1
BF jdEventDate = jdEventDate_EDTE
BF jdDateEffectiveRates = jdEffectiveDate_EFT
BF szEnrollmentEventCode = szEnrollmentEventCode_EECD
End If
^
D0800108A - Get Records from F08330B Tag File
Parameter Name | Data Item | Data Type | Req/Opt | I/O/Both |
---|---|---|---|---|
mnAddressNumber | 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
| ||||
szPlanId | PLAN | char | REQ | INPUT |
An abbreviation or number that identifies a specific employee benefit. Examples are:
o Employee Health Insurance
o Accidental Death
| ||||
szPlanAdditionalOption | AOPT | char | REQ | INPUT |
A code that identifies any additional options available for a benefit plan that have been defined in the Plan Additional Options table
| ||||
jdDateEffectiveRates | EFT | JDEDATE | REQ | INPUT |
The date that identifies when a date is first valid. The effective date is used generically. It can be a lease effective date, a price or cost
| ||||
szEnrollmentEventCode | EECD | char | OPT | OUTPUT |
The user defined code (08/BE) that you use to denote an enrollment event such as marriage. | ||||
jdEventDate | EDTE | JDEDATE | OPT | OUTPUT |
The date on which a work order event took place. | ||||
cRecordFoundYN | EV01 | char | OPT | OUTPUT |
An option that specifies the type of processing for an event. | ||||
mnEEDbaAmount | RTA1 | MATH_NUMERIC | OPT | OUTPUT |
The value of this field is either a percentage, a dollar amount or an hourly rate depending on where it is used.
A For a Deduction, Benefit
| ||||
mnERDbaAmount | RTA2 | MATH_NUMERIC | OPT | OUTPUT |
Amount or Rate | ||||
mnEEPoints | RTA3 | MATH_NUMERIC | OPT | OUTPUT |
Amount or Rate | ||||
mnERPoints | RTA4 | MATH_NUMERIC | OPT | OUTPUT |
Amount or Rate |
None |
None |