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 |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: YSASFUR

Package: Mental Health

Routine: YSASFUR


Information

YSASFUR ;ASF/ASL ASI FOLLOWUP REQUIRED ;3/13/98 10:39

Source Information

Source file <YSASFUR.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Kernel 3 ^%ZISC  ^%ZTLOAD  $$DTIME^XUP  
VA FileMan 3 ^%DT  ^%DTC  ^DIR  
MailMan 1 ^XMD  
Mental Health 1 $$SITE^YSASCF  
Registration 1 DEM^VADPT  

Entry Points

Name Comments DBIA/ICR reference
MAIN ;
QUEUE ;
ENQ ;queue entry
DTRANGE ;date range
DATELP ;look for all ASIs in range
NEXTCK ;FU checker
PTLST ; list pts
HEAD ;header
BOT ; bottom
MAIL2 ; SEND MAILMAN

External References

Name Field # of Occurrence
^%DT DTRANGE+1, DTRANGE+4
^%DTC NEXTCK+2
^%ZISC QUEUE+2
^%ZTLOAD QUEUE+2
^DIR DTRANGE+8
DEM^VADPT PTLST+5
^XMD MAIL2+13
$$DTIME^XUP MAIL2+16
$$SITE^YSASCF HEAD+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!?10,"Addiction Severity Index Followup Reminder",!
  • Line Location: MAIN+3
Function Call: WRITE
  • Prompt: !!,"Results returned via Mailman. Please queue this report for after hours."
  • Line Location: MAIN+5
Function Call: WRITE
  • Prompt: !
  • Line Location: DTRANGE+1
Function Call: WRITE
  • Prompt: !
  • Line Location: DTRANGE+4
Function Call: WRITE
  • Prompt: !,?7,"Ending Date must be closer to today than Beginning Date",!
  • Line Location: DTRANGE+7
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: DTRANGE+7
Function Call: WRITE
  • Prompt: !
  • Line Location: DTRANGE+8
Routine Call
  • DIR
  • Line Location:
    • DTRANGE+8

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" PTLST+7, HEAD+6, HEAD+7
^DPT - [#2] DATELP+8
^TMP("YSAS" MAIN+1!, QUEUE+3!, DATELP+8*, PTLST+1, PTLST+2, PTLST+5*, PTLST+9*, PTLST+10*, HEAD+1!, HEAD+5*
, HEAD+6*, HEAD+7*, HEAD+8*, HEAD+9*, HEAD+10*, HEAD+11*, HEAD+12*, HEAD+13*, HEAD+14*, BOT+1*
, BOT+2*, MAIL2+3, MAIL2+4
^TMP("YSMM" MAIL2+1!, MAIL2+4*, MAIL2+15!
^VA(200 - [#200] PTLST+8
^YSTX(604 - [#604] DATELP+1, DATELP+2, NEXTCK+3, NEXTCK+4, PTLST+7

Label References

Name Line Occurrences
BOT ENQ+4
DATELP ENQ+3
DTRANGE MAIN+4, DTRANGE+7
HEAD ENQ+4
MAIL2 ENQ+5
NEXTCK DATELP+7
PTLST ENQ+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT DTRANGE+1*
>> %DT("A" DTRANGE+1*, DTRANGE+4*
>> DFN DATELP+2*, DATELP+4, DATELP+8, NEXTCK+3, PTLST+1*, PTLST+2
DIR MAIN+2~, DTRANGE+8!
DIR("A" DTRANGE+8*
DIR("B" DTRANGE+8*
DIR(0 DTRANGE+8*
DIRUT MAIN+2~, DTRANGE+8
DT NEXTCK+2
DTIME MAIL2+7*, MAIL2+16*
DUZ MAIL2+11, MAIL2+16
G MAIN+2~, DATELP+2*, NEXTCK+4, PTLST+2*, PTLST+7*, PTLST+8
G2 MAIN+2~, NEXTCK+4*
IOF MAIN+3
IOP QUEUE+1!
U DATELP+2, DATELP+8, NEXTCK+4, PTLST+2, PTLST+7, PTLST+8
VA MAIN+2~
VA("BID" PTLST+5
X MAIN+2~, NEXTCK+2
X1 MAIN+2~, NEXTCK+2*
X2 MAIN+2~, NEXTCK+2*
>> XMDUZ MAIL2+12*
>> XMSUB MAIL2+8*
>> XMTEXT MAIL2+9*
>> XMY( MAIL2+11*
>> XMY("G.ASI PE RFORMANCE MEASURES" , MAIL2+10*
Y MAIN+2~, DTRANGE+2, DTRANGE+3, DTRANGE+5, DTRANGE+6, DTRANGE+8*, PTLST+7*, PTLST+9, HEAD+6*, HEAD+7*
YS2G12 MAIN+2~, NEXTCK+4*
YSASAD1 MAIN+2~, DATELP+2*, NEXTCK+2
YSASBDT MAIN+2~, MAIN+4, DTRANGE+1*, DTRANGE+3*, DTRANGE+7, DATELP+1, HEAD+6
YSASCL MAIN+2~, DATELP+2*, PTLST+7*, PTLST+9
YSASCNT MAIN+2~, MAIL2+3*, MAIL2+4, MAIL2+5
YSASCNT2 MAIN+2~, MAIL2+3*, MAIL2+4*, MAIL2+5, MAIL2+14*
YSASCNT3 MAIN+2~, MAIL2+2*, MAIL2+6*, MAIL2+8
YSASDLY MAIN+2~, MAIN+4, DTRANGE+8*, NEXTCK+2, HEAD+8
YSASDT MAIN+2~, DATELP+1*
YSASEDT MAIN+2~, MAIN+4, DTRANGE+1*, DTRANGE+6*, DTRANGE+7, DATELP+1, HEAD+7
YSASG12 MAIN+2~, DATELP+2*, DATELP+3
YSASIN MAIN+2~, DATELP+1*, DATELP+2, DATELP+8, NEXTCK+3
YSASIN2 MAIN+2~, NEXTCK+3*, NEXTCK+4
YSASITE MAIN+2~, HEAD+4*, HEAD+9
YSASN MAIN+2~, ENQ+2*, PTLST+5*, PTLST+9, PTLST+10, HEAD+3*, HEAD+5*, HEAD+6*, HEAD+7*, HEAD+8*
, HEAD+9*, HEAD+10*, HEAD+11*, HEAD+12*, HEAD+13*, HEAD+14*, BOT+1*, BOT+2*, MAIL2+2, MAIL2+5
YSASS MAIN+2~, PTLST+5, PTLST+9, HEAD+1*, HEAD+5, HEAD+13, HEAD+14
YSASTC MAIN+2~, MAIL2+2*, MAIL2+8
YSASTYP2 MAIN+2~, NEXTCK+4*, NEXTCK+5
YSCK MAIN+2~, DATELP+8, NEXTCK+1*, NEXTCK+2*, NEXTCK+5*, PTLST+2*, PTLST+3, PTLST+4, PTLST+10
YSIN1 MAIN+2~, PTLST+2*, PTLST+7
YSIN2 MAIN+2~, DATELP+6*, DATELP+8, NEXTCK+4*, PTLST+2*
YSINTER MAIN+2~, PTLST+8*, PTLST+9
YSLOC MAIN+2~
YSNM MAIN+2~, PTLST+1*, PTLST+2, PTLST+5
YSTOT MAIN+2~, ENQ+2*, PTLST+6*, BOT+2
>> ZTDESC QUEUE+2*
ZTIO QUEUE+1!, QUEUE+2*
>> ZTRTN QUEUE+2*
ZTSAVE QUEUE+1!
ZTSAVE("YSAS*" QUEUE+2*
>> ZTSK QUEUE+2
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All