Routine: SDM

Call Graph

Call Graph Total: 18

Package	Total	Call Graph
Scheduling	7	$$RESTPT^SCAPMCU4 MAIL^SCMCCON (,A)^SDCNSLT (,DT)^SDM0 CS^SDM1A ^SDM4 I^SDUTL
IHS Changes To Scheduling	5	PTAPPT^BSDAM EN^BSDPC ^BSDPRV ($$INACTMSG,$$PC)^BSDU NOSHOW^BSDU2
Registration	3	EN^DGREGAED $$SUB^DGSAUTL KVAR^VADPT
VA Fileman	3	^DIC YN^DICN ^DIE

Package

Total

Call Graph

Scheduling

$$RESTPT^SCAPMCU4 MAIL^SCMCCON (,A)^SDCNSLT (,DT)^SDM0 CS^SDM1A ^SDM4 I^SDUTL

IHS Changes To Scheduling

PTAPPT^BSDAM EN^BSDPC ^BSDPRV ($$INACTMSG,$$PC)^BSDU NOSHOW^BSDU2

Registration

EN^DGREGAED $$SUB^DGSAUTL KVAR^VADPT

VA Fileman

^DIC YN^DICN ^DIE

Package	Total	Caller Graph
Scheduling	9	SD IHS MAKE APPT SD OERR MAKE APPT SDAM2 SDCO5 SDM SDM4 SDMM SDMULT SDNEXT
IHS Changes To Scheduling	2	ASDI ASDM
Automated Information Collection System	1	IBDFDE1
IHS View Patient Record	1	BVPSD
Mental Health Social Services	1	AMHVRL2

Package

Total

Caller Graph

Scheduling

SD IHS MAKE APPT SD OERR MAKE APPT SDAM2 SDCO5 SDM SDM4 SDMM SDMULT
SDNEXT

IHS Changes To Scheduling

ASDI ASDM

Automated Information Collection System

IBDFDE1

IHS View Patient Record

BVPSD

Mental Health Social Services

AMHVRL2

Entry Points

External References

Name	Field # of Occurrence
PTAPPT^BSDAM	EN1+22
EN^BSDPC	EN1+3
^BSDPRV	EN1+2
$$INACTMSG^BSDU	EN1+1
$$PC^BSDU	EN1+15
NOSHOW^BSDU2	EN+5
EN^DGREGAED	PEND+20
$$SUB^DGSAUTL	EN1+28
^DIC	EN1+1, EN1+22
YN^DICN	PEND+3
^DIE	PEND+14, PEND+19
$$RESTPT^SCAPMCU4	EN2+5
MAIL^SCMCCON	EN2+16
^SDCNSLT	EN2+18
A^SDCNSLT	EN2
^SDM0	EN1+22, EN2, EN2+19
DT^SDM0	EN+7, PEND+8, CHKSO+1
CS^SDM1A	EN1+18
^SDM4	EN1+26
I^SDUTL	EN1+1
KVAR^VADPT	END

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,7,"Access to ",$$CNAM(+SC)," is prohibited!",!,"Only users with a special code may access this clinic.",7 Line Location: EN1+14
Function Call: WRITE	Prompt: !,7,"Access to ",$$CNAM(+SC)," is prohibited!",!,"Only users with a special code may access this clinic.",7 Line Location: EN1+16
Function Call: WRITE	Prompt: !?10,*7,"PATIENT HAS DIED." Line Location: EN1+25
Function Call: WRITE	Prompt: !?3,*7,VADM(7) Line Location: EN+3
Function Call: WRITE	Prompt: !,"SCHEDULED FOR ADMISSION ON " Line Location: EN+7
Function Call: WRITE	Prompt: !,"DISPLAY PENDING APPOINTMENTS:" Line Location: PEND+2
Function Call: WRITE	Prompt: ! Condition for execution: $X>9 Line Location: PEND+8
Function Call: WRITE	Prompt: CN,".",?4 Line Location: PEND+8
Function Call: WRITE	Prompt: ?23 Line Location: PEND+8
Function Call: WRITE	Prompt: ?23 Line Location: PEND+8
Function Call: WRITE	Prompt: !,"NOTE - PATIENT IS NOW IN WARD "_SDW Line Location: E+1
Function Call: WRITE	Prompt: !,?5,"Patient has restricted consults due to team assignment(s):" Line Location: EN2+9
Function Call: WRITE	Prompt: !,?10,SCRESTA(SCTM) Line Location: EN2+11
Function Call: WRITE	Prompt: ! Condition for execution: $X>9 Line Location: CHKSO+1
Function Call: WRITE	Prompt: ?10,"*" Line Location: CHKSO+1
Function Call: WRITE	Prompt: ?32,$S(SDJ=3:"LAB",SDJ=4:"XRAY",1:"EKG") Line Location: CHKSO+1
Function Call: WRITE	Prompt: !,"YES - TO DISPLAY FUTURE APPOINTMENTS",!,"NO - FUTURE APPOINTMENTS NOT DISPLAYED" Line Location: HELP+0
Routine Call	DIE Line Location: PEND+14 PEND+19
Routine Call	DIC Line Location: EN1+1 EN1+22

FileNo	Call Tags
^DPT - [#2]	Classic Fileman Calls
^SC - [#44]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("XY"	PEND+6
^DGS(41.1 - [#41.1]	EN+7
^DPT - [#2]	EN1+25, EN+3, PEND, PEND+1, PEND+8, PEND+11, PEND+16, PEND+20, E+1, EN2 , CHKSO, CHKSO+1
^SC - [#44]	EN1+4, EN1+7, EN1+8, EN1+11, EN1+15, PEND+8, PEND+9, EN2+1, EN2+2, CHKSO+2 , CNAM+3
^SC("AIHSPC"	EN1+3
^SD(409.1 - [#409.1]	CHKSO

Name	Line Occurrences
$$CNAM	EN1+16
@(	EN1+2
CHKSO	PEND+8
E	EN+5
EN	EN1+29
EN1	EN1+3
END	EN1+4, EN1+15, EN1+22, EN1+25, EN1+26, EN1+29, PEND+1
HELP	PEND+1
PEND	HELP
SDM	EN1+15, EN1+22, EN1+25, EN1+26, EN1+29, OERR

Name	Field # of Occurrence
^(	EN1+25, PEND+8, PEND+20, E+1, EN2, CHKSO+2
^("I"	EN1+8
^("SDPROT"	EN1+15
^("XY"	PEND+6
^(0	EN+7, PEND+8, EN2, CHKSO, CHKSO+1, CHKSO+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	PEND, PEND+1, PEND+2, PEND+5, END!
%DT	END!
>> %Y	PEND+4
A	END+2!
ARG	END+1!
ASKC	END!
BSDQUIT	EN1+2~
CC	END+2!
CCX	END+1!
CCXN	END+1!
CLNIEN	END+2!
CN	PEND+7, PEND+8, PEND+9, END+2!
CNIEN	PEND+9*, END+2!
CNPAT	PEND+9*, END+2!
CNSLTLNK	END+2!
CNSULT	END+2!
CNT	END+2!
COLLAT	EN1+26, END+1!
CONS	END+2!
COV	PEND+8, CHKSO*, END!
CPRSTAT	END+2!
CW	END+2!
DA	PEND+8, PEND+12, PEND+17*, END!
>> DFN	EN1+22, EN1+24, EN1+25, EN+3, EN+5, EN+7, PEND, PEND+1, PEND+8, PEND+9 , PEND+11, PEND+12, PEND+16, PEND+17, PEND+20, E+1, EN2, EN2+5, EN2+16, CHKSO , CHKSO+1, CHKSO+2, OERR*
DIC	EN1+1!, EN1+22, END!
DIC("A"	EN1+1*
DIC("S"	EN1+1*
DIC("W"	EN1+1*
DIC(0	EN1+1, EN1+22
DIE	EN1+22, PEND+12, PEND+17*, END!
DP	END!
DR	PEND+12, PEND+14!, PEND+17, PEND+19!, EN2+17!, END!
DR(2	PEND+13, PEND+18
DSH	END+2!
DT	EN+7, PEND, PEND+1, PEND+8, EN2+5, EN2+16
DTENTR	END+2!
DTIN	END+2!
DTLMT	END+2!
DTR	END+2!
DUZ	EN1+15
DX	PEND+6~
DY	PEND+6~
FLG	PEND+20~
FLG(1	PEND+20*
HEY	END!
HSI	EN1+11*, END!
HX	END+1!
HY	PEND+9, CHKSO*, CHKSO+1, CHKSO+2, CHKSO+3, END!
I	EN+7*, END+1!
IOSL	PEND+8
J	CHKSO+2*, END!
ND	END+2!
NOSHOW	END+2!
>> ORACTION	EN1+22
>> ORVP	OERR
P8	END+2!
PROC	END+2!
PT	END+2!
PTIEN	END+2!
PTNM	END+2!
PXR	END+1!
RTMP	END+2!
S	END+1!
SB	EN1+11*, END!
SC	EN1+10, EN1+11*, EN1+15, EN1+16, EN+5, EN2, EN2+1, END!
SCCLNM	EN2+8*, EN2+16, EN2+17!
>> SCOKCONS	EN2+12
SCPTTM	END+2!
SCREST	EN2+5*, EN2+6, EN2+12, EN2+16, EN2+17!
SCRESTA	EN2+4~
SCRESTA(	EN2+11
SCTM	EN2+7~, EN2+10, EN2+11
SD	EN1+10!, END+1!
SD1	END+2!
SD17	END!
>> SDAMERR	EN1+16, EN1+25
SDAMSCN	END+2!
SDAP16	END+1!
SDAPTYP	EN1+6!, EN1+28, END!
>> SDAT16	PEND+8, CHKSO*
SDATE	END+2!
SDCL	CNAM~, CNAM+3
>> SDCLN	EN1+1, EN1+2, EN1+3, EN1+4, EN1+6, EN1+15, EN1+16, EN1+22, EN1+26, EN1+29
SDDIF	EN1+11*, END!
SDDIS	EN2*, END+1!
SDDOT	END+2!
SDEDT	END+1!
SDEND	PEND+6~, PEND+8
>> SDFN	EN1+22, EN1+24, EN1+25
SDII	END+2!
SDIN	EN1+6!, EN1+8*, EN1+9!
SDINA	EN1+9!*, END+1!
SDINC	END+2!
SDINCM	END+2!
SDJ	CHKSO+1*, END!
SDLEN	END+2!
SDLN	PEND+8, CHKSO+2*, END!
SDMAX	END!
>> SDMLT	END+4
SDMLT1	EN!, PEND+4*, END+4!
SDMM	SDM+16*, END+1!
>> SDMULT	EN2, EN2+18
SDNS	END+2!
SDPC	EN1+3*!
SDRE	EN1+6!, EN1+8*
SDSC	END!
SDSI	END+2!
SDST	END+2!
SDSTR	END+2!
SDSTRTDT	END+2!
SDTY	END+1!
SDU	END!
SDW	EN1+18, E+1, END+1!
SDX	CNAM+2~, CNAM+3*, CNAM+4
SDXSCAT	EN1+28*, END+3!
SDXXX	EN1+6!, EN1+29!, EN+5, PEND+21, E+2
SDXY	PEND+6~*
SDYC	END!
SENDER	END+3!
SERVICE	END+3!
SI	EN1+11*, END!
SL	EN1+11*, E, END!
SM	END+1!
SRV	END+3!
SS	END+1!
SSC	PEND+8, PEND+9, CHKSO*, CHKSO+2, END!
ST	END+1!
STARTDAY	EN1+11*, END!
STATUS	END+3!
STPCOD	EN1+7*, END+3!
STR	EN1+11*, END!
TMP	END+3!
TMPYCLNC	EN1+7*, END+3!
TYPE	END+3!
U	EN1+7, EN1+8, EN1+11, EN1+15, EN1+22, EN1+25, EN, EN+7, PEND+8, PEND+9 , PEND+20, E, EN2, EN2+2, CHKSO, CHKSO+1, CHKSO+2, CNAM+3
>> VADM(7	EN+3
>> VAEL(9	EN
WY	EN1+18*, END+1!
X	EN1+2, EN1+11, EN1+22, EN2*, END+1!
>> XQORQUIT	OERR*
XX	EN2*, END+1!
Y	EN1+2, EN1+3, EN1+4, EN1+6, EN1+7, EN1+8, EN1+10, EN1+11!, EN1+22, EN+3 , EN+7, PEND+8, E, EN2, EN2+1, EN2+2, EN2+8, CHKSO, CHKSO+1, CHKSO+3* , END+1!
Y(0	EN+3*

Customize PDF page

Package: Scheduling

Routine: SDM

Information

Source Information

Call Graph

Call Graph Total: 18

Caller Graph

Caller Graph Total: 14

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
EN
E
HELP
OERR		ICR #739 Status: Retired Usage: Private ICR #10042 Status: Active Usage: Supported
CNAM(SDCL)	;Return clinic name
CHKSO
EN1	;L W !! D I^SDUTL I '$D(SDCLN) S DIC="^SC(",DIC(0)="AEMZQ",DIC("A")="Select CLINIC: ",DIC("S")="I $P(^(0),U,3)=""C"",'$G(^(""OOS""))" D ^DIC K DIC G:Y<0!'$D(^("SL")) END ;IHS/ANMC/LJF 8/18/2000
EN2
PEND
END