Routine: SDCP

Name	Field # of Occurrence
DW^%DTC	SETSL+7
^DIR	END, SEEND
ASK2^SDDIV	SDCP+2
DT^SDUTL	START+1
DTS^SDUTL	START+2, PRT+3, PRT+12, INACT
PAUSE^VALM1	PAUSE+2
CLINIC^VAUTOMA	SDCP+2
EN^XUTMDEVQ	QUE+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ?(SDCOL-$L(SDT)-2),SDT,": ",SDVAL Line Location: L+4
Function Call: WRITE	Prompt: ! Line Location: PRT+1
Function Call: WRITE	Prompt: ! Line Location: PRT+2
Function Call: WRITE	Prompt: ! Line Location: PRT+3
Function Call: WRITE	Prompt: ! Line Location: PRT+5
Function Call: WRITE	Prompt: ! Line Location: PRT+6
Function Call: WRITE	Prompt: ! Line Location: PRT+7
Function Call: WRITE	Prompt: ! Line Location: PRT+8
Function Call: WRITE	Prompt: ! Line Location: PRT+9
Function Call: WRITE	Prompt: ! Line Location: PRT+10
Function Call: WRITE	Prompt: !!,?4,"**** Clinic will be inactive ",$S(SDRE:"from ",1:"as of ") Line Location: PRT+12
Function Call: WRITE	Prompt: Y Line Location: PRT+12
Function Call: WRITE	Prompt: Y Line Location: PRT+12
Function Call: WRITE	Prompt: !!,?4,"* INVALID OR INACTIVE STOP CODE ASSIGNED TO THIS CLINIC *" Line Location: PRT+13
Function Call: WRITE	Prompt: !!,?4,"**** Clinic is inactive ",$S(SDRE:"from ",1:"as of "),Y Line Location: INACT+0
Function Call: WRITE	Prompt: $S(SDRE:" to "_Y,1:"")," ****" Line Location: INACT+0
Function Call: WRITE	Prompt: @IOF,?22,"CLINIC PROFILES AS OF: ",PDATE,! Line Location: TOF+0
Routine Call	DIR Line Location: END SEEND

Name	Line Occurrences (* Changed, ! Killed)
^DG(40.8 - [#40.8]	CHECK+1
^DIC(40.7 - [#40.7]	SETSL, SETSL+2
^SC - [#44]	SET0, SET0+2, SETSL+1, SETSL+3, SETSL+4, SETSL+5, SETSL+6, SETSL+7, PRT+2, PRT+11 , CHECK+1
^SC("B"	START+3

Name	Line Occurrences
$$CHECK	START+3, SOME
END	SDCP+2, START+4, SOME+1
INACT	PRT+11
L	PRT+1, PRT+2, PRT+3, PRT+4, PRT+5, PRT+6, PRT+7, PRT+8, PRT+9, PRT+10
PRT	START+3, SOME
SEEND	PRT
SET0	START+3, SOME
SETSL	START+3, SOME
SOME	START+2
TOF	START+2, PRT

Name	Field # of Occurrence
^(	SETSL+6
^("I"	PRT+11
^("SDPROT"	SETSL+1
^("SL"	SETSL+3
^(0	SETSL, SETSL+2, CHECK+1
^(1	SETSL+6, SETSL+7

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ABBR	END+1!, SET0+1*, PRT+1
ALV	END+1!, SETSL, SETSL+3, PRT+6
C	END+1!
DAYS	END+1!, SETSL+8*, PRT+3
DIC	END+1!
DIPH	END+1!, SETSL, SETSL+4, PRT+5
DIR	END~, SEEND~
DIR(0	END, SEEND
DOW	END+1!, SETSL+6!
DOW(	SETSL+6!, SETSL+7, SETSL+8
DT	START+1, START+2, SETSL, SETSL+6, SETSL+7, PRT+11, PRT+12
END	START+1, START+3, SOME, END, END+1!, PRT, SEEND
HCDB	END+1!, SETSL, SETSL+3, PRT+5
I	END+1!
IOF	TOF
IOSL	PRT, PAUSE+2
IOST	END, PRT, PAUSE+2
J	END+1!
L	END+1!, SETSL+6, SETSL+7
LINE	PAUSE~, PAUSE+2, PAUSE+3
LOC	END+1!, SET0+1*, PRT+2
LOP	END+1!, SETSL, SETSL+3, PRT+6
M	END+1!, SETSL+6, SETSL+8
NAME	END+1!, SET0+1*, PRT+1
ODM	END+1!, SETSL, SETSL+4, PRT+7
PC	END+1!, SETSL, SETSL+4, PRT+10
PDATE	START+2*, END+1!, TOF
POP	END+1!
SC	START+3, SOME, END+1!, SET0, SET0+2, SETSL+1, SETSL+3, SETSL+5, SETSL+6, SETSL+7 , PRT+2, PRT+11, CHECK+1
SCN	START+2, START+3, SOME*, END+1!
SCSC	END+1!
SD	END+1!
SDC	END+1!
SDCNT	END+1!, SET0+1*, PRT+8
SDCOL	L~, L+4
SDCR	END+1!, SET0+1, SETSL+2, PRT+8
SDIN	END+1!, PRT+11*, PRT+12!, INACT!
SDMX	END+1!, SET0+2*, PRT+9
SDNO	END+1!, PRT+1, PRT+3, PRT+12, INACT
SDPR	END+1!, SETSL+1*, PRT+9
SDRE	END+1!, PRT+11*, PRT+12!, INACT!
SDSC	END+1!, SET0+1, SETSL, PRT+13
SDT	L~, L+4
SDVAL	L~, L+4
STCD	END+1!, SET0+1, SETSL, PRT+7
STDAT	END+1!, SETSL, SETSL+5, PRT+3, PRT+4
STRING	END+1!, SET0, SET0+1, SETSL, SETSL+3*, SETSL+4
U	SET0+1, SET0+2, SETSL, SETSL+1, SETSL+2, SETSL+3, SETSL+4, SETSL+8, PRT+11, CHECK+1
VAUTC	START+2, END+1!
VAUTC(	SOME
VAUTD	END+1!, CHECK+1
VAUTD(	CHECK+1
VAUTNI	SDCP+2*, END+1!
X	END+1!, SETSL+7*
Y	SDCP+2, QUE, START+2, END+1!, SETSL+7, PRT+3, PRT+4, PRT+12, INACT, SEEND , PAUSE+1~, PAUSE+4
ZTSAVE	QUE~, QUE+1
ZTSAVE(	QUE*

Customize PDF page

Package: Scheduling

Routine: SDCP

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
L(SDT,SDCOL,SDVAL)	;Print field label
END
PAUSE(LINE)	;
PRT
SOME
CHECK()	;Check location for inclusion
SETSL
START	;Print report
SET0
SEEND
QUE
INACT
TOF