DGBT1P2 ;ALB/MRY - Patch #2 Environment Check ; 4/23/02 10:04 AM
Source file <DGBT1P2.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ;
|
|
| ABRT | ; Abort transport, but leave in ^XTMP.
|
|
| POST | ; Post install - add #392.31 file to list of DGBT files in Package file.
|
|
| PKG | ; Retrieve 'DGBT' Package name
; Get Package IEN |
|
| UPD | ; - Update fields not updated by the KIDS install.
; fields: ; File (#6) ; multiple ; Fields ; multiple |
|
| FILE | ; Add #392.31 to list of files under Bene Travel.
|
|
| FLDS | ; Add ASSIGN A VERSION NUMBER? entries to File entry #392.31
|
|
| DD | ;Hardset IDENTIFIER routine into DD (DBIA #4093)
|
|
| EXIT |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^DIC(9.4 - [#9.4] | Classic Fileman Calls, FIND^DIC |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | POST+1~, FLDS+5*, EXIT! |
| DA(1 | FILE+2*, FILE+3, FLDS+1*, FLDS+2 |
| DGBTARRY | POST+1~, EXIT! |
| DGBTARRY("DILIST" | PKG+4, PKG+5, PKG+6 |
| DGBTI | POST+1~, PKG+3*, PKG+4*, PKG+5, PKG+6, EXIT! |
| DGBTIEN | POST+1~, PKG+3*, PKG+6*, PKG+7, FILE+2, FLDS+1, EXIT! |
| DIC | POST+1~, FILE+2*, FILE+3*, FLDS+1*, FLDS+2*, FLDS+5, EXIT! |
| DIC("P" | FILE+3*, FLDS+2* |
| DIC(0 | FILE+3*, FLDS+1* |
| >> DIE | FLDS+5* |
| DR | POST+1~, FLDS+6*, EXIT! |
| DT | EN+2 |
| DUZ | EN+2 |
| DUZ(0 | EN+2 |
| U | EN+2 |
| X | POST+1~, FILE+1*, FLDS+3*, FLDS+6, EXIT! |
| >> XPDABORT | EN+1* |
| >> Y | FLDS+5 |