Routine: PXKMASC

Package	Total	Caller Graph
PCE Patient Care Encounter	1	PXKMAIN

Entry Points

Name	Comments	DBIA/ICR reference
UPD	;UP DATE VISIT FILE
EVENT	; EVENT TO PRESENT THE DATA TO OTHER USERS
EN1	;Build the Temp global for MAS AND THE WORLD.
DEL	;DELETE IF BOTH ARE NULL
PXGO	;
DUP	;Overwrite if a duplicate just the After Node
ORG	;If original copy both
PTR	; Set the Provider Narriative equal to the pointer in the files etc.

Name	Line Occurrences (* Changed, ! Killed)
^AUPNVSIT - [#9000010]	EVENT+4, EVENT+5, EVENT+6, EVENT+7, EVENT+8, UPD+3
^ORD(101 - [#101]	EVENT+11
^PX(839.7 - [#839.7]	EN1+5, EVENT+9, EVENT+10
^TMP("PXKCO"	PXGO+4, PXGO+7, DUP+2, DUP+4, ORG+2, ORG+3, ORG+5, ORG+7, DEL+1, DEL+2! , DEL+3, DEL+4, DEL+5!, DEL+6, DEL+7!, PTR+6, PTR+7, EVENT+2, EVENT+3, EVENT+4 , EVENT+5, EVENT+6, EVENT+7, EVENT+8, EVENT+9, EVENT+10, UPD+4!
^TMP("PXKENC"	UPD+5!

Name	Field # of Occurrence
PXJ	PTR+1~, PTR+2*, PTR+3, PTR+4, PTR+5, PTR+6, PTR+7
PXJJ	PTR+1~, PTR+3*, PTR+4, PTR+5, PTR+6, PTR+7
PXJJJ	PTR+1~, PTR+4*, PTR+7
>> PXKAFT(	EN1+8, EN1+11, EN1+12
>> PXKBEF(	ORG+3, ORG+6, ORG+7
>> PXKCAT	PXGO+4, PXGO+7, DUP+2, DUP+4, ORG+2, ORG+3, ORG+5, ORG+7, DEL+1, DEL+2 , DEL+3, DEL+4, DEL+5, DEL+6, DEL+7, PTR+6, PTR+7
PXKCO	UPD+4!
PXKCO("SOR"	EVENT+1, EVENT+9, EVENT+10
PXKGG	EN1+4~, EN1+6, PXGO+1, PXGO+4, PXGO+7, PXGO+9
>> PXKGN	PXGO+2, PXGO+5, PXGO+8*, DUP+2, DUP+3, DUP+4, ORG+2, ORG+4, ORG+5
PXKMOD	EN1+4~, EN1+12*, PXGO+7
>> PXKPIEN	PXGO+2, PXGO+4, PXGO+7, DUP+2, DUP+4, ORG+2, ORG+3, ORG+5, ORG+7, DEL+1 , DEL+2, DEL+3, DEL+4, DEL+5, DEL+6, DEL+7
>> PXKPTR	PTR+2
>> PXKPTR(	PTR+2, PTR+3, PTR+4
PXKR	PTR+1~, PTR+5*, PTR+7
PXKSEQ	EN1+4~, EN1+10, EN1+11, EN1+12, PXGO+8, ORG+6, ORG+7
>> PXKSOR	EN1+5
PXKSUB	EN1+4~, EN1+7, EN1+8, EN1+9, EN1+11, EN1+12, PXGO+3, PXGO+4, PXGO+5, PXGO+6 , PXGO+7, PXGO+8, DUP+1, DUP+2, DUP+4, ORG+1, ORG+2, ORG+3, ORG+5, ORG+6 , ORG+7
>> PXKVST	PXGO+4, PXGO+7, DUP+2, DUP+4, ORG+2, ORG+3, ORG+5, ORG+7, DEL+1, DEL+2 , DEL+3, DEL+4, DEL+5, DEL+6, DEL+7, PTR+6, PTR+7, EVENT+15
PXKVVST	EVENT+3*, EVENT+4, EVENT+5, EVENT+6, EVENT+7, EVENT+8, EVENT+9, EVENT+10, EVENT+13, EVENT+15 , UPD+3, UPD+4!
VSIT	UPD+2~, UPD+4!
VSIT("COD"	UPD+3*
VSIT("IEN"	UPD+3*
>> X	EVENT+11*

Name	Field # of Occurrence
$T(GLOBAL^@PXKRTN	PXGO+2, PTR+5