Routine: DGFFP03

Package	Total	Call Graph
Kernel	4	(,HOME)^%ZIS ^%ZISC ^%ZTLOAD ($$FMADD,$$FMTE,$$NOW)^XLFDT
Registration	4	($$PAUSE,GETDT)^DGFFP02 $$LASTACT^DGFFPLM (IN5,INP,SDA)^VADPT PID^VADPT6
VA Fileman	2	$$GET1^DIQ ^DIR

Package	Total	Caller Graph
Registration	2	DGFFP STATUS REPORT DGFFPLM1

Entry Points

Name	Comments	DBIA/ICR reference
GETLST(DGBEG,DGEND)	; Retrieve list of patients with the Fugitive Felon Flag set within specified date range
PRNINP(DFN)	; Print Inpatient Information
INPT(DGBEG,DGEND)	;
RPT	;
PRNAPT(DFN)	; Print Future Appointment information
PRNSCRP(DFN)	; Print Active Script Information
GETALL	; Retrieve entire list of patient to print
OUTHDR	;
FUHDR	;
START	;
HDR(DGBEG,DGEND)	;
PRINT(DGBEG,DGEND)	; Print report
QUE	;
INPHDR	;
PRNFUT(TMPARY)	;
PRNRCNT(DFN)	; Print most recent activity
EXIT
GETAPT(DFN,TEMP)	; Sort Clinic appointments by clinic
OUTP(DGBEG,DGEND)	;
GETFUADM(DFN,TMPARY)	; Get future scheduled admissions
SCHED(DGBEG,DGEND)	;

External References

Name	Field # of Occurrence
^%ZIS	QUE+14
HOME^%ZIS	EXIT
^%ZISC	QUE+16, RPT+12
^%ZTLOAD	START+5
$$PAUSE^DGFFP02	INPT+18, OUTP+18
GETDT^DGFFP02	QUE+10
$$LASTACT^DGFFPLM	PRNRCNT+3
$$GET1^DIQ	GETALL+7, GETLST+10, SCHED+8, PRNFUT+7, PRNSCRP+3
^DIR	QUE+7
IN5^VADPT	PRNINP+4
INP^VADPT	GETALL+6, GETLST+9
SDA^VADPT	GETAPT+3
PID^VADPT6	INPT+11, OUTP+11, SCHED+17
$$FMADD^XLFDT	GETLST+3
$$FMTE^XLFDT	PRNFUT+5, PRNINP+6, PRNAPT+11, HDR+9, HDR+13
$$NOW^XLFDT	START+1, HDR+13

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,$CHAR(7) Line Location: QUE+12
Function Call: WRITE	Prompt: !?5,">> This report requires a 132-column printer" Line Location: QUE+13
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: !!,"No Patients Found" Line Location: INPT+6
Function Call: WRITE	Prompt: !,TXT Line Location: INPT+12
Function Call: WRITE	Prompt: ! Line Location: INPT+16
Function Call: WRITE	Prompt: !!,"No Patients Found" Line Location: OUTP+6
Function Call: WRITE	Prompt: !,TXT Line Location: OUTP+12
Function Call: WRITE	Prompt: ! Line Location: OUTP+16
Function Call: WRITE	Prompt: !,TXT Line Location: SCHED+18
Function Call: WRITE	Prompt: !?40,$$FMTE^XLFDT(DGDT,"1P") Line Location: PRNFUT+5
Function Call: WRITE	Prompt: ?80,$$GET1^DIQ(42,DGWARD,.01) Line Location: PRNFUT+7
Function Call: WRITE	Prompt: ?110,$S(DGSCRPT>0:DGSCRPT,1:"None") Line Location: PRNSCRP+4
Function Call: WRITE	Prompt: ?40,$P(DGIN(2),U,2) Line Location: PRNINP+5
Function Call: WRITE	Prompt: ?55,$$FMTE^XLFDT($P(DGIN(3),U,1),"D") Line Location: PRNINP+6
Function Call: WRITE	Prompt: ?70,$P(DGIN(6),U,2) Line Location: PRNINP+7
Function Call: WRITE	Prompt: ?80,$P(DGIN(5),U,2) Line Location: PRNINP+8
Function Call: WRITE	Prompt: !?3,">> "_DGLAST Line Location: PRNRCNT+5
Function Call: WRITE	Prompt: !?40,DGCLN Line Location: PRNAPT+8
Function Call: WRITE	Prompt: ?70,$$FMTE^XLFDT(DGDT,"1P"),! Line Location: PRNAPT+11
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: !?SPACE,TXT Line Location: INPHDR+5
Function Call: WRITE	Prompt: !!,"Patient Name",?40,"Movement",?55,"Date",?70,"Room/Bed",?80,"Ward",?110,"Active Scripts?" Line Location: INPHDR+7
Function Call: WRITE	Prompt: !,LINE Line Location: INPHDR+8
Function Call: WRITE	Prompt: !?SPACE,TXT Line Location: OUTHDR+5
Function Call: WRITE	Prompt: !!,"Patient Name",?40,"Clinic",?70,"Appt. D/T",?110,"Active Scripts?" Line Location: OUTHDR+7
Function Call: WRITE	Prompt: !,LINE Line Location: OUTHDR+8
Function Call: WRITE	Prompt: !?SPACE,TXT Line Location: FUHDR+5
Function Call: WRITE	Prompt: !!,"Patient Name",?40,"Scheduled Admission",?80,"Ward",?110,"Active Scripts?" Line Location: FUHDR+7
Function Call: WRITE	Prompt: !,LINE Line Location: FUHDR+8
Routine Call	%ZIS Line Location: EXIT
Routine Call	DIR Line Location: QUE+7
Routine Call	%ZIS Line Location: QUE+14

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DPT - [#2]	GET1^DIQ
^DIC(42 - [#42]	GET1^DIQ
^PS(55 - [#55]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DGS(41.1 - [#41.1]	GETFUADM+4, GETFUADM+5
^DPT - [#2]	GETLST+6
^DPT("AXFFP"	GETALL+4, GETLST+5, SCHED+7
^TMP("DGFFP"	RPT+5!, RPT+11!, GETALL+7, GETLST+10, INPT+6, INPT+8, INPT+10, OUTP+6, OUTP+8, OUTP+10 , SCHED+8*, SCHED+11, SCHED+13

Label References

Name	Line Occurrences
EXIT	QUE+14
FUHDR	SCHED+4
GETALL	RPT+8
GETAPT	PRNAPT+5
GETFUADM	SCHED+15
GETLST	RPT+7
HDR	INPT+3, INPT+19, OUTP+3, OUTP+19, SCHED+3
INPHDR	INPT+4, INPT+19, OUTP+19
INPT	PRINT+2
OUTHDR	OUTP+4
OUTP	PRINT+3
PRINT	RPT+10
PRNAPT	OUTP+15
PRNFUT	SCHED+21
PRNINP	INPT+13
PRNRCNT	INPT+15, OUTP+14, SCHED+20
PRNSCRP	INPT+14, OUTP+13, SCHED+19
RPT	QUE+16
SCHED	PRINT+4
START	QUE+15

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%ZIS	QUE+1~, QUE+14*
DFN	GETALL+1~, GETALL+5, GETLST+1~, GETLST+8, INPT+1~, INPT+9, INPT+10, INPT+13, INPT+14, INPT+15 , OUTP+1~, OUTP+9, OUTP+10, OUTP+13, OUTP+14, OUTP+15, SCHED+1~, SCHED+6, SCHED+7, SCHED+8 , SCHED+12, SCHED+13, SCHED+15, SCHED+19, SCHED+20, PRNSCRP~, PRNSCRP+3, PRNINP~, PRNRCNT~, PRNRCNT+3 , PRNAPT~, PRNAPT+5, GETAPT~, GETFUADM~, GETFUADM+4
DGABRT	INPT+1~, INPT+8, INPT+10, INPT+18, OUTP+1~, OUTP+8, OUTP+10, OUTP+18, SCHED+1~, SCHED+11 , SCHED+13
DGAPT	INPT+1~, OUTP+1~, SCHED+1~, GETAPT+1~, GETAPT+4*, GETAPT+6, GETAPT+7, GETAPT+8
DGBEG	QUE+1~, QUE+9*, QUE+10, RPT+7, RPT+10, GETLST~, GETLST+7, PRINT~, PRINT+2, PRINT+3 , PRINT+4, INPT~, INPT+3, INPT+19, OUTP~, OUTP+3, OUTP+19, SCHED~, SCHED+3, HDR~ , HDR+8, HDR+9
DGCLN	PRNAPT+1~, PRNAPT+6, PRNAPT+7, PRNAPT+8, PRNAPT+10
DGDFN	GETALL+1~, GETALL+3, GETALL+4, GETALL+5, GETALL+7, GETLST+1~, GETLST+4, GETLST+5, GETLST+6, GETLST+8 , GETLST+10
DGDT	PRNFUT+1~, PRNFUT+3, PRNFUT+4, PRNFUT+5, PRNFUT+6, PRNAPT+1~, PRNAPT+9, PRNAPT+10, PRNAPT+11
DGEND	QUE+1~, QUE+9, QUE+10, RPT+7, RPT+10, GETLST~, GETLST+3, GETLST+7, PRINT~, PRINT+2 , PRINT+3, PRINT+4, INPT~, INPT+3, INPT+19, OUTP~, OUTP+3, OUTP+19, SCHED~, SCHED+3 , HDR~, HDR+9
DGFFP	GETLST+1~, GETLST+6*, GETLST+7
DGIEN	GETFUADM+1~, GETFUADM+3, GETFUADM+4, GETFUADM+5
DGIN	PRNINP+1~
DGIN(2	PRNINP+5
DGIN(3	PRNINP+6
DGIN(5	PRNINP+8
DGIN(6	PRNINP+7
DGINP	GETALL+1~, GETALL+8!, GETLST+1~, GETLST+11!
DGINP(1	GETALL+7, GETLST+10
DGLAST	PRNRCNT+1~, PRNRCNT+3*, PRNRCNT+4, PRNRCNT+5
DGNAME	INPT+1~, INPT+7, INPT+8, INPT+10, INPT+12, OUTP+1~, OUTP+7, OUTP+8, OUTP+10, OUTP+12 , SCHED+1~, SCHED+10, SCHED+11, SCHED+13, SCHED+18
DGNODE	GETFUADM+1~, GETFUADM+5*, GETFUADM+6
DGRTN	PRNAPT+1~
DGSCRPT	PRNSCRP+1~, PRNSCRP+3*, PRNSCRP+4
DGSTAT	INPT+1~, OUTP+1~, SCHED+1~
DGTMP	QUE+1~
DGWARD	PRNFUT+1~, PRNFUT+6*, PRNFUT+7
DIR	QUE+1~, QUE+7!
DIR("?"	QUE+4, QUE+5, QUE+6*
DIR("A"	QUE+3*
DIR("B"	QUE+3*
DIR(0	QUE+3*
DIRUT	QUE+1~, QUE+8
IO	RPT+3
IO("Q"	QUE+15
IOF	HDR+3
IOM	HDR+5, HDR+10, HDR+14, HDR+18, INPHDR+4, INPHDR+8, OUTHDR+4, OUTHDR+8, FUHDR+4, FUHDR+8
IOSL	INPT+17, OUTP+17
IOST	HDR+3
LINE	PRNAPT+1~, GETAPT+1~, GETAPT+5, GETAPT+6, GETAPT+7, HDR+1~, INPHDR+1~, INPHDR+8, OUTHDR+1~, OUTHDR+8 , FUHDR+1~, FUHDR+8*
PAGE	RPT+1~, RPT+4, HDR+3, HDR+17, HDR+20
>> POP	QUE+14
>> RSLT	PRNAPT+7, PRNAPT+10
SPACE	HDR+1~, HDR+5, HDR+6, HDR+10, HDR+11, HDR+14, HDR+15, HDR+18, HDR+19, INPHDR+1~ , INPHDR+4, INPHDR+5, OUTHDR+1~, OUTHDR+4, OUTHDR+5, FUHDR+1~, FUHDR+4*, FUHDR+5
TEMP	PRNAPT+1~, PRNAPT+3*, PRNAPT+4, PRNAPT+5, PRNAPT+7, PRNAPT+10, PRNAPT+12, GETAPT~, GETAPT+7
TMPARY	SCHED+1~, SCHED+14*, SCHED+15, SCHED+16, SCHED+21, SCHED+22, PRNFUT~, PRNFUT+4, PRNFUT+6, GETFUADM~ , GETFUADM+6
TXT	INPT+1~, INPT+12, OUTP+1~, OUTP+12, SCHED+1~, SCHED+18, 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, INPHDR+1~ , INPHDR+3, INPHDR+4, INPHDR+5, OUTHDR+1~, OUTHDR+3, OUTHDR+4, OUTHDR+5, FUHDR+1~, FUHDR+3, FUHDR+4 , FUHDR+5
U	GETLST+6, PRNFUT+6, PRNINP+5, PRNINP+6, PRNINP+7, PRNINP+8, GETAPT+7, GETFUADM+6
VA	INPT+1~, OUTP+1~, SCHED+1~
VA("BID"	INPT+12, OUTP+12, SCHED+18
VAROOT	GETALL+1~, GETALL+5, GETLST+1~, GETLST+8, PRNINP+1~, PRNINP+3*, GETAPT+1~
VASD	GETAPT+1~
Y	QUE+1~, QUE+9
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: DGFFP03

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: