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 |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: YSASES

Package: Mental Health

Routine: YSASES


Information

YSASES ;ALB/ASF-ASI SIGNER ;3/19/97 16:47

Source Information

Source file <YSASES.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Mental Health 4 MAIN^YSASA2  CHECKALL^YSASO2  EN1^YSASPRT  EN^YSASSN  
VA FileMan 2 $$GET1^DIQ  ^DIR  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Mental Health 1 YSAS ASI SIGNOFF  

Entry Points

Name Comments DBIA/ICR reference
MAIN ;
ACTION ;
TLD ;load ASI SIGNING list
TLP ; print list
WAIT ;

External References

Name Field # of Occurrence
$$GET1^DIQ MAIN+9, TLD+5, TLD+6, TLD+7, TLD+8
^DIR MAIN+6, ACTION+2, WAIT+3
MAIN^YSASA2 ACTION+5
CHECKALL^YSASO2 TLD+9
EN1^YSASPRT ACTION+3
EN^YSASSN ACTION+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"There are no completed ASIs for you to sign or incomplete ASIs",!,"for you to finish.",*7
  • Line Location: MAIN+2
Function Call: WRITE
  • Prompt: !
  • Line Location: MAIN+5
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: TLP+3
Function Call: WRITE
  • Prompt: @IOF,"Addiction Severity Index Sign Off Utility",!?7,"*=incomplete x=some questions X or N",!
  • Line Location: TLP+4
Function Call: WRITE
  • Prompt: ?8,"Date",?19,"Patient",?51,"Entered by",!,YSL,!
  • Line Location: TLP+5
Function Call: WRITE
  • Prompt: !,$J(YSASNUM,3),$S($P(YSASG,U,6)=1:" ",$P(YSASG,U,6)=2:"x ",1:"* ")
  • Line Location: TLP+9
Function Call: WRITE
  • Prompt: $P(YSASG,U,2)
  • Line Location: TLP+10
Function Call: WRITE
  • Prompt: ?19,$P(YSASG,U,3)
  • Line Location: TLP+11
Function Call: WRITE
  • Prompt: ?51,$P(YSASG,U,5)
  • Line Location: TLP+12
Function Call: WRITE
  • Prompt: !
  • Line Location: WAIT+1
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: WAIT+3
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: WAIT+5
Function Call: WRITE
  • Prompt: ?8,"Date",?19,"Patient",?51,"Entered by",!,YSL,!
  • Line Location: WAIT+6
Routine Call
  • DIR
  • Line Location:
    • MAIN+6
    • ACTION+2
    • WAIT+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^YSTX(604 - [#604] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP($J MAIN+3!, MAIN+8, TLD+1!, TLD+10*, TLP+1, TLP+7, TLP+8
^YSTX(604 - [#604] MAIN+2, TLD+3

Label References

Name Line Occurrences
ACTION MAIN+10
MAIN MAIN+11
TLD MAIN+4
TLP MAIN+4
WAIT TLP+13

Naked Globals

Name Field # of Occurrence
^( MAIN+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DIR MAIN+6!, ACTION+1!, ACTION+2!, WAIT+3!
DIR("A" MAIN+6*, ACTION+1*
DIR("B" ACTION+1*
DIR(0 MAIN+6*, ACTION+1*, WAIT+3*
DIRUT MAIN+7, ACTION+3!, TLP+7, WAIT+2~, WAIT+4
DTOUT WAIT+2~
DUOUT WAIT+2~
DUZ MAIN+2, TLD+3
>> I0 WAIT+1*
IOF TLP+3, TLP+4, WAIT+5
IOSL TLP+13, WAIT+1
IOST WAIT+3
U MAIN+8, TLD+10, TLP+9, TLP+10, TLP+11, TLP+12
>> Y MAIN+8, ACTION+3, ACTION+4, ACTION+5
YSASC MAIN+1~, MAIN+6, TLD+2*, TLD+4*, TLD+10
YSASCL MAIN+1~, TLD+5*, TLD+10
YSASDT MAIN+1~, TLD+6*, TLD+10
YSASFLD MAIN+1~
YSASG MAIN+1~, TLP+8*, TLP+9, TLP+10, TLP+11, TLP+12
>> YSASIEN TLD+2*, TLD+3*, TLD+5, TLD+6, TLD+7, TLD+8, TLD+9, TLD+10
YSASNUM MAIN+1~, TLP+6*, TLP+7*, TLP+8, TLP+9
>> YSASPIEN MAIN+9*, ACTION+5
YSASPT MAIN+1~, TLD+8*, TLD+10
>> YSASSIEN MAIN+8*, MAIN+9, ACTION+3, ACTION+4, ACTION+5
YSASTRN MAIN+1~, TLD+7*, TLD+10
YSASX MAIN+1~
YSL MAIN+1~, TLP+2*, TLP+5, WAIT+6
YSOK MAIN+1~, MAIN+8*, ACTION+1, TLD+9, TLD+10
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All