Routine: SDES25

Package	Total	Call Graph
Scheduling	7	($$HANDLE,AFTER,BEFORE,EVT)^SDAMEVT CO^SDEC25A GETVISIT^SDECAPI4 $$NETTOFM^SDECDATE $$SCIEN^SDECU2 (ENCODE,ERRLOG)^SDESJSON $$GETAPT^SDVSIT2
Kernel	3	($$FMTE,$$HTFM,$$NOW)^XLFDT ENCODE^XLFJSON $$KCHK^XUSRB
VA FileMan	2	(,FILE)^DIE $$GET1^DIQ

Package	Total	Caller Graph
Scheduling	1	SDES

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

Name	Field # of Occurrence
^DIE	CHECKIN+77, CANCKOUT+36, CANCKOUT+41, CANCKOUT+48, CANCKOUT+52, CANAPPT+16
FILE^DIE	SDECCHK+5, CANCHKIN+8
$$GET1^DIQ	CANCKOUT+44
$$HANDLE^SDAMEVT	CHECKIN+68, CHECKOUT+57, CANCKOUT+26
AFTER^SDAMEVT	CHECKIN+88, CHECKOUT+71, CANCKOUT+56
BEFORE^SDAMEVT	CHECKIN+69, CHECKOUT+61, CANCKOUT+30
EVT^SDAMEVT	CHECKIN+93, CHECKOUT+75, CANCKOUT+60
CO^SDEC25A	CHECKOUT+63
GETVISIT^SDECAPI4	APCHK+22
$$NETTOFM^SDECDATE	CHECKIN+34, CHECKOUT+28, CHECKOUT+31
$$SCIEN^SDECU2	CANCKOUT+39
ENCODE^SDESJSON	CHECKIN+98
ERRLOG^SDESJSON	CHECKIN+23, CHECKIN+24, CHECKIN+33, CHECKIN+34, CHECKIN+50, CHECKIN+51, CHECKIN+59, CHECKIN+63
$$GETAPT^SDVSIT2	CANCKOUT+43
$$FMTE^XLFDT	CHECKOUT+39
$$HTFM^XLFDT	CHECKOUT+34
$$NOW^XLFDT	SDECCHK+4, CANCKOUT+51
ENCODE^XLFJSON	ERR+2
$$KCHK^XUSRB	CHECKOUT+17, CANCKOUT+12

FileNo	Call Tags
^SCE - [#409.68]	GET1^DIQ
^SDEC(409.84 - [#409.84]	Classic Fileman Calls
^AUPNVSIT - [#9000010]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^DIC(40.7 - [#40.7]	CHECKIN+39
^DPT - [#2]	FIND+7, VALID+8
^SC - [#44]	CHECKIN+56, FIND+7, VALID+8
^SDEC(409.831 - [#409.831]	CHECKIN+51, CHECKIN+52, CHECKIN+53, CHKEVT+10, CHKEVT3+5, CHKEVTD+10, CHECKOUT+42, CANCKOUT+20, CANAPPT+10
^SDEC(409.84 - [#409.84]	CHECKIN+24, CHECKIN+44, CHKEVT1+7, CHKEVT1+8, CHKEVT1+9, CHECKOUT+19, CHECKOUT+37, CANCKOUT+14, CANCKOUT+15, CANAPPT+4 , CANAPPT+5
^TMP("SDEC"	CHECKOUT+13!, CHECKOUT+15, CHECKOUT+84, CHECKOUT+86, CANCKOUT+8!, CANCKOUT+10, CANCKOUT+63, CANCKOUT+65
^VA(200 - [#200]	CHECKIN+42

Name	Line Occurrences
$$CHKEVT1	CHKEVT+10
$$FIND	CHECKIN+68, CANCHKIN+6, CHECKOUT+57, CANCKOUT+26
$$VALID	FIND+7
APCHK	CHECKIN+76
CANCHKIN	CHECKIN+84
CHKEVT3	CHKEVT+11, CHKEVTD+11
ERR	CHECKOUT+17, CHECKOUT+18, CHECKOUT+19, CHECKOUT+34, CHECKOUT+39, CHECKOUT+80, CANCKOUT+12, CANCKOUT+13, CANCKOUT+14, CANCKOUT+21 , ERROR+1
SDECCHK	CHECKIN+75, CHECKIN+83, CHKEVT1+12

Name	Field # of Occurrence
^(	FIND+7
^(0	FIND+7

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	CHECKIN+16~, CHECKOUT+9~
APIERR	CHECKOUT+9~, CHECKOUT+51!, CHECKOUT+52*, CHECKOUT+63, CHECKOUT+67, CHECKOUT+78, CHECKOUT+82
APIERR(	CHECKOUT+80
APS	CANCKOUT+4~, CANCKOUT+16, CANCKOUT+50, CANCKOUT+51, CANAPPT+1~, CANAPPT+6
BSDMSG	APCHK+3~
BSDVSTN	CHECKIN+14~
CNT	CHECKOUT+9~, CHECKOUT+79, CHECKOUT+80
DA	CHECKIN+15~, CHECKIN+77, CANCKOUT+4~, CANCKOUT+34, CANCKOUT+39, CANCKOUT+46, CANCKOUT+51, CANAPPT+1~, CANAPPT+14
DA(1	CANCKOUT+39*
DA(2	CANCKOUT+39*
DFN	CHECKIN+45, CHECKIN+68, CHECKIN+69, CHECKIN+88, CANCHKIN~, CANCHKIN+6, FIND~, FIND+7, VALID~, VALID+8 , CHECKOUT~, CHECKOUT+57, CHECKOUT+61, CHECKOUT+63, CHECKOUT+71, CANCKOUT+4~, CANCKOUT+17, CANCKOUT+26, CANCKOUT+30, CANCKOUT+39 , CANCKOUT+43, CANCKOUT+56, CANAPPT+1~, CANAPPT+7*
DIE	CHECKIN+77, CANCKOUT+4~, CANCKOUT+33, CANCKOUT+38, CANCKOUT+46, CANCKOUT+51, CANAPPT+1~, CANAPPT+13
DIK	CHECKIN+15~
DR	CHECKIN+77, CANCKOUT+4~, CANCKOUT+35, CANCKOUT+40, CANCKOUT+47, CANCKOUT+51, CANAPPT+1~, CANAPPT+15
DUZ	CHECKIN+76, APCHK~, APCHK+10, CHECKOUT+17, CANCKOUT+12, CANCKOUT+35, CANCKOUT+51, CANAPPT+15
DUZ(2	APCHK+16
ERR	CHECKIN+16~, CHECKIN+98, CANCHKIN+9!, CHECKOUT+9~, CHECKOUT+80*
FDA	CANCHKIN+9!
FDA(	CANCHKIN+7*
JSON	CHECKIN~, CHECKIN+98
JSONMSG	CHECKIN+15~, CHECKIN+23, CHECKIN+24, CHECKIN+33, CHECKIN+34, CHECKIN+50, CHECKIN+51, CHECKIN+59, CHECKIN+63, CHECKIN+98 , ERR~, ERR+1
JSONMSG("Error"	ERR+1*
JSONMSG("RESULT"	CHECKIN+97*
RES	CANCKOUT+4~, CANCKOUT+19, CANCKOUT+20, CANAPPT+1~, CANAPPT+9, CANAPPT+10
RPCPERM	CHECKOUT+11~, CHECKOUT+16, CHECKOUT+17, CANCKOUT+6~, CANCKOUT+11, CANCKOUT+12
SDASK	CHECKOUT+10~, CHECKOUT+46*, CHECKOUT+63
SDATA	CHECKIN+67~, CHECKIN+68, CHECKIN+69, CHECKIN+88, CHECKIN+93, CHECKOUT+56~, CHECKOUT+57, CHECKOUT+61, CHECKOUT+71, CHECKOUT+75 , CANCKOUT+25~, CANCKOUT+26*, CANCKOUT+30, CANCKOUT+56, CANCKOUT+60
SDATA("AFTER"	CHKEVT+8, CHKEVTD+9
SDCIHDL	CHECKIN+67~, CHECKIN+68, CHECKIN+69, CHECKIN+88, CHECKIN+93, CHECKOUT+56~, CHECKOUT+57, CHECKOUT+61, CHECKOUT+71, CHECKOUT+75 , CANCKOUT+25~, CANCKOUT+26*, CANCKOUT+30, CANCKOUT+56, CANCKOUT+60
SDCL	CANCHKIN~, CANCHKIN+6, CANCHKIN+7, FIND~, FIND+7, VALID~, VALID+8, CHECKOUT+10~, CHECKOUT+43, CHECKOUT+57 , CHECKOUT+61, CHECKOUT+63, CHECKOUT+71, CANCKOUT+5~, CANCKOUT+20, CANCKOUT+26, CANCKOUT+30, CANCKOUT+38, CANCKOUT+39, CANCKOUT+43 , CANCKOUT+56, CANAPPT+1~, CANAPPT+10*
SDCOACT	CHECKOUT+10~, CHECKOUT+48*, CHECKOUT+63
SDCOALBF	CHECKOUT+10~, CHECKOUT+47*, CHECKOUT+63
SDCODT	CHECKOUT~, CHECKOUT+31*, CHECKOUT+34, CHECKOUT+39, CHECKOUT+63
SDDA	CHECKIN+67~, CHECKIN+68, CHECKIN+69, CHECKIN+88, CANCHKIN+5~, CANCHKIN+6, CANCHKIN+7, VALID~, VALID+8, CHECKOUT+10~ , CHECKOUT+45, CHECKOUT+56~, CHECKOUT+57, CHECKOUT+61, CHECKOUT+63, CHECKOUT+71, CANCKOUT+25~, CANCKOUT+26*, CANCKOUT+30, CANCKOUT+56
SDECAPPT	CHKEVT1+4~, CHKEVT1+8*, CHKEVT1+9, CHKEVT1+11, CHKEVT1+12
SDECAPTID	CHECKIN~, CHECKIN+22, CHECKIN+23, CHECKIN+24, CHECKIN+25, CHECKIN+44, CHECKIN+75, CHECKIN+77, CHECKIN+83, SDECCHK~ , SDECCHK+2, CHECKOUT~, CHECKOUT+18, CHECKOUT+19, CHECKOUT+37, CHECKOUT+63, CANCKOUT~, CANCKOUT+13, CANCKOUT+14, CANCKOUT+15 , CANCKOUT+34, CANAPPT~, CANAPPT+3, CANAPPT+4, CANAPPT+5, CANAPPT+14
SDECC	APCHK+3~, APCHK+22
SDECC("ADT"	APCHK+19*
SDECC("APPT D	ATE" , APCHK+8*, APCHK+19
SDECC("CDT"	APCHK+9*
SDECC("CLINIC	CODE" , APCHK+6*
SDECC("CLN"	APCHK+18*
SDECC("HOS LO	C" , APCHK+5*, APCHK+18
SDECC("PAT"	APCHK+4*
SDECC("PROVIDER"	APCHK+7*
SDECC("SITE"	APCHK+16*
SDECC("SRV CA	T" , APCHK+13*
SDECC("TIME R	ANGE" , APCHK+14*
SDECC("USR"	APCHK+10*
SDECC("VISIT	DATE" , APCHK+15, TYPE" , APCHK+17
SDECCAN	CHECKIN+16~, CHECKIN+18, CHECKIN+28, CHECKIN+34, CHECKIN+71, CHECKIN+79
SDECCC	CHECKIN~, CHECKIN+36, CHECKIN+39, CHECKIN+76, APCHK~, APCHK+6
SDECCDT	CHECKIN~, CHECKIN+27, CHECKIN+28, CHECKIN+33, CHECKIN+34, CHECKIN+75, CHECKIN+76, CHECKIN+93, SDECCHK~, SDECCHK+3 , SDECCHK+4, APCHK~, APCHK+9, APCHK+15
SDECFDA	SDECCHK+1~
SDECFDA(	SDECCHK+3, SDECCHK+4
SDECFOUND	CHKEVT+6~, CHKEVT+9, CHKEVT+10, CHKEVT+11, CHKEVT1+4~, CHKEVT1+5, CHKEVT1+6, CHKEVT1+7, CHKEVT1+8, CHKEVT1+10 , CHKEVT1+11, CHKEVT1+13, CHKEVTD+7~, CHKEVTD+12*
SDECI	CHECKOUT+11~, CHECKOUT+12, CHECKOUT+80, CHECKOUT+83, CHECKOUT+84, CHECKOUT+85, CHECKOUT+86, CANCKOUT+6~, CANCKOUT+7, CANCKOUT+62 , CANCKOUT+63, CANCKOUT+64*, CANCKOUT+65
SDECID	CHECKIN+15~
SDECIENS	CHECKIN+15~, SDECCHK+2*, SDECCHK+3, SDECCHK+4
SDECMSG	SDECCHK+1~
SDECNOD	CHECKIN+15~, CHECKIN+44, CHECKIN+45, CHECKIN+46, CHECKIN+48, CHECKIN+53, CHECKIN+54, CHECKIN+58, CHKEVT1+9, CHKEVT1+10 , CHECKOUT+11~, CHECKOUT+37, CHECKOUT+39, CHECKOUT+41, CHECKOUT+42, CHECKOUT+43, CANCKOUT+6~, CANCKOUT+15, CANCKOUT+16, CANCKOUT+17 , CANCKOUT+18, CANCKOUT+19, CANCKOUT+21, CANAPPT+2~, CANAPPT+5*, CANAPPT+6, CANAPPT+7, CANAPPT+8, CANAPPT+9, CANAPPT+11
SDECNOEV	CHECKIN+16~, CHECKIN+17*, CHKEVT+4, CHKEVTD+5
SDECOUT	APCHK+21~, APCHK+22
SDECPAT	CHKEVT~, CHKEVT+10, CHKEVT1~, CHKEVT1+10, CHKEVTD~
SDECPATID	CHECKIN+15~, CHECKIN+45*, CHECKIN+76, CHECKIN+84, APCHK~, APCHK+4
SDECPRV	CHECKIN~, CHECKIN+41, CHECKIN+42, CHECKIN+76, CHECKIN+77, APCHK~, APCHK+7
SDECR1	CHECKIN+16~, CHECKIN+48*, CHECKIN+50, CHECKIN+51, CHECKIN+52, CHECKIN+53
SDECRES	CHKEVT+6~, CHKEVT+10, CHKEVT+11, CHKEVT1~, CHKEVT1+6, CHKEVT1+7, CHKEVT1+8, CHKEVT3~, CHKEVT3+5, CHKEVTD+7~ , CHKEVTD+10, CHKEVTD+11, CHECKOUT+41*, CHECKOUT+42
SDECRESN	CHKEVT3+4~, CHKEVT3+5, CHKEVT3+6, CHKEVT3+7
SDECSC	CHKEVT~, CHKEVT+5, CHKEVT+10, CHKEVTD~, CHKEVTD+6, CHKEVTD+10
SDECSC1	CHECKIN+54*, CHECKIN+56, CHECKIN+58, CHECKIN+68, CHECKIN+69, CHECKIN+76, CHECKIN+84, CHECKIN+88, APCHK~, APCHK+5
SDECSTART	CHECKIN+15~, CHECKIN+46*, CHECKIN+68, CHECKIN+69, CHECKIN+76, CHECKIN+84, CHECKIN+88, APCHK~, APCHK+8, CHKEVT~ , CHKEVT+10, CHKEVT1~, CHKEVT1+7, CHKEVT1+8, CHKEVTD~
SDECSTAT	CHKEVT+6~, CHKEVT+7, CHKEVT+8, CHKEVT+10, CHKEVT1~, CHKEVT1+12, CHKEVTD+7~, CHKEVTD+8, CHKEVTD+9, CHKEVTD+10
>> SDECTYP	CHECKIN+93
SDECVEN	CHECKIN+15~
SDECY	CHECKOUT~, CHECKOUT+14, CANCKOUT~, CANCKOUT+9
SDECZ	CHECKIN+15~, CHECKIN+63, CHECKIN+76, APCHK~
SDESERRMSG2	CHECKIN+57~, CHECKIN+58*, CHECKIN+59
SDESERROR	CHECKIN+16~, CHECKIN+19, CHECKIN+23, CHECKIN+24, CHECKIN+33, CHECKIN+34, CHECKIN+49, CHECKIN+50, CHECKIN+51, CHECKIN+60 , CHECKIN+63, CHECKIN+97, ERR+3
SDLNE	CHECKOUT+10~, CHECKOUT+49*, CHECKOUT+63
SDN	CANCKOUT+5~, CANCKOUT+39*
SDOE	CANCKOUT+5~, CANCKOUT+43*, CANCKOUT+44, CANCKOUT+51
SDQUIET	CHECKOUT+10~, CHECKOUT+50*, CHECKOUT+63
SDT	CANCHKIN~, CANCHKIN+6, CANCHKIN+7, FIND~, FIND+7, VALID~, VALID+8, CHECKOUT~, CHECKOUT+28, CHECKOUT+57 , CHECKOUT+61, CHECKOUT+63, CHECKOUT+71, CANCKOUT+5~, CANCKOUT+18, CANCKOUT+26, CANCKOUT+30, CANCKOUT+38, CANCKOUT+39, CANCKOUT+43 , CANCKOUT+56, CANAPPT+1~, CANAPPT+8*
SDV	CANCKOUT+5~, CANCKOUT+44*, CANCKOUT+45, CANCKOUT+46
U	CHECKIN+45, CHECKIN+46, CHECKIN+48, CHECKIN+54, CHECKIN+58, CHECKIN+63, CHECKIN+68, VALID+8, CHKEVT1+10, CHECKOUT+39 , CHECKOUT+41, CHECKOUT+43, CHECKOUT+57, CANCKOUT+16, CANCKOUT+17, CANCKOUT+18, CANCKOUT+19, CANCKOUT+20, CANCKOUT+21, CANCKOUT+26 , CANAPPT+6, CANAPPT+7, CANAPPT+8, CANAPPT+9, CANAPPT+10, CANAPPT+11
VPRV	CHECKOUT~, CHECKOUT+63
X	CHECKIN+16~, CHECKOUT+9~
Y	CHECKIN+16~, FIND+6~, FIND+7*, FIND+8, CHECKOUT+9~

Customize PDF page

Package: Scheduling

Routine: SDES25

Information

Source Information

Call Graph

Call Graph Total: 12

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 1

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: