ABMDF4 ; IHS/ASDST/DMJ - ADA-90 Dental Export Routine ;
Source file <ABMDF4.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
BODY | ;
; For each dental entry in the bill file, find and print data |
|
ENT | ;EP for getting data and printing form
|
|
TAIL | ;END OF FORM
|
|
XIT | ;
|
|
RESET | ; Reset line numbers for BODY
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^ABMDBILL( | ENT+2, ENT+3, BODY+6, BODY+30 |
^ABMDPARM( | BODY+21, BODY+22 |
^ABMDREC - [#9002274.1] | BODY+20 |
^ADEOPS - [#9002010.03] | BODY+12, BODY+13 |
^AUTTADA - [#9999999.31] | BODY+15, BODY+19 |
^ICPT("B" | BODY+45 |
Name | Line Occurrences |
---|---|
BODY | ENT+4 |
ENT | ABMDF4+35 |
RESET | BODY+7, BODY+43, BODY+72 |
TAIL | BODY+95 |
Name | Field # of Occurrence |
---|---|
^( | BODY+6 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ABM | ABMDF4+26!, XIT+1!, BODY+4*, BODY+6*, BODY+30 |
ABM("C" | BODY+4* |
ABM("CHRG" | BODY+24*, BODY+25, BODY+26 |
ABM("DIE-FAIL" | ABMDF4+40 |
ABM("F" | BODY+9*, BODY+12, BODY+13, BODY+14, BODY+15, BODY+16, BODY+17, BODY+18, BODY+19, BODY+23 , BODY+25, BODY+44*, BODY+50, BODY+51, BODY+52, BODY+53, BODY+54, BODY+55, BODY+73*, BODY+78 , BODY+79, BODY+80, BODY+82, BODY+83, BODY+84, BODY+85, BODY+86, RESET+1*, RESET+2* |
ABM("I" | BODY+4*, BODY+7, BODY+28*, BODY+29, BODY+33*, BODY+43, BODY+57*, BODY+58, BODY+62*, BODY+72 , BODY+88*, BODY+89, BODY+93*, BODY+95, TAIL+5* |
ABM("MORE" | BODY+31*, BODY+60*, BODY+91* |
ABM("TCHRG" | BODY+4*, BODY+26*, BODY+56*, BODY+87*, TAIL+1*, TAIL+2, TAIL+3, TAIL+5* |
ABM("YTOT" | BODY+4*, TAIL+3* |
ABM(0 | BODY+6*, BODY+10, BODY+11, BODY+14, BODY+15, BODY+16, BODY+17, BODY+18, BODY+19, BODY+24 |
>> ABMCNTR | BODY+41*, BODY+42*, BODY+46, BODY+47, BODY+48, BODY+70*, BODY+71*, BODY+74, BODY+75, BODY+76 , BODY+77 |
>> ABMDENP | BODY+20*, BODY+21*, BODY+22*, BODY+23 |
>> ABMED | BODY+39*, BODY+40*, BODY+42, BODY+45, BODY+46, BODY+47, BODY+48, BODY+54, BODY+59, BODY+68* , BODY+69*, BODY+71, BODY+74, BODY+75, BODY+76, BODY+77, BODY+90 |
ABMF | XIT+1!, ENT+1! |
ABMF( | BODY+12*, BODY+13*, BODY+14*, BODY+15*, BODY+16*, BODY+17*, BODY+18*, BODY+19*, BODY+23*, BODY+25* , BODY+50*, BODY+51*, BODY+52*, BODY+53*, BODY+54*, BODY+55*, BODY+78*, BODY+79*, BODY+80*, BODY+82* , BODY+83*, BODY+84*, BODY+85*, BODY+86*, RESET+1! |
ABMF(57 | TAIL+2* |
>> ABMMS | BODY+45*, BODY+50 |
>> ABMMSCHG | BODY+48*, BODY+55, BODY+56 |
>> ABMMSDT | BODY+46*, BODY+49, BODY+51, BODY+52, BODY+53 |
>> ABMMSQTY | BODY+47* |
>> ABMOPS | BODY+11*, BODY+12, BODY+13 |
>> ABMP("BDFN" | ABMDF4+33*, ABMDF4+34*, ABMDF4+37, ENT+2, ENT+3, BODY+6, BODY+30 |
>> ABMP("EXP" | ABMDF4+28* |
>> ABMP("FLAT" | BODY+3!, BODY+25, TAIL+1 |
>> ABMP("INS" | BODY+2, BODY+20 |
>> ABMP("LDFN" | BODY+21 |
>> ABMP("VDT" | BODY+45 |
>> ABMP("XMIT" | ABMDF4+38 |
>> ABMRCD | BODY+37*, BODY+38*, BODY+40, BODY+42, BODY+46, BODY+47, BODY+48, BODY+54, BODY+59, BODY+66* , BODY+67*, BODY+69, BODY+71, BODY+74, BODY+75, BODY+76, BODY+77, BODY+90 |
ABMRV | BODY+35~, BODY+64~ |
ABMRV( | BODY+38, BODY+40, BODY+42, BODY+46, BODY+47, BODY+48, BODY+54, BODY+59, BODY+67, BODY+69 , BODY+71, BODY+74, BODY+75, BODY+76, BODY+77, BODY+90 |
>> ABMRX | BODY+74*, BODY+78, BODY+79, BODY+80 |
>> ABMRXCHG | BODY+77*, BODY+86, BODY+87 |
>> ABMRXDT | BODY+75*, BODY+81, BODY+82, BODY+83, BODY+84 |
>> ABMRXQTY | BODY+76*, BODY+85 |
ABMV | XIT+1! |
>> ABMX("INS" | BODY+2* |
>> ABMY( | ABMDF4+32, ABMDF4+34 |
>> ABMY("N" | ABMDF4+30*, ABMDF4+32*, ABMDF4+34 |
>> DA | ABMDF4+37* |
>> DIE | ABMDF4+36* |
>> DR | ABMDF4+38* |
>> DUOUT | BODY+6, BODY+40, BODY+69 |
DUZ(2 | ENT+2, ENT+3, BODY+6, BODY+22, BODY+30 |
U | ABMDF4+27*, BODY+10, BODY+11, BODY+12, BODY+13, BODY+14, BODY+15, BODY+16, BODY+17, BODY+18 , BODY+19, BODY+20, BODY+21, BODY+22, BODY+23, BODY+24, BODY+25, BODY+45, BODY+46, BODY+47 , BODY+48, BODY+50, BODY+51, BODY+52, BODY+53, BODY+54, BODY+55, BODY+74, BODY+75, BODY+76 , BODY+77, BODY+78, BODY+79, BODY+80, BODY+82, BODY+83, BODY+84, BODY+85, BODY+86, TAIL+2 |