DG531065P ;ALB/JAM - EMERGENCY PATCH DG*5.3*1065 POST-INSTALL ROUTINE ;01 October 2021 10:00 AM
Source file <DG531065P.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
POST | ; Main entry point for post-install
; - Update the UAM web services to remove the API Key from the Context Root ; - Get the API key appropriate for the site and store in the PARAMETERS file (#8989.5) |
|
POST1(DGKEY) | ; Get the API Key
; DGKEY - (Pass by Reference) Set API Key into DGKEY |
|
POST2(DGKEY) | ; Set the API Key for the site into the PARAMETER file
|
|
POST3 | ; Set services to remove the API Key - use REGREST^XOBWLIB
|
|
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
|
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DGCNTXTRT | POST3+1~, POST3+8*, POST3+9*, POST3+10 |
DGCOUNT | POST1+2~, POST1+8*, POST1+12* |
DGDATA | POST1+2~, POST1+8*, POST1+9, POST1+12*, POST1+13 |
DGERR | POST2+1~, POST2+4, POST2+5, POST2+6, POST2+7 |
DGEXIT | POST1+2~, POST1+6*, POST1+8, POST1+9*, POST1+11*, POST1+12, POST1+13* |
DGFDA | POST2+1~ |
DGI | POST3+1~, POST3+3*, POST3+5, POST3+6, POST3+8, POST3+9 |
DGILOWCASE | POST3+1~, POST3+6*, POST3+8, POST3+9 |
DGKEY | POST+5~, POST+8, POST+9, POST1~, POST1+13*, POST2~, POST2+4 |
DGPREFIX | POST+5~, POST+7*, POST3+5 |
DGREGION | POST1+2~, POST1+6*, POST1+9*, POST1+13, POST1+14 |
DGSRVC | POST3+1~, POST3+5*, POST3+10 |
DGSTATION | POST1+2~, POST1+4*, POST1+9 |
Name | Field # of Occurrence |
---|---|
$T(KEYMAP+DGCOUNT | POST1+12 |
$T(REGMAP+DGCOUNT | POST1+8 |