Routine: DDGLIBP

Package	Total	Call Graph
VA Fileman	4	YX^%DTC ($$CREF,$$OREF)^DILF ^DIR ^DIWP
Kernel	2	^%ZIS ^%ZTLOAD

Package	Total	Caller Graph
VA Fileman	1	DDBRGE

Entry Points

Name	Comments	DBIA/ICR reference
PRINTQ	;Delete the queued task and quit
PT(DDGLROOT,DDGLHDR)	;Prompt for device and print
YNREAD(DDGLPROM,DDGLDEF,DDGLHELP)	;Issue a Yes/No Read
FINISH(DDGLMSG)	;Print message and reset terminal characteristics
PRINT	;Print the document in DDGLREF, Header text in DDGLHDR
DEVICE	;Device prompt
FORMAT(DDGLREF,DDGLZN,DDGLFLAG)	;Use ^DIWP to format the text
EOPREAD	; Issue an End-of-Page Read
HDR	;Print the header DDGLHDR; increment DDGLPAGE

External References

Name	Field # of Occurrence
YX^%DTC	PRINT+19
^%ZIS	DEVICE+5, DEVICE+29
^%ZTLOAD	DEVICE+24
$$CREF^DILF	DEVICE+10
$$OREF^DILF	DEVICE+23
^DIR	YNREAD+6, EOPREAD+2
^DIWP	FORMAT+6

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: $P(DDGLVID,DDGLDEL,9) Line Location: PT+11
Function Call: WRITE	Prompt: @IOSTBM Line Location: DEVICE+14
Function Call: WRITE	Prompt: @IOF Line Location: DEVICE+15
Function Call: WRITE	Prompt: !,"Report queued!",!,"Task number: "_ZTSK,! Line Location: DEVICE+26
Function Call: WRITE	Prompt: @IOF Line Location: DEVICE+34
Function Call: WRITE	Prompt: @IOSTBM Condition for execution: $D(IOSTBM)#2 Line Location: DEVICE+34
Function Call: WRITE	Prompt: @IOF Line Location: PRINT+25
Function Call: WRITE	Prompt: !,$S(DDGLZN:$G(@DDGLREF@(DDGLI,0)),1:$G(@DDGLREF@(DDGLI))) Line Location: PRINT+26
Function Call: WRITE	Prompt: DDGLHDR Line Location: HDR+5
Function Call: WRITE	Prompt: ?DDGLCOL,DDGLPSTR Line Location: HDR+7
Function Call: WRITE	Prompt: !,$TR($J("",IOM-1)," ","-") Line Location: HDR+8
Function Call: WRITE	Prompt: !,DDGLMSG Line Location: FINISH+1
Function Call: WRITE	Prompt: $P(DDGLVID,DDGLDEL,8) Line Location: FINISH+6
Routine Call	DIR Line Location: YNREAD+6 EOPREAD+2
Routine Call	%ZIS Line Location: DEVICE+5 DEVICE+29

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZIS("C"	DEVICE+35
^%ZOSF("RM"	PT+10, FINISH+5
^%ZTSK - [#14.4]	DEVICE+3, DEVICE+18
^UTILITY($J	PRINT+12, PRINT+28!, FORMAT+2!

Label References

Name	Line Occurrences
$$YNREAD	PT+18, PT+27, PT+35
EOPREAD	DEVICE+27
FINISH	PT+20, PT+29, PT+37, DEVICE+7, DEVICE+30, DEVICE+36
FORMAT	PRINT+10
HDR	PRINT+21, PRINT+25
PRINT	DEVICE+33
PRINTQ	PRINT+2, PRINT+3, PRINT+29

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	PT+2~, PRINT+18~
%A	PT+2~
%A0	PT+4~
%B	PT+2~
%B1	PT+2~
%B2	PT+2~
%B3	PT+2~
%BA	PT+2~
%C	PT+2~
%D1	PT+4~
%D2	PT+4~
%DT	PT+4~
%E	PT+2~
%G	PT+2~
%H	PT+2~, PRINT+18~, PRINT+19*
%I	PT+2~
%J	PT+2~
%J1	PT+4~
%K	PT+2~
%M	PT+2~
%N	PT+2~
%P	PT+3~
%S	PT+3~
%T	PT+3~
%W	PT+3~
%W0	PT+4~
%X	PT+3~
%Y	PT+3~
%ZIS	DEVICE+3*, DEVICE+5!
%ZIS("B"	DEVICE+3*
%ZIS("S"	DEVICE+4*
DDGLBAR	PT+1~, PT+35*, PT+37, PT+40
DDGLCOL	HDR+1~, HDR+4*, HDR+6, HDR+7
DDGLDEF	YNREAD~, YNREAD+3
>> DDGLDEL	PT+11, FINISH+6
DDGLDT	PRINT+1~, PRINT+20*, HDR+3
DDGLFLAG	PT+1~, PT+6, PT+21, PT+40, PRINT+6, PRINT+9, PRINT+10, PRINT+16, PRINT+25, PRINT+28 , FORMAT~, FORMAT+3
DDGLHDR	PT~, PT+13, DEVICE+21, HDR+5
DDGLHELP	PT+1~, PT+17, PT+18, PT+19!, PT+26, PT+27, PT+28!, PT+34*, PT+35, PT+36! , YNREAD~, YNREAD+4
DDGLHELP(1	PT+16, PT+24, PT+32*
DDGLHELP(2	PT+25, PT+33
DDGLI	PT+1~, PRINT+1~, PRINT+24, PRINT+26, FORMAT+4, FORMAT+5
DDGLMSG	DEVICE+19~, DEVICE+28*, DEVICE+30, FINISH~, FINISH+1
DDGLPAGE	PRINT+1~, HDR+2*, HDR+3
DDGLPHDR	PT+1~, PT+18*, PT+20, PT+21
DDGLPROM	YNREAD~, YNREAD+5
DDGLPSTR	HDR+1~, HDR+3*, HDR+4, HDR+7
DDGLREF	PT+1~, DEVICE+10, DEVICE+23, PRINT+2, PRINT+3, PRINT+5, PRINT+10, PRINT+12, PRINT+24, PRINT+26 , FORMAT~, FORMAT+4, FORMAT+5
DDGLROOT	PT~, DEVICE+10
>> DDGLVID	PT+11, FINISH+6
DDGLWRAP	PT+1~, PT+27*, PT+29, PT+40
DDGLZN	PRINT+1~, PRINT+5, PRINT+10, PRINT+11, PRINT+26, FORMAT~, FORMAT+5
>> DDGLZOSF("EOFF"	FINISH+4
>> DDGLZOSF("EON"	PT+9
>> DDGLZOSF("TRMOFF"	PT+9
>> DDGLZOSF("TRMON"	FINISH+4
DDS	PT+1~
DIR	YNREAD+1~, EOPREAD+1~
DIR("?"	YNREAD+4*
DIR("A"	YNREAD+5*
DIR("B"	YNREAD+3*
DIR(0	YNREAD+2, EOPREAD+2
DIR0	PT+1~
DIROUT	YNREAD+1~, EOPREAD+1~
DIRUT	YNREAD+1~, YNREAD+7, EOPREAD+1~
DIWF	FORMAT+1~, FORMAT+3*
DIWL	FORMAT+1~, FORMAT+3*
DIWR	FORMAT+1~, FORMAT+3*
DTOUT	YNREAD+1~, EOPREAD+1~
DUOUT	YNREAD+1~, EOPREAD+1~
DX	PT+1~
DY	PT+1~
I	DEVICE+19~, DEVICE+22*
IO	PRINT+15
IO("Q"	DEVICE+18
IOBM	DEVICE+2, DEVICE+14~*
IOF	DEVICE+1~, DEVICE+2*, DEVICE+15, DEVICE+34, PRINT+25
IOM	PT+10, HDR+4, HDR+8, FORMAT+3
>> IOP	DEVICE+29*
IOSL	DEVICE+1~, DEVICE+2*, DEVICE+14, PRINT+25
IOST	DEVICE+13, DEVICE+34
>> IOSTBM	DEVICE+14, DEVICE+34
IOTM	DEVICE+2, DEVICE+14~*
POP	PT+1~, DEVICE+7
X	PT+10, PRINT+18~, YNREAD+1~, EOPREAD+1~, FORMAT+1~, FORMAT+5, FINISH+5*
Y	PRINT+18~, PRINT+20, YNREAD+1~, YNREAD+7, EOPREAD+1~
ZTDESC	DEVICE+19~, DEVICE+21*
>> ZTQUEUED	PRINTQ+1
>> ZTREQ	PRINTQ+1*
ZTRTN	DEVICE+19~, DEVICE+20*
ZTSAVE	DEVICE+19~
ZTSAVE(	DEVICE+22, DEVICE+23
ZTSK	DEVICE+19~, DEVICE+25, DEVICE+26

Customize PDF page

Package: VA Fileman

Routine: DDGLIBP

Information

Source Information

Call Graph

Call Graph Total: 6

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: