ABMER41A ; IHS/ASDST/DMJ - UB92 EMC RECORD 41 (Claim Data Condition-Value) cont'd ;
Source file <ABMER41A.m>
Package | Total | Call Graph |
---|---|---|
Third Party Billing | 2 | $$EX^ABMER20 ($$FMT,SET)^ABMERUTL |
Name | Comments | DBIA/ICR reference |
---|---|---|
150 | ;Form Locator 31 (Lower) (SOURCE: FILE= FIELD=)
|
|
210 | ;Condition Code - 11 (SOURCE: FILE=9002274.4053, FIELD=.01)
|
|
EX(ABMX,ABMY) | ||
190 | ;Value Amount - 2 (SOURCE: FILE=9002274.4055, FIELD=.02)
; form locator #40a |
|
60 | ;Condition Code - 3 (SOURCE: FILE=9002274.4053, FIELD=.01)
; form locator #26 |
|
130 | ;Condition Code - 10 (SOURCE: FILE=9002274.4053, FIELD=.01)
|
|
110 | ;Condition Code - 8 (SOURCE: FILE=9002274.4053, FIELD=.01)
|
|
80 | ;Condition Code - 5 (SOURCE: FILE=9002274.4053, FIELD=.01)
; form locator #28 |
|
170 | ;Value Amount - 1 (SOURCE: FILE=9002274.4055, FIELD=.02)
; form locator #39a |
|
20 | ;Sequence
|
|
40 | ;Condition Code - 1 (SOURCE: FILE=9002274.4053 FIELD=.01)
; form locator #24 |
|
180 | ;Value Code - 2 (SOURCE: FIlE=9002274.4055, FIELD=.01)
; form locator #40a |
|
200 | ;Value Code - 3 (SOURCE: FILE=9002274.4055, FIELD=.01) D GET55
; form locator #40a |
|
140 | ;Form Locator 31 (Upper) (SOURCE: FILE=, FIELD=)
|
|
120 | ;Condition Code - 9 (SOURCE: FILE=9002274.4053, FIELD=.01)
|
|
70 | ;Condition Code - 4 (SOURCE: FILE=9002274.4053, FIELD=.01)
; form locator #27 |
|
90 | ;Condition Code - 6 (SOURCE: FILE=9002274.4053, FIELD=.01)
; form locator #29 |
|
100 | ;Condition Code - 7 (SOURCE: FILE=9002274.4053, FIELD=.01)
; form locator #30 |
|
160 | ;Value Code - 1 (SOURCE: FILE=9002274.4055, FIELD=.01)
; form locator #39a |
|
10 | ;Record type
|
|
30 | ;Patient Control Number, (SOURCE: FILE=9000001.41,FIELD=.02)
|
|
50 | ;Condition Code - 2 (SOURCE: FILE=9002274.4053 FIELD=.01)
; form locator #25 |
|
GET55 | ;GET VALUE CODES
|
|
GET53 | ;GET CONDITION CODES
|
|
LOOP | ;LOOP HERE
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^ABMDBILL( | GET53+4, GET53+6, GET55+4, GET55+6 |
^ABMDCODE - [#9002274.03] | GET53+7, GET55+7 |
^ABMEXLM("AA" | LOOP+3 |
Name | Line Occurrences |
---|---|
@( | LOOP+2, LOOP+3, EX+10 |
GET53 | 40+2, 50+2, 60+2, 70+2, 80+2, 90+2, 100+2, 110+1, 120+1, 130+1 , 210+1 |
GET55 | 160+2, 170+2, 180+2, 190+2, 200+2 |
Name | Field # of Occurrence |
---|---|
^( | LOOP+3 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> ABM("9SP" | 170+4, 190+4 |
>> ABM(53 | 40+3, 50+3, 60+3, 70+3, 80+3, 90+3, 100+2, 110+2, 120+2, 130+2 , 210+2, GET53+6*, GET53+7*, GET53+8*, GET53+9* |
>> ABM(55 | 160+3, 170+3, 180+3, 190+3, 200+3, GET53+1, GET55+1, GET55+6*, GET55+7*, GET55+8* |
>> ABME("S#" | LOOP+4, 20+1 |
>> ABMP("BDFN" | 30+1, GET53+4, GET53+6, GET55+4, GET55+6, EX+7* |
>> ABMP("EXP" | LOOP+3 |
>> ABMP("FMT" | EX+9*, EX+12* |
>> ABMP("INS" | LOOP+3 |
>> ABMP("NOFMT" | LOOP+4, EX+9 |
>> ABMR(41 | LOOP+4, 10+1*, 20+1*, 20+2*, 30+1*, 30+2*, 40+3*, 40+4*, 50+3*, 50+4* , 60+3*, 60+4*, 70+3*, 70+4*, 80+3*, 80+4*, 90+3*, 90+4*, 100+2*, 100+3* , 110+2*, 110+3*, 120+2*, 120+3*, 130+2*, 130+3*, 140+1*, 140+2*, 150+1*, 150+2* , 160+3*, 160+4*, 170+3*, 170+4*, 170+5*, 180+3*, 180+4*, 190+3*, 190+4*, 190+5* , 200+3*, 200+4*, 210+2*, 210+3*, EX+11, EX+13! |
>> ABMREC(41 | LOOP+4* |
ABMX | EX~, EX+10, EX+11, EX+13! |
ABMY | EX~, EX+7, EX+13! |
ABMZ | EX+13! |
>> CNT | GET53+3*, GET53+5*, GET53+6, GET53+7, GET53+8, GET55+3*, GET55+5*, GET55+6, GET55+7 |
DUZ(2 | GET53+4, GET53+6, GET55+4, GET55+6 |
I | LOOP+1*, LOOP+2, LOOP+3, LOOP+4, GET53+2~, GET53+3*, GET53+4*, GET53+6, GET53+9*, GET55+2~ , GET55+3*, GET55+4*, GET55+6, GET55+8* |
U | 160+3, 180+3, 200+3, GET53+7, GET55+7 |
>> Y | EX+11*, EX+14 |