ADEGRL6 ; IHS/HQT/MJL - FILE DENTAL VISIT DATA ;10:12 PM [ 03/24/1999 9:04 AM ]
Source file <ADEGRL6.m>
Package | Total | Call Graph |
---|---|---|
IHS Dental System | 2 | ^ADEAPC ^ADEQUE |
VA Fileman | 2 | FILE^DICN ^DIE |
Kernel | 1 | ^%ZTLOAD |
MailMan | 1 | ^XMB |
Name | Comments | DBIA/ICR reference |
---|---|---|
ZTM | ;------->IF NEW VISIT CREATE ENTRY IN ADEPCD (ENTRY POINT FOR ^ADEDQUE)
|
|
END1 | ||
END | ||
RO1B | ||
RO1A | ||
FOL | ;IF FAILED APPT SEND MESSG IF ON URGENT RECALL
|
|
MSG | ||
STUFA | ||
NEWVS | ||
STUFB | ||
FAIL | ;
|
|
RO1 | ||
SDEL1 | ||
ROLL | ||
SDEL | ;
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^ADEPCD - [#9002007] | Classic Fileman Calls |
^ADEPAT - [#9002010.2] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^%ZTSCH("RUN" | ADEGRL6+11 |
^ADEFOL - [#9002003.2] | MSG, MSG+2 |
^ADEFOL("TYPE" | FOL+1, FOL+2 |
^ADEPARAM - [#9002006] | ADEGRL6+10 |
^ADEPAT - [#9002010.2] | FAIL+2, FAIL+5, FAIL+6*, FAIL+11* |
^ADEPCD - [#9002007] | SDEL1, STUFB+1*, RO1* |
^ADEUTL("ADEDQUE" | ADEGRL6+14* |
^ADEUTL("ADELOCK" | END! |
^AUTTADA("B" | ROLL |
^AUTTSITE(1 | ADEGRL6+10 |
^DIC(16 - [#16] | MSG+2 |
^DPT - [#2] | MSG+2 |
Name | Line Occurrences |
---|---|
END | ADEGRL6+6, ADEGRL6+7, ZTM+11 |
END1 | ADEGRL6+15 |
FAIL | ZTM+11 |
FOL | ZTM+11 |
MSG | FOL+2 |
NEWVS | ZTM+1 |
RO1 | ROLL |
RO1B | RO1A |
ROLL | RO1A+1 |
SDEL | ZTM+3 |
SDEL1 | SDEL1+2 |
STUFA | ZTM+5 |
STUFB | ZTM+7 |
ZTM | ADEGRL6+9, ADEGRL6+10, ADEGRL6+11 |
Name | Field # of Occurrence |
---|---|
^("RUN" | ADEGRL6+11 |
^(0 | RO1* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ADECNT | END1!, RO1A*, RO1B, RO1B+1, RO1B+2 |
ADECOD | END1! |
>> ADECON | STUFA, RO1A |
ADEDEF | END1! |
ADEDEL | END1! |
ADEDENT | END1! |
ADEDES | END1! |
>> ADEDFN | NEWVS*, SDEL+1, SDEL1, STUFA, STUFB, RO1 |
ADEFLG | END1! |
ADEHRN | END1! |
ADEHXC | END1+1! |
ADEHXF | END1+1! |
ADEHXO | END1+1! |
ADEI | END1!, ROLL*, RO1A |
>> ADEJ | STUFB+1*, ROLL*, RO1A, RO1B, RO1B+1, RO1B+2 |
ADELOE | END1! |
ADELOED | END1!, STUFA |
ADEMDFN | FOL+2*, FOL+3!, MSG, MSG+2 |
ADENEWVS | ADEGRL6+7, ZTM+1, ZTM+3, ZTM+11, END1! |
ADENOTE | END1!, STUFA |
ADENOUPD | ADEGRL6+6, END1! |
ADEOP | END1! |
ADEPAT | END, END1!, NEWVS, FAIL+2, FAIL+3, FAIL+5, FAIL+6, FAIL+11, FOL+1, FOL+2 , MSG+2 |
ADEPNM | END1! |
ADEPVNM | END1! |
ADEPVNMD | END1!, STUFA |
ADEQ | FOL+2*, FOL+3! |
ADEQTY | END1! |
ADER | FOL+2*, FOL+3! |
ADERDNM | END1! |
ADERDNMD | END1!, STUFA |
ADESVC | SDEL+1*, SDEL1*, SDEL1+1!, SDEL1+2 |
ADETCH | END1!, STUFA |
ADETCHF | END1! |
ADETFE | END1! |
ADETITL | END1! |
ADETYP | FOL+2*, FOL+3! |
ADEV | ADEGRL6+7, END1! |
ADEV( | ROLL, RO1A, RO1B, RO1B+1, RO1B+2 |
ADEV("9130" | ZTM+11, FAIL+9 |
ADEV("9140" | ZTM+11 |
ADEV("9986" | ZTM+11, FAIL+9 |
ADEV("9987" | ZTM+11 |
ADEVDATE | END1!, NEWVS, FAIL+9, MSG+2 |
DA | ZTM+5!, ZTM+7!, SDEL+1*, SDEL1+1!, STUFA*, STUFB+1*, RO1A*, RO1, FAIL+1!, FAIL+5* , FAIL+6*, FAIL+11 |
DA(1 | STUFB*, STUFB+1, FAIL+3* |
DD | NEWVS!, FAIL+2! |
DIC | ADEGRL6+3!, NEWVS*, FAIL+1!, FAIL+2* |
DIC("DR" | NEWVS* |
DIC(0 | NEWVS*, FAIL+2* |
DIE | ZTM+5!, ZTM+7!, SDEL+1*, SDEL1+1!, STUFA*, STUFB+1*, FAIL+1!, FAIL+4* |
>> DINUM | FAIL+2* |
DO | NEWVS!, FAIL+2! |
DR | ZTM+5!, ZTM+7!, SDEL1+1!, SDEL1+2*, STUFA*, RO1A*, RO1B*, RO1B+1*, RO1B+2*, FAIL+1! , FAIL+9* |
DR(2 | SDEL+1* |
U | ADEGRL6+10, NEWVS, RO1A, RO1B, RO1B+1, RO1B+2, RO1, FAIL+5, FAIL+11, MSG+2 |
X | NEWVS*, FAIL+1!, FAIL+2* |
XMB | FOL+3!, MSG+1!, MSG+3, MSG+4*, MSG+7! |
XMB(1 | MSG+2* |
XMB(2 | MSG+2* |
XMB(3 | MSG+2* |
>> XMDUZ | MSG+5* |
Y | NEWVS, FAIL+1! |
>> ZTDESC | ADEGRL6+14* |
>> ZTDTH | ADEGRL6+14* |
>> ZTIO | ADEGRL6+14* |
>> ZTRTN | ADEGRL6+14* |