GMRADSP8 ;HIRMFO/WAA-DISPLAY ALLERGY ;9/6/95 11:06
Source file <GMRADSP8.m>
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DISPLAY(ARRAY) | ;This subroutine will print out the Reactant
; ARRAY is the array that is passed |
|
| HEAD | ;Print the top of page for the display
|
|
| WRITE(NL,TAB,STRING,GMRAOUT,HEAD) | ; This will display all the
; text in a given string. ; Requited Variables: ; NL = Numeric repersentation of New lines ; = 0 No new line ; TAB = Number of tab spaces from the las given position ; STRING = The array of text to be printed. ; STRING(X) = Continue of string ; NOTE: This continuation will line feed and tab the same ; as the string itself. ; Optional variables ; GMRAOUT = The status of the Up-arrow out of a system. ; = "" use Page break function ; HEAD = HEADER SUB-ROUTINE |
|
| PAGE(HEAD) | ; Bottom of page program
; Input variable: ; HEAD = Header program to be run |
| Name | Field # of Occurrence |
|---|---|
| ^DIR | PAGE+9 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ARRAY | DISPLAY~, DISPLAY+3, DISPLAY+4 |
| CNT | DISPLAY+2~ |
| DIR | PAGE+6~ |
| DIR("?" | PAGE+8* |
| DIR("A" | PAGE+7* |
| DIR(0 | PAGE+7* |
| DIROUT | PAGE+10, PAGE+12! |
| DIRUT | PAGE+12! |
| DTOUT | PAGE+10, PAGE+12! |
| DUOUT | PAGE+11, PAGE+12! |
| GMAI | WRITE+16~, WRITE+18*, WRITE+21* |
| GMAX | WRITE+16~, WRITE+20* |
| GMRAOUT | DISPLAY+4, WRITE~, WRITE+15*, WRITE+17, WRITE+18*, WRITE+20, WRITE+21*, PAGE+4*, PAGE+10*, PAGE+11* , PAGE+14 |
| HEAD | WRITE~, WRITE+15*, WRITE+18, WRITE+21, PAGE~, PAGE+9 |
| IOSL | PAGE+5 |
| NL | WRITE~, WRITE+18, WRITE+21 |
| STRING | WRITE~, WRITE+17 |
| STRING( | WRITE+20 |
| TAB | WRITE~, WRITE+17, WRITE+20 |
| Y | PAGE+6~, PAGE+9 |
