©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
ABMEHGRV ; IHS/ASDST/DMJ - GET ANCILLARY SVCS REVENUE CODE INFO ;
Source file <ABMEHGRV.m>
| Package | Total | Call Graph |
|---|---|---|
| Third Party Billing | 3 | $$CPT^ABMCVAPI FRATE^ABMDF11 $$FMT^ABMERUTL |
| VA Fileman | 1 | $$GET1^DIQ |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| START | ;START HERE
|
|
| FMT | ;Format
|
|
| 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 ..... |
|
| TOT | ;TOTAL TO REVENUE CODE
|
|
| FLP | ;FORMAT LOOP
|
| FileNo | Call Tags |
|---|---|
| ^AUTNINS - [#9999999.18] | GET1^DIQ |
| ^AUTTINTY - [#9999999.181] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ABMDBILL( | P1+53, P1+54, P1+79, P1+88 |
| ^ABMNINS( | P1+16, P1+74, P1+80 |
| ^AUTNINS - [#9999999.18] | P1+20, P1+35 |
| ^DIC(40.7 - [#40.7] | P1+53 |
| Name | Line Occurrences |
|---|---|
| @( | P1+30 |
| FMT | FLP+5, FLP+10 |
| P1 | START+2 |
| TOT | FLP+4 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ABM | START+1!, P1+29!, FLP+12! |
| ABM( | P1+76*, 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+77, P1+89 |
| ABM(2 | P1+77, P1+86 |
| ABM(3 | P1+77 |
| ABM(4 | P1+88*, P1+89 |
| ABMCDX | P1+84! |
| ABMCPT | P1+80*, P1+81*, P1+82, P1+86, P1+105! |
| ABMI | P1+39*, P1+40*, P1+42, P1+44, P1+45, P1+47, P1+48, P1+49! |
| >> ABMIS | P1+36*, P1+37, P1+38, P1+46, P1+47 |
| ABMJ | P1+41*, P1+42*, P1+44, P1+45, P1+47, P1+48, P1+49! |
| >> ABMJS | P1+37*, P1+38, P1+46, P1+47 |
| ABMK | P1+43*, P1+44*, P1+45, P1+47, P1+48, P1+49! |
| >> ABMKS | P1+38*, P1+46, P1+47 |
| >> ABMODMOD | P1+54*, P1+69 |
| >> ABMP("BDFN" | P1+53, P1+54, P1+79, P1+88 |
| >> ABMP("CLIN" | P1+27, P1+28 |
| >> ABMP("EXP" | P1+85 |
| >> ABMP("FLAT" | P1+16, P1+73, P1+76 |
| >> ABMP("INS" | P1+16, P1+20, P1+35, P1+74, P1+80 |
| >> ABMP("VDT" | P1+81 |
| >> ABMP("VTYP" | P1+22, P1+24, P1+25, P1+26, P1+74, P1+80, P1+89 |
| ABMQLFLG | P1+61*, P1+68, P1+69, P1+70! |
| ABMRV | START+1!, P1+35 |
| ABMRV( | P1+37, P1+38, P1+40, P1+42, P1+44, P1+45, P1+46, P1+47*, P1+48*, P1+56 , P1+58, P1+60, P1+61, P1+63, P1+65, P1+67, P1+68*, P1+69*, P1+86*, FLP+3 , FLP+6*, FMT+1, FMT+5*, TOT+2, TOT+3*, TOT+4*, TOT+5* |
| ABMRV(0 | P1+36 |
| ABMRV(1 | P1+77*, P1+79*, P1+82*, P1+87*, P1+89* |
| ABMRV(9999 | FLP+7*, FLP+8*, FLP+11* |
| ABMTMP | P1+49! |
| ABMTMP("TMP" | P1+46*, P1+48 |
| DUZ(2 | P1+16, P1+53, P1+54, P1+74, P1+79, P1+80, P1+88 |
| I | P1+17~, P1+18*, P1+20, P1+22, P1+24, P1+25, P1+26, P1+27, P1+28, P1+30 , P1+55*, P1+56*, P1+58, P1+60, P1+61, P1+62*, P1+63*, P1+65, P1+67, P1+68 , P1+69, P1+75~, P1+76*, FLP+2*, FLP+3*, FLP+6, FLP+9*, FMT+1, FMT+5, TOT+2 , TOT+3, TOT+4, TOT+5 |
| >> J | P1+57*, P1+58*, P1+60, P1+61, P1+64*, P1+65*, P1+67, P1+68, P1+69, FLP+1* , FLP+5*, FLP+10*, FMT+1, FMT+2, FMT+3, FMT+4, FMT+5, TOT+1*, TOT+2*, TOT+5 |
| >> K | P1+59*, P1+60*, P1+61, P1+66*, P1+67*, P1+68, P1+69, TOT+4*, TOT+5* |
| U | P1+16, P1+35, P1+45, P1+53, P1+54, P1+61, P1+68, P1+69, P1+74, P1+79 , P1+81, P1+82, P1+86, P1+87, P1+88, P1+89, TOT+3 |