Routine: SDES2RECLLREQ

Information

SDES2RECLLREQ ; ALB/TJB,TJB,JDJ,JAS - VISTA SCHEDULING CREATE/UPDATE RECALL REQUESTS ; Nov 25, 2024

Name	Comments	DBIA/ICR reference
CREATERECREQ(RETN,SDCONTEXT,SDINPUT)	;CREATE recall request
UPDRECALLREQ(RETN,SDCONTEXT,SDINPUT)	;RECALLIEN,DFN,ACCNO,SDCMT,FASTING,APPTP,RRPROVIEN,CLINIEN,APPTLEN,DATE,RECPPDT,DAPTDT,USERIEN,SECPDT,EAS) ;update recall request
BLDREC(SDFDA,SDINPUT,SDCONTEXT)	;build and file record
BLDCOMAUD(CAFDA,SDCONTEXT,SDINPUT,RECALLIEN,LASTNOTE)	; ; 403.57 COMMENT AUDIT multiple
VALIDATE(ERRORS,SDINPUT,SDCONTEXT)	;
VALIDATERECALIEN(ERRORS,RECALLIEN,USERDUZ)	;Validate Recall IEN
VALIDATEDFN(ERRORS,DFN,OLDDFN)	;Validate Patient DFN
VALIDATEFASTING(ERRORS,FASTING)	;Validate Fasting
VALIDATEAPPTP(ERRORS,APPTP)	;Validate Appointment Type from RECALL REMINDERS APPT TYPE (#403.51)
VALIDATERRPRVIEN(ERRORS,RRPROVIEN)	;Validate Recall Provider IEN
VALIDATECLINIEN(ERRORS,CLINIEN)	;Validate Clinic IEN
VALIDATERECALLDT(ERRORS,RECALLDATE)	;Validate Recall Date
VALIDATERCDTNTRD(ERRORS,RECDTENTRD,RECALLIEN)	;Validate Recall Date Entered
VALIDATEAPPTLEN(ERRORS,LENGTHOFAPPT)	;Validate Length of Appointment
VALIDATERECPPDT(ERRORS,RECPPTDT)	;Validate Recall Date Per Patient
VALIDATEDAPTDT(ERRORS,DTRMSENT)	;Validate Date Reminder Sent
VALIDATESECPDT(ERRORS,SECPRNTDT)	;Validate Second Print Date
VALIDATESDCMT(ERRORS,SDCMT)	;Validate Comment
VALIDATEACCNUM(ERRORS,SDACC)	;Validate ACCESSION NUMBER
RETURNERROR(ERRORS,SDRECREQ,RETN,REQIEN)	;
SETEMPTYOBJ(SDRECREQ,SDCREATE)	;Set the object to NULL
KEY(RECALLIEN,USERDUZ)	;check that user has the correct SECURITY KEY

RPC Name	Call Tags
SDES2 CREATE RECALL REQUEST	CREATERECREQ
SDES2 EDIT RECALL REQUEST	UPDRECALLREQ

FileNo	Call Tags
^SD(403.5 - [#403.5]	GET1^DIQ