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 |