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 |