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

Package: Mental Health

Routine: YTKIL


Information

YTKIL ;SLC/TGA-KILL TEST/INTERVIEW DATA ;4/21/92 08:50 ; 10/31/07 12:41pm

Source Information

Source file <YTKIL.m>

Entry Points

Name Comments DBIA/ICR reference
R ;
DI ;
C ;
DC ;
E ;
END ;
TN(DFN,TN6014,TN601) ;Print test name...
; TN6014 = IEN of ^YTD(601.4,+DFN,1,+TN6014...
; TN601 = IEN of ^YTT(601,+TN601...

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!!,"Delete Patient Data"
  • Line Location: YTKIL+5
Function Call: WRITE
  • Prompt: !
  • Line Location: YTKIL+6
Function Call: WRITE
  • Prompt: !!,"NO DATA ON THIS PATIENT!"
  • Line Location: YTKIL+10
Function Call: READ
  • Formatting: !!
  • Prompt: "Delete All tests and interviews? N// "
  • Variable: A
  • Timeout: DTIME
  • Line Location: R+1
Function Call: WRITE
  • Prompt: !!,"DELETED!"
  • Line Location: R+2
Function Call: WRITE
  • Prompt: !!,"Incomplete tests and Interviews",!
  • Line Location: R+3
Function Call: WRITE
  • Prompt: !!,$$TN(+YSDFN,+T,+P),?10,$$FMTE^XLFDT(D,"5ZD")
  • Line Location: R+5
Function Call: READ
  • Prompt: " ...Delete? N// "
  • Variable: K
  • Timeout: DTIME
  • Line Location: DI+1
Function Call: WRITE
  • Prompt: ?40,"DELETED!"
  • Line Location: DI+3
Function Call: WRITE
  • Prompt: !!,"Completed Tests and Interviews"
  • Line Location: C+1
Function Call: WRITE
  • Prompt: !!,$P(^YTT(601,T,0),U),?10,$$FMTE^XLFDT(D,"5ZD")
  • Line Location: C+3
Function Call: READ
  • Prompt: " ...Delete? N// "
  • Variable: K
  • Timeout: DTIME
  • Line Location: DC+1
Function Call: WRITE
  • Prompt: ?40,"DELETED"
  • Line Location: DC+3

FileMan Files Accessed Via FileMan Db Call

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