ABMEF23 ; IHS/ASDST/DMJ - Electronic 837 version 4010 Dental ;
Source file <ABMEF23.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
SBR | ;new subscriber
|
|
CLAIM | ;one claim
|
|
END | ;end of file
|
|
SEND | ;EP - send file
|
|
START | ;
|
|
OPEN | ;
; OPEN FILE |
|
LOOP | ;loop through bills
|
Name | Field # of Occurrence |
---|---|
^%ZISC | END+1 |
$$SENDTO1^%ZISH | SEND+4 |
OPEN^%ZISH | OPEN+23 |
BILLSTAT^ABMDREEX | CLAIM+8 |
EOP^ABMDUTL | START+13 |
^ABME5L11 | START+43 |
^ABME8L1 | CLAIM+14 |
^ABME8L13 | CLAIM+22 |
^ABME8L14 | CLAIM+23 |
^ABME8L15 | CLAIM+25 |
^ABME8L2 | CLAIM+15 |
^ABME8L3 | SBR+11 |
PTCHG^ABME8L3 | CLAIM+21 |
^ABME8L8 | CLAIM+24 |
$$PNUM^ABMUTLP | SBR+10 |
SET^ABMUTLP | CLAIM+9 |
^DIC | START+8 |
^DIE | START+38 |
^DIR | OPEN+5, OPEN+19 |
$$JDT^XBFUNC | OPEN+11 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^ABMDTXST - [#9002274.6] | Classic Fileman Calls |
^AUTNINS - [#9999999.18] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^ABMDBILL( | CLAIM+5, CLAIM+6 |
^ABMDPARM( | OPEN+4 |
^ABMDTXST - [#9002274.6] | START+4, LOOP+5, LOOP+8, CLAIM+12, SBR+6, SBR+7 |
^ABMNINS("ALF" | OPEN+12, OPEN+24* |
^AUTNINS - [#9999999.18] | START+15, OPEN+8 |
Name | Line Occurrences |
---|---|
CLAIM | LOOP+9 |
END | START+44 |
LOOP | START+39 |
OPEN | START+32 |
SBR | CLAIM+17, CLAIM+19 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ABM | END+3! |
>> ABMASBR | LOOP+3*, LOOP+5*, LOOP+8, CLAIM+18, SBR+1, SBR+2, SBR+6, SBR+7, SBR+12 |
>> ABMB0 | CLAIM+16 |
>> ABMBILL | LOOP+6*, LOOP+8*, CLAIM+4, SBR+8, SBR+10 |
>> ABMCHILD | SBR+3*, SBR+9* |
ABME | END+3! |
ABMEF | END+3! |
>> ABMER("CNT" | START+31, START+44 |
>> ABMER("LAST" | START+44 |
>> ABMFILE | SEND+1*, SEND+3, SEND+4 |
ABMFN | START+37, END+3!, OPEN+17*, OPEN+18, OPEN+21*, OPEN+23, OPEN+24, SEND+1 |
>> ABMGCN | CLAIM+8 |
ABMHL | END+3! |
>> ABMJDT | OPEN+11*, OPEN+13, OPEN+17 |
ABMLF | END+3!, OPEN+12*, OPEN+13*, OPEN+14 |
ABMLNUM | END+3!, OPEN+14*, OPEN+15*, OPEN+16*, OPEN+17 |
>> ABMNPDFN | LOOP+4*, CLAIM+16*, CLAIM+20 |
>> ABMOPDFN | LOOP+4*, LOOP+7*, CLAIM+20, SBR+13* |
>> ABMOSBR | LOOP+2*, CLAIM+10, CLAIM+18, SBR+12* |
ABMP | CLAIM+1! |
ABMP("BDFN" | CLAIM+4*, CLAIM+5, CLAIM+6, CLAIM+8, CLAIM+9 |
ABMP("INS" | START+3, START+4*, START+5, START+10*, START+11, START+14, START+15, CLAIM+2*, OPEN+8, OPEN+12 , OPEN+24 |
ABMP("ITYPE" | START+15*, START+16, CLAIM+3* |
ABMP("PDFN" | SBR+13 |
ABMP("PNUM" | SBR+10* |
ABMP("XMIT" | START+2 |
ABMPATH | END+3!, OPEN+7*, OPEN+23, SEND+1 |
>> ABMPINS | START+14*, CLAIM+2 |
>> ABMPITYP | START+16*, CLAIM+3 |
>> ABMPXMIT | START+2*, START+4, START+36, LOOP+5, LOOP+8, CLAIM+8, CLAIM+12, SBR+6, SBR+7 |
ABMR | LOOP+1!, END+3! |
>> ABMRCID | OPEN+8*, OPEN+9, OPEN+10*, OPEN+17 |
ABMREC | LOOP+1!, END+3! |
ABMRT | LOOP+1! |
ABMRV | END+3! |
>> ABMSFILE | SBR+1* |
>> ABMSIEN | SBR+2* |
>> ABMSND | SEND+4*, SEND+5 |
>> ABMSPAR | SEND+4 |
>> ABMSTOT | START+40, START+42 |
>> ABMXMTDT | CLAIM+12 |
>> DA | START+36* |
>> DIC | START+6* |
>> DIC(0 | START+7* |
>> DIE | START+35* |
DIR | OPEN+5!, OPEN+19! |
DIR("A" | OPEN+3*, OPEN+18* |
DIR("B" | OPEN+4*, OPEN+18* |
DIR(0 | OPEN+2*, OPEN+18* |
>> DR | START+37* |
DT | OPEN+11 |
DUZ(2 | START+4, LOOP+5, LOOP+8, CLAIM+5, CLAIM+6, CLAIM+8, CLAIM+12, SBR+6, SBR+7, OPEN+4 |
I | SBR+4~, SBR+5*, SBR+6*, SBR+7, SBR+8 |
IO(0 | SEND+2 |
>> POP | START+31, START+33, START+34, OPEN+6*, OPEN+20*, OPEN+22*, OPEN+24 |
U | START+15, CLAIM+16 |
>> Y | START+9, START+10, OPEN+6, OPEN+7, OPEN+20, OPEN+21 |