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

Package: Mental Health

Routine: YTKILINC


Information

YTKILINC ;SLC/TGA-KILL INCOMPLETE TESTS ;11/19/90 16:41 ;

Source Information

Source file <YTKILINC.m>

Entry Points

Name Comments DBIA/ICR reference
S ;
ENP ;
END ;
D ;
HD ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This option deletes incomplete tests and interviews which",!,"have been incomplete for longer than 30 days."
  • Line Location: S+1
Function Call: READ
  • Variable: A
  • Timeout: DTIME
  • Line Location: S+2
Function Call: WRITE
  • Prompt: !!,"I will list any instruments I delete.",!!
  • Line Location: S+3
Function Call: WRITE
  • Prompt: !
  • Line Location: ENP+3
Function Call: WRITE
  • Prompt: !,"DELETED ",$S($D(^YTT(601,T,0)):$P(^(0),U),1:"UNKOWN INSTRUMENT")," FOR ",$S($D(^DPT(P,0)):$P(^(0),U),1:"UNKNOWN PATIENT")," - ",$S(YSX:YSX,1:"?")," DAYS OLD"
  • Line Location: D+3
Function Call: WRITE
  • Prompt: @IOF,!,"Deleted Incomplete Tests/Interviews",!!
  • Line Location: HD+1

FileMan Files Accessed Via FileMan Db Call

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