ABMDF18 ; IHS/ASDST/DMJ - ADA-99 Dental Export Routine ;
Source file <ABMDF18.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+7, 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+46 |
Name | Line Occurrences |
---|---|
BODY | ENT+4 |
ENT | ABMDF18+29 |
RESET | BODY+8, BODY+44, BODY+73 |
TAIL | BODY+95 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ABM | ABMDF18+20!, XIT+1!, BODY+5*, BODY+6*, BODY+7, BODY+30 |
ABM("C" | BODY+5* |
ABM("CHRG" | BODY+24*, BODY+25, BODY+26 |
ABM("DIE-FAIL" | ABMDF18+34 |
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+45*, BODY+50, BODY+52, BODY+53, BODY+54, BODY+55, BODY+56, BODY+74*, BODY+79 , BODY+80, BODY+81, BODY+83, BODY+84, BODY+85, BODY+86, BODY+87, RESET+2*, RESET+3* |
ABM("I" | BODY+5*, BODY+8, BODY+28*, BODY+29, BODY+33*, BODY+44, BODY+58*, BODY+59, BODY+73, BODY+89* , BODY+90, BODY+94*, BODY+95, TAIL+5* |
ABM("MORE" | BODY+31*, BODY+61*, BODY+92* |
ABM("TCHRG" | BODY+5*, BODY+26*, BODY+57*, BODY+88*, TAIL+1*, TAIL+2, TAIL+3, TAIL+5* |
ABM("YTOT" | BODY+5*, TAIL+3* |
ABM(0 | BODY+7*, BODY+10, BODY+11, BODY+14, BODY+15, BODY+16, BODY+17, BODY+18, BODY+19, BODY+24 , BODY+25, BODY+26 |
>> ABMCNTR | BODY+42*, BODY+43*, BODY+47, BODY+48, BODY+49, BODY+55, BODY+71*, BODY+72*, BODY+75, BODY+76 , BODY+77, BODY+78 |
>> ABMDENP | BODY+20*, BODY+21*, BODY+22*, BODY+23 |
>> ABMED | BODY+40*, BODY+41*, BODY+43, BODY+46, BODY+47, BODY+48, BODY+49, BODY+55, BODY+60, BODY+69* , BODY+70*, BODY+72, BODY+75, BODY+76, BODY+77, BODY+78, BODY+91 |
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+52*, BODY+53*, BODY+54*, BODY+55*, BODY+56*, BODY+79*, BODY+80*, BODY+81*, BODY+83* , BODY+84*, BODY+85*, BODY+86*, BODY+87*, RESET+2! |
ABMF(50 | TAIL+2* |
>> ABMMS | BODY+46*, BODY+50 |
>> ABMMSCHG | BODY+49*, BODY+56, BODY+57 |
>> ABMMSDT | BODY+47*, BODY+51, BODY+52, BODY+53, BODY+54 |
>> ABMMSQTY | BODY+48* |
>> ABMOPS | BODY+11*, BODY+12, BODY+13 |
>> ABMP("BDFN" | ABMDF18+27*, ABMDF18+28*, ABMDF18+31, ENT+2, ENT+3, BODY+6, BODY+7, BODY+30 |
>> ABMP("EXP" | ABMDF18+22* |
>> ABMP("FLAT" | BODY+3!, BODY+25, TAIL+1 |
>> ABMP("INS" | BODY+2, BODY+20 |
>> ABMP("LDFN" | BODY+21 |
>> ABMP("VDT" | BODY+46 |
>> ABMP("XMIT" | ABMDF18+32 |
>> ABMRC | BODY+60 |
>> ABMRCD | BODY+38*, BODY+39*, BODY+41, BODY+43, BODY+47, BODY+48, BODY+49, BODY+55, BODY+60, BODY+67* , BODY+68*, BODY+70, BODY+72, BODY+75, BODY+76, BODY+77, BODY+78, BODY+91 |
ABMRV | BODY+36~, BODY+65~ |
ABMRV( | BODY+39, BODY+41, BODY+43, BODY+47, BODY+48, BODY+49, BODY+55, BODY+60, BODY+68, BODY+70 , BODY+72, BODY+75, BODY+76, BODY+77, BODY+78, BODY+91 |
>> ABMRX | BODY+75*, BODY+79, BODY+80, BODY+81 |
>> ABMRXCHG | BODY+78*, BODY+87, BODY+88 |
>> ABMRXDT | BODY+76*, BODY+82, BODY+83, BODY+84, BODY+85 |
>> ABMRXQTY | BODY+77*, BODY+86 |
ABMV | XIT+1! |
>> ABMX("INS" | BODY+2* |
>> ABMY( | ABMDF18+26, ABMDF18+28 |
>> ABMY("N" | ABMDF18+24*, ABMDF18+26*, ABMDF18+28 |
>> DA | ABMDF18+31* |
>> DIE | ABMDF18+30* |
>> DR | ABMDF18+32* |
>> DUOUT | BODY+6, BODY+41, BODY+70 |
DUZ(2 | ENT+2, ENT+3, BODY+6, BODY+7, BODY+22, BODY+30 |
U | ABMDF18+21*, 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+26, BODY+46, BODY+47 , BODY+48, BODY+49, BODY+50, BODY+52, BODY+53, BODY+54, BODY+55, BODY+56, BODY+75, BODY+76 , BODY+77, BODY+78, BODY+79, BODY+80, BODY+81, BODY+83, BODY+84, BODY+85, BODY+86, BODY+87 , TAIL+2 |