ABMDF12 ; IHS/ASDST/DMJ - ADA-94 Dental Export Routine ;
Source file <ABMDF12.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+5, BODY+29 |
^ABMDPARM( | BODY+20, BODY+21 |
^ABMDREC - [#9002274.1] | BODY+19 |
^ADEOPS - [#9002010.03] | BODY+11, BODY+12 |
^AUTTADA - [#9999999.31] | BODY+14, BODY+18 |
^ICPT("B" | BODY+45 |
Name | Line Occurrences |
---|---|
BODY | ENT+4 |
ENT | ABMDF12+27 |
RESET | BODY+6, BODY+43, BODY+72 |
TAIL | BODY+95 |
Name | Field # of Occurrence |
---|---|
^( | BODY+5 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ABM | ABMDF12+18!, XIT+1!, BODY+4*, BODY+5*, BODY+29 |
ABM("C" | BODY+4* |
ABM("CHRG" | BODY+23*, BODY+24, BODY+25 |
ABM("DIE-FAIL" | ABMDF12+32 |
ABM("F" | BODY+8*, BODY+11, BODY+12, BODY+13, BODY+14, BODY+15, BODY+16, BODY+17, BODY+18, BODY+22 , BODY+24, 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+2*, RESET+3* |
ABM("I" | BODY+4*, BODY+6, BODY+27*, BODY+28, BODY+32*, BODY+43, BODY+57*, BODY+58, BODY+72, BODY+88* , BODY+89, BODY+93*, BODY+95, TAIL+5* |
ABM("MORE" | BODY+30*, BODY+60*, BODY+91* |
ABM("TCHRG" | BODY+4*, BODY+25*, BODY+56*, BODY+87*, TAIL+1*, TAIL+2, TAIL+3, TAIL+5* |
ABM("YTOT" | BODY+4*, TAIL+3* |
ABM(0 | BODY+5*, BODY+9, BODY+10, BODY+13, BODY+14, BODY+15, BODY+16, BODY+17, BODY+18, BODY+23 |
>> ABMCNTR | BODY+41*, BODY+42*, BODY+46, BODY+47, BODY+48, BODY+54, BODY+70*, BODY+71*, BODY+74, BODY+75 , BODY+76, BODY+77 |
>> ABMDENP | BODY+19*, BODY+20*, BODY+21*, BODY+22 |
>> 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+11*, BODY+12*, BODY+13*, BODY+14*, BODY+15*, BODY+16*, BODY+17*, BODY+18*, BODY+22*, BODY+24* , 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+2! |
ABMF(56 | 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+10*, BODY+11, BODY+12 |
>> ABMP("BDFN" | ABMDF12+25*, ABMDF12+26*, ABMDF12+29, ENT+2, ENT+3, BODY+5, BODY+29 |
>> ABMP("EXP" | ABMDF12+20* |
>> ABMP("FLAT" | BODY+3!, BODY+24, TAIL+1 |
>> ABMP("INS" | BODY+2, BODY+19 |
>> ABMP("LDFN" | BODY+20 |
>> ABMP("VDT" | BODY+45 |
>> ABMP("XMIT" | ABMDF12+30 |
>> 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( | ABMDF12+24, ABMDF12+26 |
>> ABMY("N" | ABMDF12+22*, ABMDF12+24*, ABMDF12+26 |
>> DA | ABMDF12+29* |
>> DIE | ABMDF12+28* |
>> DR | ABMDF12+30* |
>> DUOUT | BODY+5, BODY+40, BODY+69 |
DUZ(2 | ENT+2, ENT+3, BODY+5, BODY+21, BODY+29 |
U | ABMDF12+19*, BODY+9, 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+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 |