Routine: PXQUTL

Package	Total	Call Graph
VA Fileman	2	DD^%DT ^DIR
PCE Patient Care Encounter	1	$$RE^PXQUTL

Package

Total

Call Graph

VA Fileman

DD^%DT ^DIR

PCE Patient Care Encounter

$$RE^PXQUTL

Package	Total	Caller Graph
PCE Patient Care Encounter	10	PXQFE PXQFS PXQFV PXQMAIN PXQMAIN1 PXQMAIN2 PXQMAIN3 PXQMAIN4 PXQUTL PXQUTL1

Package

Total

Caller Graph

PCE Patient Care Encounter

PXQFE PXQFS PXQFV PXQMAIN PXQMAIN1 PXQMAIN2 PXQMAIN3 PXQMAIN4
PXQUTL PXQUTL1

Entry Points

Name	Comments	DBIA/ICR reference
SDV	;--IF AN APPOINTMENT ON THAT DAY
ASKNUM()	;Ask user for a VISIT
ASKNUM1()	;Ask user for a VISIT
READ	;--READ
CPT	;--PROCEDURES
CPT2	;--COUNT PROCEDURES
RE(ENTRY)	;--RECORD ENTRY TO BE PRINTED
EXP(ROOT,IEN)	;---EXPAND ENTRIES
SOR(IEN)	;--SOURCE IF SELECTED FROM MENU
ASKENC()	;Ask user for a ENCOUNTER
ASKPAT()	;Ask user for a patient
LCFLE()	;--LOCATION FILES
PTFLE()	;--PATIENT FILES

External References

Name	Field # of Occurrence
DD^%DT	SOR+8, SOR+13
^DIR	ASKPAT+5, ASKNUM+6, ASKNUM1+6, ASKENC+5
$$RE^PXQUTL	SOR+2, SOR+3, SOR+9, SOR+14, SOR+18, SOR+23, SOR+27, SOR+32, SOR+38, SOR+40 , SDV+12, SDV+15, SDV+17, SDV+22, SDV+28, SDV+31, CPT+1, EXP+3, EXP+4, EXP+5 , EXP+11, EXP+12

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"**************************************************************" Line Location: READ+2
Function Call: WRITE	Prompt: !,$O(^TMP("PXQRECORD",$J,I,0)) Line Location: READ+11
Function Call: WRITE	Prompt: !,@$O(^TMP("PXQRECORD",$J,I,0)) Line Location: READ+12
Function Call: WRITE	Prompt: !," END OF DISPLAY" Line Location: READ+21
Function Call: WRITE	Prompt: $$RE^PXQUTL("!") Line Location: SOR+2
Function Call: WRITE	Prompt: $$RE^PXQUTL("----------------VISIT "_IEN_"---SOURCES-------------") Line Location: SOR+3
Function Call: WRITE	Prompt: $$RE^PXQUTL("?5,""CREATED : ""_DATEC") Line Location: SOR+9
Function Call: WRITE	Prompt: $$RE^PXQUTL("?5,""EDITED : ""_DATEE") Line Location: SOR+14
Function Call: WRITE	Prompt: $$RE^PXQUTL("?5,""USER : ""_USER") Line Location: SOR+18
Function Call: WRITE	Prompt: $$RE^PXQUTL("______________________________________________________") Line Location: SOR+40
Function Call: WRITE	Prompt: $$RE^PXQUTL(ENTRY) Line Location: SDV+15
Function Call: WRITE	Prompt: $$RE^PXQUTL(" ") Line Location: SDV+31
Function Call: WRITE	Prompt: $$RE^PXQUTL("THERE ARE PROCEDURES IN PCE BUT NO RECORD IN SCHEDULING **") Line Location: CPT+1
Function Call: WRITE	Prompt: $$RE^PXQUTL($G(ENTRY)) Line Location: EXP+11
Function Call: WRITE	Prompt: $$RE^PXQUTL(" ") Line Location: EXP+12
Routine Call	DIR Line Location: ASKPAT+5 ASKNUM+6 ASKNUM1+6 ASKENC+5

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("XY"	READ+3, READ+18
^AUPNPAT(0	PTFLE+5
^AUPNVCPT - [#9000010.18]	EXP+7
^AUPNVCPT("AD"	CPT+1
^AUPNVSIT - [#9000010]	SOR+7, SOR+12, SOR+17, SOR+21, SOR+22, SOR+25, SOR+26, SOR+30, SOR+31, SOR+35 , SOR+36, SOR+37, SDV+6, SDV+8
^AUTTLOC(0	LCFLE+5
^DIC(19 - [#19]	SOR+21, SOR+22
^DIC(4 - [#4]	LCFLE+3
^DIC(40.7 - [#40.7]	SDV+21
^DIC(9.4 - [#9.4]	SOR+30, SOR+31
^DISV(	ASKNUM+3, ASKNUM1+3
^DPT(0	PTFLE+3
^ICPT - [#81]	SDV+25, SDV+26
^ORD(101 - [#101]	SOR+25, SOR+26
^PX(839.7 - [#839.7]	SOR+36, SOR+37
^SCE - [#409.68]	EXP+2, EXP+6, EXP+8
^SDV - [#409.5]	SDV+15, SDV+18, SDV+19, SDV+20
^SDV("C"	SDV+11
^TMP("PXQRECORD"	RE+4*, READ+6, READ+7, READ+11, READ+12, READ+19!
^VA(200 - [#200]	SOR+17

Name	Line Occurrences
CPT	SDV+29
CPT2	SDV+15

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ANS	READ+1~, READ+16, READ+17, READ+20
>> BROKEN	SDV+4, SDV+8, EXP+7, EXP+8
CNT	READ+5, READ+13, READ+15, SDV+1~, SDV+9, SDV+11*, CPT+1
CS	SDV+1~, SDV+18*, SDV+20
DA	ASKPAT+2~, ASKNUM+2~, ASKNUM1+2~, ASKENC+2~
DATE	SDV+4, SDV+8, SDV+10, SDV+11, SDV+30!, EXP+8
>> DATEC	SOR+7, SOR+8
>> DATEE	SOR+12, SOR+13
DAY	SDV+1~, SDV+10, SDV+11, SDV+15
DAY2	SDV+1~, SDV+15*, SDV+18, SDV+19, SDV+20
>> DFN	SDV+4, SDV+5, SDV+6, EXP+7, EXP+8*
DIC	ASKPAT+2~, ASKNUM+2~, ASKNUM1+2~, ASKENC+2~
DIR	ASKPAT+2~, ASKNUM+2~, ASKENC+2~
DIR("A"	ASKPAT+4, ASKNUM+5, ASKNUM1+5, ASKENC+4
DIR("B"	ASKNUM+3, ASKNUM1+3
DIR(0	ASKPAT+3, ASKNUM+4, ASKNUM1+4, ASKENC+3
DPTCNT	PTFLE+1~, PTFLE+3*, PTFLE+6
DTIME	READ+16, READ+20
DUZ	ASKNUM+3, ASKNUM1+3
DX	READ+1~, READ+3, READ+18
DY	READ+1~, READ+3, READ+18
ENTRY	RE~, RE+1, RE+2, RE+4, SDV+1~, SDV+15, SDV+27, SDV+28, EXP+1~, EXP+11
ERR	SDV+1~, SDV+15
I	READ+1~, READ+4, READ+6, READ+7, READ+11, READ+12, READ+17, CPT2+3, EXP+1~
IEN	SOR~, SOR+1, SOR+3, SOR+7, SOR+12, SOR+17, SOR+21, SOR+22, SOR+25, SOR+26 , SOR+30, SOR+31, SOR+35, SOR+36, SOR+37, SDV+6, SDV+8, EXP~, EXP+2, EXP+6 , EXP+7, EXP+8, EXP+9, EXP+10
IHSCNT	LCFLE+1~, LCFLE+5, LCFLE+6, PTFLE+1~, PTFLE+5, PTFLE+6
IOSL	READ+15
IOST	READ+16, READ+20
JUNK	SDV+1~
LOCCNT	LCFLE+1~, LCFLE+3*, LCFLE+6
>> OPTION	SOR+22*
>> PACKAGE	SOR+31*
PATIENT	SDV+1~, SDV+4, SDV+5, SDV+6, SDV+7, SDV+11, SDV+15, SDV+19, EXP+7, EXP+8
POINT	SDV+1~, SDV+20*, SDV+21, SDV+22
>> PROTOCOL	SOR+26*
PXC	SDV+2~, SDV+3, SDV+23, SDV+24, SDV+25, SDV+26
PXCC	SDV+2~, SDV+3, SDV+24, SDV+27
PXCCC	SDV+2~, SDV+3, SDV+25, SDV+27
PXCCCC	SDV+2~, SDV+3, SDV+26, SDV+27
PXQC	CPT2+1~, CPT2+3*, CPT2+4, CPT2+5, CPT2+6
PXQPRM	READ+19!, EXP+2, EXP+6*
PXQQ	CPT2+1~, CPT2+2, CPT2+4, CPT2+5, CPT2+6, CPT2+7*
>> PXQRECI	RE+3*, RE+4
PXQSDV	SDV+23, SDV+30!
PXQSDV(	SDV+23, SDV+24, CPT2+4, CPT2+5!, CPT2+6*
REF	SDV+14, SDV+15, CPT2+3, EXP+1~, EXP+9, EXP+11
REF2	EXP+1~, EXP+10*, EXP+11
ROOT	EXP~, EXP+2, EXP+6, EXP+7, EXP+8, EXP+9, EXP+10
>> SOURCE	SOR+37*
STOP	SDV+1~, SDV+21*, SDV+22
>> USER	SOR+17*
VAR	READ+1~, READ+7, READ+9, READ+11, READ+12
>> VISIT	CPT+1
X	ASKPAT+2~, ASKNUM+2~, ASKNUM1+2~, ASKENC+2~
Y	ASKPAT+2~, ASKPAT+6, ASKNUM+2~, ASKNUM+7, ASKNUM1+2~, ASKNUM1+7, ASKENC+2~, ASKENC+6, SOR+8, SOR+13

Customize PDF page

Package: PCE Patient Care Encounter

Routine: PXQUTL

Information

Source Information

Call Graph

Call Graph Total: 3

Caller Graph

Caller Graph Total: 10

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: