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

Package: VA FileMan

Routine: DIDG


Information

DIDG ;SFISC/RWF-GLOBAL MAP ;10JAN2006

Source Information

Source file <DIDG.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA FileMan 3 $$EZBLD^DIALOG  $$OUT^DIALOGU  ^DIDH  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

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

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
VA FileMan 1 DID  

Entry Points

Name Comments DBIA/ICR reference
A
B
END ;
HDR ;
FORM ;
H1
TEMPL
WL
UP
POP
L
Q
BLOCKQ
BLOCK ;
W
PUSH
T1
HD

External References

Name Field # of Occurrence
$$EZBLD^DIALOG H1
$$OUT^DIALOGU H1
^DIDH HD

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: S
  • Line Location: DIDG+7
Function Call: WRITE
  • Prompt: !
  • Line Location: DIDG+8
Function Call: WRITE
  • Prompt: W
  • Line Location: A+2
Function Call: WRITE
  • Prompt: !
  • Line Location: A+2
Function Call: WRITE
  • Prompt: !,DID(Z)_"0)=^"_$P(Y,U,2)_"^^ (#",N,") "_$P(Y,U,1)
  • Line Location: PUSH+1
Function Call: WRITE
  • Prompt: !
  • Line Location: POP+0
Function Call: WRITE
  • Prompt: !!,$S(S<4:$P("INPU^PRIN^SOR",U,S)_"T TEMPLATE(S):",1:"FORM(S)/BLOCK(S):")
  • Line Location: T1+1
Function Call: WRITE
  • Prompt: !,DFF,"("_DUB_")= ",$P(%1,U)_" "_%
  • Line Location: TEMPL+3
Function Call: WRITE
  • Prompt: !,?$L(DID(Z)),"==>"
  • Condition for execution: $X+$L(Y)+2>IOM
  • Line Location: WL+1
Function Call: WRITE
  • Prompt: Y
  • Line Location: WL+1
Function Call: WRITE
  • Prompt: W:$X+$L(W)+3>IOM
  • Line Location: W+0
Function Call: WRITE
  • Prompt: !,?$S(IOM-$L(W)-5<M:IOM-5-$L(W),1:M),S
  • Condition for execution: $X+$L(W)+3>IOM
  • Line Location: W+0
Function Call: WRITE
  • Prompt: $E(W,1,IOM-$X-1),S
  • Line Location: W+0
Function Call: WRITE
  • Prompt: G
  • Line Location: W+0
Function Call: WRITE
  • Prompt: !,DID(Z),")= "
  • Line Location: HD+0
Function Call: READ
  • Timeout: DTIME
  • Variable: M
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $D(DIFF)&($Y)
  • Line Location: H1+0
Function Call: WRITE
  • Prompt: "TEMPLATE LIST -- FILE #"_DIB,?(IOM-20),$$OUT^DIALOGU(DT,"FMTE","2D")_" "_$$EZBLD^DIALOG(7095,DC)
  • Line Location: H1+0
Function Call: WRITE
  • Prompt: !,M
  • Line Location: H1+1
Function Call: WRITE
  • Prompt: !,"^DIST(.403,"_DUB_")= ",$P(%1,U)_" "_%
  • Line Location: FORM+1
Function Call: WRITE
  • Prompt: !
  • Line Location: FORM+8
Function Call: WRITE
  • Prompt: !?2,"^DIST(.404,"_B_")= ",$P(%1,U)
  • Line Location: BLOCK+7
Routine Call
  • DIALOG
  • Line Location:
    • H1
Routine Call
  • DIALOGU
  • Line Location:
    • H1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD( UP, A, A+1, B, B+1, B+3, PUSH
^DIC - [#1] UP+1
^DIST( FORM+5, FORM+6, FORM+7, BLOCK+4

Label References

Name Line Occurrences
A B, PUSH+2
B B+4, B+7
BLOCK FORM+6, FORM+7
BLOCKQ BLOCK+2
FORM TEMPL+4
HD WL
HDR T1, TEMPL, BLOCK+6
L B+4, PUSH+2
POP A
PUSH B
T1 T1+6
TEMPL T1+5
UP UP
W W
WL A+2, B+2, B+7

Naked Globals

Name Field # of Occurrence
^("GL" UP+1
^("ROU" TEMPL+1
^("ROUOLD" TEMPL+1
^("UP" UP
^(0 UP, T1+5, FORM+6, BLOCK+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% TEMPL+1~*, TEMPL+2*, TEMPL+3, FORM+1
%1 T1+5*, T1+6!, TEMPL+3, WL*, FORM+1, BLOCK+4*, BLOCK+7
>> %Y W*
B FORM+3~, FORM+6*, FORM+7*, BLOCK+2, BLOCK+3, BLOCK+4, BLOCK+7
>> D0 DIDG+7
>> DA T1+2*, T1+3*, T1+4
>> DC HD*, HDR+1*, H1
>> DF B+1*, B+3, B+5
>> DFF T1+2*, T1+3, T1+4, T1+5, TEMPL+2, TEMPL+3
DG POP!
>> DIB H1
DID POP!
DID( UP+2*, A+1*, A+2, PUSH*, PUSH+1, POP*, WL, WL+1, HD
>> DIFF H1*
>> DJ( DIDG+7*
DN POP!*
DN( L*, A*, A+1, B, B+1, PUSH
DP DIDG+7*, A+1*, B*, B+1, B+2, B+3, B+5, PUSH, POP!
DP(0 A*, B+2, B+3*
DT H1
DTIME HDR+1
>> DUB T1+4*, T1+5, TEMPL+3, FORM+1, FORM+5, FORM+6, FORM+7
>> F DIDG+7*, UP*, UP+1, A+1
>> F( DIDG+7, A, A+1, B, B+1, B+3, B+4*, PUSH, PUSH+1*
>> F(1 T1+3, T1+4
I WL+1*, BLOCK+1~, BLOCK+2*
>> I1 B+2*
IOF H1
IOM WL+1, W, H1, H1+1
IOSL T1, TEMPL, WL, BLOCK+6
IOST HDR+1
L FORM+3~, FORM+4*, BLOCK+2, BLOCK+3*
L( BLOCK+2, BLOCK+3*
L(1 FORM+4*
>> M DIDG+7*, A+2, B+2, B+7, PUSH+2, END+1*, T1, T1+3, T1+4, T1+6
, TEMPL, WL, W, HD, HDR+1*, H1+1*, FORM+5, FORM+6, FORM+7, BLOCK+6
>> N UP*, UP+1*, B+3*, B+4, B+5, PUSH*, PUSH+1
P FORM+3~, FORM+5*, FORM+6, FORM+7
>> S END+1*, T1*, T1+1, T1+2, T1+6, W
U UP, A+2, B+2, B+4, B+5, B+7, PUSH+1, PUSH+2, T1, T1+1
, T1+2, T1+3, T1+4, T1+6, TEMPL, TEMPL+3, WL, HD, HDR+1, FORM+1
, FORM+4, FORM+5, FORM+6, FORM+7, BLOCK+2, BLOCK+3, BLOCK+6, BLOCK+7
W DIDG+7!*, UP*, UP+1*, UP+2!, A+2*, B+2*, B+5*, B+6*, B+7*, POP!
, WL*, WL+1, W*
W( UP*, UP+1
>> X B+4*, B+6
>> Y UP*, UP+1*, B+6*, PUSH*, PUSH+1, WL+1*
>> Z DIDG+7, UP+2, L, A, A+1, A+2, B, B+1, B+3, B+4*
, PUSH, PUSH+1*, POP*, WL, WL+1, HD
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All