ABME690 ; IHS/ASDST/DMJ - UB92 EMC RECORD 90 (Claim Control Screen) ;
Source file <ABME690.m>
Package | Total | Call Graph |
---|---|---|
Third Party Billing | 2 | $$EX^ABMER20 ($$FMT,SET)^ABMERUTL |
Name | Comments | DBIA/ICR reference |
---|---|---|
10 | ;1-2 Record type
|
|
20 | ;3-4 Filler
|
|
140 | ;56-65 Total Non-Covered Charges - Accommodations
|
|
150 | ;66-75 Total Charges - Ancillary
|
|
120 | ;45 Record Type 91 Qualifier
|
|
30 | ;5-24 Patient Control Number, (SOURCE: FILE=9000001.41,FIELD=.02)
|
|
50 | ;29-30 Record Type 2n Count
|
|
40 | ;25-28 Physical Record Count
|
|
60 | ;31-32 Record Type 3n Count
|
|
START | ;START HERE
|
|
180 | ;88-192 Remarks
|
|
130 | ;46-55 Total Charges Accommodations
|
|
110 | ;43-44 Record Type 8n Count
|
|
70 | ;33-34 Record Type 4n Count
|
|
90 | ;38-40 Record Type 6n Count
|
|
80 | ;35-37 Record Type 5n Count
|
|
160 | ;76-85 Total Non-Covered Charges - Ancillary
|
|
100 | ;41-42 Record Type 7n Count
|
|
LOOP | ;LOOP HERE
|
|
170 | ;86-87 Filler
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^ABMDBILL( | 180+4, 180+6 |
^ABMEXLM("AA" | LOOP+3 |
Name | Line Occurrences |
---|---|
@( | LOOP+2, LOOP+3 |
LOOP | START+3 |
Name | Field # of Occurrence |
---|---|
^( | LOOP+3 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ABM | START+4! |
ABME | START+4! |
ABME("RTYPE" | START+2* |
>> ABMP("BDFN" | 30+1, 180+4, 180+6 |
>> ABMP("EXP" | LOOP+3 |
>> ABMP("INS" | LOOP+3 |
>> ABMP("NOFMT" | LOOP+4 |
>> ABMR(90 | LOOP+4, 10+1*, 20+1*, 20+2*, 30+1*, 30+2*, 40+1*, 50+1*, 50+2*, 60+1* , 70+1*, 80+1*, 90+1*, 100+1*, 110+1*, 120+1*, 130+1*, 140+1*, 150+1*, 160+1* , 170+1*, 180+1*, 180+5*, 180+6*, 180+8* |
>> ABMREC(90 | START+1!, LOOP+4* |
>> ABMRT(90 | START+4!, 40+1, 50+1, 50+2, 60+1, 70+1, 80+1, 90+1, 100+1, 110+1 , 130+1, 140+1, 150+1, 160+1 |
DUZ(2 | 180+4, 180+6 |
I | LOOP+1*, LOOP+2, LOOP+3, LOOP+4, 180+3~*, 180+4, 180+5, 180+6 |