SDESAPPTLETTERS ;ALB/BWF,TJB,JHC - VISTA SCHEDULING RPCS - LETTER PRINT ; March 14, 2025
Source file <SDESAPPTLETTERS.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| PRINTLETTER(SDRES,APPTIEN,LTYPE,SDEAS) | ;
 | 
|
| PRINTLETTERS(SDRES,APPTLIST,LTYPE,SDEAS) | ;
 | 
|
| VALAPPTS(ERRORS,LIST) | ;
 | 
|
| VALAPPT(ERRORS,APPTIEN) | ;
 | 
|
| VALLETTYPE(ERRORS,LTYPE) | ;
 | 
|
| VALIDATEEAS(ERRORS,SDEAS) | ;
 | 
|
| APPTLETTER(SDECY,SDECAPID,LT) | ||
| PRT(DFN,SDC,SD,LT,SDLET,SDFORM) | ;
 ; DFN - pointer to PATIENT file 2 ; SDC - pointer to HOSPITAL LOCATION file 44 ; SD - appointment time in FM format ; LT - Letter type - "N"=No Show; "P"=Pre-Appointment; "A"=Cancelled by Patient; "C"=Cancelled by Clinic ; SDLET - pointer to LETTER file 407.5 ; SDFORM - address location on letters (1 - bottom, 0 - top)  | 
|
| WRAPP(DFN,SDC,SD,LT,SDLET) | ;WRITE APPOINTMENT INFORMATION
 | 
|
| FORM(SDC,SDCL,SDX,LEXPROC) | ;
 | 
|
| REST(DFN,SDC,SD,LT,SDLET,SDFORM) | ;WRITE THE REMAINDER OF LETTER
 | 
|
| ADDR(DFN) | ;
 | 
|
| DTS(Y) | ;
 | 
|
| LAST4(DFN) | ;Return patient "last four"
 | 
|
| BADADD | ;Print patients with a Bad Address Indicator
 | 
|
| TST(SDCL,DOW) | ; handle scheduled tests
 | 
|
| FILL(PADS,CHAR) | 
| RPC Name | Call Tags | 
|---|---|
| SDES PRINT APPT LETTER | PRINTLETTER | 
| SDES PRINT APPT LETTERS | PRINTLETTERS | 
| FileNo | Call Tags | 
|---|---|
| 2.98 | GET1^DIQ | 
| ^DG(40.8 - [#40.8] | GET1^DIQ | 
| ^VA(407.5 - [#407.5] | GET1^DIQ | 
| ^SDEC(409.831 - [#409.831] | GET1^DIQ | 
| ^SDEC(409.84 - [#409.84] | GETS^DIQ | 
| ^DG(43 - [#43] | GET1^DIQ | 
| ^SC - [#44] | GET1^DIQ | 
| 44.1 | GET1^DIQ | 
| ^DIC(5 - [#5] | GET1^DIQ |