Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: DIPTED

Package: VA FileMan

Routine: DIPTED


Information

DIPTED ;SFISC/GFT-EDIT PRINT TEMPLATE ;2013-07-10 2:34 PM

Source Information

Source file <DIPTED.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
VA FileMan 11 NOW^%DTC  EDIT^DDW  $$EZBLD^DIALOG  ^DIC  YN^DICN  EN^DICOMP  ^DICOMPW  OS^DII  
(F,FLY,OVFL)^DIP22  (UP,Y)^DIPT  ENZ^DIPZ  

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

Package Total Caller Graph
Kernel 1 XPDCOMF  
VA FileMan 1 DITCP  

Entry Points

Name Comments DBIA/ICR reference
K
EDIT(DIPT) ; EDIT PRINT TEMPLATE 'DIPT' VIA VA FILEMAN SCREEN EDITOR
E
DDW
GET(DIPTA,DIT) ;put displayable template into @DIPTA
PROCESS(DIPTA) ;puts nodes into ^UTILITY("DIP2")
LINE(X) ;returns X as component of Template. DD number is currently 'DK'
F
LIT
DIC
STRIP
HARD
QQ
GF
S
DJ
VAL3
EXP
P
D
WORD
U
SAVEFLDS(Y) ;POST-SAVE OF 'DIPTED' SCREENMAN FORM
CLEAR
J
CLONE(DA) ;
ASK
PUT ;save template from ^UTILITY
SAVEAS

External References

Name Field # of Occurrence
NOW^%DTC CLEAR+2
EDIT^DDW DDW
$$EZBLD^DIALOG DDW+2
^DIC DIPTED+8, DIC+1, ASK+2, SAVEAS+1
YN^DICN ASK+4, SAVEAS+2
EN^DICOMP HARD+1
^DICOMPW HARD+2
OS^DII E+1
F^DIP22 HARD+4
FLY^DIP22 HARD+1
OVFL^DIP22 HARD+4
UP^DIPT GET+7
Y^DIPT GET+6
ENZ^DIPZ CLEAR+10

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"NO TEMPLATE SELECTED",!
  • Line Location: E+2
Function Call: WRITE
  • Prompt: $C(7),$$EZBLD^DIALOG(8077)
  • Line Location: DDW+2
Function Call: WRITE
  • Prompt: " ",DIPTEDER(DIPTROW)
  • Line Location: DDW+6
Function Call: WRITE
  • Prompt: "<NOTHING TO SAVE>",$C(7)
  • Line Location: DDW+7
Function Call: WRITE
  • Prompt: "LINE ",LINE
  • Line Location: PROCESS+6
Function Call: WRITE
  • Prompt: " ERROR!"
  • Line Location: PROCESS+7
Function Call: WRITE
  • Prompt: $C(27,91,74)
  • Line Location: CLEAR+0
Function Call: WRITE
  • Prompt: !,$C(7),"Are you sure you want to overwrite this '",$P(Y,U,2),"' Template"
  • Line Location: ASK+4
Function Call: WRITE
  • Prompt: !,$C(7),"Sorry. Another user is editing this template."
  • Line Location: ASK+5
Function Call: WRITE
  • Prompt: !,$C(7),"Are you sure you want to overwrite this '",$P(Y,U,2),"' Template"
  • Line Location: SAVEAS+2
Function Call: WRITE
  • Prompt: !,$C(7),"Sorry. Another user is editing this template."
  • Line Location: SAVEAS+3
Routine Call
  • DIALOG
  • Line Location:
    • DDW+2
Routine Call
  • DIC
  • Line Location:
    • DIPTED+8
    • DIC+1
    • ASK+2
    • SAVEAS+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD( GF, D
^DD("OS" - [#.7] E+1, DDW+5, CLEAR+10
^DD("ROU" CLEAR+10
^DIC - [#1] DDW+3
^DIPT - [#.4] E+2, GET+3, CLEAR+2*, CLEAR+3*, CLEAR+4!, CLEAR+8!, CLEAR+9*, CLEAR+10, J, CLONE+2
, ASK, ASK+4, ASK+5, ASK+7*, ASK+8, SAVEAS+2, SAVEAS+3, SAVEAS+5*, SAVEAS+6
^DIPT("F" ASK+6*, SAVEAS+4*
^TMP("DIPTED" K!, DDW+2!
^UTILITY("DIP2" K!, DDW+1!, DDW+7, DDW+9*, DDW+10*, DDW+11*, PROCESS+4!, PROCESS+5, SAVEFLDS+2, CLEAR+5
, CLEAR+9, PUT+1
^UTILITY($J DDW+1!

Label References

Name Line Occurrences
$$CLONE CLEAR+1
$$LINE PROCESS+5
ASK ASK+4
D GF
DDW DDW+6
DIC STRIP, STRIP+2
DJ LIT+1, HARD+1
E DIPTED+10
EXP STRIP+2, HARD+2, WORD
GET E+5
GF DIC+1
J CLEAR+4, CLEAR+6
K DDW+7, CLEAR+11
P VAL3, WORD+1
PROCESS DDW+4
PUT DIPTED+11
QQ HARD+1
S DIC
SAVEAS SAVEAS+2
SAVEFLDS SAVEAS+7
U LINE+5, DIC+2, WORD+1
VAL3 HARD+3
WORD GF

Naked Globals

Name Field # of Occurrence
^( GET+6, PROCESS+3, PROCESS+5*, CLEAR+5, J*
^("DCL" CLEAR+8!
^("DNP" CLEAR+8!
^("H" DDW+13*, GET+5, CLEAR+10
^("IOM" CLEAR+10!
^("ROU" CLEAR+10!
^("ROUOLD" CLEAR+10
^("SUB" DDW+12*, GET+5
^(0 E+3, E+4, CLONE+3, ASK, ASK+7*, SAVEAS+5*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % U*, CLEAR+2, CLEAR+5*, ASK+4*, SAVEAS+2*
C E~, GET+5*, HARD, HARD+3, D
D E~, GET+8*, STRIP, STRIP+1*!
D( GET+5*
D0 E~, GET+1~, GET+3*, GET+4*, PROCESS+1~
D9 GET+1~, GET+5*, GET+7
DA E~, PROCESS+1~, HARD*, CLONE~, CLONE+2, ASK, ASK+3
DATE LINE+1~
DCL E~, DDW+10, P+2*, P+3
DCL( P+3*
DDS CLONE+1~
>> DDSCHG DDW+8*
DHD E~, DDW+13, GET+5*, CLEAR+10*
DIC DIPTED+7~, DIPTED+8*, DIPTED+9!, LINE+1~, LIT+2*, CLONE+1~, ASK+1*, ASK+4!, PUT+2~, SAVEAS*
DIC("A" ASK+1*, SAVEAS*
DIC("B" CLONE+3*, PUT+3*, SAVEAS+2!
DIC("S" DIPTED+8*, ASK+1*, SAVEAS*
DIC(0 DIPTED+8*, LIT+2*, ASK+1*, SAVEAS*
DICMX LINE+1~, HARD+1*, HARD+2*
DICOMP LINE+1~, HARD*
DICOMPX LINE+1~, HARD*
DIETAB PROCESS+1~, PROCESS+2*, LINE+5, LINE+6*
DIL E~, DDW+3*, HARD, HARD+3*, GF, D*, U*
DIL( HARD+3*, D*, U
DIPT DIPTED+7~, DIPTED+10*, EDIT~, E+2, GET+3, PUT+3
DIPTA GET~, GET+2, GET+8, PROCESS~, PROCESS+3
DIPTED DIPTED+7~, EDIT+1~, E+3*, E+4*, E+6, DDW+6, SAVEAS
DIPTEDER E~, DDW+6!
DIPTEDER( DDW+6, PROCESS+6*
DIPTEDER(0 DDW+6
DIPTEDFI CLONE+1~, ASK*, ASK+6, ASK+7
DIPTEDNM CLONE+1~, CLONE+3*, ASK+1
DIPTEDTY DIPTED+7~, EDIT+1~, E+3*, STRIP, STRIP+2, HARD+2, VAL3, WORD, CLONE+1~, ASK*
, ASK+7, SAVEAS+5
DIPTH E~, E+6*, DDW, DDW+6*
DIPTROW E~, E+6*, DDW, DDW+6*
DIPTX E~
DIPZ CLEAR+10, PUT+2~
DISH E~, DDW+12, GET+5*
>> DISYS E+1, DDW+5, CLEAR+10
DIT GET~, GET+3*, GET+5, GET+6
DIWD GET+1~
DIWD( GET+8
DJ E~, DDW+3*, LINE+1~
DK E~, DDW+3*, HARD+3*, GF, P+3, D*, U*
DL E~, DDW+3*, LINE+5, DIC+2, HARD+2, HARD+3*, D*, U*
DL( HARD+3*, D*, U
DM PROCESS+1~, HARD*
DMAX SAVEFLDS+1~, CLEAR+10*
DNP E~, DDW+3*, DDW+11, P+1!
DP LINE+1~, HARD+3
DQI PROCESS+1~, HARD*
DRK DIPTED+7~, EDIT+1~, DDW, DDW+3, GET+5*
DS GET+1~
DS( GET+8
DS(1 GET+6*
DTOUT E~, DDW+2
DUOUT E~, DDW+2
DUZ CLEAR+3
DV E~, DDW+3*, HARD+3*, DJ, D*, WORD+1, U*
DV( HARD+3*, D*, U
DX CLEAR~*
DXS E~, DDW+3*, DDW+9, HARD
DY E~, GET+6*, CLEAR~*
ERR PROCESS+1~, PROCESS+3!, PROCESS+6, QQ*, EXP*
I DIPTED+7~, EDIT+1~, DDW+1!, LIT*, LIT+1
I( GF*, U!
I(0 DDW+3*
IOM CLEAR+10*
>> IOXY CLEAR
J DIPTED+7~, EDIT+1~, DDW+1!, SAVEFLDS+1~, CLEAR+4*, CLEAR+6*, CLEAR+7*, J
J( GF*, U!
J(0 DDW+3*, GET+5*, SAVEAS+4, SAVEAS+5
L E~, GET+5*, HARD
LINE PROCESS+1~, PROCESS+3*, PROCESS+4*, PROCESS+6*, PROCESS+7
P PROCESS+1~, LINE+3*, LINE+4*, LINE+5, LINE+6, F*, STRIP+1*, HARD+3!, P, P+1
, P+2, P+3
Q E~, GET+5*, GF
S PROCESS+1~, F*, STRIP+2*, HARD*, HARD+1, HARD+3*, S, VAL3*, WORD+1
U E+3, E+4, DDW+9, DDW+10, DDW+11, GET+5, HARD+3, GF, P+3, D
, CLEAR+2, CLEAR+3, CLEAR+9, CLONE+3, ASK, ASK+4, ASK+6, ASK+7, SAVEAS+2, SAVEAS+4
, SAVEAS+5
X PROCESS+1~, PROCESS+3*, PROCESS+4, PROCESS+5*, LINE~, LINE+2, LINE+3*, LINE+4*, LIT, LIT+1
, DIC, DIC+2, STRIP*, STRIP+1*, STRIP+2*, HARD, HARD+1*, HARD+3*, GF*, S*
, DJ*, VAL3, WORD+1*, SAVEFLDS+1~, CLEAR+5*, CLEAR+6, CLEAR+7, CLEAR+10*, CLONE+1~
Y DIPTED+8, DIPTED+10, E~, GET+5*, LINE+1~, DIC*, DIC+1, HARD+3*, HARD+4~, GF+1*
, S, P+3, D*, WORD+1*, SAVEFLDS~, SAVEFLDS+2, CLEAR+1*, CLEAR+2, CLEAR+3, CLEAR+4
, CLEAR+8, CLEAR+9, CLEAR+10, J, CLONE+1~, ASK+2, ASK+3, ASK+4, ASK+5, ASK+6
, ASK+7, ASK+8, ASK+9, SAVEAS+2, SAVEAS+3, SAVEAS+4, SAVEAS+5, SAVEAS+6, SAVEAS+7
Y(0 GF
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All