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 |