Routine: SCRPW76

Package	Total	Call Graph
VA Fileman	3	NOW^%DTC EN^DIQ1 ^DIR
Scheduling	2	$$XY^SCRPW50 $$OTX^SCRPW73
Kernel	1	$$S^%ZTLOAD

Package	Total	Caller Graph
Scheduling	4	SCRPW72 SCRPW73 SCRPW77 SCRPW78

Entry Points

External References

Name	Field # of Occurrence
NOW^%DTC	HINI+3
$$S^%ZTLOAD	STOP+1
EN^DIQ1	HDRX+13
^DIR	HDR+16
$$XY^SCRPW50	HDR+18
$$OTX^SCRPW73	HDRX+7, HDRX+18

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: SDLINE,!?(SDIOM-$L(SDTITL)\2),SDTITL Line Location: HDR+19
Function Call: WRITE	Prompt: !?(SDIOM-$L(SDX)\2),SDX Line Location: HDR+26
Function Call: WRITE	Prompt: !?(SDIOM-$L(SDTIT(SDI))\2),SDTIT(SDI) Line Location: HDR+28
Function Call: WRITE	Prompt: !?(SDIOM-$L(SDTIT(SD))\2),SDTIT(SD) Line Location: HDR+30
Function Call: WRITE	Prompt: !,SDLINE Line Location: HDR+32
Function Call: WRITE	Prompt: !,"For clinic availability dates ",SDPBDT," through ",SDPEDT Line Location: HDR+33
Function Call: WRITE	Prompt: !,"Date printed: ",SDPNOW,?(IOM-6-$L(SDPAGE)),"Page: ",SDPAGE Line Location: HDR+34
Function Call: WRITE	Prompt: !,SDLINE Line Location: HDR+35
Function Call: WRITE	Prompt: !?(SDCOL+44),"Ava.",?(SDCOL+51),"Pct." Line Location: SUBT1+1
Function Call: WRITE	Prompt: ?(SDCOL+63+(14*SDI)),"--Type '",SDI,"'---" Line Location: SUBT1+3
Function Call: WRITE	Prompt: ! Line Location: SUBT1+5
Function Call: WRITE	Prompt: ?(SDCOL),"Credit Pair" Condition for execution: SDTY>1 Line Location: SUBT1+5
Function Call: WRITE	Prompt: ?(SDCOL+35),"Clinic",?(SDCOL+43),"Appt.",?(SDCOL+50),"Slots" Line Location: SUBT1+6
Function Call: WRITE	Prompt: ?(SDCOL+65+(14*SDI)),"Sch. Wait" Line Location: SUBT1+9
Function Call: WRITE	Prompt: !?(SDCOL+4),$S(SDTY=1:"Availability Date",1:"Clinic Name") Line Location: SUBT1+11
Function Call: WRITE	Prompt: ?(SDCOL+33),"Capacity",?(SDCOL+43),"Slots",?(SDCOL+51),"Ava." Line Location: SUBT1+12
Function Call: WRITE	Prompt: ?(SDCOL+64+(14*SDI)),"Appts Time" Line Location: SUBT1+15
Function Call: WRITE	Prompt: !?(SDCOL),$E(SDLINE,1,($S(SDPAST:132,1:58))) Line Location: SUBT1+17
Function Call: WRITE	Prompt: !?48,"Next",?54,$E(SDLINE,1,24),"Non-next Available Appointments",$E(SDLINE,1,23) Line Location: SUBT2+1
Function Call: WRITE	Prompt: !?40,"Next Ava. 0-1 0-1 2-7 2-7 8-30 8-30 31-60 31-60 >60 >60" Line Location: SUBT2+2
Function Call: WRITE	Prompt: ! Line Location: SUBT2+3
Function Call: WRITE	Prompt: "Credit Pair" Condition for execution: SDTY>1 Line Location: SUBT2+3
Function Call: WRITE	Prompt: ?40,"Ava. Wait" Line Location: SUBT2+3
Function Call: WRITE	Prompt: ?(SDI),"Days Wait" Line Location: SUBT2+4
Function Call: WRITE	Prompt: !?4,$S(SDTY=1:"Availability Date",1:"Clinic Name") Line Location: SUBT2+5
Function Call: WRITE	Prompt: ?(SDI),"Appts Time" Line Location: SUBT2+6
Function Call: WRITE	Prompt: !,SDLINE Line Location: SUBT2+7
Function Call: WRITE	Prompt: !?38,"Next",?43,$E(SDLINE,1,29),"Non-next Available Appointments",$E(SDLINE,1,29) Line Location: SUBT3+1
Function Call: WRITE	Prompt: !?32,"Next Ava. 0-1 0-1 0-1 2-7 2-7 2-7 8-30 8-30 8-30 31-60 31-60 31-60 >60 >60 >60" Line Location: SUBT3+2
Function Call: WRITE	Prompt: ! Line Location: SUBT3+3
Function Call: WRITE	Prompt: "Credit Pair" Condition for execution: SDTY>1 Line Location: SUBT3+3
Function Call: WRITE	Prompt: ?32,"Ava. Wait" Line Location: SUBT3+3
Function Call: WRITE	Prompt: ?(SDI),"Days Wait Wait" Line Location: SUBT3+4
Function Call: WRITE	Prompt: !?4,$S(SDTY=1:"Availability Date",1:"Clinic Name"),?31,"Appts Time1" Line Location: SUBT3+5
Function Call: WRITE	Prompt: ?(SDI),"Appts Time1 Time2" Line Location: SUBT3+6
Function Call: WRITE	Prompt: !,SDLINE Line Location: SUBT3+7
Function Call: WRITE	Prompt: !?96,"Next",!,"Date",?96,"Ava. Date Wait Wait" Line Location: SUBT4+0
Function Call: WRITE	Prompt: !,"Scheduled Patient Name SSN Appointment Date Scheduling Request Type Ind. Desired F/U Time1 Time2" Line Location: SUBT4+1
Function Call: WRITE	Prompt: !,SDLINE Line Location: SUBT4+2
Function Call: WRITE	Prompt: !?11,"SCHEDULING",?63,"TIME",!,"DATE",?11,"REQUEST",?31,"DATE",?58,"WAIT",?63,"TO",?68,"APPT",?96,"APPT",?102,"COMPLETION" Line Location: SUBT5+0
Function Call: WRITE	Prompt: !,"SCHEDULED",?11,"TYPE",?31,"DESIRED",?42,"APPT DATE/TIME",?58,"TIME",?63,"APPT",?68,"TYPE",?73,"F/U",?79,"REBOOK DATE",?96,"STAT",?102,"DATE",?113,"SCHEDULER" Line Location: SUBT5+1
Function Call: WRITE	Prompt: !,SDLINE Line Location: SUBT5+2
Routine Call	DIR Line Location: HDR+16

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	HINI+3
^SC - [#44]	HDRX+16
^TMP("SDXM"	XMTX+2*

Label References

Name	Line Occurrences
HDRX	HDR+27, HDRXM+14
HDRXM	HDR+15
STOP	HDR+17
STXM1	SUBTXM+2
STXM2	SUBTXM+2
STXM3	SUBTXM+3
STXM4	SUBTXM+3
SUBT	HDR+36
SUBT1	SUBT+1
SUBT2	SUBT+1
SUBT3	SUBT+2
SUBT4	SUBT+2
SUBT5	SUBT+3
SUBTXM	HDRXM+22
XMTX	HDRXM+4, HDRXM+5, HDRXM+6, HDRXM+13, HDRXM+16, HDRXM+18, HDRXM+19, HDRXM+21, STXM1+8, STXM1+16 , STXM1+24, STXM1+26, STXM2+3, STXM2+5, STXM2+8, STXM2+11, STXM2+12, STXM3+3, STXM3+5, STXM3+8 , STXM3+11, STXM3+12, STXM4+2, STXM4+4, STXM4+6, STXM4+7

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	HINI+1~, HINI+3
%H	HINI+1~
%I	HINI+1~
DA	HDRX+12~, HDRX+13*, HDRX+14, HDRX+15
>> DFN	HDRX+13
DIC	HDRX+12~, HDRX+13*
DIQ	HDRX+12~, HDRX+13*
DIQ(0	HDRX+13*
DIR	HDR+16~
DIR(0	HDR+16*
DR	HDRX+12~, HDRX+13*, HDRX+14, HDRX+15
IOF	HDR+18
IOM	HDR+34
IOST	HDR+16, HDR+18
SC	HDR~, HDRX+16
SD	HDR+30~*
SDARR	HDRX+13~
SDARR(2	HDRX+14, HDRX+15
>> SDCOL	SUBT1+1, SUBT1+3, SUBT1+5, SUBT1+6, SUBT1+8, SUBT1+9, SUBT1+11, SUBT1+12, SUBT1+14, SUBT1+15 , SUBT1+17, STXM1+4, STXM1+13, STXM1+21
SDCP	HDR~, HDRX+17
SDDV	HDRX+4~*, HDRX+5, HDRX+6
SDI	HDR+17~, HDR+27, HDR+28, SUBT1~, SUBT1+3, SUBT1+9, SUBT1+15, SUBT2~, SUBT2+4, SUBT2+6* , SUBT3~, SUBT3+4, SUBT3+6, HDRXM+3~, HDRXM+4, HDRXM+14, HDRXM+15, HDRXM+16, STXM1~, STXM1+3 , STXM1+4, STXM1+13, STXM1+21, STXM2~, STXM2+7, STXM2+10, STXM3~, STXM3+7, STXM3+10
>> SDIOM	HINI+2, HDR+19, HDR+26, HDR+28, HDR+30
SDIV	HDR~, HDRX+2*, HDRX+4
>> SDLINE	HINI+2*, HDR+19, HDR+32, HDR+35, SUBT1+17, SUBT2+1, SUBT2+7, SUBT3+1, SUBT3+7, SUBT4+2 , SUBT5+2, HDRXM+5, HDRXM+18, HDRXM+21, STXM1+25, STXM2+2, STXM2+12, STXM3+2, STXM3+12, STXM4+7
>> SDOUT	HDR+14, HDR+16, HDR+17, HDR+27, STOP+1
>> SDPAGE	HINI+2, HDR+34, HDR+36, HDRXM+4, HDRXM+22*
>> SDPAST	HINI+2, HDR+20, HDR+21, SUBT1+2, SUBT1+7, SUBT1+13, SUBT1+17, HDRXM+5, HDRXM+6, HDRXM+7 , HDRXM+8, HDRXM+13, HDRXM+16, HDRXM+18, HDRXM+21, STXM1+2, STXM1+11, STXM1+19, STXM1+25
>> SDPBDT	HDR+33, HDRXM+19
>> SDPEDT	HDR+33, HDRXM+19
>> SDPG	HINI+2, HDR+16, HDR+18, HDR+36
>> SDPNOW	HINI+3*, HDR+34, HDRXM+20
SDPT	HDRX+13*~
SDREPORT	HDR~, HDR+15, HDR+20, HDR+21, HDR+22, HDR+23, HDR+24, HDR+25, HDR+28, HDR+29 , HDR+36, HDRX+8, SUBT~, SUBT+1, SUBT+2, SUBT+3, HDRXM~, HDRXM+7, HDRXM+8, HDRXM+9 , HDRXM+10, HDRXM+11, HDRXM+12, HDRXM+22, SUBTXM~, SUBTXM+2, SUBTXM+3
>> SDSORT	HDRX+7, HDRX+9, HDRX+10, HDRX+11
SDTIT	HDRX+1!
SDTIT(	HDR+28, HDR+30, HDRXM+15, HDRXM+16
SDTIT(""	HDR+29
SDTIT(1	HDRX+3, HDRX+5, HDRX+6*
SDTIT(2	HDRX+7, HDRX+9, HDRX+10, HDRX+11
SDTIT(3	HDR+31, HDRX+14, HDRX+18
SDTIT(4	HDR+31, HDRX+15*
SDTIT(5	HDR+31, HDRX+16*
SDTIT(6	HDR+31, HDRX+17*
>> SDTITL	HINI+4*, HDR+19, HDRXM+6
SDTY	HDR~, HDR+27, HDR+36, HDRX~, HDRX+2, HDRX+3, HDRX+5, SUBT~, SUBT1+5, SUBT1+11 , SUBT2+3, SUBT2+5, SUBT3+3, SUBT3+5, HDRXM+14, HDRXM+22, SUBTXM~, STXM1+9, STXM1+17, STXM1+25 , STXM2+6, STXM2+9, STXM3+6, STXM3+9
SDX	HDR+17~, HDR+20, HDR+21, HDR+22, HDR+23, HDR+24, HDR+25, HDR+26, HDRXM+3~, HDRXM+7* , HDRXM+8, HDRXM+9, HDRXM+10, HDRXM+11, HDRXM+12*, HDRXM+13, XMTX~, XMTX+2
>> SDXM	HDR+15, XMTX+2*
SDZ	HDRXM+3~, HDRXM+6, HDRXM+13, HDRXM+15, HDRXM+16, HDRXM+20, HDRXM+21, SUBTXM+1~, STXM1+1, STXM1+4* , STXM1+6, STXM1+8, STXM1+9, STXM1+10, STXM1+12, STXM1+13, STXM1+14, STXM1+16, STXM1+17, STXM1+18 , STXM1+20, STXM1+21, STXM1+22, STXM1+24, STXM1+25, STXM1+26, STXM2, STXM2+1, STXM2+2, STXM2+3 , STXM2+4, STXM2+5, STXM2+6, STXM2+7, STXM2+8, STXM2+9, STXM2+10, STXM2+11, STXM2+12, STXM3 , STXM3+1, STXM3+2, STXM3+3, STXM3+4, STXM3+5, STXM3+6, STXM3+7, STXM3+8, STXM3+9, STXM3+10 , STXM3+11, STXM3+12, STXM4, STXM4+1, STXM4+2, STXM4+3, STXM4+4, STXM4+5, STXM4+6, STXM4+7
U	HDRX+4, HDRX+16
X	HINI+1~
X1	HINI+1~
X2	HINI+1~
>> Y	HINI+3*, HDR+16
>> ZTQUEUED	STOP+1
>> ZTSTOP	STOP+1*

Name	Comments	DBIA/ICR reference
HDR(SDTY,SDREPORT,SDIV,SDCP,SC)	;Print header
SUBT5
SUBT4
SUBT3
SUBT2
SUBT1
STXM2
STXM4
STOP	;Check for stop task request
SUBTXM(SDTY,SDREPORT)	;Create message header subtitles
XMTX(SDX)	;Set mail message text line
SUBT(SDTY,SDREPORT)	;Print subtitles
STXM3
HDRXM(SDREPORT)
STXM1
HINI	;Initialize header variables
HDRX(SDTY)	;Extra header lines

Customize PDF page

Package: Scheduling

Routine: SCRPW76

Information

Source Information

Call Graph

Call Graph Total: 6

Caller Graph

Caller Graph Total: 4

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: