Routine: SDESCHECKOUT

Name	Comments	DBIA/ICR reference
CHECKOUT(SDECY,APPTIEN,CHKOUTDT)	;Check Out appt ; Returns SDECY ; Input -- APPTIEN Appt IEN from 409.84 ; CHKOUTDT Appt Checkout Date/Time in ISO
VALCHKOUTDT(ERRORS,CHKOUTDT,CLINIC)	;
FIND(DFN,APPTDTTM,CLINICIEN)	; -- return appt ifn for pat ; input: DFN := ifn of pat. ; APPTDTTM := appt d/t ; CLINICIEN := ifn of clinic ; output: [returned] := ifn if pat has appt on date/time
VALID(DFN,CLINICIEN,APPTDTTM,SDDA)	; ; input: DFN := ifn of pat. ; APPTDTTM := appt d/t ; CLINICIEN := ifn of clinic ; SDDA := ifn of appt ; output: [returned] := 1 for valid appt., 0 for not valid
CHKOUT(DFN,APPTDTTM,CLINICIEN,SDDA,SDASK,CHKOUTDT,SDCOACT,SDLNE,SDECAPTID,SDQUIET,VPRV,ERRORS)	;Appt Check Out ; Input -- DFN Patient file IEN ; APPTDTTM Appointment Date/Time ; CLINICIEN Hospital Location file IEN for Appt ; SDDA IEN in ^SC multiple or null [Optional] ; SDASK Ask Check Out Date/Time [Optional] ; CHKOUTDT Date/Time of Check Out [Optional] ; SDCOACT Appt Mgmt Check Out Action [Optional] ; SDLNE Appt Mgmt Line Number [Optional] ; Input -- SDECAPTID Appointment ID ; SDQUIET No Terminal output 0=allow display 1=do not allow ; VPRV V Provider IEN - pointer to V PROVIDER file ; ERRORS Returned Array of errors
CODT(DFN,SDT,SDCL,SDDA)	; -- does appt have co date
NEW(DATE)	;-- return 1 if SD is turned on for ; Visit Tracking and optionally check if the date is past ; the cut over date for the new PCE interface. ; INPUT : DATE (Optional) Date to check for cut over. ; OUTPUT: 1 Yes, 0 No
GETAPT(DFN,SDT,SDCL,SDVIEN,ERRORS)	; ; ANU - Added ERRORS ; This utility will return the existing IEN for an Outpatient ; Encounter. If it fails to find an existing encounter, ; it will create a new Encounter and return the new IEN.
APPT(DFN,SDT,SDCL,SDVIEN,ERRORS)	; -- process appt ; input DFN = ien of patient file entry ; SDT = visit date internal format ; SDCL = ien of hospital location file entry ; SDVIEN = Visit file pointer [optional]
LOCK(SDLOCK)	; -- lock "ADFN" node
UNLOCK(SDLOCK)	; -- unlock "ADFN" node
SDOE(SDT,SDVSIT,SDVIEN,SDOEP)	; -- get visit & encounter
INP(DFN,VDATE)	; -- determine inpatient status ; dom is not an inpatient appt
DIV(DIV)	; -- determine med div ; multi-div
CSTOP(SDOE,SDCL,SDVSIT,SDT)	;Process credit stop
LOGDATA(SDOE,SDLOG)	; -- log user, date/time and other data
VIEN(SDOE,SDVIEN)	; -- stuff in Visit IEN if not already set ; -- needed for those sites that don't have ; scheduling turned on in Visit Tracking ; Required input SDOE = Outpatient Encounter pointer ; SDVIEN = Visit file pointer or null or zero
CHKOUT2(SDOE,DFN,APPTDTTM,CLINICIEN,CHKOUTDT,SDECAPTID,SDQUIET,VPRV,ERRORS)	;EP; called to ask check-out date/time ;SAT ADDED PARAMETERS CHKOUTDT, SDECAPTID, & SDQUIET ; Called by SDCO1 ; SDOE = Outpatient Encounter IEN ; DFN = Patient IEN ; APPTDTTM = Appt Date/Time ; CLINICIEN = Clinic IEN ; CHKOUTDT = APPT CHECKOUT TIME [OPTIONAL - USED WHEN SDQUIET=1] USER ENTERED FORMAT ; SDECAPTID = APPT ID - POINTER TO ^SDECAPPT ; SDQUIET = ALLOW NO TERMINAL INPUT/OUTPUT 0=ALLOW; 1=DO NOT ALLOW ; VPRV = V Provider IEN - pointer to V PROVIDER file ; ERRORS = Returned Array of errors
SCIEN(PAT,CLINIC,DATE)	;PEP; returns ien for appt in ^SC
CHK(SDSTB)	; -- is appointment checked out
STATUS(DFN,SDT,SDCL,SDATA,SDDA)	; -- return appt status ; input: DFN := ifn of pat. ; SDT := appt d/t ; SDCL := ifn of clinic ; SDATA := 0th node of pat appt entry ; SDDA := ifn for ^SC(clinic,"S",date,1,ifn) {optional} ; output: [returned] := appt status ifn ^ status name ^ print status ^ ; check in d/t ^ check out d/t ^ adm mvt ifn

Name

Comments

DBIA/ICR reference

;Check Out appt
; Returns SDECY
; Input -- APPTIEN Appt IEN from 409.84
; CHKOUTDT Appt Checkout Date/Time in ISO

;

; -- return appt ifn for pat
; input: DFN := ifn of pat.
; APPTDTTM := appt d/t
; CLINICIEN := ifn of clinic
; output: [returned] := ifn if pat has appt on date/time

VALID(DFN,CLINICIEN,APPTDTTM,SDDA)

;
; input: DFN := ifn of pat.
; APPTDTTM := appt d/t
; CLINICIEN := ifn of clinic
; SDDA := ifn of appt
; output: [returned] := 1 for valid appt., 0 for not valid

CHKOUT(DFN,APPTDTTM,CLINICIEN,SDDA,SDASK,CHKOUTDT,SDCOACT,SDLNE,SDECAPTID,SDQUIET,VPRV,ERRORS)

;Appt Check Out
; Input -- DFN Patient file IEN
; APPTDTTM Appointment Date/Time
; CLINICIEN Hospital Location file IEN for Appt
; SDDA IEN in ^SC multiple or null [Optional]
; SDASK Ask Check Out Date/Time [Optional]
; CHKOUTDT Date/Time of Check Out [Optional]
; SDCOACT Appt Mgmt Check Out Action [Optional]
; SDLNE Appt Mgmt Line Number [Optional]
; Input -- SDECAPTID Appointment ID
; SDQUIET No Terminal output 0=allow display 1=do not allow
; VPRV V Provider IEN - pointer to V PROVIDER file
; ERRORS Returned Array of errors

CODT(DFN,SDT,SDCL,SDDA)

; -- does appt have co date

NEW(DATE)

;-- return 1 if SD is turned on for
; Visit Tracking and optionally check if the date is past
; the cut over date for the new PCE interface.
; INPUT : DATE (Optional) Date to check for cut over.
; OUTPUT: 1 Yes, 0 No

GETAPT(DFN,SDT,SDCL,SDVIEN,ERRORS)

;
; ANU - Added ERRORS
; This utility will return the existing IEN for an Outpatient
; Encounter. If it fails to find an existing encounter,
; it will create a new Encounter and return the new IEN.

APPT(DFN,SDT,SDCL,SDVIEN,ERRORS)

; -- process appt
; input DFN = ien of patient file entry
; SDT = visit date internal format
; SDCL = ien of hospital location file entry
; SDVIEN = Visit file pointer [optional]

LOCK(SDLOCK)

; -- lock "ADFN" node

UNLOCK(SDLOCK)

; -- unlock "ADFN" node

SDOE(SDT,SDVSIT,SDVIEN,SDOEP)

; -- get visit & encounter

INP(DFN,VDATE)

; -- determine inpatient status ; dom is not an inpatient appt

DIV(DIV)

; -- determine med div
; multi-div

CSTOP(SDOE,SDCL,SDVSIT,SDT)

;Process credit stop

LOGDATA(SDOE,SDLOG)

; -- log user, date/time and other data

VIEN(SDOE,SDVIEN)

; -- stuff in Visit IEN if not already set
; -- needed for those sites that don't have
; scheduling turned on in Visit Tracking
; Required input SDOE = Outpatient Encounter pointer
; SDVIEN = Visit file pointer or null or zero

CHKOUT2(SDOE,DFN,APPTDTTM,CLINICIEN,CHKOUTDT,SDECAPTID,SDQUIET,VPRV,ERRORS)

;EP; called to ask check-out date/time ;SAT ADDED PARAMETERS CHKOUTDT, SDECAPTID, & SDQUIET
; Called by SDCO1
; SDOE = Outpatient Encounter IEN
; DFN = Patient IEN
; APPTDTTM = Appt Date/Time
; CLINICIEN = Clinic IEN
; CHKOUTDT = APPT CHECKOUT TIME [OPTIONAL - USED WHEN SDQUIET=1] USER ENTERED FORMAT
; SDECAPTID = APPT ID - POINTER TO ^SDECAPPT
; SDQUIET = ALLOW NO TERMINAL INPUT/OUTPUT 0=ALLOW; 1=DO NOT ALLOW
; VPRV = V Provider IEN - pointer to V PROVIDER file
; ERRORS = Returned Array of errors

SCIEN(PAT,CLINIC,DATE)

;PEP; returns ien for appt in ^SC

CHK(SDSTB)

; -- is appointment checked out

STATUS(DFN,SDT,SDCL,SDATA,SDDA)

; -- return appt status
; input: DFN := ifn of pat.
; SDT := appt d/t
; SDCL := ifn of clinic
; SDATA := 0th node of pat appt entry
; SDDA := ifn for ^SC(clinic,"S",date,1,ifn) {optional}
; output: [returned] := appt status ifn ^ status name ^ print status ^
; check in d/t ^ check out d/t ^ adm mvt ifn

FileNo	Call Tags
2.98	GET1^DIQ
^DIC(40.7 - [#40.7]	GET1^DIQ
^DGPM - [#405]	GET1^DIQ
^SCE - [#409.68]	Classic Fileman Calls, GET1^DIQ
^SDEC(409.831 - [#409.831]	GET1^DIQ
^SDEC(409.84 - [#409.84]	GET1^DIQ, GETS^DIQ
^DIC(42 - [#42]	GET1^DIQ
^DG(43 - [#43]	GET1^DIQ
^SC - [#44]	GETS^DIQ
44.003	GET1^DIQ
^AUPNVSIT - [#9000010]	GET1^DIQ, GETS^DIQ

Customize PDF page

Package: Scheduling

Routine: SDESCHECKOUT

Information

Source Information

Entry Points

Used in RPC

FileMan Files Accessed Via FileMan Db Call