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

Package: Mental Health

Routine: YSDX3B


Information

YSDX3B ;SLC/DJP-Entry of Axis 4 & Axis 5 Diagnoses for the Mental Health Medical Record ;8/29/89 08:51

Source Information

Source file <YSDX3B.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
VA FileMan 5 ^%DT  ^DIC  FILE^DICN  ^DIE  ^DIK  
Mental Health 2 GAF^YSDX3UB  EN^YSGAFOBX  
Kernel 1 EN^XQH  
Registration 1 IN5^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: 4

Package Total Caller Graph
Mental Health 4 YSDX3  YSGAF  YSGAFAP1  YSGAFTR  

Entry Points

Name Comments DBIA/ICR reference
AXIS4 ; Called by routine YSCEN1, YSDX3
; Entry of Axis 4 information
AX43 ;
AX42 ;
AX4 ;
AX41 ;
AXIS5 ; Called by routines YSCEN1, YSDX3
AX51 ;
GAFQ ;
AX5
GAF2 ;
GAF3 ;
GAFUP ;
PATSTAT ;

External References

Name Field # of Occurrence
^%DT AX51+7, GAFQ+6, GAFUP+4
^DIC AX42+7
FILE^DICN AX51+8, GAFUP+5
^DIE AX42+11, AX51+12, GAFUP+9
^DIK AX42+14, AX51+16
IN5^VADPT PATSTAT+3
EN^XQH AX43+4, AX42+3, AX51+4, GAFQ+3
GAF^YSDX3UB AXIS5+3
EN^YSGAFOBX AX51+15, GAFUP+12

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"AXIS 4",!,"------"
  • Line Location: AXIS4+3
Function Call: READ
  • Variable: X3
  • Timeout: DTIME
  • Line Location: AX43+2
Function Call: READ
  • Variable: X4
  • Timeout: DTIME
  • Line Location: AX42+2
Function Call: WRITE
  • Prompt: " "_X6
  • Line Location: AX42+5
Function Call: WRITE
  • Prompt: !!,"Enter code indicating overall severity of psychosocial stressor.",!
  • Line Location: AX4+2
Function Call: WRITE
  • Prompt: !?5,$P(A2,":")_" "_$P(A2,":",2)
  • Line Location: AX4+2
Function Call: WRITE
  • Prompt: !!,"Enter ""??"" for additional information on Severity Codes."
  • Line Location: AX4+3
Function Call: WRITE
  • Prompt: !!,"Enter short narrative (1-60 characters) describing source of stress."
  • Line Location: AX41+2
Function Call: WRITE
  • Prompt: !!,"AXIS 5",!,"------",!
  • Line Location: AXIS5+3
Function Call: READ
  • Variable: X5
  • Timeout: DTIME
  • Line Location: AX51+2
Function Call: READ
  • Variable: G7
  • Timeout: DTIME
  • Line Location: GAFQ+2
Function Call: WRITE
  • Prompt: !!,"Enter rating of current functioning as indicated on GAF Scale (100-1).",!,"Enter ""??"" for additional information on the GAF Scale.",!
  • Line Location: AX5+0
Function Call: WRITE
  • Prompt: !!,"Default shown is the highest recorded GAF Scale for this patient during ",!,"the past year. To change, enter a HIGHER number.",!,"Enter ""??"" for additional information on the GAF Scale.",!
  • Line Location: GAF2+2
Function Call: WRITE
  • Prompt: " ??",!,"Type a number (1-100) relevant to the GAF Scale."
  • Line Location: GAF3+1
Routine Call
  • DIC
  • Line Location:
    • AX42+7
Routine Call
  • DIE
  • Line Location:
    • AX42+11
    • AX51+12
    • GAFUP+9

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^YSD(627.8 - [#627.8] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(627.8 AX4+2
^VA(200 - [#200] AX42+8
^YSD(627.8 - [#627.8] AX42+9, AX42+12, AX51+11, AX51+13, GAFUP+8, GAFUP+10

Label References

Name Line Occurrences
AX4 AX42+4
AX41 AX43+3, AX43+5
AX42 AX42+3, AX42+4
AX43 AX43+3, AX43+4, AX43+5, AX42+14
AX5 AX51+3, AX51+5
AX51 AX51+3, AX51+4, AX51+5, GAFQ+2
GAF2 GAFQ+4
GAF3 GAFQ+5
GAFQ GAFQ+3, GAFQ+4, GAFQ+5
GAFUP GAFQ+6
PATSTAT AX51+9, GAFUP+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT AX51+7*, GAFQ+6*, GAFUP+4*
>> %DT("A" GAFQ+6*!
>> A1 AX4+2*
>> A2 AX4+2*
DA AX42+8*, AX42+9, AX42+12, AX42+13!, AX42+14*, AX51+6!, AX51+10*, AX51+11, AX51+13, AX51+14!
, AX51+16*, GAFUP+3!, GAFUP+7*, GAFUP+8, GAFUP+10, GAFUP+11!
DD AX51+6!, GAFUP+3!
DIC AX42+6*, AX42+13!, AX51+8*, AX51+14!, GAFUP+5*, GAFUP+11!
DIC(0 AX42+6*, AX51+8*, GAFUP+5*
DIE AX42+8*, AX42+13!, AX51+10*, AX51+14!, GAFUP+7*, GAFUP+11!
>> DIK AX42+14*, AX51+16*
DINUM AX51+6!, GAFUP+3!
>> DLAYGO AX42+6*, AX51+8*, GAFUP+5*
DO AX51+6!, GAFUP+3!
DR AX42+8*, AX42+13!, AX51+10*, AX51+14!, GAFUP+7*, GAFUP+11!
DTIME AX43+2, AX42+2, AX51+2, GAFQ+2
>> DTOUT AX42+14, AX51+16
DUZ AX42+8, AX51+10
>> G11 GAFQ+2
>> G5 GAFQ+2*
G7 GAFQ+2*, GAFQ+3, GAFQ+4!, GAFQ+5!
>> G8 GAFQ+6*
>> G9 GAFQ+6*
>> I AX4+2*
U AX42+8, AX4+2
VAIP PATSTAT+1!
VAIP(1 PATSTAT+4
>> X AX42+6*, AX51+7*, GAFQ+6*, GAFUP+4*
X3 AX43+2*, AX43+3!, AX43+4!, AX43+5!
X4 AX42+2*, AX42+3!, AX42+4, AX42+5
X5 AX51+2*, AX51+3!, AX51+4!, AX51+5!
>> X6 AX42+5*
X7 GAFQ+3!
>> XQH AX43+4*, AX42+3*, AX51+4*, GAFQ+3*
Y AX42+7, AX42+10!, AX51+7, AX51+8, GAFQ+6, GAFUP+4, GAFUP+5
Y("" AX42+14, AX51+16
>> YSDA AX42+7*, AX42+8, AX42+14, AX51+8*, AX51+10, AX51+15, AX51+16, GAFUP+5*, GAFUP+7, GAFUP+12
>> YSDFN AX42+8, AX51+10, GAFUP+7
>> YSDUZ AX42+8*
>> YSGAF GAFQ+2
>> YSOLD GAFQ+6*
>> YSQT AX43+2*, AX42+2*, AX51+2*, GAFQ+2*
>> YSSTAT AX51+10, GAFUP+7, PATSTAT+2*, PATSTAT+4*, PATSTAT+5*, PATSTAT+6*
>> YSTOUT AX43+2*, AX42+2*, AX42+14*, AX51+2*, AX51+16*, GAFQ+2*
>> YSUOUT AX43+2*, AX42+2*, AX51+2*, AX51+16*, GAFQ+2*
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