SCRPW241 ;BPCIOFO/ACS - ACRP Ad Hoc Report (cont.) ;06/30/99
Source file <SCRPW241.m>
Package | Total | Call Graph |
---|---|---|
Registration | 2 | ($$PTR2CODE,$$PTR2TEXT)^DGUTL4 DEM^VADPT |
DRG Grouper | 1 | $$CPT^ICPTCOD |
Kernel | 1 | $$NOW^XLFDT |
Scheduling | 1 | (GETCPT,GETGEN)^SDOE |
Name | Comments | DBIA/ICR reference |
---|---|---|
APAC(SDX) | ;Get all procedure codes
; INPUT - .SDX array reference ; OUTPUT- SDX array with CPT pointer, CPT code, quantity |
|
PDPE(SDX) | ||
APAP(SDX) | ;Get ambulatory procedures (no E&M codes)
; INPUT - .SDX array reference ; OUTPUT- SDX array containing CPT pointer, CPT code, CPT text |
|
APEM(SDX) | ;Get evaluation and management codes
; INPUT - .SDX array reference ; OUTPUT- SDX array containing CPT pointer, CPT code, CPT text |
|
PDPR(SDX) | ||
APOTR(SDX) | ;Transform procedure external value
; INPUT - .SDX CPT pointer ; OUTPUT- SDX text string containing CPT code, CPT text |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^IBE(357.69 - [#357.69] | APAP+11, APEM+11 |
Name | Line Occurrences |
---|---|
APOTR | APAC+16, APAP+16, APEM+16 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ABB | PDPE+2~, PDPE+7*, PDPE+8, PDPR+2~, PDPR+7*, PDPR+8 |
CNT | PDPE+2~, PDPE+4*, PDPE+8*, PDPR+2~, PDPR+4*, PDPR+8* |
CPTCODE | APAC+5~, APAC+14*, APAC+15, APAP+5~, APAP+14*, APAP+15, APEM+5~, APEM+14*, APEM+15 |
CPTINFO | APAC+5~, APAC+12*, APAC+13, APAC+14, APOTR+4~, APOTR+11*, APOTR+12, APOTR+13, APAP+5~, APAP+12* , APAP+13, APAP+14, APEM+5~, APEM+12*, APEM+13, APEM+14 |
CPTTEXT | APOTR+4~, APOTR+13*, APOTR+14 |
DFN | PDPE+2~, PDPE+3*, PDPE+4, PDPR+2~, PDPR+3*, PDPR+4 |
ENCDT | APOTR+4~, APOTR+5*, APOTR+6, APOTR+7*, APOTR+9*, APOTR+11 |
NUM | PDPE+2~, PDPE+4*, PDPE+5, PDPE+6, PDPE+7, PDPE+8, PDPR+2~, PDPR+4*, PDPR+5, PDPR+6 , PDPR+7, PDPR+8 |
SDI | APAC+5~, APAC+9*, APAC+10, APAC+15, APAC+16, APAP+5~, APAP+8*, APAP+9, APAP+16, APEM+5~ , APEM+8*, APEM+9, APEM+16 |
>> SDOE | APAC+7, APOTR+7, APOTR+8, APAP+6, APEM+6 |
>> SDOE0 | APAC+12, APOTR+5, APAP+12, APEM+12, PDPE+3, PDPR+3 |
SDX | APAC~, APAC+4!, APAC+10*, APAC+12, APAC+15*, APAC+16, APOTR~, APOTR+11, APOTR+14*, APAP~ , APAP+4!, APAP+9*, APAP+11, APAP+12, APAP+15*, APAP+16, APEM~, APEM+4!, APEM+9*, APEM+11 , APEM+12, APEM+15*, APEM+16, PDPE~, PDPE+1!, PDPE+9, PDPR~, PDPR+1!, PDPR+9 |
SDX( | APAC+16*, APAP+16*, APEM+16*, PDPE+8*, PDPR+8* |
SDX(1 | PDPE+9*, PDPR+9* |
SDY | APAC+5~, APOTR+10!, APAP+5~, APEM+5~ |
SDY( | APAC+9, APAC+10, APAC+15, APAP+8, APAP+9, APEM+8, APEM+9 |
SDY(0 | APOTR+9 |
TXT | PDPE+2~, PDPE+6*, PDPE+8, PDPR+2~, PDPR+6*, PDPR+8 |
U | APAC+10, APAC+14, APAC+15, APAC+16, APOTR+13, APOTR+14, APAP+9, APAP+14, APAP+15, APAP+16 , APEM+9, APEM+14, APEM+15, APEM+16, PDPE+3, PDPR+3 |
VADM | PDPE+2~, PDPR+2~ |
VADM(11 | PDPE+4, PDPE+5, PDPE+6, PDPE+7, PDPE+8 |
VADM(12 | PDPR+4, PDPR+5, PDPR+6, PDPR+7, PDPR+8 |