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 |  Local Variables  | All
Print Page as PDF
Routine: YSASA2

Package: Mental Health

Routine: YSASA2


Information

YSASA2 ;ASF/ALB-ASI QUICK ENTRY ;3/19/98 15:08

Source Information

Source file <YSASA2.m>

Call Graph

Call Graph

Call Graph Total: 14

Package Total Call Graph
VA FileMan 9 MSG^DIALOG  ^DIC  DQ^DICQ  $$GET1^DID  (,FILE,HELP,VAL)^DIE  $$VALUE1^DILF  $$EXTERNAL^DILFD  $$GET1^DIQ  
^DIR  
Kernel 2 HOME^%ZIS  ENDR^%ZISS  
Mental Health 2 ($$RACE,$$REL)^YSASLIB  EN^YSASSN  
Registration 1 (DEM,KVAR)^VADPT  

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: 3

Package Total Caller Graph
Mental Health 3 YSASES  YSASOL  YSASSEL  

Entry Points

Name Comments DBIA/ICR reference
AA(YSASPIEN,YSASTYP) ;Add NEW RECORD
MAIN(YSASPIEN,YSASSIEN) ;
LOOP ;
WP ;
L3 ;
L4 ;No form feed
VAL ;
FDAGET ;
SCREENH ;

External References

Name Field # of Occurrence
HOME^%ZIS SCREENH+1
ENDR^%ZISS SCREENH+3
MSG^DIALOG L4+19, L4+23
^DIC AA+17
DQ^DICQ L4+18
$$GET1^DID L4+17
^DIE AA+27, WP+9
FILE^DIE LOOP+5
HELP^DIE L4+19, L4+23
VAL^DIE VAL+1
$$VALUE1^DILF FDAGET+1
$$EXTERNAL^DILFD FDAGET+2
$$GET1^DIQ AA+13, MAIN+5, MAIN+13, MAIN+14, L4+2
^DIR LOOP+3, WP+5
DEM^VADPT MAIN+7
KVAR^VADPT MAIN+7
$$RACE^YSASLIB AA+12
$$REL^YSASLIB AA+12
EN^YSASSN WP+12

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"...reading Patient information..."
  • Line Location: AA+11
Function Call: WRITE
  • Prompt: !,"...creating new ASI record..."
  • Line Location: AA+14
Function Call: WRITE
  • Prompt: @IOF,YSHDR1,?45,YSASI1,YSHDR2,YSASI0,!
  • Line Location: MAIN+9
Function Call: WRITE
  • Prompt: !
  • Line Location: LOOP+2
Function Call: WRITE
  • Prompt: !?10,"*** Comments ***",!,"1. General Info",?20,"2. Medical",?40,"3. Employment",?60,"4. Drug/Alcohol"
  • Line Location: WP+2
Function Call: WRITE
  • Prompt: !,"5. Legal",?20,"6. Family hx",?40,"7. Social",?60,"8. Psychiatric"
  • Line Location: WP+3
Function Call: WRITE
  • Prompt: !,"9. Spiritual",?19,"10. Leisure",!
  • Line Location: WP+4
Function Call: WRITE
  • Prompt: YSASI1
  • Line Location: L3+6
Function Call: WRITE
  • Prompt: YSASI0
  • Line Location: L3+6
Function Call: WRITE
  • Prompt: !,$S($P(^YSTX(604.66,YSN,0),U,10)=1&(YSASTYP="FOLLOWUP"):"* ",1:""),YSQ,$S(YSP="":": ",1:": "_YSP_" // ")
  • Line Location: L4+4
Function Call: READ
  • Variable: YSV
  • Timeout: DTIME
  • Line Location: L4+5
Function Call: WRITE
  • Prompt: YSASI1
  • Line Location: L4+16
Function Call: WRITE
  • Prompt: YSASI0
  • Line Location: L4+16
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: L4+23
Function Call: WRITE
  • Prompt: ?$X+3,YSA(0)
  • Line Location: L4+24
Routine Call
  • %ZIS
  • Line Location:
    • SCREENH+1
Routine Call
  • DIALOG
  • Line Location:
    • L4+19
    • L4+23
Routine Call
  • DIC
  • Line Location:
    • AA+17
Routine Call
  • DIE
  • Line Location:
    • AA+27
    • WP+9
Routine Call
  • DIE
  • Line Location:
    • LOOP+5
Routine Call
  • DIE
  • Line Location:
    • L4+19
    • L4+23
Routine Call
  • DIE
  • Line Location:
    • VAL+1
Routine Call
  • DIR
  • Line Location:
    • LOOP+3
    • WP+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ
^YSTX(604 - [#604] Classic Fileman Calls,  GET1^DID,  GET1^DIQ
^YSTX(604.8 - [#604.8] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] AA+10
^TMP($J MAIN+12!
^YSTX(604.66 - [#604.66] LOOP+1, L3+1, L3+2, L4+4, L4+11, L4+13

Label References

Name Line Occurrences
FDAGET L4+1
L3 LOOP+1
L4 L4+16, L4+23
SCREENH MAIN+3
VAL L4+22

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
D L4+18*!
DA AA+9~, AA+20~, AA+21*, WP+8*
DDSFILE AA+9~
>> DFN MAIN+7*
DIC AA+9~, AA+16*, AA+21, L4+18*!
DIC(0 AA+16*, L4+18*
DID L4+18!
DIE AA+20~, AA+21*, WP+8*, L4+18!
DIERR AA+9~
DIR LOOP+3!, WP+1!, WP+5!
DIR("A" LOOP+3*, WP+5*
DIR("B" LOOP+3*
DIR(0 LOOP+3*, WP+5*
DIRUT WP+1!, WP+6
DIX L4+18!
DLAYGO AA+9~, AA+15*
DO L4+18!
DR AA+9~, AA+20~, AA+22*, AA+23*, AA+24*, AA+25*, AA+26*, WP+7*
DTIME L4+5
DUZ AA+24
>> IOBOFF SCREENH+5
>> IOBON SCREENH+5
IOF MAIN+9, L3+4
IOHG AA+8~
IOINHI AA+8~, SCREENH+4
IOINORM AA+8~, SCREENH+4
>> IORVOFF SCREENH+4
>> IORVON SCREENH+4
IOSL L3+4
IOST SCREENH+1
IOUOFF AA+8~, SCREENH+4
IOUON AA+8~, SCREENH+4
U AA+13, MAIN+7, L3+1, L3+3, L4+4
>> VADM(1 MAIN+7
>> VADM(2 MAIN+7
X AA+9~, AA+16*, AA+20~, SCREENH+2*
Y AA+9~, AA+10*, AA+13, AA+18, AA+19, AA+20~, LOOP+4, WP+7, L4+1, FDAGET+1*
, FDAGET+2*
Y(0 AA+10*, AA+12, AA+13
>> YSA L4+23, VAL+1
>> YSA(0 L4+24
YSAS AA+20~
YSAS033 AA+20~
>> YSASB0 SCREENH+5*
>> YSASB1 SCREENH+5*
YSASBLC AA+5~
YSASBRC AA+6~
YSASBT AA+6~
YSASC AA+20~
YSASDF AA+20~
YSASDFLT AA+5~
>> YSASENT L3+1*, L3+6
>> YSASEX L3+2*, L4+25
YSASF AA+20~
YSASG0 AA+4~
YSASG1 AA+4~
YSASGE AA+3~, AA+13*
YSASHL AA+4~
YSASI0 AA+4~, MAIN+9, L3+4, L3+6, L4+16, SCREENH+4*
YSASI1 AA+4~, MAIN+9, L3+4, L3+6, L4+16, SCREENH+4*
YSASLR AA+20~
YSASLT AA+4~
YSASN AA+7~
YSASNEW AA+3~, AA+19*
YSASNM AA+3~, AA+13*
YSASPIEN AA~, AA+1, AA+10, AA+22, MAIN~, MAIN+2, MAIN+7
YSASRACE AA+3~, AA+12*, AA+25
YSASREL AA+3~, AA+12*, AA+26
>> YSASRV0 SCREENH+4*
>> YSASRV1 SCREENH+4*
YSASSEX AA+4~, AA+12*
YSASSIEN AA+19*, AA+21, MAIN~, MAIN+1, MAIN+4, WP+8, WP+12
YSASTLC AA+5~
YSASTRC AA+4~, AA+5~
YSASTT AA+4~
YSASTYP AA~, AA+2, AA+23, MAIN+5*, MAIN+6, MAIN+8, L4+4
YSASU0 AA+3~, SCREENH+4*
YSASU1 AA+3~, SCREENH+4*
YSASV AA+20~
YSASVL AA+4~
YSATRIB L4+16!, L4+17*, L4+18, L4+19
>> YSDEF L3+1*, L4+3
>> YSDFLAG MAIN+13*, L4+3
>> YSEFLAG MAIN+14*, L4+25
>> YSENDLP LOOP+1*, L3+5
>> YSFDA MAIN+11*, L4+19, L4+23, VAL+1, FDAGET+1
>> YSFIELD L3+1*, L4+2, L4+17, L4+19, L4+23, VAL+1, FDAGET+1, FDAGET+2
>> YSFILE MAIN+10*, L4+19, L4+23, VAL+1, FDAGET+1, FDAGET+2
>> YSFLAG MAIN+10*, VAL+1
>> YSG L3+1*, L3+3
>> YSGP MAIN+6*, L3+3
>> YSHDR1 MAIN+7*, MAIN+9, L3+4
>> YSHDR2 MAIN+8*, MAIN+9, L3+4
>> YSIENS MAIN+4*, MAIN+5, L4+2, VAL+1
>> YSN MAIN+15*, LOOP+1*, L3+1, L3+2, L4+4, L4+14*
>> YSNN L4+10*, L4+11*, L4+12, L4+13
>> YSNN1 L4+8, L4+10*, L4+13*, L4+14
>> YSP L4+1*, L4+2*, L4+3*, L4+4, L4+6
>> YSQ L3+1*, L4+4
>> YSV MAIN+15*, LOOP+1, L4+5*, L4+6*, L4+7, L4+8, L4+9*, L4+11, L4+12, L4+16
, L4+21*, VAL+1
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 |  Local Variables  | All