Routine: DDSPRNT

Package	Total	Call Graph
VA Fileman	7	YX^%DTC (HBLKS,PAGE)^DDSPRNT1 ^DIC INIZE^DIEFU $$EXTERNAL^DILFD ^DIR ^DIWP
Kernel	2	^%ZIS (,$$S)^%ZTLOAD

Package

Total

Call Graph

VA Fileman

YX^%DTC (HBLKS,PAGE)^DDSPRNT1 ^DIC INIZE^DIEFU $$EXTERNAL^DILFD ^DIR ^DIWP

Kernel

^%ZIS (,$$S)^%ZTLOAD

Package	Total	Caller Graph
VA Fileman	3	DDS DDSPRNT1 DDSPRNT2

Package

Total

Caller Graph

VA Fileman

DDS DDSPRNT1 DDSPRNT2

Entry Points

Name	Comments	DBIA/ICR reference
W(DDSSTR,DDSCOL)	;Write DDSSTR
HDR2	;First header for non-CRTs
FORM	;Form data
HDR1	;First header for CRTs
SELFORM(DDSFORM)	;Select form
WR(DDSLAB,DDSVAL,DDSFLG)	;Write label and value
WP(DDSWP,DIWL,DDSLF)	;Print text in array @DDSWP
HEADER	;All headers except first
INIT	;Setup
END	;Finish up
PCOL(DDSVAL,DDSCOL)	;Print DDSVAL
PRINT	;Entry point for queued reports
PAGEBRK(DDSPBRK)	;Prompt

External References

Name	Field # of Occurrence
YX^%DTC	INIT+2
^%ZIS	DDSPRNT+12, DDSPRNT+24
^%ZTLOAD	DDSPRNT+20
$$S^%ZTLOAD	HEADER+4
HBLKS^DDSPRNT1	FORM+38
PAGE^DDSPRNT1	FORM+35
^DIC	SELFORM+3
INIZE^DIEFU	DDSPRNT+4, PRINT+5
$$EXTERNAL^DILFD	FORM+9, FORM+11
^DIR	HEADER+3, PAGEBRK+5
^DIWP	WP+15

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: DDSPRNT+12
Function Call: WRITE	Prompt: !,"Report queued!",!,"Task number: "_$G(ZTSK),! Line Location: DDSPRNT+21
Function Call: WRITE	Prompt: !,"Report canceled!",! Line Location: DDSPRNT+22
Function Call: WRITE	Prompt: ! Line Location: FORM+1
Function Call: WRITE	Prompt: ?49,"READ ACCESS: "_$P(DDSFORM(0),U,2) Line Location: FORM+8
Function Call: WRITE	Prompt: ?48,"WRITE ACCESS: "_$P(DDSFORM(0),U,3) Line Location: FORM+10
Function Call: WRITE	Prompt: ?53,"CREATOR: "_$P(DDSFORM(0),U,4) Line Location: FORM+12
Function Call: WRITE	Prompt: ?DDSCOL2,DDSLAB Line Location: WR+4
Function Call: WRITE	Prompt: ?DDSCOL,$E(DDSVAL,DDSIND,DDSIND+DDSWIDTH-1) Line Location: PCOL+5
Function Call: WRITE	Prompt: ?DIWL-1,$G(^UTILITY($J,"W",DIWL,1,0)) Line Location: WP+18
Function Call: WRITE	Prompt: !?+$G(DDSCOL),$G(DDSSTR) Line Location: W+2
Function Call: WRITE	Prompt: ! Line Location: HEADER+3
Function Call: WRITE	Prompt: @IOF Line Location: HDR1+1
Function Call: WRITE	Prompt: "FORM LISTING - "_$P(DDSFORM,U,2)_" (#"_+DDSFORM_")" Line Location: HDR2+3
Function Call: WRITE	Prompt: !,"FILE: "_DDSFILE Line Location: HDR2+4
Function Call: WRITE	Prompt: ?(IOM-$L(DDSHLIN)-$L(DDSPAGE)-1),DDSHLIN_DDSPAGE Line Location: HDR2+5
Function Call: WRITE	Prompt: !,$TR($J("",IOM-1)," ","-") Line Location: HDR2+6
Function Call: WRITE	Prompt: ! Line Location: PAGEBRK+5
Routine Call	DIC Line Location: SELFORM+3
Routine Call	DIR Line Location: HEADER+3 PAGEBRK+5
Routine Call	%ZIS Line Location: DDSPRNT+12 DDSPRNT+24

Name	Line Occurrences (* Changed, ! Killed)
^%ZIS("C"	END+2
^%ZTSK - [#14.4]	DDSPRNT+11, DDSPRNT+16
^DIC - [#1]	INIT+5
^DIST(	FORM+4, FORM+16, FORM+19, FORM+21, FORM+23, FORM+25, FORM+31, FORM+35
^UTILITY($J	WP+8!, WP+18, WP+21, WP+22, WP+24!

Label References

Name	Line Occurrences
@(	PRINT+7
END	DDSPRNT+16, PRINT+8
FORM	PRINT+8
HEADER	W+1
INIT	PRINT+6
PAGEBRK	DDSPRNT+8
PCOL	FORM+20, FORM+22, FORM+24, FORM+26, WR+7
SELFORM	DDSPRNT+7
W	FORM+7, FORM+9, FORM+11, FORM+13, FORM+15, FORM+16, FORM+18, FORM+20, FORM+22, FORM+24 , FORM+26, FORM+30, WR+3, PCOL+4, WP+22, WP+25
WP	FORM+4

Name	Field # of Occurrence
^(0	WP+15, INIT+5
^(21	FORM+16

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	SELFORM+1~, INIT+1~
%H	INIT+1~, INIT+2*
%W	SELFORM+1~
%Y	SELFORM+1~
%ZIS	DDSPRNT+11*, DDSPRNT+12!
C	SELFORM+1~
DDH	SELFORM+1~
DDSBK	PRINT+1~
DDSCNT	WP+6~, WP+13, WP+14, WP+15, WP+19, WP+20, WP+21, WP+22
DDSCOL	PCOL~, PCOL+2, PCOL+5, W~, W+2
DDSCOL1	PRINT+1~
DDSCOL2	PRINT+1~, WR+4
DDSCOL3	PRINT+1~, WR+6~*, WR+7
DDSCRT	PRINT+1~, PRINT+7, HEADER+1, INIT+7*
DDSFILE	PRINT+1~, HDR2+4, INIT+4, INIT+5, INIT+6*
DDSFLG	WR~, WR+1
DDSFORM	DDSPRNT+6~, DDSPRNT+7, DDSPRNT+18, FORM+4, FORM+16, FORM+19, FORM+21, FORM+23, FORM+25, FORM+31 , FORM+35, HDR2+3, SELFORM~, SELFORM+4*
DDSFORM(0	FORM+7, FORM+8, FORM+9, FORM+10, FORM+11, FORM+12, FORM+15, FORM+27!, SELFORM+4*, INIT+4
DDSHBK	PRINT+2~, FORM+38
DDSHLIN	PRINT+2~, HDR2+5, INIT+3*
DDSI	WP+6~, WP+15*
DDSIND	PCOL+1~, PCOL+3*, PCOL+4, PCOL+5
DDSLAB	WR~, WR+4
DDSLF	WP~, WP+11*, WP+17, WP+25
DDSPAGE	PRINT+2~, HDR2+2*, HDR2+5
DDSPBRK	DDSPRNT+6~, DDSPRNT+8, PAGEBRK~, PAGEBRK+6*
DDSPFRST	FORM+34*, FORM+36!
DDSPG	FORM+33~, FORM+35*
DDSPGN	FORM+33~, FORM+34, FORM+35
DDSQUE	PRINT+2~, HEADER+4, INIT+8*
DDSSTR	W~, W+2
DDSVAL	WR~, WR+1, WR+7, PCOL~, PCOL+3, PCOL+5
DDSWIDTH	PCOL+1~, PCOL+2*, PCOL+3, PCOL+5
DDSWP	WP~, WP+4, WP+13, WP+15
DIC	SELFORM+1~, SELFORM+2*, SELFORM+3!
DIC(0	SELFORM+2*
DIFM	DDSPRNT+4~, PRINT+5~
DIR	HEADER+2~, PAGEBRK+1~
DIR("A"	PAGEBRK+3*
DIR("B"	PAGEBRK+4*
DIR(0	HEADER+3, PAGEBRK+2
DIROUT	PAGEBRK+1~
DIRUT	FORM+4, FORM+7, FORM+9, FORM+11, FORM+13, FORM+15, FORM+16, FORM+18, FORM+20, FORM+22 , FORM+24, FORM+26, FORM+30, FORM+35, FORM+36, WR+3, PCOL+3, PCOL+4, WP+21, W+1 , HEADER+1, HEADER+4*, PAGEBRK+1~, PAGEBRK+5, END+3!
DIW	WP+5~
DIWF	WP+5~
DIWI	WP+5~
DIWL	WP~, WP+9*, WP+18, WP+21, WP+22
DIWR	WP+5~, WP+10*
DIWT	WP+5~
DIWTC	WP+5~
DIWX	WP+5~
DN	WP+5~
DTOUT	PAGEBRK+1~, END+3!
DUOUT	PAGEBRK+1~, END+3!
DX	PRINT+3~
DY	PRINT+3~
I	DDSPRNT+19~*, WP+6~, SELFORM+1~
IO	DDSPRNT+26
IO("Q"	DDSPRNT+16
IOF	HDR1+1
IOM	PCOL+2, WP+10, HDR2+5, HDR2+6
>> IOP	DDSPRNT+24*
IOSL	W+1
IOST	INIT+7
POP	DDSPRNT+12!, DDSPRNT+13!
Q	SELFORM+1~
U	DDSPRNT+18, FORM+7, FORM+8, FORM+9, FORM+10, FORM+11, FORM+12, FORM+15, FORM+16, WP+4 , WP+13, HDR2+3, INIT+4, INIT+5
X	PRINT+3~, FORM+19, FORM+20, FORM+21, FORM+22, FORM+23, FORM+24, FORM+25, FORM+26, WP+6~ , WP+15*, HEADER+2~, SELFORM+1~, PAGEBRK+1~, INIT+1~
Y	PRINT+3~, HEADER+2~, SELFORM+1~, SELFORM+4, PAGEBRK+1~, PAGEBRK+6, INIT+1~, INIT+3
Y(0	SELFORM+4
Z	WP+6~
>> ZTDESC	DDSPRNT+18*
>> ZTQUEUED	INIT+8, END+1
>> ZTREQ	END+1*
>> ZTRTN	DDSPRNT+17*
>> ZTSAVE(	DDSPRNT+19*
ZTSK	DDSPRNT+21, DDSPRNT+23!
>> ZTSTOP	HEADER+4*

Customize PDF page

Package: VA Fileman

Routine: DDSPRNT

Information

Source Information

Call Graph

Call Graph Total: 9

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: