DG53142P ;ALB/ABR - POST INSTALL ROUTINE ; 12 - Sep - 97
Source file <DG53142P.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 |
|---|---|---|
| EN | ; ENVIRONMENT CHECK ENTRY POINT
|
|
| FTS | ; code for the KIDS post-install questions.
|
|
| POS | ; entry point for post-install
|
|
| ADDSP | ; add SPECIALTY 38 and 39
|
|
| ADDCO | ;PTF CODE^NAME^CDR ACCT
|
|
| SPEC | ; inactivate SPECIALTY 76
|
|
| SUFFIX | ; Add Suffix
|
|
| INAFTS | ; inactivate associated facility treating specialties
|
|
| ASK | ; for individual run, ask ok for each ts
|
| FileNo | Call Tags |
|---|---|
| ^DIC(42.4 - [#42.4] | Classic Fileman Calls |
| ^DIC(45.68 - [#45.68] | Classic Fileman Calls |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CDR | ADDSP+4~, ADDSP+7*, ADDSP+11 |
| DA | ADDSP+4~, ADDSP+10*, ADDSP+17*, SPEC+2~, SPEC+8*, SUFFIX+2~, SUFFIX+11*, INAFTS+2~, INAFTS+11* |
| DA(1 | ADDSP+13*, ADDSP+17*, SPEC+4*, SPEC+8*, SUFFIX+8*, INAFTS+4*, INAFTS+11* |
| DD | ADDSP+3!, SPEC+1!, SUFFIX+1!, INAFTS+1! |
| DGINA | POS+1~, POS+11*, INAFTS+8 |
| DGNAME | INAFTS+2~, INAFTS+6*, INAFTS+10, INAFTS+13, ASK+2 |
| DGOKAY | INAFTS+2~, INAFTS+8*, ASK+4* |
| DGX | FTS+1~, FTS+3*, FTS+4, INAFTS+2~, INAFTS+3*, INAFTS+4, INAFTS+6, INAFTS+11 |
| DGY | FTS+1~, FTS+2*, FTS+4*, FTS+5, FTS+6*, FTS+7*, FTS+8 |
| DGZ | FTS+1~, FTS+2*, FTS+5 |
| DIC | ADDSP+4~, ADDSP+6*, ADDSP+13*, SPEC+2~, SPEC+3*, SUFFIX+2~, SUFFIX+4*, SUFFIX+8*, INAFTS+2~, INAFTS+4* |
| DIC("P" | ADDSP+13*, SPEC+3*, SUFFIX+8*, INAFTS+4* |
| DIC(0 | ADDSP+6*, ADDSP+13*, SPEC+3*, SUFFIX+4*, SUFFIX+8*, INAFTS+4* |
| DIE | ADDSP+4~, ADDSP+6*, ADDSP+13*, SPEC+2~, SPEC+3*, SUFFIX+2~, SUFFIX+8*, INAFTS+2~, INAFTS+4* |
| DINUM | ADDSP+4~, ADDSP+7* |
| DIR | ASK+1~ |
| DIR("A" | FTS+2, FTS+4*, FTS+6*, FTS+7*, FTS+8*, ASK+2*, ASK+3* |
| DIR("B" | ASK+3* |
| DIR(0 | ASK+3* |
| DLAYGO | ADDSP+4~, ADDSP+5*, SUFFIX+2~, SUFFIX+3* |
| DO | ADDSP+3!, SPEC+1!, SUFFIX+1!, INAFTS+1! |
| DR | ADDSP+4~, ADDSP+11*, ADDSP+17*, SPEC+2~, SPEC+8*, SUFFIX+2~, SUFFIX+12*, INAFTS+2~, INAFTS+11* |
| ERR | POS+1~, POS+2, POS+3, SPEC+6* |
| I | ADDSP+1~, ADDSP+2* |
| NAM | ADDSP+4~, ADDSP+7* |
| SPC | ADDSP+4~, ADDSP+7*, ADDSP+9, ADDSP+10, ADDSP+13, ADDSP+17 |
| TXT | ADDSP+4~, ADDSP+7*, ADDSP+15 |
| U | ADDSP+7, ADDSP+10, ADDSP+13, ADDSP+15, SPEC+3, SUFFIX+8, INAFTS+4 |
| X | ADDSP+4~, ADDSP+7*, ADDSP+14*, SPEC+2~, SPEC+4*, SUFFIX+2~, SUFFIX+5*, SUFFIX+8*, INAFTS+2~, INAFTS+5* , ASK+1~ |
| >> XPDQUES("POS1" | POS+2, POS+11 |
| Y | ADDSP+4~, ADDSP+9, ADDSP+10, ADDSP+16, ADDSP+17, SPEC+2~, SPEC+6, SPEC+8, SUFFIX+2~, SUFFIX+6 , SUFFIX+8, SUFFIX+10, SUFFIX+11, INAFTS+2~, INAFTS+9, INAFTS+11, ASK+1~, ASK+4 |
| Y(0 | SPEC+7, INAFTS+10 |
| Name | Field # of Occurrence |
|---|---|
| $T(ADDCO+I | ADDSP+7 |
