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 |