Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Caller Graph |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: DIR

Package: VA FileMan

Routine: DIR


Information

DIR ;SFISC/XAK - READER, HELP ;3NOV2016

Source Information

Source file <DIR.m>

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Electronic Health Modernization 1 EHMHL7  

Entry Points

Name Comments DBIA/ICR reference
A
TOOMANY
X
W ; write the prompt and read the user's response. Called from A+2 above
SCREEN
DIRB
QU
FLDSET
AST
SETSCR(DIRFIL,DIRFLD) ;SET UP DIC("S")
DQ
QUES ;
WRAP
W1
SET
HF
MSG ;WRITE OUT 'A0'
S
Q

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,DIR("A",%)
  • Line Location: SCREEN+2
Function Call: WRITE
  • Prompt: !
  • Line Location: SCREEN+3
Function Call: WRITE
  • Prompt: %P
  • Condition for execution: $L(%P)
  • Line Location: SCREEN+3
Function Call: WRITE
  • Prompt: DIR("B")
  • Line Location: SCREEN+4
Function Call: WRITE
  • Prompt: DIRB_"// "
  • Line Location: DIRB+0
Function Call: READ
  • Variable: X
  • Timeout: $S($D(DIR("T")):DIR("T"),'$D(DTIME):300,1:DTIME)
  • Line Location: DIRB+2
Function Call: WRITE
  • Prompt: X
  • Line Location: DIRB+4
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: QUES+10
Function Call: WRITE
  • Prompt: !,A0
  • Line Location: MSG+6
Function Call: WRITE
  • Prompt: !,DIR("L",%)
  • Line Location: S+2
Function Call: WRITE
  • Prompt: !,DIR("L")
  • Line Location: S+3
Function Call: WRITE
  • Prompt: !?5,$$EZBLD^DIALOG(8046),!
  • Line Location: S+5
Function Call: WRITE
  • Prompt: !?10,Y,?20,$P(DIR("C",%I),":",2)
  • Line Location: S+9
Function Call: WRITE
  • Prompt: !?5,$$EZBLD^DIALOG(8046),!
  • Line Location: S+11
Function Call: WRITE
  • Prompt: !?10,Y,?20,$P($P(%B,";",%I),":",2)
  • Line Location: S+15
Info |  Source |  Caller Graph |  Entry Points |  Interaction Calls