ABMERGRV ; IHS/SD/SDR - GET ANCILLARY SVCS REVENUE CODE INFO ;
Source file <ABMERGRV.m>
Package | Total | Call Graph |
---|---|---|
Third Party Billing | 2 | $$CPT^ABMCVAPI ($$FMT,$$RCID)^ABMERUTL |
VA Fileman | 1 | $$GET1^DIQ |
Name | Comments | DBIA/ICR reference |
---|---|---|
P1 | ;EP - SET UP ABMRV ARRAY
; 21 - Med/Surg ; 23 - Pharmacy ; 25 - Room and Board ; 27 - Medical Procedures ; 33 - Dental ; 35 - Radiology ; 37 - Laboratory ; 39 - Anesthesia ; 43 - Miscellaneous Services ; 45 - Supplies ; 47 - Ambulance ; ; if not flat rate ..... |
|
ORV | ; EP
; OTHER REVENUE CODE ; ABMRV(IEN to REVENUE CODE,0) = IEN to REVENUE CODE ^ ^ ^ ^ 1 ^ ; Revenue charge ^ ^ Revenue charge |
|
FLP | ;FORMAT LOOP
|
|
FMT | ;Format
|
|
TOT | ;TOTAL TO REVENUE CODE
|
|
START | ;START HERE
|
FileNo | Call Tags |
---|---|
^AUTNINS - [#9999999.18] | GET1^DIQ |
^AUTTINTY - [#9999999.181] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^ABMDBILL( | ORV+4, ORV+5, P1+32, P1+58, P1+59, P1+81, P1+82, P1+84, P1+85, P1+86 , P1+87, P1+97 |
^ABMNINS( | P1+15, P1+91 |
^AUTNINS - [#9999999.18] | P1+19, P1+31, P1+81 |
^DIC(40.7 - [#40.7] | P1+58 |
Name | Line Occurrences |
---|---|
@( | P1+27, P1+106 |
FLP | START+4 |
FMT | FLP+5, FLP+10 |
ORV | START+2 |
P1 | START+3 |
TOT | FLP+4 |
Name | Field # of Occurrence |
---|---|
^(9 | ORV+5 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
A | P1+109*, P1+110*, P1+112, P1+114, P1+115, P1+116, P1+117, P1+118*, P1+119, P1+120 , P1+122, P1+130! |
ABM | START+1!, P1+105!, FLP+12! |
ABM( | P1+80*, FMT+1*, FMT+2, FMT+4*, FMT+5 |
ABM("FSTR" | FMT+3*, FMT+4 |
ABM("TOT" | FLP+1*, FLP+7, FMT+2* |
ABM(1 | P1+82, P1+90, P1+98 |
ABM(2 | P1+82, P1+84, P1+85, P1+86, P1+89, P1+90, P1+94, P1+96, P1+98, P1+99 |
ABM(3 | P1+81*, P1+82 |
ABM(4 | P1+97*, P1+98, P1+99 |
ABMCPT | P1+91*, P1+92*, P1+93, P1+94, P1+96, P1+149! |
ABMI | P1+38*, P1+39*, P1+41, P1+44, P1+45, P1+52, P1+53, P1+55! |
>> ABMIS | P1+33*, P1+35, P1+37, P1+51, P1+52 |
ABMJ | P1+40*, P1+41*, P1+44, P1+45, P1+52, P1+53, P1+55! |
>> ABMJS | P1+35*, P1+37, P1+51, P1+52 |
ABMK | P1+43*, P1+44*, P1+45, P1+52, P1+53, P1+55! |
>> ABMKS | P1+37*, P1+51, P1+52 |
>> ABMODMOD | P1+59*, P1+74 |
>> ABMP("BDFN" | ORV+4, ORV+5, P1+32, P1+58, P1+59, P1+81, P1+82, P1+84, P1+85, P1+86 , P1+87, P1+97 |
>> ABMP("BTYP" | P1+81 |
>> ABMP("CDAYS" | P1+87*, P1+88, P1+89, P1+90, P1+99 |
>> ABMP("CLIN" | P1+26 |
>> ABMP("CPT" | P1+93* |
>> ABMP("EXP" | P1+95 |
>> ABMP("FLAT" | P1+15, P1+78, P1+80 |
>> ABMP("INS" | P1+15, P1+19, P1+31, P1+81, P1+91, P1+101 |
>> ABMP("VDT" | P1+92 |
>> ABMP("VTYP" | P1+23, P1+24, P1+25, P1+81, P1+91, P1+98, P1+104 |
ABMQLFLG | P1+66*, P1+73, P1+74, P1+75! |
ABMRV | START+1!, P1+31 |
ABMRV( | ORV+5*, P1+35, P1+37, P1+39, P1+41, P1+44, P1+45, P1+51, P1+52*, P1+53* , P1+61, P1+63, P1+65, P1+66, P1+68, P1+70, P1+72, P1+73*, P1+74*, P1+82* , P1+84*, P1+85*, P1+86*, P1+89*, P1+90*, P1+94*, P1+96*, P1+98*, P1+99*, P1+110 , P1+112, P1+114, P1+116, P1+117!, FLP+3, FLP+6*, FMT+1, FMT+5*, TOT+2, TOT+4 , TOT+5*, TOT+6*, TOT+7* |
ABMRV(0 | P1+33 |
ABMRV(519 | P1+116*, P1+118, P1+120, P1+122*, P1+123!, P1+126, P1+128, P1+129* |
ABMRV(9999 | FLP+7*, FLP+8*, FLP+11* |
ABMTMP | P1+55! |
ABMTMP("TMP" | P1+51*, P1+53 |
B | P1+111*, P1+112*, P1+114, P1+116, P1+117, P1+120*, P1+122, P1+125*, P1+126*, P1+128 , P1+129, P1+130! |
C | P1+113*, P1+114*, P1+116, P1+117, P1+127*, P1+128*, P1+129, P1+130! |
DUZ(2 | ORV+4, ORV+5, P1+15, P1+32, P1+58, P1+59, P1+81, P1+82, P1+84, P1+85 , P1+86, P1+87, P1+91, P1+97 |
I | P1+16~, P1+17*, P1+19, P1+23, P1+24, P1+25, P1+26, P1+27, P1+60*, P1+61* , P1+63, P1+65, P1+66, P1+67*, P1+68*, P1+70, P1+72, P1+73, P1+74, P1+79~ , P1+80*, P1+102~, P1+103*, P1+106, FLP+2*, FLP+3*, FLP+6, FLP+9*, FMT+1, FMT+5 , TOT+2, TOT+4, TOT+5, TOT+6, TOT+7 |
>> J | P1+62*, P1+63*, P1+65, P1+66, P1+69*, P1+70*, P1+72, P1+73, P1+74, FLP+1* , FLP+5*, FLP+10*, FMT+1, FMT+2, FMT+3, FMT+4, FMT+5, TOT+1*, TOT+2*, TOT+4 , TOT+7 |
>> K | P1+64*, P1+65*, P1+66, P1+71*, P1+72*, P1+73, P1+74, TOT+6*, TOT+7* |
>> L | TOT+3*, TOT+4*, TOT+7 |
U | ORV+5, P1+15, P1+31, P1+45, P1+58, P1+59, P1+66, P1+73, P1+74, P1+81 , P1+82, P1+84, P1+85, P1+86, P1+87, P1+89, P1+90, P1+91, P1+92, P1+94 , P1+96, P1+97, P1+98, P1+99, P1+122, P1+129, TOT+5, TOT+6, TOT+7 |