DG531014P ;ALB/MCF - DG*5.3*1014 POST-INSTALL ROUTINE ;24 July 2020 3:00 PM
Source file <DG531014P.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ; Main entry point for post-install to set up web server and services and recompile input templates
; create HWSC web server and web services entries |
|
| RECOMP | ;Recompile input templates
|
|
| INIT | ; Initialize variables DGPREFIX, DGSRVR, DGREGION, and DGKEY
|
|
| SERVICES | ; use REGREST^XOBWLIB
|
|
| SERVER | ; set up web server
|
|
| REGMAP | ; Station-to-Region mapping table - Format: ;;Station ID;VISN;Region;VHA Facility Name
|
|
| KEYMAP | ; Region 1: North Atlantic, 2: Southeast, 3: Midwest, 4: Continental, 5: Pacific - Format: ;;Region;Key
|
| Name | Field # of Occurrence |
|---|---|
| $$FIND1^DIC | SERVER+3 |
| FILE^DIE | SERVER+15 |
| UPDATE^DIE | SERVER+16, SERVER+31 |
| DIEZ^DIKCUTL3 | RECOMP+17 |
| $$GET1^DIQ | SERVER+26 |
| $$SITE^VASITE | INIT+6 |
| REGREST^XOBWLIB | SERVICES+9 |
| BMES^XPDUTL | EN+3, EN+4, EN+8, RECOMP+7, RECOMP+9, RECOMP+20, RECOMP+21, INIT+16, SERVICES+2 |
| MES^XPDUTL | RECOMP+10, RECOMP+11, SERVER+1, SERVER+18, SERVER+19, SERVER+32, SERVER+33 |
| FileNo | Call Tags |
|---|---|
| ^XOB(18.02 - [#18.02] | GET1^DIQ |
| ^XOB(18.12 - [#18.12] | FIND1^DIC |
| ^DPT - [#2] | DIEZ^DIKCUTL3 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^XOB(18.12 - [#18.12] | SERVER+25 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DGCNTXTRT | SERVICES+1~, SERVICES+7*, SERVICES+8*, SERVICES+9 |
| DGCOUNT | INIT+1~, INIT+10*, INIT+14* |
| DGDATA | INIT+1~, INIT+10*, INIT+11, INIT+14*, INIT+15 |
| DGERR | SERVER+2~ |
| DGERR02 | SERVER+2~ |
| DGERR02("DIERR" | SERVER+32, SERVER+33 |
| DGERR12 | SERVER+2~ |
| DGERR12("DIERR" | SERVER+18, SERVER+19, SERVER+32 |
| DGEXIT | INIT+1~, INIT+8*, INIT+10, INIT+11*, INIT+13*, INIT+14, INIT+15* |
| DGFDAI | SERVER+2~, SERVER+17, SERVER+28! |
| DGFDAI(1 | SERVER+17 |
| DGFLD | RECOMP+5~, RECOMP+17, RECOMP+18! |
| DGFLD( | RECOMP+15* |
| DGFLD(2 | RECOMP+14* |
| DGI | SERVICES+1~, SERVICES+3*, SERVICES+5, SERVICES+6, SERVICES+7, SERVICES+8, SERVER+2~, SERVER+21*, SERVER+22 |
| DGIEN | SERVER+2~ |
| DGIEN("SRV" | SERVER+3*, SERVER+4, SERVER+15, SERVER+16, SERVER+17*, SERVER+25 |
| DGIENS | SERVER+2~ |
| DGIENS("SRC" | SERVER+23*, SERVER+26*, SERVER+27, SERVER+29, SERVER+30 |
| DGIENS("SRV" | SERVER+4*, SERVER+5*, SERVER+6, SERVER+7, SERVER+9, SERVER+10, SERVER+11, SERVER+12, SERVER+13, SERVER+14 , SERVER+17*, SERVER+29, SERVER+30 |
| DGILOWCASE | SERVICES+1~, SERVICES+6*, SERVICES+7, SERVICES+8 |
| DGKEY | EN+2~, INIT+15*, SERVICES+7, SERVICES+8 |
| DGPREFIX | EN+2~, INIT+3*, INIT+4, SERVICES+5, SERVER+22 |
| DGREGION | EN+2~, INIT+8*, INIT+11*, INIT+15, INIT+16, SERVER+9 |
| DGSERVER | SERVER+2~ |
| DGSERVER( | SERVER+6*, SERVER+7*, SERVER+9*, SERVER+10*, SERVER+11*, SERVER+12*, SERVER+13*, SERVER+14* |
| DGSERVICE | SERVER+2~, SERVER+28! |
| DGSERVICE( | SERVER+29*, SERVER+30* |
| DGSRVC | SERVICES+1~, SERVICES+5*, SERVICES+9, SERVER+2~, SERVER+22*, SERVER+26, SERVER+29, SERVER+33 |
| DGSRVIEN | SERVER+2~, SERVER+24*, SERVER+25*, SERVER+26 |
| DGSRVR | EN+2~, INIT+4*, SERVER+3, SERVER+6, SERVER+18, SERVER+19 |
| DGSTATION | INIT+1~, INIT+6*, INIT+11 |