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

Package: IHS VA %Utilities

Routine: ZIBRPRTD


Information

ZIBRPRTD ; IHS/ADC/GTH - ROUTINE PRINT ; [ 10/29/2002 7:42 AM ]

Source Information

Source file <ZIBRPRTD.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
Kernel 3 ^%ZIS  ^%ZISC  $$VERSION^%ZOSV  
IHS VA Utilities 2 OSNO^XB  ^XBDATE  
IHS VA %Utilities 1 $$Z^ZIBNSSV  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
IHS VA Utilities 1 XBRPRTBD  

Entry Points

Name Comments DBIA/ICR reference
F1 ;
BEGIN ;
F3 ;
SDEV ;
ERR ;EP - If error, from error trap.
FORMAT ;
F2 ;
START ;
EXIT ;
RSEL ;
F4 ;
CMT ;
CMT1 ;

External References

Name Field # of Occurrence
^%ZIS SDEV+2
^%ZISC EXIT+3
$$VERSION^%ZOSV BEGIN+6
OSNO^XB BEGIN+7
^XBDATE RSEL+9
$$Z^ZIBNSSV ERR+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?10,ZIBOS," - Routine Print Utility"
  • Line Location: BEGIN+10
Function Call: WRITE
  • Prompt: !,"No routines selected"
  • Line Location: RSEL+6
Function Call: WRITE
  • Prompt: !,"No routines selected"
  • Line Location: RSEL+7
Function Call: WRITE
  • Prompt: !,"No routines will be printed."
  • Line Location: RSEL+10
Function Call: WRITE
  • Prompt: !!,"Lines per page <",%LPP,">: "
  • Line Location: F1+2
Function Call: WRITE
  • Prompt: %I
  • Line Location: F1+4
Function Call: WRITE
  • Prompt: !,*7,"Response must be positive numeric"
  • Line Location: F1+5
Function Call: WRITE
  • Prompt: !,"Characters per line <",%W,">: "
  • Line Location: F2+1
Function Call: WRITE
  • Prompt: %I
  • Line Location: F2+3
Function Call: WRITE
  • Prompt: !,*7,"Response must be positive numeric"
  • Line Location: F2+4
Function Call: WRITE
  • Prompt: !,"The comment will be displayed with the UCI, date, and time on each page header."
  • Line Location: CMT+3
Function Call: WRITE
  • Prompt: !,*7,"Too long. Maximum comment length is ",%L
  • Line Location: CMT1+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: START+8
Function Call: WRITE
  • Prompt: !!,"Done. "
  • Line Location: START+12
Function Call: WRITE
  • Prompt: !!,"...Aborted."
  • Line Location: ERR+1
Function Call: WRITE
  • Prompt: !!,"Printing ...",!
  • Line Location: FORMAT+2
Routine Call
  • %ZIS
  • Line Location:
    • SDEV+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("RSEL" RSEL+5
^%ZOSF("TRAP" BEGIN+8, BEGIN+9
^UTILITY($J F3+13, F3+16

Label References

Name Line Occurrences
CMT CMT+4, CMT1+1
CMT1 CMT+2
EXIT RSEL+7, RSEL+10, SDEV+2, F1+5, F2+4, ERR+1
F1 F1+5, F2+4
F2 F2+4, CMT+2
F4 F3+13, F3+16
FORMAT START+2
RSEL F1+5
SDEV F1+5
START F2+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% EXIT+4!
%BLK EXIT+4!
%CMT F2+5*, CMT+1*, CMT+2, CMT1+1, EXIT+4!
%DAT EXIT+4!
%DAT1 EXIT+4!
%DEV RSEL+1*, SDEV+2*, F1+5, START+3, START+9, EXIT+3, EXIT+4!, F3+9, F3+11
%I F1+3*, F1+4*, F1+5, F1+6, F2+2*, F2+3*, F2+4, F2+5, EXIT+4!, F3+13*
, F3+16*
%J EXIT+4!
%L F2+5*, F2+6, CMT1+1, EXIT+4!
%LPP F1+1*, F1+2, F1+4, F1+6*, EXIT+4!
%PG EXIT+4!, FORMAT+1*, F3+13*, F3+16*
%PGG EXIT+4!, FORMAT+1*, F3+13*, F3+16*
%R RSEL+5*, RSEL+7, EXIT+4!
%RN EXIT+4!, F3+12*, F3+13*, F3+15*, F3+16*
%TIM EXIT+4!
%TIM1 EXIT+4!
%W F1+1*, F2+1, F2+3, F2+5*, EXIT+4!
%X EXIT+4!, F3+7*, F3+8*, F4+1
DTIME F1+3, F2+2, CMT+1
IO SDEV+2, EXIT+3*
IOF START+8
>> POP SDEV+2
QUIT RSEL+3!, RSEL+7, RSEL+10, EXIT+3, EXIT+4!
>> X BEGIN+8*, BEGIN+9*
>> XBTYPE RSEL+8*
ZIBOS BEGIN+5~, BEGIN+6*, BEGIN+7, BEGIN+8, BEGIN+9, BEGIN+10, START+8, START+9, F3+7, F3+8
, F3+10, F3+14
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All