Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: SDVSIT

Package: Scheduling

Routine: SDVSIT


Information

SDVSIT ;MJK/ALB,JAS - Visit Tracking Processing ; OCT 24, 2025

Source Information

Source file <SDVSIT.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Scheduling 3 ($$FIND,$$INP)^SDAM2  LOGDATA^SDAPIAP  ($$NEW,VISIT)^SDVSIT0  
VA FileMan 3 ^%DT  ^DIE  GETS^DIQ  
Kernel 1 ($$DT,$$NOW)^XLFDT  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 7

Package Total Caller Graph
Scheduling 7 SCCVEAE1  SCCVEAE3  SCCVEAP2  SCCVEAP4  SD5396PT  SDAMEVT3  SDVSIT2  

Entry Points

Name Comments DBIA/ICR reference
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]
AEUPDQ
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]
APPTQ
CSTOP(SDOE,SDCL0,SDVSIT,SDT) ;Process credit stop
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]
DISPQ
ARRAY(DFN,SDT,SDDA,SDIS,SDVSIT) ; -- setup sdvsit for disposition
LOCK(SDLOCK) ; -- lock "ADFN" node
UNLOCK(SDLOCK) ; -- unlock "ADFN" node
DIV(DIV) ; -- determine med div
DIVQ
SDOE(SDT,SDVSIT,SDVIEN,SDOEP) ; -- get visit & encounter
DATECHCK(DATETIME) ;Validate FileMan date/time

External References

Name Field # of Occurrence
^%DT DATECHCK+20
^DIE APPT+55, DISP+22
GETS^DIQ SDOE+9
$$FIND^SDAM2 APPT+15
$$INP^SDAM2 APPT+35, SDOE+10
LOGDATA^SDAPIAP CSTOP+20
$$NEW^SDVSIT0 SDOE+17
VISIT^SDVSIT0 SDOE+16
$$DT^XLFDT DATECHCK+22
$$NOW^XLFDT DATECHCK+11

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AUPNVSIT - [#9000010] GETS^DIQ

Global Variables Directly Accessed

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

Label References

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

Naked Globals

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+54~, APPT+55*, DISP+6~, DISP+22*
DA(1 APPT+55*, 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+26, APPT+35, APPT+55, DISP~, DISP+9, DISP+14
, DISP+22, ARRAY~, ARRAY+2, ARRAY+6, SDOE+6, SDOE+10
DIE AEUPD+5~, APPT+6~, APPT+54~, APPT+55*, DISP+6~, DISP+22*
>> DILOCKTM LOCK+1
DIV DIV~, DIV+1, DIV+2*, DIVQ
DQ AEUPD+5~
DR AEUPD+5~, APPT+6~, APPT+54~, APPT+55*, 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+26
SDCL0 AEUPD+5~, AEUPD+36*, AEUPD+37, APPT+6~, APPT+15*, APPT+17, APPT+20, APPT+57, CSTOP~, CSTOP+8
, CSTOP+10, CSTOP+13, CSTOP+23
SDDA APPT+6~, APPT+15*, APPT+16, APPT+52, DISP+6~, DISP+14, DISP+22, ARRAY~, ARRAY+1*, ARRAY+2
, ARRAY+8
SDI SDOE+1~
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+52*, APPT+53, APPT+55, APPT+57, 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+28
SDSC APPT+6~, APPT+16*, APPT+20, APPT+27
SDT AEUPD+5~, AEUPD+8*, AEUPD+14, AEUPD+35, AEUPD+37, APPT~, APPT+10, APPT+14, APPT+15, APPT+16
, APPT+34, APPT+52, APPT+55, APPT+57, CSTOP~, CSTOP+12, CSTOP+19, DISP~, DISP+10, DISP+14
, DISP+21, ARRAY~, ARRAY+1, SDOE~, SDOE+2, SDOE+3, SDOE+16, SDOE+17
SDTR APPT+6~, APPT+34*, APPT+35, SDOE+1~, SDOE+2*, SDOE+3*, SDOE+6, SDOE+10
SDVIEN AEUPD~, AEUPD+7, AEUPD+18, AEUPD+35, APPT~, APPT+52, DISP~, DISP+21, SDOE~, SDOE+4
, SDOE+6, SDOE+14*, SDOE+15
SDVIEN1 SDOE+5~, SDOE+6*, SDOE+9, SDOE+10, SDOE+11, SDOE+12, SDOE+13, SDOE+14
SDVIENOR CSTOP+9~, CSTOP+14*, CSTOP+24
SDVIENSV CSTOP+9~, CSTOP+17*, CSTOP+25
SDVISARR SDOE+5~
SDVISARR(9000010 SDOE+10, SDOE+11, SDOE+12, SDOE+13
SDVSIT AEUPD+5~, AEUPD+35, AEUPD+37, APPT+6~, APPT+52, APPT+57, CSTOP~, CSTOP+19, DISP+6~, DISP+14
, DISP+21, ARRAY~, SDOE~, SDOE+16, SDOE+17
SDVSIT("CLN" AEUPD+24*, AEUPD+26*, AEUPD+27, APPT+17*, APPT+23, CSTOP+8, CSTOP+13*, CSTOP+23*, DISP+18, ARRAY+3*
, SDOE+11
SDVSIT("DFN" AEUPD+9*, AEUPD+10, APPT+26*, ARRAY+6*
SDVSIT("DIV" AEUPD+20*, AEUPD+21*, AEUPD+22, APPT+17*, APPT+23, DISP+18, ARRAY+4*
SDVSIT("DSS" APPT+32*, APPT+37, APPT+39, APPT+40, APPT+41
SDVSIT("ELG" AEUPD+30*, APPT+27*, ARRAY+5*
SDVSIT("IO" APPT+35*, APPT+44
SDVSIT("LOC" AEUPD+29*, AEUPD+36, APPT+26*, APPT+32, APPT+41, SDOE+12
SDVSIT("ORG" AEUPD+33*, APPT+52*, CSTOP+14, CSTOP+15*, CSTOP+24*, ARRAY+7*
SDVSIT("PAR" AEUPD+32*, CSTOP+16*, CSTOP+26!, SDOE+4
SDVSIT("REF" AEUPD+34*, APPT+52*, ARRAY+8*
SDVSIT("SVC" APPT+31*, APPT+39*, APPT+40*, APPT+41*, APPT+43*, APPT+45*, APPT+46*, APPT+48*, APPT+49*, SDOE+10
SDVSIT("TYP" AEUPD+31*, APPT+28*, ARRAY+10*
SDVSIT("VST" CSTOP+17, CSTOP+18!, CSTOP+25*, ARRAY+9*, SDOE+15*, SDOE+16
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+27, APPT+28, CSTOP+8, CSTOP+10, CSTOP+12, CSTOP+13, CSTOP+23, DISP+17, ARRAY+4, ARRAY+5
, DIV+1
X CSTOP+9~, CSTOP+10*, CSTOP+12, CSTOP+19*, CSTOP+20, DATECHCK+13~, DATECHCK+18*
Y DATECHCK+13~, DATECHCK+22
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All