ABME8PAT ; IHS/ASDST/DMJ - 837 PAT Segment
Source file <ABME8PAT.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| 10 | ;segment | |
| 20 | ;PAT01 - Individual Relationship Code | |
| 30 | ;PAT02 - Patient Location Code | |
| 50 | ;PAT04 - Student Status Code | |
| 40 | ;PAT03 - Employment Status Code | |
| 60 | ;PAT05 - Date Time Period Format Qualifier | |
| START | ;START HERE | |
| 70 | ;PAT06 - Date Time Period | |
| 90 | ;PAT08 - Weight | |
| 80 | ;PAT07 - Unit or Basis for Measurement Code | |
| 100 | ;PAT09 - Pregnancy Indicator | |
| LOOP | ;LOOP HERE | 
| Name | Field # of Occurrence | 
|---|---|
| $$REL^ABMUTLP | 20+1 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^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*, LOOP+3 | 
| >> ABMP("BDFN" | 20+1 | 
| >> ABMP("EXP" | LOOP+3 | 
| >> ABMP("INS" | LOOP+3 | 
| >> ABMR("PAT" | START+1!, LOOP+5, 10+1*, 20+1*, 30+1*, 40+1*, 50+1*, 60+1*, 70+1*, 80+1* , 90+1*, 100+1* | 
| >> ABMREC("PAT" | START+1!, LOOP+4*, LOOP+5* | 
| >> I | LOOP+1*, LOOP+2, LOOP+3, LOOP+5 |