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

Package: VA FileMan

Routine: DIETED


Information

DIETED ;SFISC/GFT - SCREEN EDIT AN INPUT TEMPLATE ; Nov 15, 2012

Source Information

Source file <DIETED.m>

Entry Points

Name Comments DBIA/ICR reference
K
EDIT(DIET) ; Edit Template using Screen Editor
E
DDW
KL
GET(DIETA,DIT) ;put displayable template into @DIETA
1
DOWN
DIAT
NDB
UP
PROCESS(DIETA) ;puts nodes into ^UTILITY("DIETED")
LINE(X) ;Process one LINE from the screen
OUT
ALL
SEMIC
DIC
X
L
D
DEF
XEC
DR ;takes 'Y' and puts it into 'DR' array
DIAB
PUT ;save template
SAVEAS
SAVEFLDS(Y) ;
NOW

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"NO TEMPLATE SELECTED",!
  • Line Location: E+2
Function Call: WRITE
  • Prompt: "..."
  • Line Location: E+4
Function Call: WRITE
  • Prompt: $C(7),$$EZBLD^DIALOG(8077)
  • Line Location: KL+1
Function Call: WRITE
  • Prompt: !!,"LINE ",LINE
  • Line Location: PROCESS+6
Function Call: WRITE
  • Prompt: " ERROR!",!!,"Press RETURN to continue"
  • Line Location: PROCESS+9
Function Call: WRITE
  • Prompt: !,$C(7),"Are you sure you want to overwrite this '",$P(Y,U,2)," 'Template"
  • Line Location: SAVEAS+2
Info |  Source |  Entry Points |  Interaction Calls