SDES2APTLETTER ;ALB/TJB,TJB,TJB - VISTA SCHEDULING RPCS - LETTER PRINT ; JAN 31, 2025
Source file <SDES2APTLETTER.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
PRINTLETTER(RESULTS,SDCONTEXT,SDINPUT) | ;
|
|
PRINTLETTERS(RESULTS,SDCONTEXT,SDINPUT) | ;
|
|
VALAPPTS(ERRORS,LIST,LTYPE) | ;
|
|
VALAPPT(ERRORS,APPTIEN,LTYPE) | ;
|
|
VALLETTYPE(ERRORS,LTYPE) | ;
|
|
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,SDLET) | ;
|
|
REST(DFN,SDC,SD,LT,SDLET,SDFORM) | ;WRITE THE REMAINDER OF LETTER
|
|
ADDR(DFN) | ;
|
|
DTS(Y) | ;
|
|
BADADD | ;Print patients with a Bad Address Indicator
|
|
TST(SDCL,DOW) | ; handle scheduled tests
|
|
FILL(PADS,CHAR) | ||
LILAST4(DFN) | ;Retrieve the first letter of the last name and append last 4 SSN of a patient
|
RPC Name | Call Tags |
---|---|
SDES2 PRINT APPT LETTER | PRINTLETTER |
SDES2 PRINT APPT LETTERS | PRINTLETTERS |
FileNo | Call Tags |
---|---|
^DPT - [#2] | GET1^DIQ |
2.98 | GET1^DIQ |
^DG(40.8 - [#40.8] | GET1^DIQ |
^VA(407.5 - [#407.5] | GET1^DIQ |
^VA(407.6 - [#407.6] | FIND1^DIC |
^SDEC(409.831 - [#409.831] | GET1^DIQ |
^SDEC(409.84 - [#409.84] | GET1^DIQ, GETS^DIQ |
^DG(43 - [#43] | GET1^DIQ |
^SC - [#44] | GET1^DIQ |
44.1 | GET1^DIQ |
^DIC(5 - [#5] | GET1^DIQ |