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

Package: Kernel

Routine: %ZTPP


Information

%ZTPP ;SF/RWF - ROUTINE PRETTY PRINT OUTPUT ;10/19/09 14:56

Source Information

Source file <ZTPP.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
Kernel 4 ^%ZIS  ^%ZISC  ^%ZTLOAD  ($$OS,MOVE)^ZTMGRSET  
VA Fileman 1 NOW^%DTC  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Kernel 2 XUPRROU  ZTPTCH  

Entry Points

Name Comments DBIA/ICR reference
A
EXEC ;
DD
RSUM ;Checksum and byte counts ;p122
A3
A2
EXIT
POST ;POST-INIT
DQ ;FF start each routine on a new page, LN line numbers

External References

Name Field # of Occurrence
NOW^%DTC DQ+2
^%ZIS A3+4
^%ZISC EXIT+1
^%ZTLOAD A3+6
$$OS^ZTMGRSET POST+2
MOVE^ZTMGRSET POST+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Routine Print:"
  • Line Location: A+0
Function Call: READ
  • Prompt: "Want to start each routine on a new page: Yes// "
  • Formatting: !
  • Timeout: DTIME,!
  • Variable: FF
  • Line Location: A2+0
Function Call: WRITE
  • Prompt: !,"Enter Yes to start each routine on a new page.",!?5,"No for the old way."
  • Line Location: A2+0
Function Call: WRITE
  • Prompt: !,"Enter Yes to have line numbers, O for offset numbers, No for no line numbers."
  • Line Location: A3+1
Function Call: WRITE
  • Prompt: !!,"NO routines selected."
  • Line Location: A3+3
Function Call: WRITE
  • Prompt: !,"REQUEST QUEUED"
  • Line Location: A3+6
Function Call: WRITE
  • Prompt: !!
  • Line Location: DQ+5
Function Call: WRITE
  • Prompt: $J(RN,10)
  • Line Location: DQ+9
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $X>70
  • Line Location: DQ+9
Function Call: WRITE
  • Prompt: !,Y,?J>1+6," "
  • Line Location: DQ+13
Function Call: WRITE
  • Prompt: "--",!,?8
  • Condition for execution: $X>8
  • Line Location: DQ+13
Function Call: WRITE
  • Prompt: $E(X,1,IOM-(J>1+8))
  • Line Location: DQ+13
Function Call: WRITE
  • Prompt: !,J1,?4,Y,?J>1+10," "
  • Line Location: DQ+15
Function Call: WRITE
  • Prompt: "--",!,?12
  • Condition for execution: $X>12
  • Line Location: DQ+15
Function Call: WRITE
  • Prompt: $E(X,1,IOM-(J>1+12))
  • Line Location: DQ+15
Function Call: WRITE
  • Prompt: !
  • Line Location: DQ+19
Function Call: WRITE
  • Prompt: RN," * * ",$S(PG>1:"(cont.)",1:LC_" LINES, (total "_BYTECNT_", comments "_CCNT_") BYTES"),?60,"Page ",PG
  • Line Location: RSUM+13
Function Call: WRITE
  • Prompt: !,?8,HDR(1),?49,HDR(2),!
  • Line Location: RSUM+15
Function Call: READ
  • Prompt: "Press RETURN to continue or '^' to exit: "
  • Formatting: !
  • Timeout: 600
  • Variable: ST
  • Line Location: RSUM+17
Routine Call
  • %ZIS
  • Line Location:
    • A3+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("LOAD" DQ+8
^%ZOSF("RSEL" A3+3
^%ZOSF("UCI" DQ+3
^DD("SITE" DQ+3
^UTILITY($J A3+3!, DQ+7

Label References

Name Line Occurrences
%Z3 DQ+11, DQ+12
%Z5 DQ+7, %Z3
A2 A2
A3 A3+1
DD DQ+2
EXIT A2, A3+1, A3+3, A3+4, A3+6
RSUM DQ+11

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% DQ+2, EXIT!
%D DQ+6!, POST+1~, POST+3*
%S POST+1~, POST+3*
%T DQ+6!
%TIM DQ+6!
%Y DQ+6*, DQ+12, EXIT!
%Z33 EXIT!
%ZIS A3+4!*
BYTECNT DQ+1~, DQ+10*, RSUM+1*, RSUM+4*, %Z3+2
CCNT DQ+1~, DQ+10*, RSUM+1*, RSUM+7*, %Z3+2
DIF DQ+1~, DQ+8*
DTIME A+1~*, A2, A3
FF A+1~, A2*, A3+2*, %Z3+1
HDR DQ+1~
HDR(1 DQ+3*, %Z3+4
HDR(2 DQ+2*, %Z3+4
I A3+5*, EXIT!, RSUM+1~, RSUM+4*, RSUM+5*, RSUM+6, POST+1~
IO DQ+4, DQ+5, DQ+10, DQ+19
IO("Q" A3+5, A3+6!
IO(0 DQ+4, DQ+5, DQ+9
IOC DQ+1~, DQ+4*, DQ+5, DQ+7, DQ+9, %Z3
IOC2 DQ+1~, DQ+4*, DQ+5, DQ+7, %Z3
IOF DQ+5, %Z3+1
IOM DQ+6, DQ+13, DQ+15
IOP A3+4!
IOSL DQ+6, DQ+17, %Z3+1
IOST DQ+4
J DQ+13*, DQ+15*, EXIT!
J1 DQ+14*, DQ+15*, EXIT!
LC DQ+1~, DQ+8*, DQ+12, RSUM+2, %Z3+1, %Z3+2, %Z5*
LI DQ+1~, DQ+12*, DQ+14, %Z5*
LN A+1~, A3*, A3+1, A3+2*, DQ+13, DQ+14, DQ+15
OF DQ+1~, DQ+10*, DQ+14*
PG DQ+1~, DQ+10*, %Z3*, %Z3+1, %Z3+2, %Z3+3
>> POP A3+4
R RSUM+1~, RSUM+2*, RSUM+3
R1 RSUM+1~, RSUM+2*, RSUM+3, RSUM+4
R2 RSUM+1~, RSUM+3*
R3 RSUM+1~, RSUM+3*
R4 RSUM+1~, RSUM+4*, RSUM+5, RSUM+6*, RSUM+7
RN DQ+1~, DQ+6*, DQ+7*, DQ+8, DQ+9, %Z3+2, %Z5*
RSUM DQ+1~, RSUM+9*, %Z3+3
RSUM2 DQ+1~, RSUM+9*, %Z3+3
RTN DQ+8!, EXIT!
RTN( DQ+12, RSUM+2
S EXIT!
SCR POST+1~, POST+3*
ST DQ+1~, DQ+7, DQ+12, EXIT!, %Z3*, %Z5*
U DQ+2*
X DQ+1~, DQ+8*, DQ+12*, DQ+13*, DQ+15*, EXIT!, %Z5*
XCNP DQ+1~, DQ+8*
Y DQ+2*, DQ+3, DQ+12*, DQ+13*, DQ+14, DQ+15*, EXIT!, DD*, RSUM+1~*, RSUM+3*
, RSUM+9
Y2 RSUM+1~*, RSUM+3*, RSUM+9
>> ZTDESC A3+5*
>> ZTDTH A3+5*
ZTIO A3+4!
ZTMODE POST+1~, POST+2*
ZTOS POST+1~, POST+2*
>> ZTQUEUED EXIT+1
>> ZTREQ EXIT+1*
>> ZTRTN A3+5*
>> ZTSAVE( A3+5*
ZTSK A+1~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All