Routine: ZIBRPRTD

Information

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

Package	Total	Caller Graph
IHS VA Utilities	1	XBRPRTBD

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

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

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