Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: SDES25

Package: Scheduling

Routine: SDES25


Information

SDES25 ;ALB/MGD/LEG - VISTA SCHEDULING RPCS ;June 7, 2021@13:07

Source Information

Source file <SDES25.m>

Entry Points

Name Comments DBIA/ICR reference
CHECKIN(JSON,SDECAPTID,SDECCDT,SDECCC,SDECPRV) ;
; RPC: SDES APPT CHECKIN JSON. Entry parameter tag is in SDES.
; This routine is based off of the existing SDES25 routine. It has been
; optimized and updated to return info in JSON format.
SDECCHK(SDECAPTID,SDECCDT) ;
APCHK(SDECZ,SDECPATID,SDECSC1,SDECCC,SDECPRV,SDECSTART,SDECCDT,DUZ) ;
CANCHKIN(DFN,SDCL,SDT) ; Logic to cancel a checkin if the checkin date/time is passed in as '@'
; input: DFN := ifn of patient
; SDCL := clinic#
; SDT := appt d/t
FIND(DFN,SDT,SDCL) ; -- return appt ifn for pat
; input: DFN := ifn of pat.
; SDT := appt d/t
; SDCL := ifn of clinic
; output: [returned] := ifn if pat has appt on date/time
VALID(DFN,SDCL,SDT,SDDA) ; -- return valid appt.
; **NOTE: For speed consideration the ^SC and ^DPT nodes must be
; check to see they exist prior to calling this entry point.
; input: DFN := ifn of pat.
; SDT := appt d/t
; SDCL := ifn of clinic
; SDDA := ifn of appt
; output: [returned] := 1 for valid appt., 0 for not valid
CHKEVT(SDECPAT,SDECSTART,SDECSC) ;EP Called by SDEC CHECKIN APPOINTMENT event
CHKEVT1(SDECRES,SDECSTART,SDECPAT,SDECSTAT) ;
CHKEVT3(SDECRES) ;
CHKEVTD(SDECPAT,SDECSTART,SDECSC) ;EP Called by SDEC CHECKIN APPOINTMENT event
CHECKOUT(SDECY,DFN,SDT,SDCODT,SDECAPTID,VPRV) ;Check Out appointment
CANCKOUT(SDECY,SDECAPTID) ;Cancel Check Out appointment
CANAPPT(SDECAPTID)
ERROR ;
ERR(JSONMSG) ;Error processing

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^SCE - [#409.68] GET1^DIQ
^SDEC(409.84 - [#409.84] Classic Fileman Calls
^AUPNVSIT - [#9000010] Classic Fileman Calls
Info |  Source |  Entry Points |  FileMan Files Accessed Via FileMan Db Call