©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
ABMER40 ; IHS/ASDST/DMJ - UB92 EMC RECORD 40 (Claim Data) ;
Source file <ABMER40.m>
| Package | Total | Call Graph |
|---|---|---|
| Third Party Billing | 2 | ^ABMER40A ($$FMT,DFMT,S90,SET)^ABMERUTL |
| VA Fileman | 1 | EN^DIQ1 |
| Package | Total | Caller Graph |
|---|---|---|
| Local Area Programs | 1 | AZAXSND |
| Third Party Billing | 1 | ABMEF10 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| 210 | ;Occurrence Date 7 (SOURCE: FILE=9002274.4051, FIELD=.02)
; form locator #34b |
|
| EX(ABMX,ABMY) | ;EXTRINSIC FUNCTION HERE
|
|
| 310 | ;Occurrence Span Code 2 (SOURCE: FILE=9002274.4057, FIELD=.01)
; form locator #36a |
|
| 190 | ;Occurrence Date 6 (SOURCE: FILE=9002274.4051, FIELD=.02)
; form locator #33b |
|
| 270 | ;Occurrence Date 10 (SOURCE FILE=9002274.4051, FIELD=.02)
|
|
| 390 | ;Occurrence Span From Date 2 (SOURCE: FILE=9002274.4057, FIELD=.02)
; form locator #36b |
|
| 250 | ;Occurrence Date 9 (SOURCE: FILE=9002274.4051, FIELD=.02)
|
|
| 230 | ;Occurrence Date 8 (SOURCE: FILE=9002274.4051, FIELD=.01)
; form locator #35b |
|
| 180 | ;Occurrence Code 6 (SOURCE: FILE=9002274.4051, FIELD=.01)
; form locator #33b |
|
| 320 | ;Occurrence Span From Date 2 (SOURCE: FILE=9002274.4057, FIELD=.02)
; form locator #36a |
|
| 340 | ;Filler (National Use)
|
|
| 400 | ;Occurrence Span Through Date 2 (SOURCE: FILE=9002274.4057, FIELD=.03)
; form locator #36b |
|
| 280 | ;Occurrence Span Code 1 (SOURCE: FILE=9002274.4057, FIELD=.01)
; form locator #35a |
|
| 360 | ;Occurrence Span From Date 2 (SOURCE: FILE=9002274.4057, FIELD=.02)
; form locator #35b |
|
| 200 | ;Occurrence Code 7 (SOURCE: FILE=9002274.4051, FIELD=.01)
; form locator #34b |
|
| 300 | ;Occurrence Span Through Date 1 (SOURCE: FILE=9002274.4057, FIELD=.03)
; form locator #35a |
|
| 330 | ;Occurrence Span Through Date 2 (SOURCE: FILE=9002274.4057, FIELD=.03)
; form locator #36a |
|
| 380 | ;Occurrence Span Code 2 (SOURCE: FILE=9002274.4057, FIELD=.01)
; form locator #36b |
|
| START | ;START HERE
|
|
| 260 | ;Occurrence Code 10 (SOURCE: FILE=9002274.4051, FIELD=.01)
|
|
| 240 | ;Occurrence Code 9 (SOURCE: FILE=9002274.4051, FIELD=.01)
|
|
| GET57 | ;GET OCCURRENCE SPAN CODES
|
|
| 220 | ;Occurrence Code 8 (SOURCE: FILE=9002274.4051, FIELD=.01)
; form locator #35b |
|
| DIQ1 | ;PULL POLICY HOLDER DATA VIA DIQ1
|
|
| LOOP | ;LOOP HERE
|
|
| 350 | ;Occurrence Span Code 3 (SOURCE: FILE=9002274.4057, FIELD=.01)
; form locator #35b |
|
| 370 | ;Occurrence Span Through Date 2 (SOURCE: FILE=9002274.4057, FIELD=.03)
; form locator #35b |
|
| 290 | ;Occurrence Span From Date 1 (SOURCE: FILE=9002274.4057, FIELD=.02)
; form locator #35a |
|
| GET51 | ;GET OCCURANCE CODES
|
| Name | Field # of Occurrence |
|---|---|
| ^ABMER40A | LOOP+1 |
| $$FMT^ABMERUTL | 180+4, 190+6, 200+4, 210+6, 220+4, 230+6, 240+3, 250+5, 260+3, 270+5 , 280+4, 290+6, 300+6, 310+4, 320+6, 330+6, 340+2, 350+4, 360+6, 370+6 , 380+4, 390+6, 400+6 |
| DFMT^ABMERUTL | 190+4, 210+4, 230+4, 250+3, 270+3, 290+4, 300+4, 320+4, 330+4, 360+4 , 370+4, 390+4, 400+4 |
| S90^ABMERUTL | START+6 |
| SET^ABMERUTL | START+3, EX+8 |
| EN^DIQ1 | DIQ1+8 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ABMDBILL( | GET51+4, GET51+6, GET57+4, GET57+6 |
| ^ABMDCODE - [#9002274.03] | GET51+7, GET57+7 |
| ^ABMEXLM("AA" | LOOP+4 |
| Name | Line Occurrences |
|---|---|
| @( | LOOP+3, LOOP+4, EX+10 |
| GET51 | 180+2, 190+2, 200+2, 210+2, 220+2, 230+2, 240+1, 250+1, 260+1, 270+1 |
| GET57 | 280+2, 290+2, 300+2, 310+2, 320+2, 330+2, 350+2, 360+2, 370+2, 380+2 , 390+2, 400+2 |
| LOOP | START+5 |
| Name | Field # of Occurrence |
|---|---|
| ^( | LOOP+4 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ABM | START+7!, EX+13! |
| ABM( | DIQ1+1 |
| ABM(51 | 180+3, 190+3, 200+3, 210+3, 220+3, 230+3, 240+2, 250+2, 260+2, 270+2 , GET51+1, GET51+6*, GET51+7*, GET51+8*, GET51+9* |
| ABM(57 | 280+3, 290+3, 300+3, 310+3, 320+3, 330+3, 350+3, 360+3, 370+3, 380+3 , 390+3, 400+3, GET57+1, GET57+6*, GET57+7*, GET57+8* |
| ABME | EX+13! |
| ABME("FLD" | DIQ1+1 |
| ABME("RTYPE" | START+2* |
| ABME("S#" | START+4*, LOOP+5 |
| >> ABMP("BDFN" | DIQ1+1, DIQ1+6, EX+7*, GET51+4, GET51+6, GET57+4, GET57+6 |
| >> ABMP("EXP" | LOOP+4 |
| >> ABMP("FMT" | EX+9*, EX+12* |
| >> ABMP("INS" | LOOP+4 |
| >> ABMP("NOFMT" | LOOP+5, EX+9 |
| >> ABMR(40 | START+1!, LOOP+5, 180+3*, 180+4*, 190+5*, 190+6*, 200+3*, 200+4*, 210+5*, 210+6* , 220+3*, 220+4*, 230+5*, 230+6*, 240+2*, 240+3*, 250+4*, 250+5*, 260+2*, 260+3* , 270+4*, 270+5*, 280+3*, 280+4*, 290+5*, 290+6*, 300+5*, 300+6*, 310+3*, 310+4* , 320+5*, 320+6*, 330+5*, 330+6*, 340+1*, 340+2*, 350+3*, 350+4*, 360+5*, 360+6* , 370+5*, 370+6*, 380+3*, 380+4*, 390+5*, 390+6*, 400+5*, 400+6*, EX+11, EX+13! |
| >> ABMREC(40 | START+1!, LOOP+5* |
| ABMX | EX~, EX+10, EX+11, EX+13! |
| ABMY | EX~, EX+7, EX+13! |
| ABMZ | EX+13! |
| >> CNT | GET51+3*, GET51+5*, GET51+6, GET51+7, GET51+8, GET57+3*, GET57+5*, GET57+6, GET57+7 |
| >> DA | DIQ1+6* |
| >> DIC | DIQ1+5* |
| DIQ | DIQ1+3*, DIQ1+9! |
| DIQ(0 | DIQ1+4* |
| >> DR | DIQ1+7* |
| DUZ(2 | GET51+4, GET51+6, GET57+4, GET57+6 |
| I | LOOP+2*, LOOP+3, LOOP+4, LOOP+5, DIQ1+2~, GET51+2~, GET51+3*, GET51+4*, GET51+6, GET51+9* , GET57+2~, GET57+3*, GET57+4*, GET57+6, GET57+8* |
| U | 180+3, 200+3, 220+3, 240+2, 260+2, 280+3, 310+3, 350+3, 360+3, 370+3 , 380+3, 390+3, 400+3, GET51+7, GET57+7 |
| >> Y | 190+3*, 190+5, 210+3*, 210+5, 230+3*, 230+5, 250+2*, 250+4, 270+2*, 270+4 , 290+3*, 290+5, 300+3*, 300+5, 320+3*, 320+5, 330+3*, 330+5, 360+3*, 360+5 , 370+3*, 370+5, 390+3*, 390+5, 400+3*, 400+5, EX+11*, EX+14 |