Routine: SDAM1

Call Graph

Call Graph Total: 10

Package	Total	Call Graph
Scheduling	4	LIST^SDAM (INIT,LARGE,NUL)^SDAM10 $$FIND^SDAM2 ($$COLLAT,$$ELSTAT,$$MHCLIN,$$NEWGAF)^SDUTL2
Registration	3	ADM^VADPT2 CHGCAP^VALM FLDCTRL^VALM10
IHS Changes To Scheduling	1	WLDIS^BSDAM
Kernel	1	$$FMTE^XLFDT
VA Fileman	1	C^%DTC

Package	Total	Caller Graph
Scheduling	23	SCRPW78 SDAM SDAM10 SDAM2 SDAM3 SDAMC SDAMEP1 SDAMEVT SDAMEX SDAMEX1 SDAMN SDAMOS SDAMU SDAPIAP SDCNP0 SDCO1 SDCOU SDN SDN2 SDNOS0 SDPCE2 SDPPAPP1 SDRPA05
Clinical Scheduling for Windows	3	BSDX25A BSDX37 BSDX38
Registration	3	DGVPTIB1 DGVPTIB2 DGVPTIB5
Automated Information Collection System	2	IBDF18E0 IBDFRPC3
IHS Changes To Scheduling	2	BSDAM BSDCF
Integrated Billing	2	IBECEAU IBOVOP1
PCE Patient Care Encounter	1	PXCESDA1

Package

Total

Caller Graph

Scheduling

SCRPW78  SDAM  SDAM10  SDAM2  SDAM3  SDAMC  SDAMEP1  SDAMEVT
SDAMEX  SDAMEX1  SDAMN  SDAMOS  SDAMU  SDAPIAP  SDCNP0  SDCO1
SDCOU  SDN  SDN2  SDNOS0  SDPCE2  SDPPAPP1  SDRPA05

Clinical Scheduling for Windows

BSDX25A BSDX37 BSDX38

Registration

DGVPTIB1 DGVPTIB2 DGVPTIB5

Automated Information Collection System

IBDF18E0 IBDFRPC3

IHS Changes To Scheduling

BSDAM BSDCF

Integrated Billing

IBECEAU IBOVOP1

PCE Patient Care Encounter

PXCESDA1

Entry Points

Name	Comments	DBIA/ICR reference
ANC()	; -- set ancillary info
STATUSQ
STAT1	; -- $$REQ & $$COCMP in SDM1A not used for speed
BLD1Q
LOWER(X)	; convert to lowercase ; same as LOWER^VALM1 ; here for speed
CHKQ
CHKENC	;SD*567 grab status from outpatient encounter for purged appts
SET(X)	;
INIT	; -- get init pat appt data ; input: DFN := ifn of pat ; output: ^TMP("SDAM" := appt array
CHK(DFN,SDT,SDCL,SDATA,SDAMLIST,SDSTAT,SDDA)	; -- does appt meet criteria ; input: DFN := ifn of pat. ; SDT := appt d/t ; SDCL := ifn of clinic ; SDATA := 0th node of pat appt entry ; SDAMLIST := list definition ; SDSTAT := appt status data from $$STATUS call ; SDDA := ifn for ^SC(clinic,"S",date,1,ifn) {optional} ; output: [returned] := meets criteria for list [0 - no \| 1 - yes ]
BLD	; -- scan apts	ICR #1317 Status: Retired Usage: Private
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	ICR #659 Status: Retired Usage: Private ICR #1103 Status: Retired Usage: Private ICR #2850 Status: Retired Usage: Private
BLD1	; -- build array
TIME(X)	; -- format time only := hr:min

External References

Name	Field # of Occurrence
C^%DTC	INIT+6, INIT+7
WLDIS^BSDAM	BLD+7
LIST^SDAM	INIT+9
INIT^SDAM10	BLD+2
LARGE^SDAM10	BLD+9
NUL^SDAM10	BLD+9
$$FIND^SDAM2	STATUS+13
$$COLLAT^SDUTL2	BLD1+7
$$ELSTAT^SDUTL2	BLD1+6
$$MHCLIN^SDUTL2	BLD1+7
$$NEWGAF^SDUTL2	BLD1+8
ADM^VADPT2	STATUS+20
CHGCAP^VALM	INIT+8
FLDCTRL^VALM10	BLD1+27
$$FMTE^XLFDT	BLD1+15

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD(2.98	STATUS+17
^DG(43 - [#43]	INIT+5, STATUS+21
^DGPM - [#405]	STATUS+21
^DIC(42 - [#42]	STATUS+21
^DPT - [#2]	BLD+4
^GMR(123 - [#123]	BLD+5
^SC - [#44]	BLD+4, BLD+5, STATUS+14, STATUS+17, STAT1+7
^SCE - [#409.68]	STAT1+7, CHKENC+4
^SCE("ADFN"	STATUS+24, CHKENC+3
^SD(409.63 - [#409.63]	STATUSQ, CHKENC+6, CHKENC+7
^TMP("SDAM"	BLD+7, BLD+10, SET+1, SET+2*
^TMP("SDAMIDX"	BLD1+28*

Name	Line Occurrences
$$ANC	BLD1+23
$$CHK	BLD1+3
$$LOWER	BLD1+14, BLD1+22, BLD1+23
$$STATUS	BLD1+2
$$TIME	BLD1+24, ANC+3
BLD1	BLD+4
BLD1Q	BLD1+3
CHKENC	STATUS+24
CHKQ	CHK+11
SET	BLD1+26
STAT1	STATUS+24

Name	Field # of Occurrence
^(	BLD+4
^(0	BLD+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
AC	BLD+1~, BLD1+13
AW	BLD+1~, BLD1+13
BL	BLD+1~, BLD1+13, BLD1+14, BLD1+15, BLD1+17, BLD1+22, BLD1+23, BLD1+25
C	ANC+1~, ANC+2, ANC+3, STATUS+10~, STATUS+26, STATUS+27, STAT1+5, STAT1+8, STAT1+11, STAT1+12 , CHKENC+7, CHKENC+8, LOWER+1~, LOWER+3
CC	BLD+1~, BLD1+17
CN	BLD+1~, BLD+5*
CNPAT	BLD+1~, BLD+5*
CNSTLNK	BLD+1~, BLD+4!, BLD+5*, BLD1+17!
CSTAT	BLD+1~, BLD+5, BLD1+16, BLD1+17!
CW	BLD+1~, BLD1+17
DFN	BLD+1~, BLD+3*, BLD+4, BLD+5, BLD+7, BLD1+2, BLD1+3, BLD1+6, BLD1+8, BLD1+27 , BLD1+28, CHK~, STATUS~, STATUS+13, STATUS+24, CHKENC+3
DT	INIT+6, INIT+7, BLD1+24, STATUS+24, STATUS+26, STATUS+27, STAT1+13
I	ANC+1~, ANC+3, LOWER+1~, LOWER+3
>> IOINHI	BLD1+27
>> IOINORM	BLD1+27
NC	BLD+1~, BLD1+14
NW	BLD+1~, BLD1+14
P	STATUS+10~, STAT1+5, STAT1+6, STAT1+7, STAT1+8, STAT1+11, STAT1+13, STAT1+14, STATUSQ
POP	STATUS+24, STATUS+25!, STAT1+1!, CHKENC+7
S	STATUS+10~, STATUS+17, STATUS+21, STATUS+26, STATUS+27, STAT1+5, STAT1+7, STAT1+8, STAT1+11, STAT1+12 , STAT1+13, STAT1+14, STATUSQ, CHKENC+8
SC	BLD+1~, BLD1+22, BLD1+23
>> SDACNT	BLD1+10*, BLD1+11, BLD1+12, BLD1+13, BLD1+28, SET+2
>> SDAMBOLD(	BLD1+27
SDAMDD	BLD+1~
SDAMLIST	BLD1+3, CHK~, CHK+12, CHK+13
SDAMLIST(	CHK+11
SDAMLIST("SCR"	CHKQ
SDATA	BLD+4*, BLD1+2, BLD1+3, BLD1+7, BLD1+20, ANC+3, CHK~, STATUS~, STATUS+17, STAT1+7
>> SDBEG	INIT+6*, BLD+4
SDCL	BLD+1~, BLD+4*, BLD+5, BLD1+2, BLD1+3, BLD1+7, BLD1+27, BLD1+28, CHK~, STATUS~ , STATUS+13, STATUS+14, STATUS+17, STAT1+7
SDDA	BLD1+2, BLD1+28, CHK~, STATUS~, STATUS+13*, STATUS+14
SDELIG	BLD1+1~, BLD1+6*, BLD1+7
>> SDEND	INIT+7, BLD+4, BLD1+12
>> SDFN	BLD+3
>> SDGAF	BLD1+8*
>> SDGAFREQ	BLD1+5, BLD1+9, BLD1+13
>> SDGAFST	BLD1+8*, BLD1+9
SDIEN	CHKENC+1~, CHKENC+2, CHKENC+3, CHKENC+4
SDLARGE	BLD+1~, BLD+9, BLD1+12*
SDMAX	BLD+1~, BLD1+12
SDNAME	BLD+1~, BLD+4*, BLD1+14
>> SDPRD	INIT+5*, INIT+6
SDSTAT	BLD1+1~, BLD1+2*, BLD1+3, BLD1+18, BLD1+20, BLD1+24, CHK~, CHK+11, CHK+13
SDT	BLD+1~, BLD+4*, BLD+5, BLD1+2, BLD1+3, BLD1+12, BLD1+15, BLD1+27, BLD1+28, CHK~ , STATUS~, STATUS+13, STATUS+14, STATUS+20, STATUS+24, STATUS+26, STATUS+27, STAT1+13, CHKENC+3
SDX	BLD1+1~
SNODE	CHKENC+1~, CHKENC+4*, CHKENC+5, CHKENC+6, CHKENC+7
SW	BLD+1~, BLD1+22, BLD1+23
TC	BLD+1~, BLD1+25
TW	BLD+1~, BLD1+23, BLD1+25
U	INIT+5, BLD+4, BLD+5, BLD+10, BLD1+7, BLD1+20, BLD1+28, ANC+3, CHK+12, CHK+13 , STATUS+17, STATUS+21, STAT1+7, CHKENC+6, CHKENC+7
VADMVT	STATUS+10~, STATUS+21, STATUSQ
VAINDT	STATUS+10~, STATUS+20*
>> VALMCNT	BLD+10, BLD1+27, BLD1+28, SET+1*, SET+2
>> VALMWD	BLD1+10, BLD1+13, BLD1+14, BLD1+15, BLD1+17, BLD1+22, BLD1+25
X	INIT+5, INIT+6, INIT+7, INIT+9, BLD1+1~, BLD1+10, BLD1+13, BLD1+14, BLD1+15, BLD1+17* , BLD1+22, BLD1+23, BLD1+25*, BLD1+26, SET~, SET+1, LOWER~, LOWER+2, TIME~, TIME+1
>> X1	INIT+6, INIT+7
>> X2	INIT+6, INIT+7
XC	BLD+1~, BLD1+15
XW	BLD+1~, BLD1+15
Y	BLD1+1~, BLD1+18, BLD1+20, BLD1+22, BLD1+23, ANC+1~, ANC+2, ANC+3, ANC+4, ANC+5 , CHK+10, CHK+11, CHK+12, CHK+13, CHKQ, CHKQ+1, STATUS+10~, STATUS+14, STATUS+24, STATUS+26 , STATUSQ, LOWER+1~, LOWER+2, LOWER+3*, LOWER+4
Y1	BLD1+1~, BLD1+24*, BLD1+25

Customize PDF page

Package: Scheduling

Routine: SDAM1

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Caller Graph Total: 36

Entry Points

External References

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: