©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
DGMTSCU3 ;ALB/RMO - Means Test Screen Variable Utilities Cont. ;4 MAY 1992 7:45 am
Source file <DGMTSCU3.m>
| Package | Total | Call Graph |
|---|---|---|
| Registration | 3 | $$TOT^DGMTSCU1 CHK^DGMTSCU2 ALL^DGMTU21 |
| VA Fileman | 1 | ^DIE |
| Package | Total | Caller Graph |
|---|---|---|
| Registration | 4 | DGMTSC2 DGMTSC2V DGMTSCC DGMTSCU2 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SPOUSEQ | ||
| CHILDQ | ||
| MT(DGINR,DGMTI) | ;Update Means Test IEN in Individual Annual Income file
; Input -- DGINR Income Relation IEN ; DGMTI Annual Means Test IEN ; Output -- Update Means Test IEN |
|
| CHILD | ;Determine total dependent children(s) income and expense
|
|
| SPOUSE | ;Determine spouse income and net worth
|
|
| INC | ;Determine income, expense and net worth
; Input -- DFN Patient file IEN ; DGCOMF Means Test Completion Flag (Optional) ; (1 if completing means test) ; DGMTDT Date of Test ; DGMTI Annual Means Test IEN ; DGVINI Veteran Individual Annual Income IEN ; DGSP Spouse 1=YES and 0=NO (mt income) ; DGDC Dependent children 1=YES and 0=NO (mt income) ; DGMTPAR Annual Means Test Parameters ; Output -- DGIN0 Annual Income 0th node array (income) ; DGIN1 Annual Income 1 node array (expense) ; DGIN2 Annual Income 2 node array (net worth) ; DGINT Total income ; DGDET Total deductible expenses ; DGNWT Total net worth ; DGINTF Income flag ; DGNWTF Net worth flag |
| FileNo | Call Tags |
|---|---|
| ^DGMT(408.22 - [#408.22] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGMT(408.21 - [#408.21] | INC+20, SPOUSE+1, CHILD+2, CHILD+4, CHILD+8 |
| Name | Line Occurrences |
|---|---|
| CHILD | INC+26 |
| MT | INC+24, SPOUSE+4, CHILD+7 |
| SPOUSE | INC+25 |
| Name | Field # of Occurrence |
|---|---|
| ^(1 | INC+20, SPOUSE+1 |
| ^(2 | INC+20, SPOUSE+1 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | MT+4~, MT+5* |
| >> DFN | INC+19 |
| DGCE | CHILD+1~, CHILD+5*, CHILD+6 |
| DGCNT | INC+18~, INC+26*, CHILD+2, CHILD+4, CHILD+7, CHILD+8 |
| >> DGCOMF | INC+24, SPOUSE+4, CHILD+7 |
| >> DGDC | INC+26 |
| >> DGDET | INC+22*, CHILD+6* |
| DGEMP | CHILD+1~, CHILD+3*, CHILD+5, CHILD+6 |
| >> DGIN0( | INC+27 |
| >> DGIN0("C" | INC+26*, CHILD+2* |
| >> DGIN0("S" | INC+25*, SPOUSE+1*, SPOUSE+2 |
| >> DGIN0("V" | INC+20*, INC+21 |
| >> DGIN1("C" | INC+26*, CHILD+4* |
| >> DGIN1("S" | INC+25*, SPOUSE+1* |
| >> DGIN1("V" | INC+20*, INC+22 |
| >> DGIN2( | INC+28 |
| >> DGIN2("C" | INC+26*, CHILD+9* |
| >> DGIN2("S" | INC+25*, SPOUSE+1*, SPOUSE+3 |
| >> DGIN2("V" | INC+20*, INC+23 |
| DGINC | INC+18~ |
| DGINC("C" | INC+26, CHILD+2, CHILD+4, CHILD+8 |
| DGINC("S" | INC+25, SPOUSE+1 |
| DGINR | INC+18~, MT~, MT+5 |
| DGINR("C" | CHILD+7 |
| DGINR("S" | SPOUSE+4 |
| DGINR("V" | INC+24 |
| >> DGINT | INC+21*, INC+27, SPOUSE+2*, CHILD+3* |
| >> DGINTF | INC+27* |
| >> DGMTDT | INC+19 |
| DGMTI | INC+19, INC+24, SPOUSE+4, CHILD+7, MT~, MT+5 |
| >> DGMTPAR | CHILD+5 |
| >> DGNWT | INC+23*, INC+28, SPOUSE+3*, CHILD+10* |
| >> DGNWTF | INC+28* |
| >> DGSP | INC+25 |
| >> DGVINI | INC+20 |
| DIE | MT+4~, MT+5* |
| DR | MT+4~, MT+5* |
| I | INC+18~, INC+27*, INC+28*, CHILD+1~, CHILD+2*, CHILD+9* |
| J | INC+18~, INC+27*, INC+28* |
| X | CHILD+1~, CHILD+2*, CHILD+3, CHILD+4*, CHILD+5, CHILD+8*, CHILD+9, CHILD+10 |
| Y | INC+18~, INC+26 |