PXBPMOD ;ISA/EW,ESW - PROMPT MOD ; 10/31/02 12:12pm
Source file <PXBPMOD.m>
Package | Total | Call Graph |
---|---|---|
VA Fileman | 4 | ^DIC FILE^DICN (,VAL)^DIE GETS^DIQ |
PCE Patient Care Encounter | 2 | $$CPTOK^PXBUTL REMOVE^PXCEVFIL |
Package | Total | Caller Graph |
---|---|---|
PCE Patient Care Encounter | 2 | PXBMCPT2 PXBPCPT1 |
Name | Comments | DBIA/ICR reference |
---|---|---|
VALCPT(X) | ;Determine if CPT code is valid
|
|
BLDARRY | ;Copy new modifiers into local array
|
|
MOD(PXVST,PXPAT,PXCPT,PXMODSTR,PXCPTIEN,PXVSTDAT,PXCNT,PXARR) | ;
|
|
FILECPT | ;Create a new entry in V CPT file and get IEN
|
|
CPTMOD | ;Prompt for CPT Modifiers
|
FileNo | Call Tags |
---|---|
9000010.181 | VAL^DIE |
Name | Line Occurrences |
---|---|
$$VALCPT | MOD+17 |
BLDARRY | MOD+29 |
CPTMOD | MOD+24 |
FILECPT | MOD+21 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DA | MOD+15~, MOD+19*, MOD+22, FILECPT+7*, CPTMOD+12, BLDARRY+3 |
>> DATA | MOD+26* |
DD | FILECPT+1~ |
DIC | MOD+15~, FILECPT+2*, VALCPT+2~, VALCPT+3* |
DIC(0 | FILECPT+3*, CPTMOD+4*, VALCPT+4* |
>> DIE | FILECPT+8*, CPTMOD+3* |
DIROUT | MOD+15~ |
DO | FILECPT+1~ |
DR | MOD+15~, FILECPT+1~, FILECPT+9*, CPTMOD+2*, CPTMOD+8*, CPTMOD+14*, CPTMOD+16* |
DTOUT | MOD+15~, MOD+25 |
DUOUT | MOD+15~ |
>> EDATA | MOD+26* |
PXARR | MOD~, MOD+22* |
PXARR(1 | BLDARRY+6* |
PXARR2 | BLDARRY+1~ |
PXARR2( | BLDARRY+5, BLDARRY+6 |
PXCNT | MOD~, MOD+24 |
PXCPT | MOD~, MOD+17, MOD+18, FILECPT+4 |
PXCPTIEN | MOD~, MOD+19, MOD+20 |
PXERR | CPTMOD+1~, CPTMOD+11*, CPTMOD+12, CPTMOD+13 |
PXFIL | BLDARRY+1~, BLDARRY+2*, BLDARRY+3 |
PXGLB | MOD+15~, MOD+16*, FILECPT+2, FILECPT+8, FILECPT+10, FILECPT+12, CPTMOD+3, CPTMOD+5, CPTMOD+18 |
PXI | CPTMOD+1~, CPTMOD+10* |
PXMOD | CPTMOD+1~, CPTMOD+9*, CPTMOD+10*, CPTMOD+12 |
PXMODSTR | MOD~, CPTMOD+7, CPTMOD+8, CPTMOD+10 |
>> PXNEWIEN | MOD+22*, MOD+28 |
PXPAT | MOD~ |
PXSUB | BLDARRY+1~, BLDARRY+4*, BLDARRY+5*, BLDARRY+6 |
PXSUBFIL | BLDARRY+1~, BLDARRY+2*, BLDARRY+5, BLDARRY+6 |
PXVST | MOD~ |
PXVSTDAT | MOD~, MOD+18 |
X | FILECPT+1~, FILECPT+4*, VALCPT~ |
Y | MOD+15~, MOD+25, FILECPT+1~, FILECPT+7, VALCPT+2~, VALCPT+6 |