DVBAREQ1 ;ALB/GTS-557/THM-AMIE NEW REQUESTS; 21 JUL 89@0128
Source file <DVBAREQ1.m>
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 |
---|---|---|
Automated Medical Information Exchange | 2 | DVBA NEW REQUEST DVBA REGIONAL TASK |
Kernel | 1 | ^DIC(19 |
Name | Comments | DBIA/ICR reference |
---|---|---|
BYDATE | ;Selection by the date like old way
|
|
BYNAME | ;Selection by patient name
|
|
LINE | ;LINE FEED
|
|
REMOTE | ;Get remote site name from user
|
|
ASK | ||
DATE | ;Gets beginning and ending dates from user
|
|
GO | ||
DATA | ||
LOOPDIV | ;** Loop through Division - 'AE' X-ref
|
|
LOOPDA | ;** Loop through DA - 'AE' X-ref
|
|
EXIT | ||
TASK | ||
DEQUE | ||
CLIN | ;Logic not changed, it is the original - needs to be
|
|
INIT | ;Initialize variables
|
|
HDR | ;Writes header info
|
|
DEVICE | ;Get device to print to
|
Name | Field # of Occurrence |
---|---|
^%DT | DATE+5, DATE+9, TASK, TASK+1 |
^%ZIS | DEVICE+5 |
HOME^%ZIS | INIT+4 |
^%ZISC | EXIT+17, DEVICE+14 |
^%ZTLOAD | CLIN+4, DEVICE+13 |
^DIC | REMOTE+6 |
^DIR | ASK+5 |
PRINT^DVBAREQ3 | BYNAME+20, LOOPDA+2, LOOPDA+3, DEQUE+4 |
^DVBAREQS | BYDATE+11 |
$$VERSION^DVBAREQS | BYDATE+9, BYNAME+8 |
KILL^DVBAREQS | DVBAREQ1+7, TASK+4, TASK+8, DEQUE+7 |
KILL1^DVBAREQS | BYDATE+3, BYNAME+3 |
NAME^DVBAREQS | BYNAME+12 |
NOPARM^DVBAUTL2 | TASK+3, INIT+2 |
WR^DVBAUTL4 | LINE+2, REMOTE+3, DATE+2, DATE+14, EXIT+2, EXIT+14, HDR+2, DEVICE+2, DEVICE+17 |
$$PAT^DVBAUTL5 | BYNAME+5 |
$$SELECT^DVBAUTL5 | DVBAREQ1+4 |
$$SITE^DVBCUTL4 | TASK+6, INIT+7 |
PAUSE^DVBCUTL4 | DATE+16 |
STM^DVBCUTL4 | GO |
FileNo | Call Tags |
---|---|
^DG(40.8 - [#40.8] | Classic Fileman Calls |
Name | Field # of Occurrence |
---|---|
^(0 | CLIN+2 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
%DT | DATE+4*, DATE+18! |
%DT("A" | DATE+4*, DATE+8* |
%DT(0 | DATE+4* |
%ZIS | DEVICE+4*, DEVICE+6! |
>> BDT | BYNAME+16*, DATE+7*, DATE+12, DATA, EXIT+6, EXIT+7, TASK* |
>> DA | BYNAME+11*, BYNAME+19*, LOOPDA+1*, LOOPDA+2, LOOPDA+3, DEQUE+3* |
>> DIC | REMOTE+5* |
>> DIC("A" | REMOTE+5* |
>> DIC(0 | REMOTE+5* |
DIR | ASK+11! |
DIR("?" | ASK+4* |
DIR("A" | ASK+2* |
DIR("B" | ASK+3* |
DIR(0 | ASK+1* |
DT | DATE+4, TASK+2, INIT+8 |
>> DTOUT | REMOTE+7, ASK+6 |
>> DUOUT | ASK+6 |
>> DVBAMAN | INIT+6* |
>> DVBAQUIT | TASK+4, INIT+3 |
>> DVBATASK | LOOPDA+2, LOOPDA+3, TASK+5* |
>> DVBDA | BYNAME+5*, BYNAME+7, BYNAME+11, BYNAME+15*, BYNAME+19, DEQUE+3 |
>> DVBOUT | BYDATE+1, BYDATE+2*, BYDATE+6, BYDATE+8, BYDATE+10*, BYDATE+13, BYNAME+1, BYNAME+2*, BYNAME+7*, BYNAME+9* , BYNAME+18, REMOTE+7*, ASK+6*, DATE+6*, DATE+10*, INIT+1*, INIT+3*, DEVICE+7* |
>> DVBSEL | DVBAREQ1+4*, DVBAREQ1+5, DVBAREQ1+6, TASK+5*, DEQUE+1, DEQUE+2 |
>> DVBSTOP | BYDATE+2*, BYDATE+13, BYNAME+2*, BYNAME+18, DEVICE+9* |
>> DVBVER | BYDATE+9*, BYDATE+10, BYDATE+11, BYDATE+14, BYNAME+8*, BYNAME+9, BYNAME+10, BYNAME+14 |
>> EDT | BYNAME+16*, DATE+11*, DATE+12, DATA, EXIT+10, TASK+1* |
>> FDT(0 | EXIT+3, TASK+2*, INIT+8* |
>> HOSP | TASK+6*, INIT+7* |
>> I | CLIN+3*, DEVICE+12* |
IO | BYNAME+19, GO+1, EXIT+1 |
IO("Q" | DEVICE+8 |
ION | DEVICE+11 |
IOST | EXIT+2 |
>> J | DATA* |
>> LPDIV | DATA*, LOOPDIV+1*, LOOPDA+1, LOOPDA+2 |
LPVAR | LOOPDIV+1*, LOOPDIV+2! |
>> MA | DATA*, LOOPDIV+1, LOOPDA+1 |
NOASK | INIT+9!, DEVICE+9* |
>> NODTA | BYNAME+19*, GO+1*, EXIT, DEQUE+3* |
>> POP | DEVICE+7 |
BYNAME+19*, GO+1*, LOOPDA+2*, LOOPDA+3*, DEQUE+3* | |
U | REMOTE+7, EXIT+5, CLIN+2 |
VAR | LINE+3!, REMOTE+4!, ASK+8*, ASK+10, ASK+11!, DATE+3!, DATE+15!, EXIT+2!, EXIT+15!, HDR+3! , DEVICE+3!, DEVICE+18! |
VAR(1 | LINE+1*, REMOTE+2*, DATE+1*, DATE+13*, EXIT+2*, EXIT+3*, HDR+1*, DEVICE+1*, DEVICE+16* |
VAR(2 | EXIT+4* |
VAR(3 | EXIT+5*, EXIT+9*, EXIT+12* |
>> X | REMOTE+7, DATE+6, DATE+10, TASK*, TASK+1* |
>> XDIV | BYNAME+6*, REMOTE+1*, REMOTE+8*, ASK+7*, DATA, LOOPDIV+1, EXIT+5, DEQUE, CLIN+2* |
>> Y | REMOTE+8, ASK, ASK+7, ASK+8, DATE+6, DATE+7, DATE+10, DATE+11, EXIT+7*, EXIT+9 , EXIT+10*, EXIT+12, TASK, TASK+1, TASK+2*, INIT+8* |
>> ZI | TASK+7*, CLIN+2 |
>> ZJ | TASK+7*, CLIN+2 |
>> ZTDESC | CLIN+2*, DEVICE+11* |
>> ZTDTH | CLIN+4* |
>> ZTIO | CLIN+2*, DEVICE+11* |
>> ZTRTN | CLIN+2*, DEVICE+10* |
>> ZTSAVE( | CLIN+3*, DEVICE+12* |
>> ZTSK | DEVICE+15 |