SDES844P ;ALB/MGD,TJB - SD*5.3*844 Post Init Routine ; May 24, 2023
Source file <SDES844P.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ; Entry point for the post-install routine
|
|
| FIND | ;FIND THE IEN FOR "VS GUI NATIONAL"
|
|
| VERSION | ;SET THE NEW VERSION UPDATE IN SDEC SETTING FILE #409.98 TO 1.7.42
|
|
| NOFIND | ;"VS GUI NATIONAL" NOT FOUND
|
|
| TASK | ;
|
|
| DISP | ; Disposition old OPEN Appointment Requests that have the STOP CODE "COMMUNITY CARE CONSULT"
|
|
| ;
; Get Station Number |
| FileNo | Call Tags |
|---|---|
| ^VA(200 - [#200] | FIND1^DIC |
| ^DIC(4 - [#4] | GET1^DIQ |
| ^DIC(40.7 - [#40.7] | FIND1^DIC |
| ^SDEC(409.853 - [#409.853] | FIND1^DIC |