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 |