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

Package: Mental Health

Routine: YIHISTF


Information

YIHISTF ;SLC/DKG-INTERVIEW HISTORY DRIVER (Cont) ; 10/18/88 13:40 ;

Source Information

Source file <YIHISTF.m>

Entry Points

Name Comments DBIA/ICR reference
CK ;
CK1 ;
L ;
RP ;
R1 ;
YSRP1 ;
NOST ;
STM ;
WH ;
HDR ;
WAIT ;
END ;
PC ;
PC1 ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?YSIND,Y1
  • Line Location: L+2
Function Call: WRITE
  • Prompt: !?YSIND,$E(Y1,1,YSYI)
  • Line Location: L+3
Function Call: WRITE
  • Prompt: !?YSIND,Y1
  • Line Location: L+4
Function Call: WRITE
  • Prompt: !!?YSIND,$P(A,U,2),!
  • Line Location: R1+3
Function Call: WRITE
  • Prompt: !
  • Condition for execution: YSSCK
  • Line Location: R1+8
Function Call: WRITE
  • Prompt: !?YSIND,$P(A,U,3)
  • Line Location: R1+8
Function Call: WRITE
  • Prompt: !
  • Condition for execution: YSSCK=2
  • Line Location: R1+8
Function Call: WRITE
  • Prompt: !
  • Condition for execution: YSSCK
  • Line Location: STM+2
Function Call: WRITE
  • Prompt: !?YSLCK,YSYCK
  • Line Location: STM+2
Function Call: WRITE
  • Prompt: !
  • Condition for execution: YSSCK=2
  • Line Location: STM+2
Function Call: WRITE
  • Prompt: !,$P(^YTT(601,YSTEST,0),U)," QUESTION # ",J,!
  • Line Location: WH+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !,"MEDICAL RECORD"
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: ?(80-$L(YSFHDR)/2),YSFHDR
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !?25,"(Continued from previous page)"
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !?(80-$L(YSXR)\2),YSXR,":"
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: !
  • Line Location: WAIT+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: WAIT+3
Function Call: WRITE
  • Prompt: !!?34,YSXR
  • Line Location: PC+2
Function Call: WRITE
  • Prompt: !!,Y
  • Line Location: PC1+2
Function Call: WRITE
  • Prompt: !!
  • Line Location: PC1+3
Function Call: WRITE
  • Prompt: !
  • Line Location: PC1+3
Function Call: WRITE
  • Prompt: !!
  • Condition for execution: P0
  • Line Location: PC1+3
Function Call: WRITE
  • Prompt: $P($G(^VA(200,+YSU,0)),U)
  • Line Location: PC1+3
Function Call: WRITE
  • Prompt: !,"NOT VALID UNLESS SIGNED - NOT TO BE FILED IN MEDICAL RECORD UNLESS SIGNED"
  • Line Location: PC1+4

FileMan Files Accessed Via FileMan Db Call

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