XBDHD1 ; IHS/ADC/GTH - COMPILES HEADER LINE ; [ 02/07/97 3:02 PM ]
Source file <XBDHD1.m>
| Package | Total | Caller Graph |
|---|---|---|
| IHS VA Utilities | 3 | XBDHD XBDHD2 XBDHDSP |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| WLINE | ;
|
|
| NOTES | ;
; WRITES THE CURRENT HEADER LINE AT THE TOP OF THE SCREEN ; INPUT = ^TMP("XBDH",$J,"HEADER",N),XBDHTHLW ; OUTPUT = XBDHHDSP,XBDHHDPD ; ALSO WRITES THE FIELD BOUNDARY LINE (AAAAAABBBCCCCC...) BELOW THE HEADER LINE ; THIS ROUTINE IS CALLED EVERY TIME THE HEADER LINE IS CHANGED BY THE EDITING PROCESS |
|
| INIT | ;
|
|
| EXIT | ;
|
|
| L3 | ;
|
|
| VAR | ;
|
|
| NEW | ;
|
|
| LINE | ;
|
|
| FIN | ;
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^TMP("XBDH" | INIT+4, VAR+1 |
| Name | Line Occurrences |
|---|---|
| LINE | WLINE+1 |
| VAR | INIT+4 |
| Name | Field # of Occurrence |
|---|---|
| ^( | VAR+1 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DX | NEW+1~, INIT+3* |
| DY | NEW+1~, FIN+1*, LINE+1*, LINE+2* |
| IOF | INIT+1, INIT+5 |
| >> IOXY | FIN+2, LINE+2 |
| >> V | VAR+1 |
| >> XBDHCHLW | INIT+3*, VAR+1* |
| >> XBDHCHN | VAR+1* |
| XBDHCHN2 | NEW+1~, INIT+3*, INIT+4*, VAR+1, VAR+3, VAR+4 |
| >> XBDHECHN | VAR+4 |
| XBDHHDPD | NEW+1~, VAR+1*, VAR+2 |
| >> XBDHHDR | VAR+1*, VAR+2 |
| XBDHHDSP | NEW+1~, VAR+1*, VAR+2, VAR+5 |
| >> XBDHHDW | VAR+1*, VAR+2, VAR+5 |
| >> XBDHL | INIT+4* |
| XBDHL1 | NEW+1~, INIT+3*, VAR+2* |
| XBDHL2 | NEW+1~, INIT+3*, VAR+5*, L3+1 |
| XBDHL3 | NEW+1~, INIT+3*, L3+1* |
| >> XBDHNSL | INIT+3*, VAR+1* |
| >> XBDHTHLW | INIT+3, WLINE+1, L3+1 |
| >> XBDHWOFF | INIT+2 |
| XBDHX | FIN+1*, FIN+3, LINE+1*, LINE+2, VAR+5*, L3+1*, L3+2! |
| XBDHXX | VAR+3*, VAR+4*, VAR+5, L3+2! |
| XBDHY | LINE+2*, VAR+5*, L3+2! |
| >> XBDHZ | WLINE+1*, FIN+1, LINE+1 |