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

Package: Mental Health

Routine: YSGAF1


Information

YSGAF1 ;ASF/ALB- GLOBAL ASSESSMENT OF FUNCTIONNING CONT;9/25/97 11:19 ;11/10/97 16:08

Source Information

Source file <YSGAF1.m>

Entry Points

Name Comments DBIA/ICR reference
ONELOC ;single hospital location
DATE ;
ONLYREQ ;only > ysdays
LP1 ;loop to create tmp pt list
LP2 ;apps at one time
HX ;GAF history
QHX ;Queued Task Entry Point
HXLP ;
TOP ;
BOT ;page end

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,YSCNAME," does not have a mental health stop code"
  • Line Location: ONELOC+7
Function Call: WRITE
  • Prompt: !!,"No previous GAF's on file for this patient"
  • Line Location: QHX+6
Function Call: WRITE
  • Prompt: !,$E(Y,4,5)_"/"_$E(Y,6,7)_"/"_$E(Y,2,3),$S($L($P(YSG,U,4)):"Err",1:" ")
  • Line Location: QHX+10
Function Call: WRITE
  • Prompt: $E($P($G(^VA(200,$P(YSG,U,3),0)),U),1,15)
  • Line Location: QHX+11
Function Call: WRITE
  • Prompt: ?26,$J(+YSG,3)
  • Line Location: QHX+12
Function Call: WRITE
  • Prompt: " ",$E(YSGR,1,+YSG\2)
  • Line Location: QHX+13
Function Call: WRITE
  • Prompt: @IOF,"Global Assessment of Functioning Historical Listing"
  • Line Location: TOP+3
Function Call: WRITE
  • Prompt: !,VADM(1),?$X+5,"xxx-xx-",VA("BID"),?45,"printed: "
  • Line Location: TOP+4
Function Call: WRITE
  • Prompt: Y
  • Line Location: TOP+5
Function Call: WRITE
  • Prompt: !,YSLINE
  • Line Location: TOP+6
Function Call: WRITE
  • Prompt: !,"Date",?10,"Clinician",?26,"GAF",?30,YSGT
  • Line Location: TOP+7
Function Call: WRITE
  • Prompt: !!
  • Line Location: BOT+2

FileMan Files Accessed Via FileMan Db Call

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