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

Package: VA FileMan

Routine: DIC1


Information

DIC1 ;SFISC/GFT/TKW-READ X, SHOW CHOICES ;29DEC2013

Source Information

Source file <DIC1.m>

Entry Points

Name Comments DBIA/ICR reference
B
PROMPT ; Prompt user for lookup values
GETFA(DIC,DO) ; Get file attributes
; DIC is open global reference, output same as documented in DO^DIC1.
DO ; GET FILE ATTR
EGP
DO2
P ; Add code to DIC("W") to display identifiers on pointed-to files
W
WOV
RENUM ;
DT
Y ; Display a list of entries
E
BLDDSP(DS,DD,DINDXFL,DIYX,DIY,DICRS) ; Build display of index values
GOT ; Set data for single entry selected by user.
OK ;
BAD
MIX ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: DST
  • Line Location: DT+1
Function Call: WRITE
  • Prompt: !,$$EZBLD^DIALOG(8087,$S(DIC(0)["T":"'^^' to exit all lists,",1:""))
  • Line Location: Y+16
Function Call: READ
  • Timeout: $S($D(DTIME):DTIME,1:300)
  • Line Location: Y+17
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: Y+18
Function Call: WRITE
  • Prompt: !?4,$$EZBLD^DIALOG(8040),!
  • Line Location: OK+6
Info |  Source |  Entry Points |  Interaction Calls