Routine: DGFFP02

Package	Total	Call Graph
Kernel	4	(,HOME)^%ZIS ^%ZISC ^%ZTLOAD ($$FMADD,$$FMTE,$$NOW)^XLFDT
VA Fileman	2	$$GET1^DIQ ^DIR
Registration	1	PID^VADPT6

Package	Total	Caller Graph
Registration	3	DGFFP ALPHA LIST DGFFP03 DGFFP04

Entry Points

Name	Comments	DBIA/ICR reference
BLD(DGBEG,DGEND)	; Build report for specified date range
PAUSE()	; Screen pause for Terminal displays
HDR(DGBEG,DGEND)	;
ADMIN	;
BLDALL	; Build report for entire date range
GETDT(DGBEG,DGEND)	; Retrieve Begin and End date values entered by the user
START	;
PRINT(DGBEG,DGEND)	;
QUE	;
EXIT

External References

Name	Field # of Occurrence
^%ZIS	QUE+12
HOME^%ZIS	EXIT
^%ZISC	QUE+14, ADMIN+12
^%ZTLOAD	START+5
$$GET1^DIQ	BLD+8, BLDALL+6, PRINT+13
^DIR	QUE+7, GETDT+7, GETDT+12, PAUSE+5
PID^VADPT6	PRINT+8
$$FMADD^XLFDT	BLD+3
$$FMTE^XLFDT	PRINT+11, HDR+9, HDR+13
$$NOW^XLFDT	START+1, HDR+13

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!?5,"Report canceled" Line Location: START+6
Function Call: WRITE	Prompt: !!?5,"Report Queued" Line Location: START+7
Function Call: WRITE	Prompt: !,TXT Line Location: PRINT+10
Function Call: WRITE	Prompt: ?40,$$FMTE^XLFDT($P(^TMP("DGFFP",$J,DGNAME,DFN),U,3),"2D") Line Location: PRINT+11
Function Call: WRITE	Prompt: ?50,$$GET1^DIQ(200,$P(DGUSER,U,2),.01) Line Location: PRINT+13
Function Call: WRITE	Prompt: @IOF Line Location: HDR+3
Function Call: WRITE	Prompt: !?SPACE,TXT Line Location: HDR+6
Function Call: WRITE	Prompt: !?SPACE,TXT Line Location: HDR+11
Function Call: WRITE	Prompt: !?SPACE,TXT Line Location: HDR+15
Function Call: WRITE	Prompt: !?SPACE,TXT Line Location: HDR+19
Function Call: WRITE	Prompt: !!,"Patient Name",?40,"Entered",?50,"Who Entered" Line Location: HDR+22
Function Call: WRITE	Prompt: !,LINE Line Location: HDR+23
Routine Call	%ZIS Line Location: EXIT
Routine Call	DIR Line Location: QUE+7 GETDT+7 GETDT+12 PAUSE+5
Routine Call	%ZIS Line Location: QUE+12

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DPT - [#2]	GET1^DIQ
^VA(200 - [#200]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	BLD+6, BLD+7, BLDALL+5
^DPT("AXFFP"	BLD+5, BLDALL+4
^TMP("DGFFP"	ADMIN+5!, ADMIN+11!, BLD+8, BLDALL+6, PRINT+5, PRINT+7, PRINT+11, PRINT+12

Label References

Name	Line Occurrences
$$PAUSE	PRINT+15, PRINT+17
ADMIN	QUE+14
BLD	ADMIN+8
BLDALL	ADMIN+7
EXIT	QUE+12
GETDT	QUE+10
HDR	PRINT+3, PRINT+16
PRINT	ADMIN+10
START	QUE+13

Naked Globals

Name	Field # of Occurrence
^("FFP"	BLD+7

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%ZIS	QUE+1~, QUE+12*
DFN	PRINT+1~, PRINT+6, PRINT+7, PRINT+11, PRINT+12
DGABRT	PRINT+1~, PRINT+5, PRINT+7, PRINT+15*
DGBEG	QUE+1~, QUE+9, QUE+10, GETDT~, GETDT+3, GETDT+9, GETDT+13, ADMIN+7, ADMIN+8, ADMIN+10 , BLD~, BLD+7, PRINT~, PRINT+3, PRINT+16, HDR~, HDR+8, HDR+9
DGEND	QUE+1~, QUE+9, QUE+10, GETDT~, GETDT+3, GETDT+14, ADMIN+8, ADMIN+10, BLD~, BLD+3 , BLD+7, PRINT~, PRINT+3, PRINT+16, HDR~, HDR+9
DGFFP	BLD+1~, BLD+6, BLD+8, BLDALL+1~, BLDALL+5, BLDALL+6
DGIEN	BLD+1~, BLD+4, BLD+5, BLD+6, BLD+7, BLD+8, BLDALL+1~, BLDALL+3, BLDALL+4, BLDALL+5 , BLDALL+6
DGNAME	PRINT+1~, PRINT+4, PRINT+5, PRINT+7, PRINT+9, PRINT+11, PRINT+12
DGTMP	QUE+1~
DGUSER	PRINT+1~, PRINT+12*, PRINT+13
DIR	QUE+1~, QUE+7!, GETDT+1~, PAUSE+1~, PAUSE+5!
DIR("?"	QUE+4, QUE+5, QUE+6, GETDT+5
DIR("A"	QUE+3, GETDT+6, GETDT+11*
DIR("B"	QUE+3*
DIR(0	QUE+3, GETDT+4, PAUSE+4*
DIRUT	QUE+1~, QUE+8, GETDT+1~, GETDT+8, GETDT+13
IO	ADMIN+3
IO("Q"	QUE+13
IOF	HDR+3
IOM	HDR+5, HDR+10, HDR+14, HDR+18, HDR+23
IOSL	PRINT+14
IOST	PAUSE+3, HDR+3
LINE	HDR+1~, HDR+23*
PAGE	ADMIN+1~, ADMIN+4, HDR+17, HDR+20
>> POP	QUE+12
RSLT	PAUSE+1~, PAUSE+6*, PAUSE+7
SPACE	HDR+1~, HDR+5, HDR+6, HDR+10, HDR+11, HDR+14, HDR+15, HDR+18, HDR+19
TXT	PRINT+1~, PRINT+9, PRINT+10, HDR+1~, HDR+4, HDR+5, HDR+6, HDR+9, HDR+10, HDR+11 , HDR+13, HDR+14, HDR+15, HDR+17*, HDR+18, HDR+19
U	BLD+7, PRINT+11, PRINT+13
VA	PRINT+1~
VA("BID"	PRINT+9
Y	QUE+1~, QUE+9, GETDT+1~, GETDT+9, GETDT+14, PAUSE+6
ZTDESC	QUE+1~, START+3*
ZTDTH	QUE+1~, START+1*
ZTIO	QUE+1~
ZTRTN	QUE+1~, START+4*
ZTSAVE	QUE+1~
ZTSAVE("DGBEG"	START+2*
ZTSAVE("DGEND"	START+2*
>> ZTSK	START+6

Customize PDF page

Package: Registration

Routine: DGFFP02

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: