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 |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: XTVRC2

Package: Toolkit

Routine: XTVRC2


Information

XTVRC2 ; JLI/SF-ISC.SEATTLE ** PRODUCE LISTING OF CHANGE HISTORY FOR ROUTINE ;12/7/93 15:20

Source Information

Source file <XTVRC2.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
VA Fileman 3 ^%DT  %XY^%RCR  ^DIR  
Toolkit 1 (LCHEK,LOOP)^XTVRC1  

Entry Points

Name Comments DBIA/ICR reference
INSERT ;
LIST ;
ONE ;
A1
A2
KILL
RSEL
DIX
DELETE ;
CHANGE ;
DQ ;

External References

Name Field # of Occurrence
^%DT RSEL+2, DQ+1
%XY^%RCR RSEL+1
^%ZIS A2+1
^%ZISC DQ+6, KILL
^%ZTLOAD A2+1
^DIR DIX
LCHEK^XTVRC1 ONE+1
LOOP^XTVRC1 ONE+1, ONE+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This routine lists the changes in program code that have been noted.",!!
  • Line Location: XTVRC2+2
Function Call: WRITE
  • Prompt: !!,"Select the routine(s) which you want changes listed for:",!
  • Line Location: RSEL+0
Function Call: READ
  • Timeout: DTIME
  • Line Location: RSEL+2
Function Call: READ
  • Prompt: "Show changes for how many past versions (or ALL): 1// "
  • Formatting: !!
  • Timeout: DTIME
  • Variable: X
  • Line Location: A1+0
Function Call: WRITE
  • Prompt: !,"Enter a number indicating the number of past versions you want to see changes",!
  • Line Location: A1+0
Function Call: WRITE
  • Prompt: !!,"The following routines ARE NEW to the file (no prior version to compare):",!!
  • Line Location: DQ+3
Function Call: WRITE
  • Prompt: !
  • Condition for execution: XTVI#7
  • Line Location: DQ+3
Function Call: WRITE
  • Prompt: $J(XTVNAM,10)
  • Line Location: DQ+3
Function Call: WRITE
  • Prompt: !!,"The following routines showed no change in the specified number of versions:",!!
  • Line Location: DQ+4
Function Call: WRITE
  • Prompt: !
  • Condition for execution: XTVI#7
  • Line Location: DQ+4
Function Call: WRITE
  • Prompt: $J(XTVNAM,10)
  • Line Location: DQ+4
Function Call: WRITE
  • Prompt: !
  • Line Location: DQ+5
Function Call: WRITE
  • Prompt: !!,XTVNAM," changes in code ",XTVJ-XTVL," version",$S(XTVJ-XTVL>1:"s",1:"")," back (recorded ",XTVDATX,")"
  • Line Location: LIST+3
Function Call: WRITE
  • Prompt: !!?4,"original line ",XTVK," deleted. code was:",!,^XTV(8991,DA,1,XTVL,1,XTVK,"DEL")
  • Line Location: DELETE+2
Function Call: WRITE
  • Prompt: !!?4,"new line",$S($D(^XTV(8991,DA,1,XTVL,1,XTVK,"INS",2)):"s",1:"")," inserted **BEFORE** original line ",XTVK-1
  • Line Location: INSERT+1
Function Call: WRITE
  • Prompt: !,^(M,0)
  • Line Location: INSERT+2
Function Call: WRITE
  • Prompt: !!?4,"line ",XTVK," replaced:"
  • Line Location: CHANGE+6
Function Call: WRITE
  • Prompt: !,$E(X,$S(N1>5:N1-6,1:1),N2X+6),!?4,"with:"
  • Line Location: CHANGE+7
Function Call: WRITE
  • Prompt: !,$E(Y,$S(N1>5:N1-6,1:1),N2Y+6)
  • Line Location: CHANGE+8
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: DIX+1
Routine Call
  • DIR
  • Line Location:
    • DIX
Routine Call
  • %ZIS
  • Line Location:
    • A2+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("RSEL" RSEL+1
^TMP($J RSEL+1!, DQ+2, DQ+3, DQ+4, ONE+1*, ONE+5*
^UTILITY($J RSEL+1!
^XTV(8991 - [#8991] ONE+1, ONE+3, ONE+4, LIST+1, LIST+4, DELETE+1, DELETE+2, INSERT+1, INSERT+2, CHANGE+1

Label References

Name Line Occurrences
A1 A1
A2 RSEL+2
CHANGE DELETE+1
DELETE LIST+4
DIX LIST+2, DELETE+2, INSERT+1, INSERT+2, CHANGE+6
INSERT LIST+4
KILL RSEL+1, A2+1, DQ+3
LIST ONE+4
ONE DQ+2
RSEL DQ+6

Naked Globals

Name Field # of Occurrence
^( ONE+4, LIST+4, INSERT+2
^(2 LIST+1, DELETE+1
^(3 LIST+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% LIST+3*!
%DT RSEL+2*!, DQ+1*
>> %X RSEL+1*
>> %Y RSEL+1*
>> %ZIS A2+1*
DA KILL+1!, ONE+1*, ONE+2*, ONE+3, ONE+4, LIST+1, LIST+4, DELETE+1, DELETE+2, INSERT+1
, INSERT+2, CHANGE+1
DIR KILL+1!
DIR(0 DQ+2*
DIRUT DQ+2, DQ+3, KILL+1!, ONE+4, LIST+2, LIST+4, DELETE+2, INSERT+1, INSERT+2, CHANGE+6
, DIX
DTIME RSEL+2, A1
IO DQ+2, DQ+7
IO("Q" A2+1!
IO(0 RSEL
IOF DQ+7, DIX+1
ION A2+1
IOSL LIST+2, DELETE+2, INSERT+1, INSERT+2, CHANGE+6
IOST DQ+7, DIX
>> L ONE+1
M KILL+1!, INSERT+2*, CHANGE+2*, CHANGE+4*
>> N1 CHANGE+2*, CHANGE+5*, CHANGE+7, CHANGE+8
>> N2M CHANGE+3*
>> N2X CHANGE+3*, CHANGE+4*, CHANGE+7
>> N2Y CHANGE+3*, CHANGE+4*, CHANGE+8
POP A2+1, KILL+1!
U A1
X RSEL+2*, A1*, A2, DQ+1*, KILL+1!, CHANGE+1*, CHANGE+2, CHANGE+3, CHANGE+4, CHANGE+5
, CHANGE+7, DIX~
>> XTROU ONE+1*
XTVA DQ+2*, KILL+1!
XTVC KILL+1!, ONE+4*, ONE+5, LIST+3*
XTVD KILL+1!, LIST+4*, DELETE+3*, CHANGE+9*
>> XTVDA ONE+2*
XTVDAT RSEL+2*, KILL+1!, ONE+4
XTVDAT1 KILL+1!, ONE+4*
>> XTVDATX ONE+4*, LIST+3*
XTVI DQ+3*, DQ+4*, KILL+1!, LIST+4*, INSERT+3*, CHANGE+9*
XTVJ KILL+1!, ONE+3*, ONE+4, LIST+3
XTVK KILL+1!, LIST+4*, DELETE+1, DELETE+2, DELETE+3, INSERT+1, INSERT+2, INSERT+3, CHANGE+1, CHANGE+6
, CHANGE+9
XTVL KILL+1!, ONE+3*, ONE+4*, LIST+1, LIST+3, LIST+4, DELETE+1, DELETE+2, INSERT+1, INSERT+2
, CHANGE+1
XTVNAM DQ+2*, DQ+3*, DQ+4*, KILL+1!, ONE+1, ONE+5, LIST+3
XTVNV A2*, KILL+1!, ONE+4
>> XTVTIM DQ+1*
Y RSEL+2*, DQ+1, KILL+1!, CHANGE+1*, CHANGE+2, CHANGE+3, CHANGE+4, CHANGE+5, CHANGE+8, DIX~
ZTDESC A2+1*!
ZTIO A2+1*!, KILL+1!
>> ZTQUEUED DQ+6, DIX
ZTRTN A2+1*!, KILL+1!
ZTSAVE A2+1!, KILL+1!
ZTSAVE("XTVDAT" A2+1*
ZTSAVE("XTVNV" A2+1*
ZTSAVE("^TMP($J," A2+1*
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All