Routine: DIP3

Information

DIP3 ;SFISC/GFT,TKW-PRINT HEADING, PAGE, COPIES ;06:51 PM 9 Dec 1999 [ 04/02/2003 8:25 AM ]

Source file <DIP3.m>

Package	Total	Call Graph
VA Fileman	11	ZIS^DDXP4 IX^DIC YN^DICN CLEAN^DIEFU Q^DIP (D,PUT)^DIP21 HQ^DIP31 ^DIP4 ^DIP5 DIP3^DIQQ DIP3^DIQQQ
Kernel	1	^%ZIS

Package	Total	Caller Graph
VA Fileman	6	DIP2 DIP21 DIP23 DIP4 DIQQ DIQQQ

Name	Comments	DBIA/ICR reference
F2
SDPCLO
SDP
ZIS
G
H
O
DHD(DHD,DK,L)	;VALIDATE HEADER 'DHD' FOR FILE 'DK' ; 'L'=0 MEANS SILENT ; CALLED BY SCREENMAN TEMPLATE EDIT
CLO
FREE
X
DHDBAD
PAGE	;
HD
CLO1

Name	Line Occurrences
Function Call: WRITE	Prompt: $C(7),!,"TRY LATER" Line Location: X+0
Function Call: READ	Prompt: "START AT PAGE: 1// " Formatting: ! Timeout: DTIME Variable: X Line Location: PAGE+2
Function Call: READ	Prompt: "NUMBER OF COPIES: " Formatting: ! Timeout: DTIME Variable: F Line Location: SDP+1
Function Call: WRITE	Prompt: !,"OUTPUT COPIES TO" Line Location: O+0
Function Call: WRITE	Prompt: $C(7),?8,"MARGIN WIDTH IS NORMALLY AT LEAST "_^("IOM"),!?8,"ARE YOU SURE" Line Location: FREE+1
Function Call: WRITE	Prompt: !,"THIS TERMINAL IS NOW FREE",!!,"Exit",! Line Location: FREE+3
Routine Call	%ZIS Line Location: ZIS O+1 O+2
Routine Call	DIC Line Location: DHD+4

Name	Line Occurrences (* Changed, ! Killed)
^%ZIS("C"	FREE+3
^%ZOSF("RM"	ZIS+1
^%ZOSF("UCI"	PAGE+4
^%ZTSCH("RUN"	PAGE+4
^%ZTSK - [#14.4]	PAGE+4
^DD("FUNC" - [#.5]	FREE+3, CLO1
^DD("OS" - [#.7]	PAGE+4, ZIS+2, FREE+2
^DIPT - [#.4]	FREE+1, HD+1
^UTILITY("DIP2"	DIP3+4*

Name	Field # of Occurrence
^("H"	HD+1
^("IOM"	FREE+1

Name	Field # of Occurrence
%	DHD+3~, DHD+6, FREE, FREE+1, FREE+2*
%ZIS	PAGE+4, O!, O+2*, FREE+2
%ZIS("B"	PAGE+4, O
>> C	PAGE+1, PAGE+2, F2+1*
CP	F2+1!
DA	H+2, H+3, PAGE+1!, O+2*, FREE+2, F2+1!
DALL	H, G, F2+1!
DC	DHD+3~, DHD+4, PAGE+1, PAGE+2, F2, F2+1!
DC(0	HD+1
>> DCL	HD
>> DCOPIES	SDP+1*
DD	DHD+3~
>> DDXP	H, PAGE+1, ZIS, ZIS+1
>> DDXPIOM	ZIS+1
>> DDXPIOSL	ZIS+1
>> DE	DIP3+4*, G
DHD	H+3, DHD~, DHD+4, DHD+5, DHD+6, G, PAGE+2, F2, HD+2*
>> DI	F2+1, HD
>> DIAR	HD
>> DIASKHD	H, HD+2*
>> DIAX	HD
DIC	DHD+3~, DHD+4!, F2+1!
DIC("S"	DHD+4*
DIC(0	DHD+4*
DICOMPX	PAGE+1!
DIE	F2+1!
>> DIFIXPT	PAGE+3
DINS	F2+1!
>> DIOEND	FREE+3*
>> DIOEND(9	FREE+3*
DIOP	ZIS*!
DIOQ	O*, O+2!
>> DIPCRIT	PAGE+1*
>> DIPION	SDP*, O+2
>> DIPZ	FREE+1
DIROUT	H+2!
DIRUT	H+2!
>> DIS	HD
>> DISUPNO	PAGE+1*
>> DISYS	PAGE+4, ZIS+2, FREE+2
>> DJ	DIP3+4*, G
DK	H+3, DHD~, F2+1*
DM	FREE+3*, F2+1!
>> DOUT	PAGE+1, O+2*
>> DPP	PAGE+2
>> DPP(	PAGE+2
DRK	F2+1!
DTIME	PAGE+2, SDP+1
>> DTOUT	H+2
>> DUOUT	H+2
DUZ(0	DHD+6
DW	DHD+3~
>> F	SDP+1, FREE, FREE+2
FR	F2+1!
H	F2+1!
IO	SDP, O+1, O+2, FREE+2, FREE+3, CLO, CLO1
IO("C"	PAGE+1!, FREE+3*
IO("Q"	O, FREE+2, F2+2
IO(0	FREE+1, FREE+2
IO(1	FREE+3!, CLO1!
>> IOFREE	FREE+2
IOM	ZIS+1*, O+2, FREE+1
ION	SDP, O+2
IOP	ZIS, O!, O+2*, FREE+1, FREE+2
IOSL	ZIS+1*
IOST	O+2, FREE
>> IOT	ZIS+2
J	F2+1!
L	H, H+3, DHD~, DHD+4, G, PAGE+1, PAGE+2
N	F2+1!
>> O	SDP, O+1, F2+1, SDPCLO
PG	PAGE+1!
>> POP	ZIS, O+1
Q	F2+1!
S	F2+1!
T	F2+1!
TO	F2+1!
U	DHD+4, PAGE+2, SDP+1, FREE+2
V	F2+1!
>> W	FREE*, FREE+2
X	H+2, H+3, DHD+3~, DHD+4, X, PAGE+2, ZIS+1, FREE+3, F2, F2+1 , SDPCLO, CLO, HD, HD+1, HD+2*
Y	DHD+3~, DHD+4