BHLIQUI ; cmi/sitka/maw - BHL HL7 Immunization Query User Interface ;
Source file <BHLIQUI.m>
Package | Total | Call Graph |
---|---|---|
VA Fileman | 3 | ^%DT ^DIC ^DIR |
IHS VA Utilities | 1 | $$VAL^XBDIQ1 |
Kernel | 1 | EN^XQOR |
Name | Comments | DBIA/ICR reference |
---|---|---|
PT | ;-- get the patient
|
|
EOJ | ;-- kill variables
|
|
REC | ;-- limit the query to number of records
|
|
DTR | ;-- get the date ranges
|
|
MAIN | ;-- this is the main routine driver
|
|
REG | ;-- ask if this is going to a registry or not
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Name | Line Occurrences |
---|---|
DTR | MAIN+4 |
EOJ | MAIN+8 |
PT | MAIN+3, PT+16 |
REC | MAIN+5 |
REG | MAIN+2 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
%DT | DTR+8*, DTR+13!, DTR+14*, DTR+18! |
%DT("A" | DTR+8*, DTR+14* |
BHLQDA | PT+6*, EOJ+1! |
BHLQDT | EOJ+1! |
>> BHLQMPT | PT+15* |
BHLREG | MAIN+7, REG+5*, EOJ+1! |
DIC | MAIN+6!, MAIN+7*, PT+1*, PT+7! |
DIC("A" | PT+1* |
DIC(0 | PT+1* |
DIR | MAIN+6!, DTR+6!, REC+1!, REC+8! |
DIR("A" | REG+2*, PT+12*, DTR+2*, REC+3* |
DIR(0 | REG+1*, PT+11*, DTR+2*, REC+3* |
>> DIRUT | MAIN+4, MAIN+5, DTR+4, REC+5 |
>> DTOUT | MAIN+3, PT+3 |
>> DUOUT | MAIN+3, PT+3 |
INA | MAIN+1! |
INA("QBDT" | DTR+11* |
INA("QEDT" | DTR+17* |
INA("QNM" | PT+5* |
INA("QTY" | REC+7* |
>> X | MAIN+7* |
Y | MAIN+3, MAIN+6!, REG+4, PT+4, PT+5, PT+6, PT+14, DTR+5, DTR+6!, DTR+10 , DTR+11, DTR+13!, DTR+16, DTR+17, DTR+18!, REC+1!, REC+6, REC+7, REC+8! |