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 |  Marked Items |  All
Print Page as PDF
Routine: XPDCOM

Package: Kernel

Routine: XPDCOM


Information

XPDCOM ;SFISC/RSD - Compare Transport Global ;08/14/2008

Source Information

Source file <XPDCOM.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Kernel 7 GETENV^%ZOSV  ($$FMTE,$$NOW)^XLFDT  EN^XPDCOMG  EN^XPDCOML  $$LOOK^XPDI1  $$KSP^XUPARAM  EN^XUTMDEVQ  
VA FileMan 1 ^DIR  

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
Kernel 1 XPD COMPARE TO SYSTEM  

Entry Points

Name Comments DBIA/ICR reference
COM(XPDA) ;XPDA=ien of package in ^XTMP("XPDI"
HDR ;
COMP ;taken from XMPC routine
COMR ;compare routines
EN1 ;compare to current system
JOB ;Loop thru XPDT
WP(X,Y) ;

External References

Name Field # of Occurrence
GETENV^%ZOSV HDR+4
^DIR EN1+4
$$FMTE^XLFDT HDR+4
$$NOW^XLFDT HDR+4
EN^XPDCOMG COM+3
EN^XPDCOML COMR+10, COMR+31
$$LOOK^XPDI1 EN1+2
$$KSP^XUPARAM HDR+3
EN^XUTMDEVQ EN1+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: COM+4
Function Call: WRITE
  • Prompt: !!,"*ADD*",NAME,!
  • Line Location: COMR+6
Function Call: WRITE
  • Prompt: "*** WARNING, your routine has more patches than the incoming routine ***",!
  • Line Location: COMR+21
Function Call: WRITE
  • Prompt: "*** WARNING, your routine has different patches than the incoming routine ***",!
  • Line Location: COMR+23
Function Call: WRITE
  • Prompt: ?RM,"No Routines"
  • Line Location: COMR+35
Function Call: WRITE
  • Prompt: !,?IOM-$L(NAME)\2,NAME
  • Line Location: COMP+3
Function Call: WRITE
  • Prompt: !,"* "_$P("ADD^DEL^OLD^NEW",U,Y)_" * ",X
  • Line Location: WP+1
Function Call: WRITE
  • Prompt: @IOF,!,"Compare KIDS package ",XPDNM," to current site (Disk)"
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !,"Site: ",$$KSP^XUPARAM("WHERE")
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: " UCI: ",$P(Y,U),",",$P(Y,U,2)," ",?IOM/2+2,$$FMTE^XLFDT($$NOW^XLFDT()),!
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: "2nd Line of "
  • Condition for execution: XPDC=2
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: "Routines Only",!
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: ?3,"KIDS",?IOM\2+3,"Disk",!
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: XPDUL,!
  • Line Location: HDR+7
Routine Call
  • DIR
  • Line Location:
    • EN1+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("TEST" COMR+6
^TMP($J COMR+28!, COMR+29*, COMR+31, COMR+33!, COMP+5, COMP+8, COMP+11, COMP+18
^XTMP("XPDI" COM+1, COMR+3, COMR+9, COMR+26, COMR+31, COMP+5, COMP+6, COMP+19

Label References

Name Line Occurrences
COM JOB+2
COMP COMR+31
COMR COM+3
HDR COM+3
WP COMP+11, COMP+15, COMP+16, COMP+18, COMP+19

Naked Globals

Name Field # of Occurrence
^( COMR+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS EN1+1~
D1 COMP+1~, COMP+8*, COMP+9, COMP+13, COMP+15
DI COMP+1~, COMP+2*, COMP+5*, COMP+8, COMP+11, COMP+13*, COMP+16*, COMP+18, COMP+19
DIC EN1+1~
DIR EN1+1~
DIR("?" EN1+3*
DIR("A" EN1+3*
DIR(0 EN1+3*
DIRUT EN1+1~
DITCPT EN1+1~
DL COMR+1~, COMR+30*, COMP+5, COMP+8, COMP+18, COMP+19
DTOUT EN1+1~, EN1+4
DUOUT EN1+1~, EN1+4
I COMP+1~, COMP+8*, COMP+11, COMP+13, COMP+18*, COMP+19*
IOF HDR+2
IOM COMR+2, COMR+11, COMR+32, COMP+3, HDR+4, HDR+6
J COMP+1~, COMP+11*
K COMP+1~, COMP+9*
NAME COMR+1~, COMR+2*, COMR+4*, COMR+5, COMR+6, COMR+10, COMR+11, COMR+31, COMR+32, COMR+35
, COMP+3
NL COMP+1~, COMP+2*, COMP+8
POP EN1+1~
RM COMR+1~, COMR+2*, COMR+35
U COM+2, WP+1, HDR+4
X COMR+1~, COMR+3*, COMR+5, COMR+6*, COMR+16*, COMR+17, COMR+19, COMR+23, COMR+26*, COMR+27
, COMR+29*, COMR+30, WP~, WP+1
X1 COMP+1~, COMP+6*, COMP+9, COMP+13, COMP+15, COMP+16
XI COMP+1~, COMP+2*, COMP+5*, COMP+6, COMP+18, COMP+19
XL COMR+1~, COMR+16*, COMR+19, COMR+21, COMR+23, COMR+27*, COMP+5, COMP+18, COMP+19
XL(2 COMR+9*, COMR+14, COMR+16
XPD EN1+1~, EN1+6
XPD("XPDC" EN1+5*
XPD("XPDNM" EN1+5*
XPD("XPDT(" EN1+5*
XPDA EN1+1~, COM~, COM+1, COM+2, COMR+3, COMR+9, COMR+26, COMR+31, COMP+5, COMP+6
, COMP+19
XPDC EN1+1~, EN1+5*, COM+3, COMR+8, COMR+31, HDR+5
XPDHEAD COMR+1~, COMR+4*, COMR+11, COMR+32, COMP+2*
XPDI COMR+1~, COMR+2*, COMR+3*, COMR+4, COMR+6, COMR+9, COMR+26, COMR+28, COMR+29, COMR+31
, COMR+33, COMP+5, COMP+6, COMP+8, COMP+11, COMP+18, COMP+19
XPDIT JOB+1~, JOB+2*
XPDNM EN1+1~, COM+2*, HDR+2
XPDST EN1+1~, EN1+2*
XPDT EN1+1~
XPDT( JOB+2, COM+2
XPDT("DA" COM+2
XPDUL EN1+1~, HDR+1*, HDR+7
Y EN1+1~, EN1+4, EN1+5*, EN1+6, COMR+1~, COMR+16*, COMR+17, COMR+19, COMR+23, COMR+29*
, WP~, WP+1, HDR+4
Y1 COMP+1~, COMP+6*, COMP+8, COMP+13*, COMP+16
YL COMR+1~, COMR+16*, COMR+19, COMR+21, COMR+23
YL(2 COMR+9*, COMR+14, COMR+16
Z EN1+1~, EN1+5*, EN1+6

Marked Items

Name Field # of Occurrence
$T( COMR+9, COMR+29
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All