Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: AGEVST

Package: IHS Patient Registration

Routine: AGEVST


Information

AGEVST ; cmi/flag/maw - AGEV Scheduled Visit Task ;

Source Information

Source file <AGEVST.m>

Call Graph

Call Graph Total: 9

Package Total Call Graph
VA Fileman 3 ^%DT  C^%DTC  ^DIR  
IHS VA Utilities 2 ^XBKVAR  EN^XBVK  
Kernel 2 ^%ZTLOAD  $$FMTE^XLFDT  
IHS Patient Registration 1 ($$ECHK,AL,E1)^AGEVC  
MailMan 1 ^XMB  

Entry Points

Name Comments DBIA/ICR reference
CD(DT) ;-- get date to check
TASK ;-- if they want to task it
EOJ ;-- kill variables
CNT ;-- count records created
BUL ;-- send a bulletin with the counts
ASK ;-- get the beginning and end dates for search
MAIN ;-- this is the main routine driver
LOOP ;-- loop through file 44 and get scheduled visits

External References

Name Field # of Occurrence
^%DT ASK+2, ASK+7
C^%DTC CD+2
^%ZTLOAD TASK+10
$$ECHK^AGEVC LOOP+11
AL^AGEVC LOOP+13
E1^AGEVC LOOP+12
^DIR TASK+3, ASK+13
^XBKVAR LOOP+1
EN^XBVK EOJ+3
$$FMTE^XLFDT ASK+1, ASK+6, BUL+3, BUL+4
^XMB BUL+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^INTHU(0 MAIN+3, CNT+3
^SC - [#44] LOOP+4, LOOP+6, LOOP+8, LOOP+9

Label References

Name Line Occurrences
ASK MAIN+1
BUL EOJ+2
CNT EOJ+1
EOJ MAIN+5, LOOP+17
LOOP MAIN+6
TASK MAIN+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT ASK+1*, ASK+5!, ASK+6*, ASK+10!
%DT("A" ASK+1*, ASK+6*
%DT("B" ASK+1*, ASK+6*
>> AGEVBDT ASK+4*, LOOP+5, BUL+3
>> AGEVCDT LOOP+10*, LOOP+11, LOOP+12
>> AGEVCTR CNT+2*, CNT+4*, BUL+2
>> AGEVDT LOOP+5*, LOOP+6*, LOOP+8, LOOP+9, LOOP+10
>> AGEVEDT ASK+9*, LOOP+6, BUL+4
>> AGEVEXT LOOP+2*
>> AGEVIEN LOOP+7*, LOOP+8*, LOOP+9
>> AGEVOELG ASK+14*, LOOP+11
>> AGEVSPAT LOOP+9*, LOOP+11, LOOP+13
>> AGEVTB MAIN+3*, CNT+4
>> AGEVTE CNT+3*, CNT+4
>> AGEVVDA LOOP+3*, LOOP+4*, LOOP+6, LOOP+8, LOOP+9
>> AGEVVST LOOP+13
>> AGEVYN MAIN+5, TASK+4*, TASK+5, BUL+1
BGDT EOJ+4!
>> CIMTSKV TASK+7*
DIR TASK+6!, ASK+15!
DIR("A" TASK+1*, ASK+12*
DIR("B" TASK+2*
DIR(0 TASK+1*, ASK+11*
DT ASK+1, ASK+6, CD~, CD+1
EGDT EOJ+4!
U MAIN+3, LOOP+9, CNT+3
VDA EOJ+4!
>> X CD+3
>> X1 CD+1*
>> X2 CD+1*
>> XMB BUL+2*
>> XMB(1 BUL+3*
>> XMB(2 BUL+4*
>> XMB(3 BUL+2*
>> Y MAIN+2, TASK+4, ASK+3, ASK+4, ASK+8, ASK+9, ASK+14
>> ZTDESC TASK+9*
>> ZTIO TASK+8*
>> ZTRTN TASK+9*
>> ZTSAVE( TASK+7*
Info |  Source |  Call Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  All