EASUM5 ;ALB/SEK,MNH - ADD NEW INCOME RELATION FILE ENTRIES ;19 MAY 94 9:30am
Source file <EASUM5.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Enrollment Application System | 2 | EASUM1 EASUM6 |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ; this routine will add entries to INCOME RELATION file (408.22)
; will also inactivate VAMC dependents (spouse & children) who are not ; IVM dependents, by adding an inactivate entry into the EFFECTIVE DATE ; sub-file (multiple-408.1275) of the PATIENT RELATION file (#408.12) |
|
INACTIVE | ; inactivate dependents not in IVM means test and kill
; corresponding dgrel |
|
CHKINACT | ; if dependent was made active during income year
; add record for same date (add .08 time) with active code 0 |
|
INACT1 | ; add inactivate entry to 408.1275
|
FileNo | Call Tags |
---|---|
^DGPR(408.12 - [#408.12] | Classic Fileman Calls |
^DGMT(408.22 - [#408.22] | Classic Fileman Calls |
^DGMT(408.31 - [#408.31] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DGMT(408.22 - [#408.22] | EN+41, EN+47* |
^DGPR(408.12 - [#408.12] | CHKINACT+4, CHKINACT+7, INACT1+10* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DA | EN+32*, EN+33*, EN+42*, EN+43!, EN+47*, EN+48!, INACT1+3*, INACT1+6, INACT1+10, INACT1+11! |
DA(1 | INACTIVE+2*, INACTIVE+11*, CHKINACT+4, CHKINACT+7, INACT1+10 |
DD | INACT1+3! |
>> DFN | EN+15, EN+40 |
>> DGINI | EN+15 |
>> DGIRI | EN+15*, EN+18, EN+24, EN+41, EN+42, EN+47 |
>> DGLY | EN+40, INACTIVE+7, INACTIVE+16, CHKINACT+5 |
>> DGMTI | EN+24, EN+33, EN+40, INACT1+10 |
>> DGPRI | INACT1+10 |
>> DGREL | EN+38, INACTIVE+9 |
>> DGREL("C" | INACTIVE+11! |
>> DGREL("S" | INACTIVE+2! |
>> DGREL("V" | EN+37! |
DIC | INACT1+3*, INACT1+11! |
DIC(0 | INACT1+3* |
DIE | EN+32*, EN+33*, EN+42*, EN+43! |
DIK | EN+46*, EN+48!, INACT1+3*, INACT1+11! |
DINUM | INACT1+2! |
DLAYGO | INACT1+3*! |
DO | INACT1+3! |
DR | EN+32*, EN+33*, EN+42*, EN+43! |
>> HLERR | EN+19*, INACT1+7* |
IVM0 | EN+14~, EN+44*, EN+47 |
IVM01 | EN+14~, EN+45*, EN+47 |
IVM02 | EN+14~, EN+45*, EN+47 |
IVM03 | EN+14~, EN+45*, EN+47 |
IVMACTR | INACTIVE+10*, INACTIVE+11*, INACTIVE+19! |
IVMDGLY | INACTIVE+19!, CHKINACT+4*, CHKINACT+5, CHKINACT+6, CHKINACT+8 |
>> IVMFERR | EN+21*, EN+31, EN+38, INACTIVE+4, INACTIVE+9, INACTIVE+13, CHKINACT+4, CHKINACT+6, INACT1+9* |
IVMFLG6 | INACTIVE+4, INACTIVE+13, INACTIVE+19!, CHKINACT+3*, CHKINACT+4, CHKINACT+6, CHKINACT+8* |
>> IVMMTIEN | EN+32 |
>> IVMSEG | EN+44, EN+45 |
>> IVMSPCHV | EN+25, EN+31, EN+45, EN+47 |
>> IVMTEXT(6 | EN+19*, INACT1+7* |
IVMYEAR | INACTIVE+19!, CHKINACT+6*, CHKINACT+7 |
>> X | INACTIVE+7*, INACTIVE+16*, CHKINACT+8* |
>> Y | INACT1+3 |