Routine: PXKMAIN2

Package	Total	Call Graph
Kernel	1	($$GET,GET)^XUA4A72
PCE Patient Care Encounter	1	(EN1,EVENT)^PXKMAIN

Package	Total	Caller Graph
PCE Patient Care Encounter	1	PXKMAIN

Entry Points

Name	Comments	DBIA/ICR reference
RECALL	; Recall PXKMAIN to populate special circumstances
SPEC	;Populate other v files ; VARIABLES ; PXKAV(0) = The AFTER variables created in PXKMAIN ; PXKBV(0) = The BEFORE variables created in PXKMAIN ; PXKFG(ED,DE,AD) =The EDIT,DELETE,ADD flags ; PXKCAT = The category being $o through (CPT,IMM etc...) ; PXKIN = The pointer value of first piece in the mapping file ; PXKPXD = An array with all the entries to be mapped this go around ; PXKDIEN = IEN of the coding file
POP	;Population of more than one v file using PCE CODE MAPPING file 811.1
PRVTYPE	;---POPULATE PROVIDER TYPE

Name	Line Occurrences (* Changed, ! Killed)
^AUPNVSIT - [#9000010]	PRVTYPE+10
^PXD(811.1 - [#811.1]	SPEC+13, SPEC+14, SPEC+15, SPEC+19, SPEC+22, SPEC+23, SPEC+24, SPEC+28, POP+5, POP+6
^TMP("PXK"	POP+12, POP+13, RECALL+1!, RECALL+5, RECALL+6, PRVTYPE+3, PRVTYPE+6, PRVTYPE+7, PRVTYPE+10, PRVTYPE+14*
^TMP("PXKSAVE"	RECALL+7!

Name	Line Occurrences
@(	POP+10
POP	SPEC+20, SPEC+29

Name	Field # of Occurrence
NOD0	PRVTYPE+5~, PRVTYPE+7, PRVTYPE+8, PRVTYPE+13, PRVTYPE+14
>> PXJ(1	SPEC+15, SPEC+16, SPEC+18, SPEC+24, SPEC+25, SPEC+27
>> PXJ(2	SPEC+16, SPEC+17, SPEC+25, SPEC+26
>> PXJ(3	SPEC+17, SPEC+19, SPEC+26, SPEC+28
>> PXJ(4	SPEC+18, SPEC+19, SPEC+27, SPEC+28
>> PXKAV(0	SPEC+13, SPEC+14, POP+4
>> PXKBV(0	SPEC+22, SPEC+23, POP+4
>> PXKCAT	SPEC+13, SPEC+14, SPEC+22, SPEC+23, POP+5
PXKDIEN	POP+3~, POP+5*, POP+6
PXKDONE	SPEC+10, SPEC+14, SPEC+15, SPEC+19, SPEC+20, SPEC+23, SPEC+24, SPEC+28, SPEC+29*, SPEC+30!
PXKDT	PRVTYPE+5~, PRVTYPE+10*, PRVTYPE+12
>> PXKFGAD	SPEC+12, POP+4
>> PXKFGDE	SPEC+21, POP+4
>> PXKFGED	SPEC+11
PXKIN	POP+3~, POP+4*, POP+5
PXKNORG	RECALL+7!
PXKNORG("SOR"	POP+12*, RECALL+5
PXKNORG("VSTIEN"	POP+13*, RECALL+6
PXKPRV	PRVTYPE+5~, PRVTYPE+8*, PRVTYPE+9, PRVTYPE+12
PXKPSUB	PRVTYPE+5~, PRVTYPE+6*, PRVTYPE+7, PRVTYPE+14
>> PXKPXD(	SPEC+20, SPEC+29, POP+6*, POP+7, POP+9, POP+10
>> PXKREF	RECALL+2, RECALL+3, RECALL+4
PXKROU	POP+3~, POP+10*
>> PXKSAVE	RECALL+3, RECALL+4
PXKTO	POP+3~, POP+9*, POP+10
PXKX	POP+3~, POP+7*, POP+8, POP+9, POP+10, POP+11
PXKXX	POP+3~, POP+7*
>> TMPPX	POP+8, POP+11*
TYPE	PRVTYPE+5~, PRVTYPE+12*, PRVTYPE+13

Name	Field # of Occurrence
$T(GET^XUA4A72	PRVTYPE+4