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 |  Local Variables |  All
Print Page as PDF
Routine: DITMGMRG

Package: VA FileMan

Routine: DITMGMRG


Information

DITMGMRG ;SFISC/EDE(OHPRD)-RELINK/MERGE TWO ENTRIES BELOW POINTED TO FILE ;8MAR2006

Source Information

Source file <DITMGMRG.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA FileMan 4 ^DITMGM1  ^DITMGM2  INIT^DITMGMRI  CHKIT^DITMU4  

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

Package Total Caller Graph
Toolkit 1 XDRMRG  
VA FileMan 1 DITM2  

Entry Points

Name Comments DBIA/ICR reference
FILES ; CALLED RECURSIVELY
PTCHK ; MAKE SURE "PT" CORRECT
EN ; EXTERNAL ENTRY POINT
EOJ2 ; List errors
IHS
RECURSE ;
START ;
EOJ ;
FIELDS ;
STACK ;STACK ALL FILES POINTING TO POINTED TO FILE AND IF .01 FIELD

External References

Name Field # of Occurrence
^DITMGM1 START+1
^DITMGM2 EN+5
INIT^DITMGMRI EN+1
CHKIT^DITMU4 PTCHK+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "]"
  • Line Location: PTCHK+6
Function Call: WRITE
  • Prompt: !!,"The following errors occurred during the merge: ",!
  • Line Location: EOJ2+1
Function Call: WRITE
  • Prompt: !,DITMGMRG("ERROR",%)
  • Line Location: EOJ2+2
Function Call: WRITE
  • Prompt: !
  • Line Location: EOJ2+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZTSK - [#14.4] EOJ+7!
^DD( FILES+2, FIELDS+2, IHS+3, PTCHK+4
^UTILITY("DITMGMRG" EN+6!, STACK+5!, IHS+1*

Label References

Name Line Occurrences
EN START+3
EOJ START+2, EN+8
EOJ2 EOJ+8
FIELDS FILES+2
FILES STACK+7, RECURSE+5
PTCHK FILES+1
RECURSE IHS+3
STACK EN+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% EOJ+2!, EOJ2+2*, EOJ2+4!
AUPNDAYS EOJ+5!
AUPNDOB EOJ+5!
AUPNDOD EOJ+5!
AUPNPAT EOJ+5!
AUPNSEX EOJ+5!
DIPGM EOJ+2!
DITMGFLE STACK+4~, STACK+6*, FILES+2, FIELDS+2, IHS+1, RECURSE+2~, RECURSE+3*, PTCHK+3
>> DITMGM2("NOTALK" EN+4*, EN+5!
DITMGMF EOJ+4!
DITMGMFG EOJ+4!
DITMGMFL EOJ+4!
DITMGMQF EN+2, EOJ+3, EOJ+4!
DITMGMRG START+2!, START+4!
DITMGMRG("ERROR" EOJ+8!, EOJ2+2
DITMGMRG("EXCLUDE" FILES+4
DITMGMRG("FILE" STACK+6
DITMGMRG("GO" START+2
DITMGMRG("NOTALK" EN+4, EN+7, STACK+3, PTCHK+1, EOJ+8
DITMGMRG("PACKAGE" FILES+6, FILES+7
DITMGMRG("QFLG" EOJ+3*
DITMGMT EOJ+4!
DITMGPFD STACK+4~, FIELDS+2*, IHS, IHS+1, IHS+3, RECURSE+4~
DITMGPFL STACK+4~, FILES+2*, FILES+4, FILES+7, FIELDS+2, IHS, IHS+1, IHS+3, RECURSE+3, RECURSE+4~
DITMSKP STACK+4~, FILES+2, FILES+3*, FILES+4*, FILES+7*
>> DITMU4("NOTALK" PTCHK+2*, PTCHK+5!
DITMU4FI PTCHK+3*, PTCHK+4, PTCHK+5!
DITMU4L PTCHK+5!
DITMU4PD PTCHK+4*, PTCHK+5!
DITMU4PF PTCHK+4*, PTCHK+5!
DITMU4X PTCHK+5!
U IHS+3
X EOJ+1!
Y EOJ+1!
>> ZTQUEUED EOJ+6
>> ZTREQ EOJ+6*
ZTSK EOJ+7!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All