Routine: PXBGCPT

Package	Total	Call Graph
PCE Patient Care Encounter	1	CASE^PXBUTL
VA Fileman	1	($$GET1,GETS)^DIQ

Package

Total

Call Graph

CASE^PXBUTL

($$GET1,GETS)^DIQ

Package	Total	Caller Graph
PCE Patient Care Encounter	3	PXAICPT PXBMCPT PXBMCPT2

Package

Total

Caller Graph

Name	Comments	DBIA/ICR reference
A	;--Set array with CPT codes and associated modifiers
CPT(VISIT)	;--Gather the entries in the V CPT file
B	;--Add line numbers
EXIT	;--KILL

FileNo	Call Tags
^ICPT - [#81]	GET1^DIQ
^AUPNVCPT - [#9000010.18]	GETS^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^AUPNVCPT("AD"	CPT+7, CPT+9
^TMP("PXBU"	CPT+6!, CPT+10*, A+2, A+4, EXIT+1!

Name	Field # of Occurrence
CPT	CPT+2~, CPT+6!, A+7, A+11, A+13, A+14, A+19, B+2, B+3, B+4* , B+6, B+7, B+8, B+11, B+12, B+13, B+14, B+15
CPT(	A+14, A+19, B+4, B+6, B+7, B+8, B+11, B+12, B+13, B+14 , B+15
DA	CPT+3~
DIC	CPT+3~
DIQ	CPT+3~
DR	CPT+3~
GROUP	CPT+2~, A+13*, A+14
IEN	CPT+2~, CPT+8, CPT+9, CPT+10, A+3, A+4, A+6, A+7, A+8, A+9 , A+10, A+14, A+19, B+5, B+6, B+7, B+8, B+9, B+11, B+12 , B+13, B+14, B+15
NARR	CPT+2~, A+10, A+11, A+13
PROVIDER	CPT+2~, A+9*, A+13
PXBC	CPT+2~, B+3, B+6, B+7, B+8, B+9, B+12, B+13, B+15, EXIT+2
>> PXBCNT	EXIT+2*
PXBKY	CPT+6!
PXBKY(	B+7, B+12
PXBPRV	CPT+6!
PXBPRV(	B+15*
PXBSAM	CPT+6!
PXBSAM(	B+8, B+13
PXBSKY	CPT+6!
PXBSKY(	B+9*
PXMOD	CPT+4~, A+18*, A+19
PXSFIL	CPT+4~, A+15*, A+17, A+18
PXSIEN	CPT+4~, A+16, A+17, A+18, A+19, B+10, B+11, B+12, B+13
QUANTITY	CPT+2~, A+8*, A+13, B+15
VAUGHN	CPT+6!, A+5~, EXIT+1!
VAUGHN(	A+7, A+8, A+9, A+10, A+17, A+18
VISIT	CPT~, CPT+7, CPT+9

Information