ABME8HL ; IHS/ASDST/DMJ - 837 HL Segment
Source file <ABME8HL.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| 10 | ;segment
|
|
| 20 | ;HL01 - Hierarchical ID Number
|
|
| 30 | ;HL02 - Hierarchical Parent ID Number
|
|
| 50 | ;HL04 - Hierarchical Child Code
|
|
| 40 | ;HL03 - Hierarchical Level Code
|
|
| EP(X,Y) | ;EP - START HERE
|
|
| LOOP | ;LOOP HERE
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ABMEXLM("AA" | LOOP+3 |
| Name | Line Occurrences |
|---|---|
| @( | LOOP+2, LOOP+3 |
| LOOP | EP+9 |
| Name | Field # of Occurrence |
|---|---|
| ^( | LOOP+3 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ABM | EP+10! |
| >> ABMCHILD | EP+5*, 50+1 |
| ABME | EP+10! |
| ABME("RTYPE" | EP+8*, LOOP+3 |
| >> ABMHL | EP+4*, EP+7, 30+1, 40+1 |
| >> ABMHL( | EP+7*, 30+1, 30+2 |
| >> ABMHLCNT | EP+6*, EP+7, 20+1 |
| >> ABMP("EXP" | LOOP+3 |
| >> ABMP("INS" | LOOP+3 |
| >> ABMR("HL" | EP+3!, LOOP+5, 10+1*, 20+1*, 30+1*, 30+2*, 40+1*, 50+1* |
| >> ABMREC("HL" | EP+3!, LOOP+4*, LOOP+5* |
| >> I | LOOP+1*, LOOP+2, LOOP+3, LOOP+5 |
| X | EP~, EP+4 |
| Y | EP~, EP+5 |