PXBGCPT ;ISL/JVS - GATHER CPT ;7/16/96 11:41
Source file <PXBGCPT.m>
| Package | Total | Call Graph | 
|---|---|---|
| PCE Patient Care Encounter | 1 | CASE^PXBUTL | 
| VA Fileman | 1 | ($$GET1,GETS)^DIQ | 
| Package | Total | Caller Graph | 
|---|---|---|
| PCE Patient Care Encounter | 3 | PXAICPT PXBMCPT PXBMCPT2 | 
| 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! | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| 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 |