IVMCM6 ;ALB/SEK,JAN,RTK,CKN,TDM,GN,HM - COMPLETE DCD INCOME TEST ;4/10/20 11:41am
Source file <IVMCM6.m>
| Package | Total | Call Graph |
|---|---|---|
| Registration | 8 | $$UPD^DGENDBS EN^DGMTAUD (AFTER,EN)^DGMTEVT ($$GETCODE,$$GETSTAT)^DGMTH EN^DGMTR $$LST^DGMTU (DATETIME,MTPRIME,RXPRIME)^DGMTU4 $$SITE^VASITE |
| Income Verification Match | 4 | (ADD,BULL1,BULL2,BULL3)^IVMCMB $$SETSTAT^IVMPLOG ADDFUTR^IVMPLOG2 ^IVMPMTE |
| VA FileMan | 3 | FILE^DICN (,WP)^DIE EN^DIQ1 |
| Kernel | 2 | $$NOW^XLFDT $$VERSION^XPDUTL |
| Health Level Seven | 1 | $$FMDATE^HLFNC |
| List Manager | 1 | $$FTIME^VALM1 |
| 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 |
|---|---|---|
| EN | ; This routine will update annual means test file (#408.31):
; ; Note: There is no entry in 408.31 for income screening. |
|
| MTBULL | ; Build results array
|
|
| CLEANUP | ; cleanup
|
|
| CHKCMT(MTIEN) | ; CHECK FOR HARDSHIP COMMENT IVM*2.0*190
; DBIA 968 NAME: DBIA968 FILE: 408.31 ROOT: DGMT(408.31, |
|
| RMVECMT(MTIEN) | ; REMOVE COMMENTS NOT NEEDED IVM*2.0*190
; DBIA 968 NAME:DBIA968 FILE: 408.31 ROOT: DGMT(408.31, |
|
| OPEN | ; open case record for uploaded test
|
|
| OPEN1 | ||
| OPEN2 | ||
| MTDRIVER | ; call means test event driver
; dgmtact ; adj adjudicated mt ; cat hardship mt ; add new mt or copay ; edit corrected mt or copay ; |
|
| CHKTST | ; Verify if the incoming Income Test requires a Z07 transmission.
|
|
| TRNSMT | ; Set the record to transmit due to DCD Criteria
|
| Name | Field # of Occurrence |
|---|---|
| $$UPD^DGENDBS | EN+156, EN+183, TRNSMT+4 |
| EN^DGMTAUD | EN+166 |
| AFTER^DGMTEVT | EN+165, EN+188, MTDRIVER+9 |
| EN^DGMTEVT | EN+189, MTDRIVER+11 |
| $$GETCODE^DGMTH | EN+128, EN+174, MTBULL+1 |
| $$GETSTAT^DGMTH | EN+64, EN+154 |
| EN^DGMTR | EN+193 |
| $$LST^DGMTU | EN+82 |
| DATETIME^DGMTU4 | EN+168 |
| MTPRIME^DGMTU4 | EN+172 |
| RXPRIME^DGMTU4 | EN+173 |
| FILE^DICN | OPEN1+2 |
| ^DIE | OPEN2 |
| WP^DIE | EN+135, EN+146, RMVECMT+12 |
| EN^DIQ1 | CHKCMT+5, RMVECMT+5 |
| $$FMDATE^HLFNC | EN+21, EN+23, EN+26, EN+34, EN+35, EN+43, EN+47, EN+48 |
| ADD^IVMCMB | MTBULL+1 |
| BULL1^IVMCMB | EN+125 |
| BULL2^IVMCMB | EN+119 |
| BULL3^IVMCMB | EN+128 |
| $$SETSTAT^IVMPLOG | TRNSMT+6 |
| ADDFUTR^IVMPLOG2 | EN+177 |
| ^IVMPMTE | EN+167 |
| $$FTIME^VALM1 | EN+133 |
| $$SITE^VASITE | EN+101 |
| $$NOW^XLFDT | EN+66 |
| $$VERSION^XPDUTL | CHKTST+10 |
| FileNo | Call Tags |
|---|---|
| ^IVM(301.5 - [#301.5] | Classic Fileman Calls |
| ^DGMT(408.31 - [#408.31] | WP^DIE |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DG(408.34 - [#408.34] | CHKTST+8 |
| ^DGMT(408.31 - [#408.31] | EN+89, EN+90, EN+96, EN+174, MTBULL+1, CHKTST+4, CHKTST+5 |
| ^IVM(301.5 - [#301.5] | OPEN+1, OPEN+2, TRNSMT+2 |
| ^TMP($J | EN+18, EN+80, EN+81, EN+132!, EN+133*, EN+134*, EN+136!, EN+139, EN+140!, EN+144 , EN+145*, EN+147!, RMVECMT+11*, RMVECMT+12!, CHKTST+7 |
| ^UTILITY("DIQ1" | CHKCMT+7, CHKCMT+8, RMVECMT+7, RMVECMT+8 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CNT | CHKCMT+2~, CHKCMT+6*, CHKCMT+7*, CHKCMT+8, RMVECMT+2~, RMVECMT+6*, RMVECMT+7*, RMVECMT+8 |
| CODE | EN+10~, EN+152*, EN+153*, EN+154, EN+174*, MTBULL+1 |
| COMMENT | CHKCMT+2~, CHKCMT+8*, CHKCMT+9, RMVECMT+2~, RMVECMT+8*, RMVECMT+9, RMVECMT+10, RMVECMT+11 |
| DA | CHKCMT+2~, CHKCMT+3*, RMVECMT+2~, RMVECMT+3*, OPEN+3*, OPEN1+2* |
| DA( | CHKCMT+4*, RMVECMT+4* |
| DATA | EN+10~, EN+156, EN+181~, EN+183 |
| DATA( | EN+49*, EN+53*, EN+54*, EN+64*, EN+66*, EN+68*, EN+72*, EN+73*, EN+74*, EN+82* , EN+83*, EN+84*, EN+85!, EN+93*, EN+101*, EN+104*, EN+108*, EN+111*, EN+118*, EN+122* , EN+153, EN+154* |
| DATA(2 | EN+182* |
| DATA(50 | EN+96*, EN+136!, EN+138*, EN+147! |
| DATE | EN+78~, EN+80*, EN+81*, EN+82 |
| DCDDATA | TRNSMT+1~, TRNSMT+4 |
| DCDDATA( | TRNSMT+3* |
| DCDIEN | TRNSMT+1~, TRNSMT+3*, TRNSMT+4 |
| DD | OPEN1!, OPEN2! |
| >> DFN | EN+82, EN+119, EN+125, EN+128, MTBULL+1, OPEN+1, OPEN1+1, TRNSMT+2 |
| DGADDF | EN+191~, EN+192* |
| DGCAT | CLEANUP+1! |
| DGCOMF | CLEANUP+1! |
| >> DGLY | OPEN+1, TRNSMT+2 |
| DGMSGF | EN+191~, EN+192* |
| DGMTA | EN+181~ |
| DGMTACT | EN+162*, EN+181~, EN+187*, CLEANUP+1!, MTDRIVER+8* |
| DGMTI | EN+135, EN+146, EN+156, EN+168, EN+172, EN+173, EN+174, EN+177, EN+181~, EN+187* , CLEANUP+1!, CHKTST+4, CHKTST+5 |
| DGMTINF | EN+164*, EN+187*, CLEANUP+1!, MTDRIVER+10* |
| >> DGMTP | EN+163*, MTDRIVER+8 |
| DGMTPAR | CLEANUP+1! |
| DGMTYPT | EN+181~, EN+187* |
| DGREF | EN+10~, EN+25* |
| DGTHB | CLEANUP+1! |
| DIC | CHKCMT+2~, CHKCMT+3*, RMVECMT+2~, RMVECMT+3*, OPEN1+1*, OPEN2! |
| DIC(0 | OPEN1+1* |
| DIE | OPEN+4*, OPEN1+3*, OPEN2! |
| DLAYGO | OPEN1+1*, OPEN2! |
| DO | OPEN1!, OPEN2! |
| DR | CHKCMT+2~, CHKCMT+3*, RMVECMT+2~, RMVECMT+3*, OPEN+4*, OPEN1+3*, OPEN2! |
| DR( | CHKCMT+4*, RMVECMT+4* |
| DT | EN+52, EN+117 |
| DUZ | EN+64 |
| ERROR | EN+181~, EN+183, TRNSMT+1~, TRNSMT+4 |
| EVENTS | TRNSMT+1~, TRNSMT+6 |
| EVENTS("DCD" | TRNSMT+5* |
| FIELD | EN+10~, EN+19* |
| >> HLFS | EN+19, EN+80, EN+81 |
| >> HLQ | EN+19, EN+114, EN+125 |
| IVM1 | EN+21*, EN+64, EN+133, CLEANUP+2! |
| IVM10 | EN+32*, EN+74, CLEANUP+2! |
| IVM11 | EN+33*, EN+64, EN+128, CLEANUP+2! |
| IVM12 | EN+34*, EN+52, EN+72, EN+104, EN+114, EN+117, EN+125, EN+131, EN+137, EN+148 , CLEANUP+2! |
| IVM13 | EN+35*, EN+64, CLEANUP+2! |
| IVM14 | EN+36*, EN+57, EN+59*, EN+60*, EN+61*, EN+64, EN+152, CLEANUP+2! |
| IVM15 | EN+37*, EN+59, EN+68, CLEANUP+2! |
| IVM16 | EN+38*, EN+73, EN+84, CLEANUP+2! |
| IVM17 | EN+39*, EN+72, CLEANUP+2! |
| IVM18 | EN+40*, EN+68, CLEANUP+2! |
| IVM19 | EN+41*, EN+64, CLEANUP+2! |
| IVM2 | EN+22*, EN+72, EN+83, CLEANUP+2! |
| IVM20 | EN+42*, EN+72, CLEANUP+2! |
| IVM21 | EN+43*, EN+74, CLEANUP+2! |
| IVM22 | EN+44*, EN+59, EN+74, CLEANUP+3! |
| IVM23 | EN+45*, EN+74, CLEANUP+3! |
| IVM24 | EN+46*, EN+64, CLEANUP+3! |
| IVM25 | EN+47*, EN+131, EN+137, CLEANUP+3! |
| IVM26 | EN+48*, EN+49, EN+52, EN+117, CLEANUP+3! |
| IVM3 | EN+23*, EN+72, CLEANUP+2! |
| IVM4 | EN+24*, EN+25, EN+64, EN+68, EN+73, EN+84, CLEANUP+2! |
| IVM5 | EN+26*, EN+72, CLEANUP+2! |
| IVM6 | EN+27*, EN+58, EN+59, EN+61, EN+153, CLEANUP+2! |
| IVM7 | EN+28*, EN+53*, EN+58, EN+66, EN+72, EN+101, EN+108, EN+111, EN+114, EN+122 , EN+125, CLEANUP+2! |
| IVM8 | EN+30*, EN+64, EN+93, EN+180, CLEANUP+2! |
| IVM9 | EN+31*, EN+72, EN+101, EN+108, EN+125, CLEANUP+2! |
| IVMBU45 | CLEANUP+1! |
| IVMCAT | EN+29*, CLEANUP+2! |
| IVMCEA | CLEANUP+2! |
| IVMCEB | CLEANUP+2! |
| IVMDA | MTDRIVER+7~ |
| IVMDT | MTDRIVER+7~ |
| IVMFLG | MTDRIVER+7~ |
| IVMFNDC1 | RMVECMT+2~, RMVECMT+3*, RMVECMT+8*, RMVECMT+9*, RMVECMT+11 |
| IVMFNDC2 | RMVECMT+2~, RMVECMT+3*, RMVECMT+8*, RMVECMT+10*, RMVECMT+11 |
| >> IVMFUTR | EN+171, MTBULL+1 |
| >> IVMHADJ | EN+29, MTDRIVER+8 |
| IVMLNCT | RMVECMT+2~, RMVECMT+3*, RMVECMT+11*, RMVECMT+12 |
| IVMMTA | CLEANUP+2! |
| IVMMTDT | MTBULL+1, MTDRIVER+7~ |
| >> IVMMTIEN | EN+87, EN+89, EN+90, EN+96, EN+138, EN+148, EN+180, EN+183, EN+187, MTBULL+1 |
| IVMNEW | MTDRIVER+7~ |
| IVMNTECT | EN+141~, EN+143*, EN+144, EN+145 |
| IVMNTED | EN+141~, EN+142*, EN+143, EN+144* |
| IVMOP | CLEANUP+1!, OPEN+1*, OPEN+2, OPEN+3 |
| IVMOP1 | CLEANUP+1!, OPEN+2*, OPEN+3 |
| >> IVMSEG | EN+18*, EN+19*, EN+21, EN+22, EN+23, EN+24, EN+26, EN+27, EN+28, EN+29 , EN+30, EN+31, EN+32, EN+33, EN+34, EN+35, EN+36, EN+37, EN+38, EN+39 , EN+40, EN+41, EN+42, EN+43, EN+44, EN+45, EN+46, EN+47, EN+48 |
| >> IVMTYPE | EN+14, EN+18, EN+58, EN+64, EN+71, EN+77, EN+98, EN+153, EN+154, EN+161 , EN+172, EN+173, EN+187, MTBULL+1, CHKTST+7 |
| MTIEN | CHKCMT~, CHKCMT+3, CHKCMT+7, CHKCMT+8, RMVECMT~, RMVECMT+3, RMVECMT+7, RMVECMT+8, RMVECMT+12 |
| MTREC | CHKTST+2~, CHKTST+4* |
| NODE0 | EN+10~, EN+89*, EN+93, EN+101, EN+108, EN+111, EN+114, EN+119, EN+122, EN+125 , EN+128 |
| NODE2 | EN+10~, EN+90*, EN+93, EN+108, EN+119, EN+125, EN+180 |
| OK2SND | EN+10~, EN+194, CHKTST+3*, CHKTST+14* |
| REC01 | CHKTST+2~, TRNSMT+1~, TRNSMT+2*, TRNSMT+3, TRNSMT+6 |
| RET | EN+10~, CHKCMT+2~, CHKCMT+6*, CHKCMT+7, CHKCMT+9*, CHKCMT+10, RMVECMT+2~, RMVECMT+6*, RMVECMT+7 |
| TYPE | EN+78~, EN+80*, EN+81*, EN+82 |
| U | CHKTST+8 |
| X | OPEN1+1*, OPEN2! |
| Y | OPEN1+2, OPEN2! |
| ZMTSEG | CHKTST+2~, CHKTST+7*, CHKTST+8 |