Routine: PXQFE

Information

PXQFE ;ISL/JVS - DEPENDENT ENTRY COUNT-ENCOUNTERS (SCE) ;5/1/97 08:29

Source file <PXQFE.m>

Package	Total	Call Graph
PCE Patient Care Encounter	3	$$SOR^PXQFE $$EXP^PXQFV $$RE^PXQUTL

Package	Total	Caller Graph
PCE Patient Care Encounter	5	PXQFE PXQFV PXQMAIN PXQMAIN1 PXQMAIN3

Name	Comments	DBIA/ICR reference
SOR(ROOT,IEN)	;--SOURCE OF ENCOUNTER
FILE(RT,FILENUM)	;
QUE	;CHECK OUT CROSS REFERENCE
FF
LINE()	;--LINE
REF	;Look for all of the regular cross references and other
REG	;Look for regular cross references
DEC(VISIT,VISUAL,EXPAND)	;Test looking through DD to find fields pointing to the visit entries. ; ENCOUNTER=ENCOUNTER ien to looked up and counted ; VISUAL= Set to 1 if you want and interactive display of what is found ; EXPAND= SET TO 1 TO EXPAND ENTRIES

Name	Line Occurrences
Function Call: WRITE	Prompt: $$RE^PXQUTL(VAR) Line Location: DEC+18
Function Call: WRITE	Prompt: "- - - - -" Line Location: LINE+2

Name	Line Occurrences (* Changed, ! Killed)
^DD(	FF+2
^DIC - [#1]	FF, FF+1
^SCE - [#409.68]	SOR+5, SOR+6, SOR+7
^SD(409.1 - [#409.1]	SOR+7
^SD(409.63 - [#409.63]	SOR+6

Name	Field # of Occurrence
BECKY	DEC+7~, QUE+13*, QUE+14, QUE+15
COUNT	DEC+7~, DEC+18, QUE+2, QUE+13
DD	DEC+7~, DEC+10*, DEC+12, DEC+14, REG+3, REG+4, REG+5, QUE+5
DEC	DEC+8~, QUE+13*
DECF	DEC+8~, QUE+13*
EXPAND	DEC~, QUE+14
FIELD	DEC+7~, DEC+13, DEC+14, DEC+15, REF+3, REG+3, REG+4, REG+5, REG+6, REG+7 , QUE+2
FILE	DEC+7~, DEC+11, DEC+12, DEC+14, DEC+15, REF+2, REF+3, REG+3, REG+4, REG+5 , REG+6, REG+7, QUE+2, QUE+3, QUE+4, QUE+13, FILE+1~, FF+1*, FF+3
FILENUM	FILE~, FILE+2, FF, FF+1, FF+2*
GET	DEC+7~, REG+5, REG+6, QUE+4, QUE+5
I	SOR+1~
IEN	SOR~, SOR+2, SOR+3, SOR+5, SOR+6, SOR+7
ORG	DEC+8~, SOR+5*, SOR+8
PIECE	DEC+7~, QUE+7*, QUE+8, QUE+9
PKG	SOR+1~
PX	DEC+7~, QUE+11*, QUE+12, QUE+13
>> PXQAUDIT	LINE+1
>> PXQSOR	QUE+15
REF	DEC+7~, QUE+5, QUE+6, QUE+7, SOR+1~, SOR+2, SOR+4
REF2	SOR+1~, SOR+3*
ROOT	SOR~, SOR+2, SOR+3
RT	FILE~
SNDPIECE	DEC+7~, QUE+8*, QUE+11, QUE+13, QUE+14, QUE+15
SOR	SOR+1~
STOP	DEC+7~, REG+2, REG+6, QUE+2, QUE+4, QUE+10*
STS	DEC+8~, SOR+6*, SOR+9
SUB	DEC+7~, REG+4, REG+5, REG+6, QUE+4
TYP	DEC+8~, SOR+7*, SOR+10
VAR	DEC+8~, DEC+18*
VAUGHN	DEC+7~, QUE+9*, QUE+10
VDD	REF+5!
VDD(	DEC+15*, REF+2, REF+3
VDDN	DEC+17!
VDDN(	REG+3, REG+7
VDDR	DEC+17!
VDDR(	REG+6*, QUE+3, QUE+4
VISIT	DEC~, QUE+13
VISUAL	DEC~, DEC+18, QUE+13