IVMBULK1 ;ALB/KCL - IVM/ENROLLMENT Extract Con't ; 18-AUG-1997
Source file <IVMBULK1.m>
| Package | Total | Call Graph |
|---|---|---|
| Income Verification Match | 5 | ($$GET,$$GETCONST,$$STORE,UNLOCK)^IVMBULK2 BUILD^IVMPTRN8 (CLEAN,INIT)^IVMUFNC $$LD^IVMUFNC4 ($$ON,SETON)^IVMUPAR1 |
| Kernel | 3 | (CLOSE,OPEN)^%ZISH $$S^%ZTLOAD ($$FMTE,$$NOW)^XLFDT |
| Registration | 3 | $$STATUS^DGENA ($$CURINPAT,$$INPAT,$$OUTPAT,$$VET)^DGENPTA $$SITE^VASITE |
| MailMan | 1 | ^XMD |
| Scheduling | 1 | CLOSE^SDQ |
| 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 |
|---|---|---|
| GOGO | ; --
; Description: This entry point will be the main driver for enrollment data extract. |
|
| BULK(IVMCONST,IVMARRY1) | ; --
; Description: This entry point will perform the enrollment data extract. |
|
| BULKQ | ; set up final extract statistics
|
|
| CRITERIA(DFN,IVMDT1,IVMDT2) | ; --
; Description: This function will determine if the patient meets the enrollment initial data extract selection criteria for a specific date range. |
|
| CRITQ | ||
| HOST(HLSDT) | ; --
; Description: Take HL7 message contained in temporary array and write to host file. |
|
| DOMAIL | ; --
; Description: This function will generate a MailMan message contianing the results of the enrollment data extract. |
|
| DOMAILQ | ||
| FINAL(IVMTXT) | ; --
; Description: Places message text into local IVMTXT array. |
|
| FINALQ |
| Name | Field # of Occurrence |
|---|---|
| CLOSE^%ZISH | BULK+54, BULK+70 |
| OPEN^%ZISH | BULK+25, BULK+57 |
| $$S^%ZTLOAD | BULK+63 |
| $$STATUS^DGENA | CRITERIA+16 |
| $$CURINPAT^DGENPTA | CRITERIA+24 |
| $$INPAT^DGENPTA | CRITERIA+27 |
| $$OUTPAT^DGENPTA | CRITERIA+30 |
| $$VET^DGENPTA | CRITERIA+21 |
| $$GET^IVMBULK2 | FINAL+14 |
| $$GETCONST^IVMBULK2 | DOMAIL+20 |
| $$STORE^IVMBULK2 | BULK+22, BULK+65, BULKQ+6 |
| UNLOCK^IVMBULK2 | BULKQ+9 |
| BUILD^IVMPTRN8 | BULK+42 |
| CLEAN^IVMUFNC | BULKQ+15 |
| INIT^IVMUFNC | BULK+14 |
| $$LD^IVMUFNC4 | BULK+42 |
| $$ON^IVMUPAR1 | GOGO+18 |
| SETON^IVMUPAR1 | GOGO+18 |
| CLOSE^SDQ | BULK+68 |
| $$SITE^VASITE | DOMAIL+11, FINAL+16 |
| $$FMTE^XLFDT | FINAL+23, FINAL+24 |
| $$NOW^XLFDT | BULK+18, BULKQ+2 |
| ^XMD | DOMAIL+26 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DPT - [#2] | BULK+30 |
| ^TMP("HLS" | BULK+39!, BULKQ+12!, HOST+24, HOST+25 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DFN | BULK+12~, BULK+29*, BULK+30*, BULK+36, BULK+42, BULK+63, BULKQ+1, CRITERIA~, CRITERIA+16, CRITERIA+21 , CRITERIA+24, CRITERIA+27, CRITERIA+30 |
| DIFROM | DOMAIL+8~ |
| DT | BULK+36 |
| DUZ | DOMAIL+13 |
| HLSDT | BULK+39, BULK+45, BULKQ+12, HOST~, HOST+24, HOST+25 |
| IO | HOST+18 |
| IVMARRY1 | GOGO+12, BULK~, BULK+22, BULK+65, BULKQ+6 |
| IVMARRY1("DIR" | BULK+25, BULK+57 |
| IVMARRY1("ERROR" | BULK+15*, BULK+26*, BULK+30, BULK+51, BULK+58*, BULK+63*, DOMAIL+23 |
| IVMARRY1("EXTRACT" | BULK+17*, BULK+25, BULK+48*, BULK+51, BULK+57, BULKQ+3 |
| IVMARRY1("FILES" | BULKQ+3* |
| IVMARRY1("HOST" | BULK+16*, BULK+25, BULK+57 |
| IVMARRY1("LASTPAT" | BULK+29, BULK+63*, BULKQ+1* |
| IVMARRY1("PROC" | BULK+17*, BULK+33*, BULK+61 |
| IVMARRY1("START" | BULK+18* |
| IVMARRY1("STOP" | BULKQ+2* |
| IVMARRY1("TASK" | BULK+19* |
| IVMARRY1("TERM" | BULK+15*, BULK+63* |
| IVMARRY2 | FINAL+10~, FINAL+14 |
| IVMARRY2("DIR" | FINAL+30 |
| IVMARRY2("ERROR" | FINAL+35, FINAL+39 |
| IVMARRY2("EXTRACT" | FINAL+27, FINAL+28 |
| IVMARRY2("FILES" | FINAL+32 |
| IVMARRY2("HOST" | FINAL+31 |
| IVMARRY2("PROC" | FINAL+26, FINAL+28 |
| IVMARRY2("START" | FINAL+23 |
| IVMARRY2("STOP" | FINAL+24 |
| IVMARRY2("TASK" | FINAL+40 |
| IVMCON1 | DOMAIL+8~, DOMAIL+20 |
| IVMCON1("MAILGRP" | DOMAIL+23 |
| IVMCONST | GOGO+12, BULK~ |
| IVMCONST("BEGDT" | BULK+36 |
| IVMCONST("HOST" | BULK+16 |
| IVMCONST("MSGMAX" | BULK+25, BULK+51, BULK+57, BULKQ+3 |
| IVMCRIT | CRITERIA+12~, CRITERIA+13*, CRITERIA+18*, CRITERIA+24*, CRITERIA+27*, CRITERIA+30*, CRITQ |
| IVMCUREN | CRITERIA+12~, CRITERIA+16*, CRITERIA+18 |
| IVMDT1 | CRITERIA~, CRITERIA+27, CRITERIA+30 |
| IVMDT2 | CRITERIA~, CRITERIA+27, CRITERIA+30 |
| IVMMSG | DOMAIL+8~, DOMAIL+17 |
| IVMPRCNT | DOMAIL+8~ |
| >> IVMQUERY | BULK+42 |
| >> IVMQUERY( | BULK+68! |
| >> IVMQUERY("LTD" | BULK+13! |
| >> IVMQUERY("OVIS" | BULK+13! |
| IVMSITE | DOMAIL+8~, DOMAIL+11*, DOMAIL+12, FINAL+10~, FINAL+16*, FINAL+20, FINAL+21 |
| IVMSUB | HOST+15~, HOST+24*, HOST+25 |
| IVMTXT | FINAL~ |
| IVMTXT(1 | FINAL+18* |
| IVMTXT(10 | FINAL+27* |
| IVMTXT(11 | FINAL+28* |
| IVMTXT(12 | FINAL+29* |
| IVMTXT(13 | FINAL+30* |
| IVMTXT(14 | FINAL+31* |
| IVMTXT(15 | FINAL+32* |
| IVMTXT(16 | FINAL+36* |
| IVMTXT(17 | FINAL+37* |
| IVMTXT(18 | FINAL+38* |
| IVMTXT(19 | FINAL+39* |
| IVMTXT(2 | FINAL+19* |
| IVMTXT(20 | FINAL+40* |
| IVMTXT(3 | FINAL+20* |
| IVMTXT(4 | FINAL+21* |
| IVMTXT(5 | FINAL+22* |
| IVMTXT(6 | FINAL+23* |
| IVMTXT(7 | FINAL+24* |
| IVMTXT(8 | FINAL+25* |
| IVMTXT(9 | FINAL+26* |
| POP | BULK+12~, BULK+26, BULK+58 |
| SUCCESS | FINAL+10~, FINAL+11*, FINAL+42*, FINALQ |
| XMDUZ | DOMAIL+8~, DOMAIL+13* |
| XMSUB | DOMAIL+8~, DOMAIL+12* |
| XMTEXT | DOMAIL+8~, DOMAIL+14* |
| XMY | DOMAIL+8~ |
| XMY( | DOMAIL+13*, DOMAIL+23* |
| XMZ | DOMAIL+7! |
| Z | BULK+12~, BULK+68* |
| >> ZTSK | BULK+19 |
