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: %INDX6

Package: Toolkit

Routine: %INDX6


Information

%INDX6 ;ISC/REL,GRK - GET SET OF ROUTINES TO INDEX ;8/3/93 16:10 ;

Source Information

Source file <ZINDX6.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Kernel 3 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  
Toolkit 3 ALIVE^%INDEX  (,START)^%INDX10  CLEAN^%INDX5  
VA FileMan 2 DD^%DT  NOW^%DTC  

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
Toolkit 2 %INDEX  %INDX8  

Entry Points

Name Comments DBIA/ICR reference
L7
DEVICE
END
ANS(PR,DEF,HELP) ;Ask question get answer
YN
NY
RD
RLIST
ASKRTN ;Collect a list of routines to index.
R1
SETUP ;Write startup header stuff.
HDR

External References

Name Field # of Occurrence
DD^%DT HDR
NOW^%DTC HDR
ALIVE^%INDEX DEVICE+4
^%INDX10 %INDX6+6
START^%INDX10 SETUP+2
CLEAN^%INDX5 END
^%ZIS DEVICE
HOME^%ZIS %INDX6+4, DEVICE+6
^%ZISC DEVICE+2
^%ZTLOAD DEVICE+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,$C(7),"This report could take some time, Remember to QUEUE the report.",!
  • Condition for execution: NRO>2
  • Line Location: DEVICE+0
Function Call: WRITE
  • Prompt: !,*7,"%INDEX terminated. No device specified."
  • Line Location: DEVICE+0
Function Call: WRITE
  • Prompt: !,"Do you really mean queue to this device? NO//"
  • Line Location: DEVICE+2
Function Call: WRITE
  • Prompt: !!,"Ok, tell me again ..."
  • Line Location: DEVICE+2
Function Call: WRITE
  • Prompt: !!,"I am QUEUEING this report for you."
  • Line Location: DEVICE+3
Function Call: WRITE
  • Prompt: !!,PR
  • Line Location: ANS+1
Function Call: WRITE
  • Prompt: !,HELP
  • Condition for execution: $D(HELP)
  • Line Location: YN+0
Function Call: WRITE
  • Prompt: !,"Please enter 'Y' or return for YES, 'N' for NO"
  • Line Location: YN+0
Function Call: WRITE
  • Prompt: !,HELP
  • Condition for execution: $D(HELP)
  • Line Location: NY+0
Function Call: WRITE
  • Prompt: !,"Please enter 'N' or return for NO, 'Y' for YES"
  • Line Location: NY+0
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: RD+0
Function Call: WRITE
  • Prompt: !,"Please select one of the choices."
  • Line Location: RLIST+0
Function Call: WRITE
  • Prompt: !!,"LIST OF ROUTINES TO BE INDEXED; PRESS RETURN TO TERMINATE LIST",!
  • Line Location: ASKRTN+3
Function Call: READ
  • Formatting: !
  • Prompt: "ROUTINE NAME: "
  • Variable: ROU
  • Timeout: $S($G(DTIME):DTIME,1:360)
  • Line Location: R1+0
Function Call: WRITE
  • Prompt: " INVALID ROUTINE NAME"
  • Line Location: R1+1
Function Call: WRITE
  • Prompt: " INVALID ROUTINE NAME"
  • Line Location: R1+2
Function Call: WRITE
  • Prompt: !!,"Routines are being processed.",!
  • Line Location: SETUP+2
Function Call: WRITE
  • Prompt: "Indexed Routines: ",NRO,!!
  • Line Location: SETUP+3
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $Y>3
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !!,?IOM-$L(INDHDR)\2,INDHDR,!,?IOM-$L(INDHDR(1))\2,INDHDR(1),!
  • Line Location: HDR+1
Routine Call
  • %ZIS
  • Line Location:
    • DEVICE
Routine Call
  • %ZIS
  • Line Location:
    • %INDX6+4
    • DEVICE+6

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("RSEL" ASKRTN+1
^%ZOSF("TEST" R1+2
^%ZOSF("UCI" HDR
^%ZOSF("VOL" HDR
^DIC(9.4 - [#9.4] %INDX6+6
^DIC(9.8 - [#9.8] L7
^UTILITY($J %INDX6+5!, ASKRTN+1, R1+3*

Label References

Name Line Occurrences
@( ANS+1
ANS %INDX6+6, %INDX6+8, %INDX6+9, %INDX6+10, %INDX6+11, %INDX6+12, %INDX6+13, L7, L7+1
ASKRTN %INDX6+5
DEVICE DEVICE+2
END %INDX6+6, %INDX6+7, %INDX6+8, %INDX6+9, %INDX6+10, %INDX6+11, %INDX6+12, %INDX6+13, L7, L7+1
, DEVICE
HDR %INDX6+4, SETUP+1, SETUP+2
L7 %INDX6+8, %INDX6+9
NY DEVICE+2
R1 R1+1, R1+2, R1+3
RD YN, NY, RLIST

Naked Globals

Name Field # of Occurrence
^("RSEL" ASKRTN+1
^("TEST" R1+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% ANS+1~, YN*, NY*, RD, RLIST*, HDR
%ZIS DEVICE!*, END!
%ZIS("B" DEVICE*
>> DA %INDX6+6, SETUP+2*
DEF ANS~, ANS+1
DT HDR*
DTIME %INDX6+4*, RD, R1
>> DUOUT %INDX6+6
>> G DEVICE+5*
HELP ANS~, YN, NY
>> I %INDX6+5*, ASKRTN+1*
>> IND("TM" SETUP+2*
>> INDDA %INDX6+6*, %INDX6+7, %INDX6+12, SETUP+2
>> INDDS SETUP+2*
>> INDHDR HDR*, HDR+1
>> INDHDR(1 HDR*, HDR+1
>> INDXDT HDR*
>> INP( %INDX6+5*
>> INP(1 %INDX6+8*
>> INP(2 %INDX6+10*, %INDX6+11
>> INP(3 %INDX6+13*
>> INP(4 %INDX6+12*
>> INP(5 %INDX6+11*
>> INP(6 %INDX6+9*
>> INP(7 L7*
>> INP(8 L7+1*
>> INP(9 %INDX6+6*
IO DEVICE+2, SETUP+1
IO("Q" DEVICE+2!, DEVICE+4, DEVICE+6!
IO(0 DEVICE+2
IOF HDR+1
IOM HDR+1
IOP DEVICE!
IOSL SETUP+2
IOST DEVICE+2
>> NRO %INDX6+7, DEVICE, DEVICE+5, ASKRTN+1*, ASKRTN+3*, R1+3*, SETUP+3
>> POP DEVICE
PR ANS~, ANS+1
>> Q %INDX6+5*, SETUP+2*
>> ROU R1*, R1+1, R1+2, R1+3
>> RTN %INDX6+5*, SETUP+2*
U SETUP+2*
>> X %INDX6+6, %INDX6+8, %INDX6+9, %INDX6+10, %INDX6+11, %INDX6+12, %INDX6+13, L7, L7+1, DEVICE+2
, YN, NY, RD*, RLIST, ASKRTN+1*, R1+2*
>> Y ANS+1*, YN*, NY*, RLIST*, HDR*
>> ZTDESC DEVICE+5*
ZTDTH %INDX6+5!
ZTIO %INDX6+5!
>> ZTRTN DEVICE+5*
>> ZTSAVE( DEVICE+5*
ZTSK %INDX6+5!, END!

Marked Items

Name Field # of Occurrence
$T( HDR
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