Routine: SDESUPDRECREQ2

Information

SDESUPDRECREQ2 ;ALB/LAB,KML,MGD,RRM,ANU,BWF - VISTA SCHEDULING CREATE EDIT RECALL REQ RPC ;March 06, 2023

Name	Comments	DBIA/ICR reference
CREATERECREQ(RETN,DFN,ACCNO,SDCMT,FASTING,APPTP,RRPROVIEN,CLINIEN,APPTLEN,DATE,RECPPDT,DAPTDT,USERIEN,SECPDT,SDENTDT,EAS)	;CREATE recall request
UPDRECALLREQ(RETN,RECALLIEN,DFN,ACCNO,SDCMT,FASTING,APPTP,RRPROVIEN,CLINIEN,APPTLEN,DATE,RECPPDT,DAPTDT,USERIEN,SECPDT,EAS)	;update recall request
BLDREC	;build and file record
VALIDATE(ERRORS,SDCREATE)	;
INITINPUTPAR(SDCREATE)	;Initialized Input Paramaters
VALIDATERECALIEN(ERRORS,RECALLIEN)	;Validate Recall IEN
VALIDATEDFN(ERRORS,DFN)	;Validate Patient DFN
VALIDATEFASTING(ERRORS,FASTING)	;Validate Fasting
VALIDATEAPPTP(ERRORS,APPTP)	;Validate Appointment Type
VALIDATERRPRVIEN(ERRORS,RRPROVIEN)	;Validate Recall Provider IEN
VALIDATECLINIEN(ERRORS,CLINIEN)	;Validate Clinic IEN
VALIDATERECALLDT(ERRORS,RECALLDATE)	;Validate Recall Date
VALIDATERCDTNTRD(ERRORS,SDRCREATE,RECDTENTRD)	;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
VALIDATEUSERIEN(ERRORS,USERIEN)	;Validate User IEN
VALIDATESECPDT(ERRORS,SECPRNTDT)	;Validate Second Print Date
VALIDATESDCMT(ERRORS,SDCMT)	;Validate Length of Appointment
VALIDATEEAS(ERRORS,SDEAS)	;Validate SDEAS
RETURNERROR(ERRORS,SDRECREQ,RETN,SDCREATE)	;
SETEMPTYOBJ(SDRECREQ,SDCREATE)	;Set the object to NULL
KEY(RECALLIEN)	;check that user has the correct SECURITY KEY

RPC Name	Call Tags
SDES CREATE RECALL REQ 2	CREATERECREQ
SDES EDIT RECALL REQ 2	UPDRECALLREQ