Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: YSGAF2

Package: Mental Health

Routine: YSGAF2


Information

YSGAF2 ;ASF/ALB- GLOBAL ASSESSMENT OF FUNCTIONNING CONT ;11/13/97 09:09

Source Information

Source file <YSGAF2.m>

Entry Points

Name Comments DBIA/ICR reference
EDENT ;edit /error
SHOW ; display dxs
LST ;LIST AXIS 5 FOR CURRENT PT AND DUZ
SEL ;select dx
APART ;time since dx

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Edit Global Assessment of functioning Diagnosis",!
  • Line Location: EDENT+2
Function Call: WRITE
  • Prompt: !,"No previous GAF on record for this patient",!,"Please enter any new GAF data through the entry options",!
  • Line Location: EDENT+5
Function Call: WRITE
  • Prompt: !!,"No Axis 5 dx's by "_$P(^VA(200,DUZ,0),U)
  • Line Location: EDENT+7
Function Call: WRITE
  • Prompt: !,"Dx made ",YSDAYS," days ago and cannot be changed. Do you wish to mark it as an error? "
  • Line Location: EDENT+12
Function Call: WRITE
  • Prompt: !!
  • Line Location: SHOW+1
Function Call: WRITE
  • Prompt: $J(K,3),". GAF:",$J($P(^TMP("YSGAF",$J,K),U,3),3)_" on "
  • Line Location: SHOW+4
Function Call: WRITE
  • Prompt: Y
  • Line Location: SHOW+5
Function Call: WRITE
  • Prompt: ?40
  • Line Location: SHOW+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^YSD(627.8 - [#627.8] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call