DGJ1INIP ;ALB/MRY - Post-install of DGJ v1.0 ;[ 11/21/01 13:20 pm]
Source file <DGJ1INIP.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 |
|---|---|---|
| PKG | ; Retrieve 'DGJ' Package name
; Get Package IEN |
|
| UPD | ; - Update fields not updated by the KIDS install.
; fields: ; Short Description (#2); required field ; Description (#3) ; word processing field ; File (#6) ; multiple ; Fields ; multiple |
|
| FILE | ; - Replace File (#9.44) field.
; first remove (delete) existing fields. |
|
| FLDS | ; Add FIELD entries to File entries #40.8, #43, #405.
; Add ASSIGN A VERSION NUMBER? entries to File entries #393-393.41. |
|
| XPREF | ; Add 'DGJZ' entry to the EXCLUDED NAME SPACE (#919) field of DGJ.
|
|
| EXIT |
| Name | Field # of Occurrence |
|---|---|
| ABRT^DGJ1INIT | PKG+7, XPREF+7 |
| ^DIC | FILE+13, FLDS+5, XPREF+3, XPREF+7, XPREF+11 |
| FIND^DIC | PKG+2 |
| LIST^DIC | FILE+3 |
| ^DIE | FILE+8, FLDS+7, FLDS+8, FLDS+9, FLDS+10 |
| FILE^DIE | UPD+9 |
| WP^DIE | UPD+15 |
| BMES^XPDUTL | DGJ1INIP+6, PKG+8, UPD+10, UPD+16, FILE+14, FLDS+11, XPREF+8 |
| MES^XPDUTL | DGJ1INIP+7, PKG+9, UPD+11, UPD+17, FILE+15, FLDS+12, XPREF+9 |
| FileNo | Call Tags |
|---|---|
| ^DIC(9.4 - [#9.4] | Classic Fileman Calls, FIND^DIC, WP^DIE |
| 9.44 | LIST^DIC |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | FILE+8*, FLDS+6*, EXIT! |
| DA(1 | FILE+7*, FILE+11*, FILE+12, FLDS+2*, FLDS+3, XPREF+1*, XPREF+2, XPREF+10* |
| DGJARRY | FILE+2!, EXIT! |
| DGJARRY("DILIST" | PKG+4, PKG+5, PKG+6, FILE+5, FILE+6 |
| DGJFIEN | FILE+6*, FILE+8, EXIT! |
| >> DGJI | PKG+3*, PKG+4*, PKG+5, PKG+6 |
| DGJIEN | PKG+3*, PKG+6*, PKG+7, UPD+8, UPD+15, FILE+3, FILE+7, FILE+11, FLDS+2, XPREF+1 , EXIT! |
| DGJII | FILE+4*, FILE+5*, FILE+6, EXIT! |
| DIC | FILE+2~, FILE+11*, FILE+12*, FLDS+2*, FLDS+3*, FLDS+6, XPREF+1*, XPREF+2*, XPREF+6*, XPREF+10* , EXIT! |
| DIC("P" | FILE+12*, FLDS+3*, XPREF+2*, XPREF+10* |
| DIC(0 | FILE+12*, FLDS+2*, XPREF+2*, XPREF+6*, XPREF+10* |
| DIE | FILE+7*, FLDS+6*, EXIT! |
| >> DR | FILE+8*, FLDS+7*, FLDS+8*, FLDS+9*, FLDS+10* |
| ERR | UPD+12! |
| FDATA | UPD+8!, UPD+12! |
| FDATA( | UPD+8* |
| >> FLD | FLDS+7*, FLDS+8*, FLDS+9* |
| X | FILE+10*, FLDS+4*, FLDS+7, FLDS+8, FLDS+9, FLDS+10, XPREF+3*, XPREF+6*, XPREF+11*, EXIT! |
| >> Y | FLDS+6, XPREF+7, XPREF+10 |
