©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
ABMDF25 ; IHS/SD/SDR - ADA-2000 Dental Export Routine ;
Source file <ABMDF25.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| BODY | ;
; For each dental entry in the bill file, find and print data. |
|
| RESET | ;
; Reset line numbers for BODY |
|
| TAIL | ;END OF FORM
|
|
| OTHER | ;
; Other charges on page 3? |
|
| ENT | ;EP for getting data and printing form
|
|
| RXDATA | ||
| XIT | ;
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ABMDBILL( | ENT+2, ENT+3, BODY+6, BODY+7, BODY+35, OTHER+2, OTHER+3 |
| ^ABMDPARM( | BODY+25, BODY+26 |
| ^ABMDREC - [#9002274.1] | BODY+24 |
| ^ADEOPS - [#9002010.03] | BODY+12, BODY+13 |
| ^AUTTADA - [#9999999.31] | BODY+21, BODY+22 |
| ^ICPT("B" | OTHER+17 |
| Name | Line Occurrences |
|---|---|
| BODY | ENT+4 |
| ENT | ABMDF25+20 |
| RESET | BODY+8, OTHER+15, RXDATA+8 |
| TAIL | RXDATA+27 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ABM | ABMDF25+11!, XIT+1!, BODY+5*, BODY+6*, BODY+7, BODY+35 |
| ABM("C" | BODY+5* |
| ABM("CHRG" | BODY+29*, BODY+30, BODY+31 |
| ABM("DIE-FAIL" | ABMDF25+25 |
| ABM("F" | BODY+9*, BODY+12, BODY+13, BODY+16, BODY+17, BODY+18, BODY+20, BODY+21, BODY+22, BODY+27 , BODY+30, OTHER+16*, OTHER+22, OTHER+23, OTHER+24, OTHER+25, RXDATA+9*, RXDATA+14, RXDATA+15, RXDATA+16 , RXDATA+17, RXDATA+18, RESET+2*, RESET+3* |
| ABM("I" | BODY+5*, BODY+8, BODY+33*, BODY+34, BODY+38*, OTHER+15, OTHER+27*, OTHER+28, OTHER+32*, RXDATA+8 , RXDATA+20*, RXDATA+21, RXDATA+25*, RXDATA+27, TAIL+5* |
| ABM("MORE" | BODY+36*, OTHER+30*, RXDATA+23* |
| ABM("TCHRG" | BODY+5*, BODY+31*, OTHER+4*, OTHER+26*, RXDATA+19*, TAIL+1*, TAIL+2, TAIL+3, TAIL+5* |
| ABM("YTOT" | BODY+5*, TAIL+3* |
| ABM(0 | BODY+7*, BODY+10, BODY+11, BODY+16, BODY+17, BODY+18, BODY+20, BODY+21, BODY+22, BODY+29 , BODY+30, BODY+31 |
| >> ABMCNTR | OTHER+13*, OTHER+14*, OTHER+18, OTHER+19, OTHER+20, RXDATA+6*, RXDATA+7*, RXDATA+10, RXDATA+11, RXDATA+12 , RXDATA+13 |
| >> ABMDENP | BODY+24*, BODY+25*, BODY+26*, BODY+27 |
| >> ABMED | OTHER+11*, OTHER+12*, OTHER+14, OTHER+17, OTHER+18, OTHER+19, OTHER+20, OTHER+23, OTHER+29, RXDATA+4* , RXDATA+5*, RXDATA+7, RXDATA+10, RXDATA+11, RXDATA+12, RXDATA+13, RXDATA+22 |
| ABMF | XIT+1!, ENT+1! |
| ABMF( | BODY+12*, BODY+13*, BODY+16*, BODY+17*, BODY+18*, BODY+20*, BODY+21*, BODY+22*, BODY+27*, BODY+30* , OTHER+22*, OTHER+23*, OTHER+24*, OTHER+25*, RXDATA+14*, RXDATA+15*, RXDATA+16*, RXDATA+17*, RXDATA+18*, RESET+2! |
| ABMF(38 | OTHER+3*, OTHER+4 |
| ABMF(39 | TAIL+2* |
| >> ABMMS | OTHER+17*, OTHER+24 |
| >> ABMMSCHG | OTHER+20*, OTHER+25, OTHER+26 |
| >> ABMMSDT | OTHER+18*, OTHER+21, OTHER+22 |
| >> ABMMSQTY | OTHER+19* |
| >> ABMOPS | BODY+11*, BODY+12, BODY+13 |
| >> ABMP("BDFN" | ABMDF25+18*, ABMDF25+19*, ABMDF25+22, ENT+2, ENT+3, BODY+6, BODY+7, BODY+35, OTHER+2, OTHER+3 |
| >> ABMP("EXP" | ABMDF25+13* |
| >> ABMP("FLAT" | BODY+3!, BODY+30, TAIL+1 |
| >> ABMP("INS" | BODY+2, BODY+24 |
| >> ABMP("LDFN" | BODY+25 |
| >> ABMP("VDT" | OTHER+17 |
| >> ABMP("XMIT" | ABMDF25+23 |
| >> ABMRCD | OTHER+9*, OTHER+10*, OTHER+12, OTHER+14, OTHER+18, OTHER+19, OTHER+20, OTHER+29, RXDATA+2*, RXDATA+3* , RXDATA+5, RXDATA+7, RXDATA+10, RXDATA+11, RXDATA+12, RXDATA+13, RXDATA+22 |
| ABMRV | OTHER+7~, RXDATA~ |
| ABMRV( | OTHER+10, OTHER+12, OTHER+14, OTHER+18, OTHER+19, OTHER+20, OTHER+29, RXDATA+3, RXDATA+5, RXDATA+7 , RXDATA+10, RXDATA+11, RXDATA+12, RXDATA+13, RXDATA+22 |
| >> ABMRX | RXDATA+10*, RXDATA+14, RXDATA+15, RXDATA+16 |
| >> ABMRXCHG | RXDATA+13*, RXDATA+18, RXDATA+19 |
| >> ABMRXDT | RXDATA+11*, RXDATA+17 |
| >> ABMRXQTY | RXDATA+12* |
| ABMV | XIT+1! |
| >> ABMX("INS" | BODY+2* |
| >> ABMY( | ABMDF25+17, ABMDF25+19 |
| >> ABMY("N" | ABMDF25+15*, ABMDF25+17*, ABMDF25+19 |
| >> DA | ABMDF25+22* |
| >> DIE | ABMDF25+21* |
| >> DR | ABMDF25+23* |
| >> DUOUT | BODY+6, OTHER+12, RXDATA+5 |
| DUZ(2 | ENT+2, ENT+3, BODY+6, BODY+7, BODY+26, BODY+35, OTHER+2, OTHER+3 |
| U | ABMDF25+12*, BODY+10, BODY+11, BODY+12, BODY+13, BODY+16, BODY+17, BODY+18, BODY+20, BODY+21 , BODY+22, BODY+24, BODY+25, BODY+26, BODY+27, BODY+29, BODY+30, BODY+31, OTHER+2, OTHER+3 , OTHER+4, OTHER+17, OTHER+18, OTHER+19, OTHER+20, OTHER+22, OTHER+23, OTHER+24, OTHER+25, RXDATA+10 , RXDATA+11, RXDATA+12, RXDATA+13, RXDATA+14, RXDATA+15, RXDATA+16, RXDATA+17, RXDATA+18, TAIL+2 |