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

Package: Mental Health

Routine: YSDX3UB


Information

YSDX3UB ;SLC/DJP/LJA-Continuation of Utilities for Diagnosis Entry in the MH Medical Record ;09/07/94 13:11

Source Information

Source file <YSDX3UB.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Kernel 2 $$REPLACE^XLFSTR  EN^XQH  
Mental Health 2 DELETE^YSDX3UA  ASKQUAL^YSDX3UC  
VA FileMan 2 (,DD)^%DT  ^DIE  

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 YSDX3  YSDX3B  YSDX3RUA  

Entry Points

Name Comments DBIA/ICR reference
MODIF ; Called by routine YSDX3
; Print out modifier questions
MQUES ;
DQP(YSPEC) ; Display Qualifier Prompt (Specifier)
; Note: Cursor should be at beginning of line when DQP call made.
DQP1(YSPEC) ;Print prompt with proper wrapping...
; After call, cursor is left at end of last line...
YN ;
NUM ;
MSET ;
GAF ; Called by routine YSDX3B, YSDX3RUA
; Calculates the highest GAF for the past year. YSGAF(X) stores scale^DA.
GAF1 ;
EOR ;YSDX3UB-Continuation of Utilities for Diagnosis Entry in the MH Medical Record ;9/18/91 15:39

External References

Name Field # of Occurrence
^%DT GAF1+2
DD^%DT GAF+9
^DIE MSET+15
$$REPLACE^XLFSTR DQP+8
EN^XQH NUM+5
DELETE^YSDX3UA MODIF+6
ASKQUAL^YSDX3UC MQUES+12

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"MODIFIERS: "
  • Line Location: MODIF+4
Function Call: WRITE
  • Prompt: ":"
  • Line Location: DQP+12
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $X>9
  • Line Location: DQP+16
Function Call: WRITE
  • Prompt: ?10
  • Line Location: DQP+16
Function Call: WRITE
  • Prompt: YSY,!,?10
  • Line Location: DQP+19
Function Call: WRITE
  • Prompt: $E(YSY,1,YSI),!,?13,$E(YSY,YSI+1,999)
  • Line Location: DQP+22
Function Call: WRITE
  • Prompt: !,?10
  • Line Location: DQP+23
Function Call: WRITE
  • Prompt: YSPEC
  • Line Location: DQP1+6
Function Call: WRITE
  • Prompt: $E(YSPEC,1,+YSX)
  • Line Location: DQP1+9
Function Call: WRITE
  • Prompt: !!,"Diagnosis may be modified. Answer ""YES"" or ""NO""."
  • Line Location: YN+4
Function Call: WRITE
  • Prompt: "??"
  • Line Location: YN+6
Function Call: WRITE
  • Prompt: !!,"Diagnosis may be modified. Answer with corresponding numeric."
  • Line Location: NUM+3
Function Call: WRITE
  • Prompt: "??"
  • Line Location: NUM+6
Function Call: WRITE
  • Prompt: !!,"Answer with corresponding numeric."
  • Line Location: NUM+8
Routine Call
  • DIE
  • Line Location:
    • MSET+15

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)
^DIC(627.9 - [#627.9] MQUES+3, MQUES+7, MQUES+8, MQUES+17, NUM+7
^YSD(627.7 - [#627.7] MODIF+3, MODIF+6, MODIF+7
^YSD(627.8 - [#627.8] MSET+5, MSET+16, GAF+4, GAF+6, GAF+9, GAF1+2, GAF1+4

Label References

Name Line Occurrences
DQP1 DQP+12, DQP+26
GAF1 GAF+6
MQUES MODIF+8
MSET MQUES+20

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT GAF1+2*
DA MSET+4~, MSET+6*
DIE MSET+4~, MSET+6*
DR MSET+4~, MSET+12*
DR(2 MSET+13*, MSET+14*
>> G GAF+3*, GAF+4*, GAF+6
>> G1 GAF+5*, GAF+6*, GAF1+2, GAF1+4
>> G10 GAF+8*, GAF+9
>> G11 GAF+9*
>> G2 GAF+3*, GAF+8, GAF1+4*
>> G4 GAF1+2*, GAF1+3
G5 GAF+3!, GAF+7*, GAF+8*
>> G6 GAF+8*
>> I GAF+8*
IOM DQP+19, DQP+20, DQP+21, DQP1+6, DQP1+7
>> K1 MODIF+5*, MODIF+6*, MODIF+7
>> K2 MODIF+7*, MODIF+9, MQUES+3, MQUES+6, NUM+5, NUM+7
>> K3 YN+2*, YN+3, YN+6, YN+7*, YN+8*, NUM+2, NUM+5, NUM+6, NUM+8
>> K5 YN+5*, YN+6*, NUM+4*, NUM+5*, NUM+6*, NUM+8*
>> N NUM+7*, NUM+8
U MODIF+7, MQUES+3, MQUES+8, NUM+7, GAF+8, GAF+9, GAF1+2, GAF1+4
>> X MSET+11*, GAF1+2*
>> XQH NUM+5*
>> Y GAF+9*, GAF1+2
>> YSALZ MODIF+9*
>> YSDA MSET+5, MSET+6, MSET+16
>> YSDFN GAF+4, GAF+6
>> YSDXDA1 MODIF+3, MODIF+6, MODIF+7
>> YSGAF GAF+7
>> YSGAF( GAF+8, GAF1+4*
>> YSI DQP+20*, DQP+21*, DQP+22
YSLP MSET+4~, MSET+7*, MSET+8*, MSET+9, MSET+11
>> YSMODI MQUES+3*
>> YSOK MQUES+15
YSPEC DQP~, DQP+2, DQP+8*, DQP+11, DQP+12, DQP+13*, DQP+14*, DQP+17, DQP+26, DQP1~
, DQP1+2, DQP1+5, DQP1+6*, DQP1+7, DQP1+8, DQP1+9, DQP1+10*, DQP1+11
>> YSQCH MQUES+18, MSET+3
YSQIEN MQUES+6*, MQUES+7, MQUES+8, MQUES+17, MSET+4~, MSET+9*, MSET+10, MSET+12
YSQSFOR MSET+4~, MSET+11*, MSET+14
YSQT MODIF+6!, MQUES+15*, MQUES+16*, MQUES+17*
YSQUSEL MSET+4~, MSET+9*, MSET+10, MSET+13
YSTEST MQUES+2~
>> YSTOUT MQUES+16
>> YSUOUT MQUES+16
YSX MQUES+8*, MQUES+9, DQP+3~, DQP+17*, DQP1+4~, DQP1+7*, DQP1+8*, DQP1+9, DQP1+10
YSY DQP+3~, DQP+17*, DQP+18*, DQP+19, DQP+20, DQP+22
YSZ DQP+3~, DQP+8
YSZ(" - :" DQP+7*
YSZ("=" DQP+6*
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