Routine: SDCIAL

Package	Total	Call Graph
Scheduling	5	$$SDAPI^SDAMA301 $$SDAPIERR^SDAMUTDT ASK^SDDIV SDIAL^SDKILL (AT,DATE,DIV,DT,DTS,OUT)^SDUTL
Kernel	1	$$UP^XLFSTR
Registration	1	(CLOSE,ZIS)^DGUTQ
VA Fileman	1	^DIC

Package

Total

Call Graph

Scheduling

$$SDAPI^SDAMA301 $$SDAPIERR^SDAMUTDT ASK^SDDIV SDIAL^SDKILL (AT,DATE,DIV,DT,DTS,OUT)^SDUTL

Kernel

$$UP^XLFSTR

Registration

(CLOSE,ZIS)^DGUTQ

VA Fileman

^DIC

Package	Total	Caller Graph
Scheduling	1	SDAPP INPT

Package

Total

Caller Graph

Scheduling

SDAPP INPT

External References

Name	Field # of Occurrence
CLOSE^DGUTQ	END
ZIS^DGUTQ	RD1+2
^DIC	RD+4
$$SDAPI^SDAMA301	DFN+4
$$SDAPIERR^SDAMUTDT	WRT
ASK^SDDIV	SDCIAL+2
SDIAL^SDKILL	END
AT^SDUTL	WRTC+1
DATE^SDUTL	RD1
DIV^SDUTL	SDCIAL+2
DT^SDUTL	START
DTS^SDUTL	APPT, HD+1
OUT^SDUTL	HD
$$UP^XLFSTR	RD+1

Interaction Calls

Name	Line Occurrences
Function Call: READ	Prompt: "FOR WARD (TYPE 'ALL' FOR ALL WARDS): " Formatting: ! Timeout: DTIME Variable: X Line Location: RD+0
Function Call: WRITE	Prompt: !,"ENTER A WARD NAME OR ALL FOR ALL WARDS" Line Location: RD+0
Function Call: WRITE	Prompt: *7,!,"Start date must be in the future" Line Location: RD1+0
Function Call: WRITE	Prompt: @IOF,?29,"INPATIENT APPOINTMENT LIST",! Line Location: WRT+0
Function Call: WRITE	Prompt: !!,$$SDAPIERR^SDAMUTDT() Line Location: WRT+0
Function Call: WRITE	Prompt: @IOF,?29,"INPATIENT APPOINTMENT LIST",! Line Location: WRT+1
Function Call: WRITE	Prompt: !!,"NO MATCHES FOUND!" Line Location: WRT+1
Function Call: WRITE	Prompt: !! Condition for execution: SD2 Line Location: APPT+0
Function Call: WRITE	Prompt: !,Y Line Location: APPT+0
Function Call: WRITE	Prompt: !,?2,$P(^DPT(I3,0),"^",1),?34,$P(^(0),"^",9) Line Location: APPT+1
Function Call: WRITE	Prompt: !,?2,$P(^DPT(I3,0),"^",1),?34,$P(^(0),"^",9)," (CONTINUED)" Line Location: WRTC+0
Function Call: WRITE	Prompt: !,?5,$P(^SC(+SDY,0),"^",1) Line Location: WRTC+1
Function Call: WRITE	Prompt: ?37,$J(Y,8) Line Location: WRTC+1
Function Call: WRITE	Prompt: ?37,$J(Y,8) Line Location: WRTC+1
Function Call: WRITE	Prompt: !,?15,$P(^(I4),"^",6) Line Location: WRTC+3
Function Call: WRITE	Prompt: !,@IOF,!,?29,"INPATIENT APPOINTMENT LIST",?69,"PAGE: ",SDPG,! Line Location: HD+1
Function Call: WRITE	Prompt: ?SDOS,"WARD: ",I Line Location: HD+1
Function Call: WRITE	Prompt: ?SDOS,"WARD: ",I Line Location: HD+1
Function Call: WRITE	Prompt: !!,"APPOINTMENT DATE",!,?2,"PATIENT NAME",?34,"SSN",!,?38,"APPOINT",?52,"LAB",?62,"XRAY",?72,"EKG",!,?5,"CLINIC",?38,"TIME" Line Location: HD+2
Function Call: WRITE	Prompt: ?A,"TIME" Line Location: HD+2
Function Call: WRITE	Prompt: !,?15,"OTHER INFORMATION",! Line Location: HD+3
Function Call: WRITE	Prompt: "-" Line Location: HD+3
Routine Call	DIC Line Location: RD+4

FileNo	Call Tags
^DIC(42 - [#42]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(42 - [#42]	START+3
^DPT - [#2]	PT+1, DFN+16, APPT+1, WRTC
^DPT("ACN"	START+4, PT+1
^SC - [#44]	DFN+11, WRTC+1
^TMP($J	START!, DFN+6, DFN+7, DFN+8*, DFN+11!, DFN+13, DFN+14, DFN+15, DFN+17, DFN+18 , DFN+19, DFN+20, END!
^UTILITY($J	START!, DFN+22*, WRT+1, WRT+2, APPT+1, WRTC, WRTC+3

Name	Line Occurrences
APPT	WRT+2
DFN	START+3, START+5
END	RD1, RD1+2, WRT, WRT+1, WRT+3
HD	WRT+2, APPT, APPT+1, WRTC
PT	START+3, START+4
RD	RD+4
RD1	RD+2, RD1
WRT	START+3, START+5
WRTC	APPT+1

Name	Field # of Occurrence
^(	WRTC+3
^(0	APPT+1, WRTC

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	END!
A	WRTC+1, HD+2, HD+3*, END!
ALL	END!
BEGDATE	RD1, RD1+1, DFN+3, END!
DFN	END!
DIC	RD+3*, END!
DIC("A"	SDCIAL+2*
DIC(0	RD+3*
DIV	SDCIAL+2*, RD1+1, DFN+9, DFN+11, END!
DT	RD1, START, HD+1
DTIME	RD
ENDDATE	RD1+1, DFN+3, END!
I	START+3, START+4, PT+1, WRT+1, WRT+2, APPT+1, WRTC, WRTC+3, HD+1, END!
I1	END!
I2	PT+1, WRT+2, APPT, APPT+1, WRTC, WRTC+3, END!
I3	APPT+1*, WRTC, WRTC+3, END!
I4	APPT+1*, WRTC, WRTC+1, WRTC+3, END!
II	END!
IO	START
IOF	WRT, WRT+1, HD+1, END*
IOSL	START+2, WRT+2, APPT, APPT+1, WRTC
IOST	START+2
>> PGM	RD1+1*
POP	RD1, RD1+2, END!
SD1	START+2, HD, HD+1, END!
>> SD2	APPT, WRTC+1, HD+4*
SDAPPT	DFN+2~, DFN+15*, DFN+17, DFN+18, DFN+19, DFN+20, DFN+22
SDARRAY	DFN+2~, DFN+4
SDARRAY("FLDS"	DFN+3*
SDARRAY(1	DFN+3*
SDARRAY(3	DFN+3*
SDARRAY(4	DFN+3*
SDB	WRTC+1*, END!
SDCL	DFN+2~, DFN+7, DFN+8, DFN+11, DFN+13*, DFN+14, DFN+15, DFN+17, DFN+18, DFN+19 , DFN+20, DFN+22
SDCOUNT	START+1~, DFN+4, WRT
SDDFN	DFN+2~, DFN+6, DFN+7, DFN+8, DFN+14, DFN+15, DFN+16, DFN+17, DFN+18, DFN+19 , DFN+20, DFN+22
SDEKG	DFN+2~, DFN+19*, DFN+22
SDEND	START+2*, WRT+2, APPT, APPT+1, WRTC, HD, END!
SDLAB	DFN+2~, DFN+17*, DFN+22
SDLIST	START+1~, DFN+1
SDLIST(	PT+1*
SDOS	HD+1*, END!
SDOTHER	DFN+2~, DFN+20*, DFN+22
SDPG	WRT+2, HD+1, END!
SDSC	END!
SDT1	END!
SDTT	SDCIAL+2, START+2, HD, END!
SDW	RD+2, RD+4, RD1+1, START+3, END!
SDWARD	DFN+2~, DFN+16*, DFN+22
SDXRAY	DFN+2~, DFN+18*, DFN+22
SDXX	END!
SDY	WRTC*, WRTC+1, END!
>> VAL	RD1+1*
>> VAR	RD1+1*
X	RD, RD+1, RD+2, RD+4, END!
Y	SDCIAL+2, RD+4, APPT, WRTC+1, HD+1*, END!

Customize PDF page

Package: Scheduling

Routine: SDCIAL

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Caller Graph Total: 1

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
RD1
PT	;build patient list
APPT
RD
START
WRT
DFN	;retrieve appt data for list of patients
WRTC
END
HD