ENLIB4 ;(WASH IRMFO)/DH-Package Utilities (Facility Equip) ;9.29.98
Source file <ENLIB4.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 |
|---|---|---|
| ADDUS | ; Maintain the utility system field down the parent/child hierarchy
; Called at set of field #82 in file #6914 ; Uses recursion to climb up and down the "AE" x-ref ; Will not maintain local x-refs on field #82 |
|
| ADRCRSN(PARNT,PRECRSR) | ; navigate the "AE" x-ref
|
|
| KILLUS | ; Maintain the utility system field down the parent/child hierarchy
; Called at kill |
|
| KLRCRSN(PARNT,PRECRSR) | ; navigate the "AE" x-ref, deleting utility systems field of all the children
|
|
| EDITY2 | ; called upon edit of Y2K category, restricts screen edits
|
| FileNo | Call Tags |
|---|---|
| ^ENG(6914 - [#6914] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ENG(6914 - [#6914] | ADDUS+5, ADRCRSN+2, ADRCRSN+4*, ADRCRSN+6, KILLUS+3, KLRCRSN+2, KLRCRSN+4*, KLRCRSN+6 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CHILD | ADRCRSN+1~, ADRCRSN+2*, ADRCRSN+3, ADRCRSN+4, ADRCRSN+6, KLRCRSN+1~, KLRCRSN+2*, KLRCRSN+3, KLRCRSN+4, KLRCRSN+6 |
| COUNT | ADDUS+4~, ADDUS+5*, ADDUS+6, ADRCRSN+4* |
| >> DA | ADDUS+5, KILLUS+3, EDITY2+4 |
| >> DJJ(21 | ADDUS+6 |
| >> DJJ(25 | EDITY2+1 |
| PARNT | ADDUS+4~, ADRCRSN~, ADRCRSN+2, ADRCRSN+3, ADRCRSN+6, KILLUS+2~, KLRCRSN~, KLRCRSN+2, KLRCRSN+3, KLRCRSN+6 |
| PRECRSR | ADDUS+4~, ADDUS+5*, ADRCRSN~, ADRCRSN+3, ADRCRSN+6, KILLUS+2~, KILLUS+3*, KLRCRSN~, KLRCRSN+3, KLRCRSN+6 |
| U | ADRCRSN+4, KLRCRSN+4, EDITY2+1 |
| >> V(25 | EDITY2+2 |
| >> X | ADRCRSN+4, EDITY2+2, EDITY2+4* |
