ABME3HA0 ; IHS/ASDST/SDR - HCFA-1500 NSF 3.01 RECORD HA0 (Claim Root Segment) ;
Source file <ABME3HA0.m>
| Package | Total | Call Graph | 
|---|---|---|
| Third Party Billing | 2 | WRITE^ABMEF20 ($$FMT,SET)^ABMERUTL | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| 10 | ;1-3 Record type | |
| 20 | ;4-5 Sequence | |
| 30 | ;6-22 Patient Control Number | |
| 50 | ;40-320 Extra Narrative Data | |
| 40 | ;23-39 Line Item Control Number | |
| START | ;START HERE | |
| ADD | ;ADD TO RECORD | |
| EX(ABMX,ABMY,ABMZ) | ;EXTRINSIC FUNCTION HERE | |
| LOOP | ;LOOP HERE | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^ABMDBILL( | 50+1 | 
| ^ABMEXLM("AA" | LOOP+3 | 
| Name | Line Occurrences | 
|---|---|
| @( | LOOP+2, LOOP+3, EX+4 | 
| ADD | LOOP+4 | 
| LOOP | START+3 | 
| Name | Field # of Occurrence | 
|---|---|
| ^( | LOOP+3 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| ABM | START+4!, EX+7! | 
| ABME | START+4!, EX+7! | 
| >> ABMEF("LINE" | LOOP+5* | 
| >> ABMP("BDFN" | 50+1, EX+2* | 
| >> ABMP("EXP" | LOOP+3 | 
| >> ABMP("FMT" | EX+3*, EX+6* | 
| >> ABMP("INS" | LOOP+3 | 
| >> ABMP("NOFMT" | ADD+1, EX+3 | 
| >> ABMP("PCN" | 30+1 | 
| >> ABMR(64 | ADD+1, 10+1*, 20+1*, 20+2*, 30+1*, 30+2*, 40+1*, 40+2*, 50+1*, 50+2* , EX+5, EX+7! | 
| >> ABMREC(64 | START+1!, LOOP+5, ADD+1* | 
| ABMRV | START+4! | 
| ABMX | EX~, EX+4, EX+5, EX+7! | 
| ABMY | EX~, EX+2, EX+7! | 
| ABMZ | EX~, EX+7! | 
| DUZ(2 | 50+1 | 
| >> I | LOOP+1*, LOOP+2, LOOP+3, ADD+1 | 
| U | 50+1 | 
| >> Y | EX+5*, EX+8 |