Routine: VENPCCMF

Package	Total	Call Graph
VA Fileman	4	NOW^%DTC ^DIC ^DIE EN1^DIP
PCC New Encounter Form	2	$$CHART^VENPCC1A $$NOW^VENPCCU
Kernel	1	($$FMDIFF,$$HADD,$$HTFM)^XLFDT

Package	Total	Caller Graph
PCC New Encounter Form	1	VENPCCA

Entry Points

Name	Comments	DBIA/ICR reference
RANGE(LINE,END,MAX)	; EP-RETURN A RANGE OF LINES
ARR
RUN	;
LIST(HR,CIEN)	; EP-GIVEN HRS & SUPERBILL DEPT IEN, RETURN IN ^TMP ARRAY ALL LINES
TIME(T1,T2)	; TIME DIFF
QUEUE
START
DATES(PATIENT)	; EP-GET DATES FOR LAST DEMOG UPDATE AND REVIEW
ASK
RPT	; EP-PRINT A REPORT
AGO(HRS)	;
STAT(DA)	;
SPEC	; EP-SPECIAL LIST
LOOP
HALT	;

External References

Name	Field # of Occurrence
NOW^%DTC	ARR+5
^DIC	RUN+4
^DIE	STAT+3
EN1^DIP	RPT+5, SPEC+5
$$CHART^VENPCC1A	ARR+8
$$NOW^VENPCCU	STAT+1
$$FMDIFF^XLFDT	TIME+2, TIME+3
$$HADD^XLFDT	AGO+2
$$HTFM^XLFDT	AGO+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"There are currently no patients in the queue",!! Line Location: LOOP+3
Function Call: WRITE	Prompt: @IOF Line Location: LOOP+4
Function Call: WRITE	Prompt: !!,CNAME," patients. Average waiting time ",ATIME," =>",! Line Location: LOOP+5
Function Call: WRITE	Prompt: !,?3,I,")",?7,$P(@TMP@(I),U) Line Location: LOOP+6
Function Call: WRITE	Prompt: !! Line Location: LOOP+7
Function Call: WRITE	Prompt: "Select a patient (",START,"-",FIN,") " Line Location: ASK+0
Function Call: WRITE	Prompt: "or press <ENTER> to see more choices" Line Location: ASK+1
Function Call: WRITE	Prompt: ": " Line Location: ASK+2
Function Call: WRITE	Prompt: " ??" Line Location: ASK+10
Function Call: WRITE	Prompt: !,"No activity in the past hour. Terminating session." Line Location: HALT+1
Routine Call	DIE Line Location: STAT+3
Routine Call	DIC Line Location: RUN+4

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^VEN(7.2 - [#19707.2]	Classic Fileman Calls
^VEN(7.95 - [#19707.95]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUPNPAT - [#9000001]	DATES+5
^DD("DD"	DATES+4, DATES+5
^DPT - [#2]	ARR+4, ARR+7
^VEN(7.2 - [#19707.2]	ARR, ARR+1, ARR+4, STAT+3, DATES+4
^VEN(7.95 - [#19707.95]	LIST+2, RPT+2, SPEC+2

Label References

Name	Line Occurrences
$$AGO	LIST+5
$$RANGE	LOOP+1
$$TIME	ARR+6
ASK	ASK+10
HALT	ASK+4
LIST	START
LOOP	ASK+6
RUN	QUEUE
START	ASK+4, ASK+7, ASK+8
STAT	ASK+8

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	LIST+3~, ARR+6, RUN+1~, LOOP+1, LOOP+2, RPT+1~, RPT+2, DATES+1~, DATES+3, DATES+4* , SPEC+1~, SPEC+2*
%H	LIST+3~
%I	LIST+3~
ATIME	ARR+12, ARR+13, RUN+1~, RUN+5*, LOOP+5
BY	RPT+1~, RPT+3, SPEC+1~, SPEC+3
CIEN	LIST~, LIST+2, ARR+3, ARR+8, RUN+1~, RUN+5*, START
CLINIC	LIST+3~, ARR+3*
CNAME	RUN+1~, RUN+5*, LOOP+5
CNT	RUN+1~, RUN+5, ASK+4, ASK+5*, HALT+1
D	RUN+1~, TIME+1~, TIME+4*, TIME+9, TIME+10
D0	RUN+1~
DA	RUN+1~, STAT~, STAT+3
DFN	LIST+3~, ARR+4*, ARR+7, ARR+8
DHD	RPT+1~, RPT+3, SPEC+1~, SPEC+3
DI	RUN+1~
DIC	RUN+1~, RUN+3, RPT+1~, RPT+3, SPEC+1~, SPEC+3*
DIC("A"	RUN+3*
DIC(0	RUN+3*
DIE	RUN+1~, STAT+2*
>> DIS(0	RPT+2, SPEC+2
DQ	RUN+1~
DR	RUN+1~, STAT+1*
DUR	TIME+1~, TIME+2*, TIME+8, TIME+9, TIME+10
ELAP	LIST+3~, ARR+6*, ARR+10
END	RANGE~, RANGE+1, RANGE+3, RUN+1~, LOOP*, LOOP+1, ASK+1, ASK+6
FIN	RUN+1~, LOOP+2*, LOOP+3, LOOP+6, ASK, ASK+1, ASK+6, ASK+8
>> FLDS	RPT+3, SPEC+3
FR	RPT+1~, RPT+4, SPEC+1~, SPEC+4
H	TIME+1~, TIME+6*, TIME+9, TIME+10
HR	LIST~, LIST+1, LIST+5, RUN+1~, RUN+5*, START
HRS	AGO~, AGO+2
I	RUN+1~, LOOP+6*
IOF	QUEUE, LOOP+4, ASK+4
IOP	RPT+1~, SPEC+1~
L	RPT+1~, RPT+3, SPEC+1~, SPEC+3
LINE	RANGE~, RANGE+1, RANGE+2, RANGE+3, RANGE+4, RUN+1~, START+1, LOOP+1, ASK+6
M	TIME+1~, TIME+7*, TIME+9, TIME+10
MAX	RANGE~, RANGE+1, RANGE+2, RANGE+3, RANGE+4, RUN+1~, START+1*, LOOP+1
PATIENT	LIST+3~, ARR+7, ARR+8, ARR+10, DATES~, DATES+4, DATES+5
QIEN	LIST+3~, ARR*, ARR+1, ARR+4, ARR+10
RD	DATES+1~, DATES+2, DATES+4, DATES+6
RDT	DATES+1~, DATES+2, DATES+4, DATES+6*, DATES+7
SP	DATES+1~, DATES+2*, DATES+7
START	RUN+1~, LOOP+2*, LOOP+6, ASK
STATUS	LIST+3~, ARR+2*
STOP	DATES+1~
T1	TIME~, TIME+2, TIME+3
T2	TIME~, TIME+2, TIME+3
TIME	LIST+3~, LIST+5, ARR, ARR+6
TMP	LIST+3~, LIST+4, ARR+10, RUN+1~, RUN+2, LOOP, LOOP+6, ASK+8
TO	RPT+1~, RPT+4, SPEC+1~, SPEC+4
TOT	LIST+3~, LIST+6, ARR+9, ARR+10, ARR+13
TTOT	LIST+3~, LIST+6, ARR+6, ARR+13
TXT	DATES+1~, DATES+2, DATES+7, DATES+8*, DATES+9
U	RANGE+1, RANGE+2, RANGE+3, RANGE+4, ARR+2, ARR+3, ARR+6, ARR+7, ARR+10, RUN+5 , LOOP+2, LOOP+6, ASK+8, ASK+9, TIME+8, TIME+9, TIME+10, DATES+4, DATES+5
UD	DATES+1~, DATES+2, DATES+5, DATES+6
UDT	DATES+1~, DATES+2, DATES+5, DATES+6, DATES+8
X	LIST+3~, ARR+1, ARR+2, ARR+3, RUN+1~, ASK+3, ASK+6, ASK+7, ASK+8, ASK+9 , TIME+1~, TIME+3, TIME+4, TIME+5, AGO+1~, AGO+2, AGO+3, RPT+1~, DATES+1~, SPEC+1~
Y	RUN+1~, RUN+4, RUN+5, TIME+1~, TIME+5, TIME+6, TIME+7, AGO+1~, AGO+3, AGO+4 , AGO+5, RPT+1~, DATES+1~, DATES+4, DATES+5, SPEC+1~
Z	AGO+1~, AGO+4*, AGO+5

Customize PDF page

Package: PCC New Encounter Form

Routine: VENPCCMF

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: