SDES842P ;ALB/MGD,LAB - SD*5.3*842 Post Init Routine ; Mar 10, 2023
Source file <SDES842P.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| FIND | ;FIND THE IEN FOR "VS GUI NATIONAL"
 | 
|
| VERSION | ;SET THE NEW VERSION UPDATE IN SDEC SETTING FILE #409.98 TO 1.7.40
 | 
|
| NOFIND | ;"VS GUI NATIONAL" NOT FOUND
 | 
|
| TASK | ;
 | 
|
| TASK2 | ;
 | 
|
| DISP | ; Disposition old Appointment Requests
 | 
|
| ;
 ; Get Station Number  | 
||
| MAIL2 | ;
 ; Appointment vs request data report  | 
|
| DATAREPORT | ;
 | 
|
| APPT(APPTREQINFO,APPTIEN,APPTDFN,APPTREQTYP) | ;
 | 
|
| CONSULT(APPTREQINFO,APPTIEN,APPTDFN,APPTREQTYP) | ;
 | 
|
| REPORT(REQIEN,APPTREQTYP,APPTPATDFN,PATIENTNAME,REQPATDFN,APPTIEN,REQPATIENT) | ;
 | 
| FileNo | Call Tags | 
|---|---|
| ^GMR(123 - [#123] | GET1^DIQ | 
| ^DIC(4 - [#4] | GET1^DIQ | 
| ^SD(409.2 - [#409.2] | GET1^DIQ | 
| ^SDEC(409.84 - [#409.84] | GET1^DIQ | 
| ^SDEC(409.85 - [#409.85] | GET1^DIQ | 
| ^SDEC(409.853 - [#409.853] | FIND1^DIC | 
| ^XPD(9.7 - [#9.7] | FIND1^DIC, GET1^DIQ |