DGRPEIS2 ;ALB/MIR,ERC - EDIT INCOME SCREENING DATA (SCREEN 9) ; 4/20/06 10:37am
Source file <DGRPEIS2.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 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EDIT9 | ; Allow edit of income screening amounts (called from DGRPE)
; In: DFN ; DGRPANN as string of selected items ; DGRPSEL as allowable groups for edit (V, S, and/or D) ; DGRPSELT (maybe) as type of dependent selected (V=vet, ; S=spouse, and D=dependent). If not defined, it is set ; to DGRPSEL. |
|
| EDIT9Q | ||
| EDT | ;Edit inc and nt worth
|
|
| EDTQ | ||
| 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 | ||
| RELTYPE(RELIEN,TYPE) | ;* Return type of relationship
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^DGMT(408.21 - [#408.21] | Classic Fileman Calls |
| ^DGMT(408.22 - [#408.22] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD("DD" | ACT+8 |
| ^DG(408.11 - [#408.11] | RELTYPE+16 |
| ^DGMT(408.21 - [#408.21] | EDIT9+11 |
| ^DGMT(408.22 - [#408.22] | SPOUSE1+1 |
| ^DGMT(408.31 - [#408.31] | EDIT9+15, EDIT9+17 |
| ^DGPR(408.12 - [#408.12] | RELTYPE+14, RELTYPE+15 |
| ^DIC(11 - [#11] | SPOUSE+6 |
| ^DPT - [#2] | SPOUSE+6, READ+9 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | EDT+1~, EDT+6*, EDT+13*, SPOUSE1*! |
| >> DFN | EDIT9+10, EDIT9+13, EDT+3, EDT+12, EDT+16, SPOUSE+5, SPOUSE+6, SPOUSE+7, READ+9 |
| >> DGACT | ACT+7*, READ+5*, READ+13* |
| >> DGANS | RELTYPE+20, RELTYPE+21, RELTYPE+22 |
| DGCNT | EDIT9+23*, EDIT9+25! |
| DGDT | READ+3~, READ+5*, READ+10 |
| DGDTSPEC | READ+3~, READ+6*, READ+10 |
| >> DGEDDEP | READ+6 |
| DGERR | EDT+1~, EDT+3, EDT+12 |
| DGFIN | EDT+1~, EDT+9 |
| >> DGFL | EDIT9+24*, EDT+10*, ACT+6*, READ+12* |
| DGIAIYR | EDIT9+7~, EDIT9+11*, EDIT9+12*, EDIT9+14, EDIT9+17, EDIT9+18, EDIT9+19 |
| >> DGINC | EDIT9+18, EDIT9+19 |
| >> DGINC("V" | EDIT9+11, EDT+12*, EDT+13 |
| DGINI | EDT+1~, EDT+6, EDT+12 |
| DGIRI | EDT+1~, SPOUSE1, SPOUSE1+1 |
| DGISDT | READ+3~, READ+5* |
| DGMS | SPOUSE+4~, SPOUSE+6*, SPOUSE+7* |
| >> DGMTDT | EDT+2, READ+4 |
| >> DGMTED | EDIT9+21*, EDIT9+22*, EDIT9+23*, EDT+5 |
| >> DGMTED("D" | EDIT9+23 |
| >> DGMTED("S" | EDIT9+22 |
| >> DGMTED("V" | EDIT9+21 |
| DGMTI | EDIT9+7~, EDIT9+13*, EDIT9+14, EDIT9+15, EDIT9+17, EDIT9+19, SPOUSE+7, SPOUSE1 |
| DGPATREL | RELTYPE+10~, RELTYPE+16*, RELTYPE+17*, RELTYPE+18*, RELTYPE+20*, RELTYPE+21*, RELTYPE+22*, RELTYPE+23*, RELTYPE+24 |
| >> DGPRI | EDIT9+21*, EDIT9+22*, EDIT9+23*, EDT+3, EDT+4 |
| DGPTRLIN | RELTYPE+10~, RELTYPE+13*, RELTYPE+14*, RELTYPE+15 |
| >> DGREL("D" | EDIT9+23 |
| >> DGREL("S" | EDIT9+22, SPOUSE+7 |
| >> DGREL("V" | EDIT9+20, EDIT9+21, EDT+12, SPOUSE+5 |
| DGRELIEN | RELTYPE+10~, RELTYPE+15*, RELTYPE+16 |
| >> DGRP0ND | ACT+6 |
| >> DGRPANN | EDIT9+8 |
| >> DGRPOUT | EDIT9+22, EDIT9+23, EDT+9*, EDT+10*, EDT+11, EDT+12, EDT+13 |
| >> DGRPS | RELTYPE+18 |
| >> DGRPSEL | EDIT9+9 |
| >> DGRPSELT | EDIT9+9*, EDIT9+21, EDIT9+22, EDIT9+23, EDT+4 |
| >> DGSCR8 | RELTYPE+18 |
| >> DGSPFL | SPOUSE1+1* |
| DGTSTDT | EDT+2~*, EDT+3, READ+4~*, READ+5 |
| DGTY | EDIT9+7~, EDIT9+15*, EDIT9+16 |
| DGTYEXT | EDIT9+7~, EDIT9+16*, EDIT9+17, EDIT9+18 |
| DIE | EDT+1~, EDT+6*, SPOUSE1*! |
| DIR | READ+12! |
| DIR("?" | READ+11* |
| DIR("A" | READ+10* |
| DIR("B" | ACT+8* |
| DIR(0 | READ+8*, READ+9*, READ+10* |
| DIRUT | READ+12, ACTQ! |
| >> DOB | ACT+7, ACT+8, READ+5, READ+8, READ+9 |
| DR | EDT+1~, EDT+7*, EDT+8*, EDT+11*, SPOUSE1*! |
| DT | EDIT9+10, EDIT9+13, EDT+2, EDT+12, SPOUSE+5, SPOUSE+7, READ+4 |
| DTOUT | EDT+10, READ+12, ACTQ! |
| DUOUT | READ+12, ACTQ! |
| MTVER | EDIT9+7~, EDIT9+17*, EDIT9+18*, EDIT9+19*, EDT+7, EDT+8 |
| OK | EDT+1~ |
| RELATION | ACT+5~, ACT+6*, ACT+7, ACT+8, READ+9 |
| RELIEN | RELTYPE~, RELTYPE+12, RELTYPE+14, RELTYPE+19 |
| TYPE | RELTYPE~, RELTYPE+11*, RELTYPE+18 |
| VDOB | READ+3~, READ+9* |
| X | ACT+5~ |
| Y | ACT+5~, ACT+8*, READ+12, READ+13 |
