EASECED2 ;ALB/LBD - EDIT INCOME SCREENING DATA ;20 AUG 2001
Source file <EASECED2.m>
| Package | Total | Call Graph |
|---|---|---|
| VA FileMan | 2 | ^DIE ^DIR |
| Enrollment Application System | 1 | GETIENS^EASECU2 |
| Registration | 1 | GETREL^DGMTU11 |
| 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 | 4 | EASECDP2 EASECED EASECED1 EASECED3 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SPOUSE | ; make sure marital status, spouse is up-to-date
; input -- DFN ; DGREL("V") as returned from GETREL for veteran ; used -- DGSPFL as VETS marital status |
|
| SPOUSE1 | ||
| ACT | ; ask date active as of (use dob if KIDS)
; In: DOB ; DGRP0ND as 0 node of PATIENT RELATION file (relation=piece 2) |
|
| READ | ; get active as of date
; DIR("B") set before entry ; DOB passed in as input |
|
| ACTQ |
| FileNo | Call Tags |
|---|---|
| ^DGMT(408.22 - [#408.22] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD("DD" | ACT+8 |
| ^DGMT(408.22 - [#408.22] | SPOUSE1+1 |
| ^DIC(11 - [#11] | SPOUSE+6 |
| ^DPT - [#2] | SPOUSE+6 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | SPOUSE1*! |
| >> DFN | SPOUSE+5, SPOUSE+6, SPOUSE+7 |
| >> DGACT | ACT+7*, READ+5*, READ+10* |
| DGDT | READ+3~, READ+5*, READ+7 |
| DGDTSPEC | READ+3~, READ+6*, READ+7 |
| >> DGEDDEP | READ+6 |
| >> DGFL | ACT+6*, READ+9* |
| >> DGIRI | SPOUSE1, SPOUSE1+1 |
| DGISDT | READ+3~, READ+5* |
| DGMS | SPOUSE+4~, SPOUSE+6*, SPOUSE+7* |
| >> DGMTDT | READ+4 |
| >> DGMTI | SPOUSE+7, SPOUSE1 |
| >> DGREL("S" | SPOUSE+7 |
| >> DGREL("V" | SPOUSE+5 |
| >> DGRP0ND | ACT+6 |
| >> DGSPFL | SPOUSE1+1* |
| DGTSTDT | READ+4~*, READ+5 |
| DIE | SPOUSE1*! |
| DIR | READ+9! |
| DIR("?" | READ+8* |
| DIR("A" | READ+7* |
| DIR("B" | ACT+8* |
| DIR(0 | READ+7* |
| DIRUT | READ+9, ACTQ! |
| >> DOB | ACT+7, ACT+8, READ+5, READ+7 |
| DR | SPOUSE1*! |
| DT | SPOUSE+5, SPOUSE+7, READ+4 |
| DTOUT | READ+9, ACTQ! |
| DUOUT | READ+9, ACTQ! |
| RELATION | ACT+5~, ACT+6*, ACT+7, ACT+8 |
| X | ACT+5~ |
| Y | ACT+5~, ACT+8*, READ+9, READ+10 |