©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
DGMTUTL3 ;ALB/GTS - Means Test generic utilities ; 12/16/05 2:53pm
Source file <DGMTUTL3.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| IAIWALK(IAI) | ;* Return the version per findings in 408.21 record
; Input: IAI - Individual Annual Income entry IEN ; Returned value: ; 0 - Record contains data defined for version 0 (pre Feb, 2005) ; Form (pce's 9-13, 15, 16) ; 1 - Record contains data defined for version 1 (Feb, 2005) Form |
|
| VER(DGINC) | ;* Return the version of Individual Annual Income records (0 or 1)
; Input: DGINC Individual Annual Income IEN Array ; Output: 1 - version 1 1010EZ form Feb, 2005 ; 0 - version 0 1010EZ form pre Feb, 2005 ; -1 - Annual Means Test record is associated and it is not a ; Means/Co-Pay test |
|
| MTRECVER(IAI,VER211,CONVRT) | ;* Return the version indicated in 408.31 Means Test Version field (2.11)
; Input: IAI - Individual Annual Income entry IEN |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGMT(408.21 - [#408.21] | VER+34, MTRECVER+12, IAIWALK+11 |
| ^DGMT(408.31 - [#408.31] | VER+34, MTRECVER+12 |
| Name | Line Occurrences |
|---|---|
| $$IAIWALK | VER+52, VER+68 |
| MTRECVER | VER+49, VER+66 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CONVRT | VER+13~, VER+22*, VER+42, VER+49, VER+50, VER+52, VER+61, VER+66, VER+67, VER+68 , MTRECVER~, MTRECVER+11*, MTRECVER+13* |
| DEPNUM | VER+57~, VER+58*, VER+61*, VER+62 |
| DGINC | VER~ |
| DGINC( | VER+44, VER+45 |
| DGINC("D" | VER+61, VER+62 |
| DGINC("V" | VER+20, VER+34 |
| FORM | VER+13~, VER+49, VER+50, VER+66, VER+67 |
| IAI | MTRECVER~, MTRECVER+12, IAIWALK~, IAIWALK+11 |
| IAIIEN | VER+13~, VER+45*, VER+49, VER+52, VER+62*, VER+66, VER+68 |
| IAIREC | IAIWALK+7~, IAIWALK+11*, IAIWALK+12 |
| IAIVER | VER+13~, VER+26*, VER+52*, VER+53, VER+61, VER+68*, VER+69 |
| MTVER | VER+13~, VER+14*, VER+20, VER+36*, VER+38, VER+42, VER+50*, VER+53*, VER+67*, VER+69* , VER+70 |
| NULLVAL | IAIWALK+7~, IAIWALK+8*, IAIWALK+12 |
| PCE | IAIWALK+7~, IAIWALK+9*, IAIWALK+12* |
| RECTYP | VER+13~, VER+42*, VER+43, VER+44, VER+45, VER+56 |
| RECVER | IAIWALK+7~, IAIWALK+10*, IAIWALK+12*, IAIWALK+13 |
| VER211 | MTRECVER~, MTRECVER+12*, MTRECVER+13, MTRECVER+14* |