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
Print Page as PDF
Routine: YTAR1

Package: Mental Health

Routine: YTAR1


Information

YTAR1 ;SLC/TGA,DKG-RESUME TESTS; ;5/30/02 14:57

Source Information

Source file <YTAR1.m>

Entry Points

Name Comments DBIA/ICR reference
R11 ;
R2 ;
MCMI2 ;
DEL ;
DAT ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?2,"("
  • Line Location: YTAR1+6
Function Call: WRITE
  • Prompt: $P(^YTT(601,X,0),U)
  • Line Location: YTAR1+7
Function Call: WRITE
  • Prompt: $S(YSX=60:"MMPIR",YSX=61:"MMPR",1:"??")
  • Line Location: YTAR1+9
Function Call: WRITE
  • Prompt: " Test was discontinued in Clerical Entry mode)"
  • Line Location: YTAR1+10
Function Call: WRITE
  • Prompt: ?44,$$FMTE^XLFDT(M,"5ZD")
  • Line Location: R11+1
Function Call: WRITE
  • Prompt: !
  • Line Location: R11+1
Function Call: READ
  • Formatting: !!?2
  • Prompt: "Restart Instrument: "
  • Variable: YSTEST
  • Timeout: DTIME
  • Line Location: R2+1
Function Call: WRITE
  • Prompt: " ??",$C(7,7)
  • Line Location: R2+4
Function Call: READ
  • Prompt: "? Y// "
  • Variable: A1
  • Timeout: DTIME
  • Line Location: DEL+1
Function Call: WRITE
  • Prompt: !,"DELETED!"
  • Line Location: DEL+2
Function Call: WRITE
  • Prompt: !,$C(7),"You must either restart or delete this ",$P(^YTT(601,YSXT,0),U),"!"
  • Line Location: DEL+3
Function Call: WRITE
  • Prompt: !!?2,Z1,?9,"discontinued "
  • Line Location: DAT+5
Function Call: WRITE
  • Prompt: X," days ago "
  • Line Location: DAT+5
Function Call: WRITE
  • Prompt: "- not restartable"
  • Line Location: DAT+6
Info |  Source |  Entry Points |  Interaction Calls