Routine: SDCO1

Call Graph

Call Graph Total: 21

Package	Total	Call Graph
Scheduling	14	BLD^SDAM ($$STATUS,$$TIME)^SDAM1 ($$FIND,UPD)^SDAM2 ($$HANDLE,AFTER,BEFORE,EVT)^SDAMEVT EN^SDCO MC^SDCO5 $$ASK^SDCO6 ($$CHK,$$CODT)^SDCOU $$REQ^SDM1A $$NEW^SDPCE ($$COLLAT,$$ELSTAT,$$GAFCM,$$MHCLIN,$$NEWGAF)^SDUTL2 $$GETAPT^SDVSIT2 (ANSW,APPT,EN)^SDWLEVAL (INIT,LIST)^SDWLPL
Registration	2	($$FTIME,$$LOWER,FULL,PAUSE)^VALM1 EN^VALM2
VA Fileman	2	NOW^%DTC ^DIE
IHS Changes To Scheduling	1	CO^BSDCO1
Kernel	1	T0^%ZOSV
PCE Patient Care Encounter	1	$$INTV^PXAPI

Caller Graph

Caller Graph Total: 6

Package	Total	Caller Graph
Scheduling	6	SDAMEVT SDAMEX1 SDAPIAP SDCO7 SDCODEL SDCOM

Entry Points

Name	Comments	DBIA/ICR reference
COQ
EWLCHK	;check if patient has any open EWL entries (SD/372)
EN	;Entry point for SDCO APPT CHECK OUT protocol
AFTER(SDATA,DFN,SDT,SDCL,SDDA,SDHDL,SDLNE)	; -- event driver after ; not used
DIEQ
CO(DFN,SDT,SDCL,SDDA,SDASK,SDCODT,SDCOACT,SDLNE,SDCOALBF)	;Appt Check Out ; Input -- DFN Patient file IEN ; SDT Appointment Date/Time ; SDCL Hospital Location file IEN for Appt ; SDDA IEN in ^SC multiple or null [Optional] ; SDASK Ask Check Out Date/Time [Optional] ; SDCODT Date/Time of Check Out [Optional] ; SDCOACT Appt Mgmt Check Out Action [Optional] ; SDLNE Appt Mgmt Line Number [Optional] ; Output -- SDCOALBF Re-build Appt Mgmt List
BEFORE(SDATA,DFN,SDT,SDCL,SDDA,SDHDL)	; -- event driver before ; not used
CHK(SDSTB)	; -- is appointment checked out
DT(DFN,SDT,SDCL,SDDA,SDASK,SDCODT,SDCOQUIT)	;Update Check Out Date
DIE(SDCL,SDT,SDDA,DR)	; -- update appt data in ^SC
UPD(DFN,SDT,SDCL,SDLNE,SDSTB,SDSTA)	; -- update appt mgmt screen ; used by AFTER but AFTER is not used
ELIG(DFN,SDT,SDCL,SDDA)	; -- update elig if blank
DTQ

External References

Name	Field # of Occurrence
NOW^%DTC	EN+5
T0^%ZOSV	CO+10
CO^BSDCO1	CO+57
^DIE	DIE+3
$$INTV^PXAPI	CO+44
BLD^SDAM	EN+10
$$STATUS^SDAM1	CO+24
$$TIME^SDAM1	UPD+3
$$FIND^SDAM2	CO+12
UPD^SDAM2	UPD+2, UPD+3
$$HANDLE^SDAMEVT	BEFORE+1
AFTER^SDAMEVT	AFTER+1
BEFORE^SDAMEVT	BEFORE+2
EVT^SDAMEVT	AFTER+3
EN^SDCO	CO+55, CO+61, CO+65
MC^SDCO5	CO+33
$$ASK^SDCO6	CO+48
$$CHK^SDCOU	EN+9
$$CODT^SDCOU	CO+27
$$REQ^SDM1A	DT+5
$$NEW^SDPCE	CO+19
$$COLLAT^SDUTL2	CO+52
$$ELSTAT^SDUTL2	CO+51
$$GAFCM^SDUTL2	CO+54
$$MHCLIN^SDUTL2	CO+52
$$NEWGAF^SDUTL2	CO+53
$$GETAPT^SDVSIT2	CO+21, CO+64
ANSW^SDWLEVAL	EWLCHK+11, EWLCHK+12
APPT^SDWLEVAL	EWLCHK+4
EN^SDWLEVAL	EWLCHK+6
INIT^SDWLPL	EWLCHK+8
LIST^SDWLPL	EWLCHK+10, EWLCHK+11
$$FTIME^VALM1	DT+5
$$LOWER^VALM1	UPD+2
FULL^VALM1	EN+4
PAUSE^VALM1	CO+13
EN^VALM2	EN+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: EN+10
Function Call: WRITE	Prompt: !!,*7,">>> You cannot check out this appointment." Line Location: CO+13
Function Call: WRITE	Prompt: !!,"MUST ACCEPT OR ENTER A REASON NOT TO DISPOSITION MATCHED EWL ENTRY",! Line Location: EWLCHK+12
Routine Call	DIE Line Location: DIE+3

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(8 - [#8]	ELIG+3
^DPT - [#2]	CO+14, ELIG+3
^SC - [#44]	ELIG+2, DT+2, DT+3, DT+5
^SCE - [#409.68]	CO+44
^TMP("SDAM"	EN+8
^TMP("SDAMIDX"	EN+7
^TMP("SDWLPL"	EWLCHK+7!
^TMP($J	EWLCHK+3!, EWLCHK+5, EWLCHK+7!, EWLCHK+9, EWLCHK+11, EWLCHK+12

Label References

Name	Line Occurrences
$$CHK	CO+24
CO	EN+9
COQ	CO+13, CO+19
DIE	ELIG+4, DT+8
DTQ	DT+4
EWLCHK	COQ
UPD	AFTER+2

Naked Globals

Name	Field # of Occurrence
^(	EN+7
^("C"	DT+3
^(0	ELIG+3, DT+2*

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	EN+5, COQ!
%DT	DT+1~
DA	DIE+1~, DIE+2*
DA(1	DIE+2*
DA(2	DIE+2*
DE	DIE+3!
DFN	CO~, CO+12, CO+14, CO+21, CO+24, CO+27, CO+44, CO+51, CO+53, CO+57 , CO+64, EWLCHK+4, EWLCHK+6, EWLCHK+8, EWLCHK+10, EWLCHK+11, BEFORE~, BEFORE+1, BEFORE+2, AFTER~ , AFTER+1, AFTER+2, UPD~, UPD+2, ELIG~, ELIG+3, DT~
DIE	DIE+1~, DIE+2*
DQ	DIE+3!
DR	ELIG+1~, ELIG+4, DT+1~, DT+3, DT+4, DT+5, DT+6, DT+7, DT+8, DIE~
DT	UPD+3
IOF	EWLCHK+4
SDAMBOLD	UPD+1~
SDAMBOLD(	UPD+2*
SDAPTYP	CO+43~
SDASK	CO~, DT~, DT+4
SDAT	EN+7!*, EN+8, EN+9, EN+12!
SDATA	CO+11~, CO+14, CO+24, CO+52, BEFORE~, BEFORE+1, BEFORE+2, AFTER~, AFTER+1, AFTER+3
SDATA("AFTER"	AFTER+2
SDATA("BEFORE"	AFTER+2
SDCIDT	DT+1~, DT+3*, DT+5, DT+6
SDCL	CO~, CO+12, CO+21, CO+24, CO+27, CO+52, CO+57, CO+64, EWLCHK+4, BEFORE~ , BEFORE+1, BEFORE+2, AFTER~, AFTER+1, AFTER+2, UPD~, UPD+2, ELIG~, ELIG+2, ELIG+4 , DT~, DT+2, DT+3, DT+5, DT+8, DIE~, DIE+2
SDCOACT	CO~, CO+31
SDCOALBF	EN+1~, EN+9, EN+10, CO~, CO+19, CO+36
SDCOAP	EN+1~, EN+5, EN+6, EN+7, EN+9
SDCOBG	EN+1~, EN+10*
SDCODT	EN+1~, EN+5*, EN+9, CO~, DT~, DT+5, DT+6
SDCOED	CO+20~, CO+24*, CO+31, CO+42
SDCOMKF	CO+28~, CO+32~, CO+33, CO+36
SDCOQUIT	CO+11~, CO+33, CO+39*, CO+42, DT~
SDDA	CO~, CO+12*, CO+13, CO+24, BEFORE~, BEFORE+1, BEFORE+2, AFTER~, AFTER+1, ELIG~ , ELIG+2, ELIG+4, DT~, DT+3, DT+8, DIE~, DIE+2
SDELIG	CO+50~, CO+51*, CO+52
SDEV	EWLCHK+6~
SDEV(1	EWLCHK+6
>> SDGAFC	CO+48, CO+49, CO+54, CO+55
SDHDL	BEFORE~, BEFORE+1*, BEFORE+2, AFTER~, AFTER+1, AFTER+3
SDLNE	CO~, AFTER~, AFTER+2, UPD~, UPD+2, UPD+3
SDOE	CO+11~, CO+21, CO+33, CO+44, CO+55, CO+57, CO+61, CO+64, CO+65
SDR	EWLCHK+11~, EWLCHK+12~
SDSTA	UPD~, UPD+2, UPD+3
SDSTB	UPD~, UPD+2, CHK~, CHK+2
SDT	CO~, CO+12, CO+14, CO+19, CO+21, CO+24, CO+27, CO+57, CO+64, EWLCHK+4 , BEFORE~, BEFORE+1, BEFORE+2, AFTER~, AFTER+1, AFTER+2, UPD~, UPD+2, ELIG~, ELIG+2 , ELIG+4, DT~, DT+3, DT+5, DT+8, DIE~, DIE+2
SDTRES	CO+28~, CO+44*, CO+45
U	CO+44, CO+52, ELIG+2, ELIG+3, DT+5
>> VALMAR	EN+10
>> VALMBCK	EN+2, EN+11, CO+19*
>> VALMBG	EN+10*
VALMY	EN+1~
VALMY(	EN+6
X	ELIG+1~, ELIG+3, ELIG+4, DT+1~, DT+3, DT+4
>> XQORNOD(0	EN+3
>> XRTL	CO+10
Y	CHK+1~, CHK+2*, CHK+3

Customize PDF page

Package: Scheduling

Routine: SDCO1

Information

Source Information

Call Graph

Call Graph Total: 21

Caller Graph

Caller Graph Total: 6

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: