Routine: SDNOS1

Information

SDNOS1 ;ALB/LDB - NO-SHOW REPORT ; 07 May 99 11:13 AM

Source Information

Source file <SDNOS1.m>

Call Graph

Call Graph Total: 9

Package	Total	Call Graph
Scheduling	4	END^SDNOS (DIV,LINE)^SDNOS1A SDTOT^SDNOS2 OUT^SDUTL
IHS Changes To Scheduling	2	$$RBKDT^BSDN1 $$CONF^BSDU
VA Fileman	2	(DW,NOW)^%DTC D^DIQ
Registration	1	TP^DGUTL

Caller Graph

Caller Graph Total: 1

Package	Total	Caller Graph
Scheduling	1	SDNOS0

Entry Points

Name	Field # of Occurrence
DW^%DTC	WR2+1, WTOT
NOW^%DTC	HDR+2
$$RBKDT^BSDN1	WR3+1
$$CONF^BSDU	HDR+4
TP^DGUTL	SDNOS1+15
D^DIQ	HDR+5, HDR+6
END^SDNOS	SDNOS1+16
DIV^SDNOS1A	HDR+7
LINE^SDNOS1A	HDR+3, HDR2+1
SDTOT^SDNOS2	CL+6, ABB+5
OUT^SDUTL	SCR, ABBHD

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: CL+3
Function Call: WRITE	Prompt: !! Line Location: CL+4
Function Call: WRITE	Prompt: @IOF,Y,?70,"PAGE " Line Location: HDR+0
Function Call: WRITE	Prompt: P1 Line Location: HDR+0
Function Call: WRITE	Prompt: !!,?2,"FOR PERIOD COVERING: " Line Location: HDR+1
Function Call: WRITE	Prompt: ?30,SDBG Line Location: HDR+1
Function Call: WRITE	Prompt: @IOF,Y,?70,"PAGE " Line Location: HDR+2
Function Call: WRITE	Prompt: P1 Line Location: HDR+2
Function Call: WRITE	Prompt: !,?30,"NO SHOW REPORT",$S(SDTOT!SDTOT1:" TOTALS",1:""),! Line Location: HDR+3
Function Call: WRITE	Prompt: !?15,$$CONF^BSDU Line Location: HDR+4
Function Call: WRITE	Prompt: !!,?2,"FOR PERIOD COVERING: " Line Location: HDR+5
Function Call: WRITE	Prompt: ?30,SDBG Line Location: HDR+5
Function Call: WRITE	Prompt: " TO ",Y Line Location: HDR+6
Function Call: WRITE	Prompt: !,"DATE",?23,"TIME",?32,"PATIENT",?63,"SSN",!,"----",?23,"----",?32,"-------",?63,"---" Line Location: HDR1+0
Function Call: WRITE	Prompt: !,"DATE",?23,"TIME",?32,"PATIENT",?63,"HRCN",!,"----",?23,"----",?32,"-------",?63,"----" Line Location: HDR1+1
Function Call: WRITE	Prompt: !!!,"* NO NO-SHOWS OCCURRED IN THIS CLINIC DURING THIS TIME FRAME *" Line Location: NONE+0
Function Call: WRITE	Prompt: !!,SDOW,?10,Y1 Line Location: WR2+4
Function Call: WRITE	Prompt: ?22 Condition for execution: $L(Y2)>7 Line Location: WR2+4
Function Call: WRITE	Prompt: ?23 Condition for execution: $L(Y2)<8 Line Location: WR2+4
Function Call: WRITE	Prompt: Y2,?32,SDPT,?63,C3 Line Location: WR2+4
Function Call: WRITE	Prompt: !!,SDOW,?10,Y1 Line Location: WR2+5
Function Call: WRITE	Prompt: ?22 Condition for execution: $L(Y2)>7 Line Location: WR2+5
Function Call: WRITE	Prompt: ?23 Condition for execution: $L(Y2)<8 Line Location: WR2+5
Function Call: WRITE	Prompt: Y2,?32,SDPT,?63,C3 Line Location: WR2+5
Function Call: WRITE	Prompt: !! Line Location: WR2+6
Function Call: WRITE	Prompt: ?22 Condition for execution: $L(Y2)>7 Line Location: WR2+6
Function Call: WRITE	Prompt: ?23 Condition for execution: $L(Y2)<8 Line Location: WR2+6
Function Call: WRITE	Prompt: Y2,?32,SDPT,?63,C3 Line Location: WR2+6
Function Call: WRITE	Prompt: !,?32,"CLERK: ",$S($P(SDX,U,3):$P($G(^VA(200,$P(SDX,U,3),0)),U),$P(SDX,U)["NT":"NONE - NO ACTION TAKEN",1:"UNKNOWN") Line Location: WR2+7
Function Call: WRITE	Prompt: !,?32,"REBOOKED ON " Line Location: WR3+0
Function Call: WRITE	Prompt: Y,! Line Location: WR3+0
Function Call: WRITE	Prompt: !,?32,"REBOOKED TO " Line Location: WR3+1
Function Call: WRITE	Prompt: Y,! Line Location: WR3+1
Function Call: WRITE	Prompt: !,?27,"___",?45,"___",?75,"___",!!,?27,SDT4,?47,SDT5,?75,SDT6 Line Location: TOT+7
Function Call: WRITE	Prompt: !!!,SDPR," of appointments for ",SDC," were NO-SHOWS for this period" Line Location: TOT+10
Function Call: WRITE	Prompt: !!!,SDPR," of "_X_" appointments for ",SDC," were NO-SHOWS for this period" Line Location: TOT+12
Function Call: WRITE	Prompt: !,SDC,?40,$J(SDT4,5),?50,$J(SDT5,5),?60,$J(SDT6,5),?70,$J(SDPR,5) Line Location: TOT+13
Function Call: WRITE	Prompt: !,X Line Location: WTOT+0
Function Call: WRITE	Prompt: ?10,Y,?27,SDT1,?47,SDT2 Line Location: WTOT+0
Function Call: WRITE	Prompt: ?10,Y,?27,SDT1,?47,SDT2 Line Location: WTOT+0
Function Call: WRITE	Prompt: !!,?23,"TOTAL NO-SHOWS W/NO",?45,"TOTAL NO-SHOWS W/",?65,"TOTAL NO-SHOWS" Line Location: HDR2+0
Function Call: WRITE	Prompt: ! Condition for execution: SDTOT1 Line Location: HDR2+1
Function Call: WRITE	Prompt: ?23,"REBOOKED APPTS.",?45,"REBOOKED APPTS." Line Location: HDR2+1
Function Call: WRITE	Prompt: ?40,"Without",?50,"With",!?40,"Rebooked",?50,"Rebooked",?60,"Total" Line Location: HDR3+2
Function Call: WRITE	Prompt: ?70,"Percent",!,"Clinic",?40,"Appts.",?50,"Appts.",?60,"No-Shows" Line Location: HDR3+3
Function Call: WRITE	Prompt: ?70,"No-Shows",!,SDLINE Line Location: HDR3+4
Function Call: WRITE	Prompt: ?(30+(10*SDI)),$E(SDLINE,1,8) Line Location: HDR3+4

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	HDR+2, WR2+1, WR3+1, WTOT
^DD("FUNC" - [#.5]	WR2, WR2+4
^UTILITY($J	SDNOS1+13, CL+4, WR, WR1+1, TOT, TOT+1, TOT+2, TOT+3, TOT+9, TOT+11 , TOTAL, TOTAL+2, ABB+2, ABB+3
^VA(200 - [#200]	WR2+7

Label References

Name	Line Occurrences
ABB	CL
ABBHD	ABB+3
CL	SDNOS1+13
HDR	CL+4, WR2+3, TOT+6, TOT+8, WTOT, ABB+1, ABBHD+1
HDR1	CL+4, WR2+3
HDR2	WTOT
HDR3	HDR+7, ABBHD+1
NONE	WR
SCR	SDNOS1+13, CL+4, WR2+3, TOT+5, TOT+8, WTOT, ABB+5
TOT	CL+4, ABB+3
TOTAL	TOT
WR	CL+4
WR1	WR
WR2	WR1+1
WTOT	TOTAL+3

Name	Field # of Occurrence
^(	CL+4, WR1+1
^("*TOT*"	TOT+9

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	HDR+2
>> C	CL+4, ABB+2
>> C1	WR, WR1+1, WR2, WR2+1, WR2+4, WR2+8, TOT, TOTAL, TOTAL+2, WTOT
>> C2	WR1+1*
>> C3	WR1+1*, WR2+4, WR2+5, WR2+6
>> C4	WR1+1*
>> C6	WR*
IO	SDNOS1+15, HDR1+1
IO(0	SDNOS1+13, CL+4, WR, WR2+3, TOT+5, TOT+8, WTOT
IOF	HDR+2
IOSL	WR2+3, TOT+5, TOT+6, TOT+8, WTOT, ABB+3
IOST	SCR, ABB+5, ABBHD
>> P1	HDR+2*
>> Q	CL*, CL+4, ABB+3
>> SDABB	SDNOS1+15, CL, HDR+7, TOT, TOT+7, TOT+8, TOT+12, TOT+13
>> SDBD	HDR+5
>> SDBG	HDR+5*
>> SDC	CL, CL+4, WR, WR1+1, TOT, TOT+1, TOT+2, TOT+3, TOT+9, TOT+11 , TOT+12, TOT+13, TOTAL, TOTAL+2, ABB+2*, ABB+3
>> SDCL(1	CL
>> SDDIV	SDNOS1+13*, CL+4, WR, WR1+1, TOT, TOT+1, TOT+2, TOT+3, TOT+9, TOT+11 , TOTAL, TOTAL+2, ABB+2, ABB+3
>> SDED	HDR+6
>> SDEND	SDNOS1+13, CL+4, CL+6, HDR1+1, WR, WR1+1, WR2+2, WR2+3, TOT, TOT+4 , TOT+5, TOT+8, WTOT, ABB+2, ABB+3, ABB+5
>> SDHD	CL+4, WR2+3, WR2+4, WR2+5, WR2+6, WR2+8*
SDI	HDR3~, HDR3+4*
>> SDIO	SDNOS1+13, SDNOS1+15, CL+4, HDR1+1, WR, WR2+3, TOT+5, TOT+8, WTOT
SDLINE	HDR3~, HDR3+1*, HDR3+4
>> SDNO	WR*
>> SDOK	TOTAL+1*
>> SDOW	WR2+1*, WR2+4, WR2+5
>> SDPR	TOT+9*, TOT+12, TOT+13
>> SDPT	WR1+1*, WR2+4, WR2+5, WR2+6
>> SDRB	WR3+1*
>> SDT1	TOTAL*, TOTAL+1, TOTAL+3, WTOT
>> SDT2	TOTAL+2*, TOTAL+3, WTOT
>> SDT3	WTOT*
>> SDT4	TOT+1*, TOT+7, TOT+13
>> SDT5	TOT+2*, TOT+7, TOT+13
>> SDT6	TOT+3*, TOT+7, TOT+13
>> SDTOT	CL+4, HDR+3, ABB+1
>> SDTOT1	CL+6, HDR+3, HDR2+1, ABB+1
>> SDV1	SDNOS1+13
SDX	WR1+1~*, WR2+7, WR3+1
U	WR2+7, WR3+1
>> VALM	SDNOS1+15, HDR+2, HDR+3
X	WR2, WR2+1, WR2+4, TOT+11~, TOT+12, WTOT*
>> X1	WR*
>> Y	HDR+2, HDR+5, HDR+6, WR2+1, WR3+1, WTOT
>> Y1	WR2+1*, WR2+4, WR2+5
>> Y2	WR2, WR2+4, WR2+5, WR2+6
>> Y3	WR, WR2+5, WR2+6, WR2+8

Customize PDF page

Package: Scheduling

Routine: SDNOS1

Information

Source Information

Call Graph

Call Graph Total: 9

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
ABBHD
NONE
WTOT
HDR
HDR1	;Q:SDIO=IO&(SDEND) W !,"DATE",?23,"TIME",?32,"PATIENT",?63,"SSN",!,"----",?23,"----",?32,"-------",?63,"---" ;IHS/ANMC/LJF 11/03/2000
CL
ABB	;Print abbreviated no-show report (clinic totals only)
TOT
HDR3
WR2
WR
WR1	;N SDX S SDPT=0 F C2=0:0 S SDPT=$O(^UTILITY($J,"SDNO",SDDIV,SDC,C1,SDPT)) Q:SDPT?1"***".E!(SDPT="")!(SDEND) S C3=0 F C4=0:0 S C3=$O(^UTILITY($J,"SDNO",SDDIV,SDC,C1,SDPT,C3)) Q:C3<1!(SDEND) S SDX=^(C3) D WR2
HDR2
TOTAL
SCR
WR3