IVMPTRN1 ;ALB/MLI - Clock routine for testing only ; 04-MAY-93
Source file <IVMPTRN1.m>
| Package | Total | Call Graph |
|---|---|---|
| VA FileMan | 2 | NOW^%DTC ^DIE |
| Income Verification Match | 1 | $$STATUS^IVMPLOG |
| MailMan | 1 | ^XMD |
| Registration | 1 | $$LYR^DGMTSCU1 |
| 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 |
|---|---|---|
| Income Verification Match | 4 | IVMLINS2 IVMPREC4 IVMPTRN IVMUM6 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| START | ; start clock remove after v1
|
|
| STOP | ; stop clock, mail bulletin remove after v1
|
|
| STOPQ | ||
| DELMT | ; send delete mt transaction if pt no longer meets IVM criteria
|
|
| CLOSE(IVMIY,DFN,IVMCS,IVMCR) | ; Close IVM case record for a patient
; Input: DFN -- Pointer to the patient in file #2 ; IVMIY -- Income year of the closed case ; IVMCS -- Closure source [1=IVM | 2=DHCP] ; IVMCR -- Pointer to the closure reason in file #301.93 |
|
| CLOSEQ | ||
| PSEUDO | ; strip P from pseudo SSNs before transmitting to IVM
|
| FileNo | Call Tags |
|---|---|
| ^IVM(301.5 - [#301.5] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("UCI" | STOP+8 |
| ^IVM(301.5 - [#301.5] | CLOSE+9, CLOSE+10 |
| ^TMP("HLS" | DELMT+8* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | START+1, START+2!, STOP+3, CLOSE+16 |
| DA | CLOSE+6~, CLOSE+9*, CLOSE+10, CLOSE+14 |
| DFN | DELMT+9, CLOSE~, CLOSE+7, CLOSE+9 |
| DIE | CLOSE+6~, CLOSE+17* |
| DR | CLOSE+6~, CLOSE+16* |
| DUZ | STOP+10 |
| EVENTS | CLOSE+6~, CLOSE+14 |
| EVENTS("ENROLL" | CLOSE+14 |
| >> HLFS | DELMT+7, DELMT+8, PSEUDO+4 |
| >> HLQ | DELMT+7 |
| >> HLSDT | DELMT+8 |
| I | DELMT+5~, DELMT+7* |
| >> IVMBEG | START+1*, STOP+5 |
| IVMCR | CLOSE~, CLOSE+7, CLOSE+16 |
| IVMCS | CLOSE~, CLOSE+7, CLOSE+16 |
| >> IVMCT | DELMT+8 |
| >> IVMDELMT | CLOSE+8* |
| IVMEND | STOP+3*, STOP+6, STOPQ! |
| IVMGBEG | STOPQ! |
| IVMGTOT | STOP+2, STOP+7, STOPQ! |
| IVMIY | DELMT+5~, DELMT+6*, DELMT+9, CLOSE~, CLOSE+7, CLOSE+9 |
| >> IVMMTDT | DELMT+6 |
| IVMPID | PSEUDO+3, PSEUDO+5!* |
| IVMPID(1 | PSEUDO+3, PSEUDO+6* |
| IVMTEXT | STOPQ+1! |
| IVMTEXT(1 | STOP+4* |
| IVMTEXT(2 | STOP+4* |
| IVMTEXT(3 | STOP+5* |
| IVMTEXT(4 | STOP+6* |
| IVMTEXT(5 | STOP+7* |
| STATUS | CLOSE+6~, CLOSE+13*, CLOSE+14*, CLOSE+16 |
| X | STOP+1~, DELMT+5~, DELMT+7*, DELMT+8, CLOSE+6~, PSEUDO+2~, PSEUDO+3*, PSEUDO+4*, PSEUDO+5, PSEUDO+6 |
| XMDUZ | STOP+10*, STOPQ+1! |
| XMSUB | STOP+9*, STOPQ+1! |
| XMTEXT | STOP+9*, STOPQ+1! |
| XMY | STOPQ+1! |
| XMY( | STOP+10* |
| Y | STOP+1~, CLOSE+6~ |