Routine: SDVSIT

Package	Total	Call Graph
Scheduling	3	$$FIND^SDAM2 LOGDATA^SDAPIAP $$NEW^SDVSIT0
VA Fileman	2	^%DT ^DIE
IHS Changes To Scheduling	1	$$DIV^BSDU
Kernel	1	($$DT,$$NOW)^XLFDT

Package	Total	Caller Graph
Scheduling	6	SCCVEAE1 SCCVEAE3 SCCVEAP2 SCCVEAP4 SDAMEVT3 SDVSIT2

Entry Points

Name	Comments	DBIA/ICR reference
CSTOP(SDOE,SDCL0,SDVSIT,SDT)	;Process credit stop
SDOE(SDT,SDVSIT,SDVIEN,SDOEP)	; -- get visit & encounter
ARRAY(DFN,SDT,SDDA,SDIS,SDVSIT)	; -- setup sdvsit for disposition
AEUPD(SDVIEN,SDATYPE,SDOEP)	; -- update one entry in multiple ; input: SDVIEN := Visit file pointer ; SDATYPE := Appointment Type [optional] ; SDOEP := ien of ^SCE that is the parent encounter [optional]
LOCK(SDLOCK)	; -- lock "ADFN" node
DATECHCK(DATETIME)	;Validate FileMan date/time
UNLOCK(SDLOCK)	; -- unlock "ADFN" node
DIV(DIV)	; -- determine med div
AEUPDQ
APPTQ
DISPQ
APPT(DFN,SDT,SDCL,SDVIEN)	; -- 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]
DISP(DFN,SDT,SDVIEN)	; -- process disposition ; input DFN = ien of patient file entry ; SDT = visit date internal format ; SDIV = ien of med ctr file entry ; SDVIEN = Visit file pointer [optional]
DIVQ

Name	Field # of Occurrence
^%DT	DATECHCK+20
$$DIV^BSDU	DIV+1
^DIE	APPT+45, DISP+22
$$FIND^SDAM2	APPT+15
LOGDATA^SDAPIAP	CSTOP+20
$$NEW^SDVSIT0	SDOE+3
$$DT^XLFDT	DATECHCK+22
$$NOW^XLFDT	DATECHCK+11

Name	Line Occurrences (* Changed, ! Killed)
^AUPNVSIT - [#9000010]	AEUPD+7
^DG(40.8 - [#40.8]	DIV+3, DIV+4
^DG(43 - [#43]	DIV+3
^DIC(40.7 - [#40.7]	AEUPD+26, CSTOP+10, ARRAY+3
^DPT - [#2]	APPT+14, ARRAY+2
^SC - [#44]	AEUPD+20, AEUPD+26, AEUPD+36, APPT+15, APPT+16
^SCE("ADFN"	LOCK+1, UNLOCK+1
^SCE("AVSIT"	AEUPD+18

Name	Line Occurrences
$$DIV	AEUPD+21, APPT+17, ARRAY+4
$$SDOE	AEUPD+35, APPT+42, CSTOP+19, DISP+21
AEUPDQ	AEUPD+7, AEUPD+10, AEUPD+18, AEUPD+22, AEUPD+27
APPTQ	APPT+20, APPT+21, APPT+22, APPT+34
ARRAY	DISP+14
CSTOP	AEUPD+37, APPT+47
DISPQ	DISP+17, DISP+18
DIVQ	DIV+3
LOCK	AEUPD+15, APPT+11, DISP+11
UNLOCK	AEUPDQ, APPTQ, DISPQ

Name	Field # of Occurrence
^(0	AEUPD+7

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	DATECHCK+13~, DATECHCK+19*
DA	AEUPD+5~, APPT+6~, APPT+44~, APPT+45, DISP+6~, DISP+22
DA(1	APPT+45, DISP+22
DATE	DATECHCK+13~, DATECHCK+15, DATECHCK+18, DATECHCK+22, DATECHCK+24, DATECHCK+45
DATETIME	DATECHCK~, DATECHCK+11, DATECHCK+15, DATECHCK+16
DE	AEUPD+5~
DFN	APPT~, APPT+9, APPT+14, APPT+15, APPT+37, APPT+45, DISP~, DISP+9, DISP+14, DISP+22 , ARRAY~, ARRAY+2, ARRAY+6
DIE	AEUPD+5~, APPT+6~, APPT+44~, APPT+45, DISP+6~, DISP+22
DIV	DIV~, DIV+1, DIV+3, DIV+4*, DIVQ
DQ	AEUPD+5~
DR	AEUPD+5~, APPT+6~, APPT+44~, APPT+45, DISP+6~, DISP+22
HR	DATECHCK+13~, DATECHCK+26, DATECHCK+32, DATECHCK+34, DATECHCK+36, DATECHCK+37*, DATECHCK+43
MIN	DATECHCK+13~, DATECHCK+27, DATECHCK+30, DATECHCK+32, DATECHCK+34, DATECHCK+38, DATECHCK+39, DATECHCK+43
SD0	AEUPD+5~, AEUPD+7*, AEUPD+8, AEUPD+9, AEUPD+13, AEUPD+20, AEUPD+24, AEUPD+26, AEUPD+29, AEUPD+30
SDATYPE	AEUPD~, AEUPD+31
SDCL	APPT~, APPT+15, APPT+16, APPT+21, APPT+37
SDCL0	AEUPD+5~, AEUPD+36, AEUPD+37, APPT+6~, APPT+15, APPT+17, APPT+20, APPT+47, CSTOP~, CSTOP+8 , CSTOP+10, CSTOP+13, CSTOP+23
SDDA	APPT+6~, APPT+15, APPT+16, APPT+42, DISP+6~, DISP+14, DISP+22, ARRAY~, ARRAY+1, ARRAY+2 , ARRAY+8
SDIS	DISP+6~, DISP+14, DISP+17, ARRAY~, ARRAY+2*, ARRAY+4, ARRAY+5
SDLOCK	AEUPD+5~, AEUPD+15, AEUPDQ, APPT+6~, APPT+11, APPTQ, DISP+6~, DISP+11, DISPQ, LOCK~ , UNLOCK~
SDLOCK("DFN"	AEUPD+13, APPT+9, DISP+9*, LOCK+1, UNLOCK+1
SDLOCK("EVENT	DATE/TIME" , AEUPD+14, APPT+10, DISP+10*, LOCK+1, UNLOCK+1
SDOE	AEUPD+5~, AEUPD+35, AEUPD+37, APPT+6~, APPT+42, APPT+43, APPT+45, APPT+47, CSTOP~, CSTOP+8 , CSTOP+16, DISP+6~, DISP+21*, DISP+22
SDOEP	AEUPD~, AEUPD+32, AEUPD+35, SDOE~
SDPT	APPT+6~, APPT+14*, APPT+20, APPT+21, APPT+22, APPT+39
SDSC	APPT+6~, APPT+16*, APPT+20, APPT+38
SDT	AEUPD+5~, AEUPD+8*, AEUPD+14, AEUPD+35, AEUPD+37, APPT~, APPT+10, APPT+14, APPT+15, APPT+16 , APPT+42, APPT+45, APPT+47, CSTOP~, CSTOP+12, CSTOP+19, DISP~, DISP+10, DISP+14, DISP+21 , ARRAY~, ARRAY+1, SDOE~, SDOE+3
SDVIEN	AEUPD~, AEUPD+7, AEUPD+18, AEUPD+35, APPT~, APPT+42, DISP~, DISP+21, SDOE~, SDOE+1
SDVIENOR	CSTOP+9~, CSTOP+14*, CSTOP+24
SDVIENSV	CSTOP+9~, CSTOP+17*, CSTOP+25
SDVSIT	AEUPD+5~, AEUPD+35, AEUPD+37, APPT+6~, APPT+42, APPT+47, CSTOP~, CSTOP+19, DISP+6~, DISP+14 , DISP+21, ARRAY~, SDOE~, SDOE+3
SDVSIT("CLN"	AEUPD+24, AEUPD+26, AEUPD+27, APPT+17, APPT+34, CSTOP+8, CSTOP+13, CSTOP+23, DISP+18, ARRAY+3
SDVSIT("DFN"	AEUPD+9, AEUPD+10, APPT+37, ARRAY+6*
SDVSIT("DIV"	AEUPD+20, AEUPD+21, AEUPD+22, APPT+17, APPT+34, DISP+18, ARRAY+4
SDVSIT("ELG"	AEUPD+30, APPT+38, ARRAY+5*
SDVSIT("LOC"	AEUPD+29, AEUPD+36, APPT+37
SDVSIT("ORG"	AEUPD+33, APPT+42, CSTOP+14, CSTOP+15, CSTOP+24, ARRAY+7*
SDVSIT("PAR"	AEUPD+32, CSTOP+16, CSTOP+26!
SDVSIT("REF"	AEUPD+34, APPT+42, ARRAY+8*
SDVSIT("TYP"	AEUPD+31, APPT+39, ARRAY+10*
SDVSIT("VST"	CSTOP+17, CSTOP+18!, CSTOP+25, ARRAY+9, SDOE+1*
SEC	DATECHCK+13~, DATECHCK+28, DATECHCK+30, DATECHCK+34, DATECHCK+40, DATECHCK+41*, DATECHCK+43
TIME	DATECHCK+13~, DATECHCK+16, DATECHCK+24, DATECHCK+26, DATECHCK+27, DATECHCK+28, DATECHCK+43, DATECHCK+45
U	AEUPD+9, AEUPD+13, AEUPD+20, AEUPD+24, AEUPD+26, AEUPD+29, AEUPD+30, APPT+17, APPT+20, APPT+22 , APPT+38, APPT+39, CSTOP+8, CSTOP+10, CSTOP+12, CSTOP+13, CSTOP+23, DISP+17, ARRAY+4, ARRAY+5 , DIV+3
X	CSTOP+9~, CSTOP+10, CSTOP+12, CSTOP+19, CSTOP+20, DATECHCK+13~, DATECHCK+18*
Y	DATECHCK+13~, DATECHCK+22

Customize PDF page

Package: Scheduling

Routine: SDVSIT

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Caller Graph Total: 6

Entry Points

External References

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: