Routine: SCRPO6

Information

SCRPO6 ;BP-CIOFO/KEITH - Historical Team Assignment Summary ; 9/14/99 10:07am

Package	Total	Call Graph
Scheduling	4	($$DTR,$$LIST,$$PPAR,HDR)^SCRPO (CKTEAM,COUNT,FOOT)^SCRPO7 DISP0^SCRPW23 (END,SUBT,TITL)^SCRPW50
Kernel	3	$$S^%ZTLOAD $$NOW^XLFDT EN^XUTMDEVQ
VA FileMan	2	YN^DICN ^DIR

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 1

Package	Total	Caller Graph
Scheduling	1	SC PCMM HIST TEAM ASSIGN SUMM

Entry Points

Name	Comments	DBIA/ICR reference
EN	;Queue report
PROMPT(LIST,SCRTN,SCDESC)	;Prompt for report parameters, queue report
END
STOP	;Check for stop task request
RUN	;Print report
BUILD	;gather report information
PRINT	;Print report
SLINE(SCN,SCX,SCPF,SCLF)	;Print summary line
TLINE(SCDIV,SCTEAM,SCPNAM,SCX)	;Print broken team assignment line
PLINE(SCDIV,SCTEAM,SCPNAM,SCX)	;Print broken team assignment line
HDRX(SCX)	;extra header line
HINI	;Initialize header variables
SHDR(X)	;Print subheader

External References

Name	Field # of Occurrence
$$S^%ZTLOAD	STOP+1
YN^DICN	EN+3
^DIR	PRINT+58
$$DTR^SCRPO	PROMPT+10
$$LIST^SCRPO	PROMPT+13
$$PPAR^SCRPO	PROMPT+17, PRINT+4
HDR^SCRPO	PRINT+4, PRINT+7, PRINT+12, PRINT+25, PRINT+42, SLINE+8, TLINE+8, PLINE+8
CKTEAM^SCRPO7	BUILD+5, BUILD+10
COUNT^SCRPO7	RUN+4
FOOT^SCRPO7	PRINT+22, SLINE+8
DISP0^SCRPW23	END, PRINT+3
END^SCRPW50	END
SUBT^SCRPW50	PROMPT+8, PROMPT+11, PROMPT+16
TITL^SCRPW50	PROMPT+7
$$NOW^XLFDT	HINI+4
EN^XUTMDEVQ	PROMPT+20

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Print Final Summary Only" Line Location: EN+3
Function Call: WRITE	Prompt: !!,"This report requires 132 column output!" Line Location: PROMPT+18
Function Call: WRITE	Prompt: ! Line Location: PROMPT+19
Function Call: WRITE	Prompt: ! Line Location: PRINT+58
Function Call: WRITE	Prompt: !,$E($P(SCN,U),1,28) Line Location: SLINE+15
Function Call: WRITE	Prompt: !,$E($P(SCN,U),1,28),?30,$S($P(SCX,U)="":"NO",1:$P(SCX,U)) Line Location: SLINE+16
Function Call: WRITE	Prompt: ?(27+(9*SCI)),$J(+$P(SCX,U,$P(SCY,U,SCI)),6,0) Line Location: SLINE+18
Function Call: WRITE	Prompt: !,$P(SCDIV,U),?32,$P(SCTEAM,U),?64,SCPNAM Line Location: TLINE+9
Function Call: WRITE	Prompt: ?96,$TR($P(SCX,U,2),"-",""),?108,$P(SCX,U,3),?121,$P(SCX,U,4) Line Location: TLINE+10
Function Call: WRITE	Prompt: !,$P(SCDIV,U),?24,$P(SCTEAM,U),?48,SCPNAM,?72,$TR($P(SCX,U,2),"-","") Line Location: PLINE+9
Function Call: WRITE	Prompt: ?84,$P(SCX,U,5),?108,$P(SCX,U,3),?121,$P(SCX,U,4) Line Location: PLINE+10
Function Call: WRITE	Prompt: ?(35+(9*SCI)),"-------" Line Location: SHDR+7
Function Call: WRITE	Prompt: $E(SCLINE,1,30)," " Line Location: SHDR+11
Function Call: WRITE	Prompt: $E(SCLINE,1,22)," " Line Location: SHDR+16
Routine Call	DIR Line Location: PRINT+58

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	TLINE+7, PLINE+7, HINI+4
^SCTM(404.51 - [#404.51]	BUILD+9
^TMP("SC"	END!, BUILD+3, BUILD+4, HDRX+5, HDRX+6, HDRX+7
^TMP("SCRATCH"	RUN+6!
^TMP("SCRPT"	RUN+2!, RUN+6!, PRINT+6, PRINT+13, PRINT+14, PRINT+15, PRINT+16, PRINT+21, PRINT+24, PRINT+27 , PRINT+29, PRINT+31, PRINT+33, PRINT+34, PRINT+41, PRINT+44, PRINT+46, PRINT+48, PRINT+50, PRINT+51

Label References

Name	Line Occurrences
$$HDRX	PRINT+4, PRINT+12, PRINT+25, PRINT+42
BUILD	RUN+4
END	PROMPT+10, PROMPT+15, PROMPT+17
HINI	PRINT+3
PLINE	PRINT+52
PRINT	RUN+5
PROMPT	EN+7
SHDR	PRINT+12, PRINT+25, PRINT+42, SLINE+8, TLINE+8, PLINE+8
SLINE	PRINT+14, PRINT+17, PRINT+21
STOP	RUN+4, BUILD+5, BUILD+10
TLINE	PRINT+35

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	EN+3*
DESC	EN+1~, EN+6*, EN+7
DIR	PRINT+58~
DIR(0	PRINT+58*
IOSL	SLINE+8, TLINE+8, PLINE+8
IOST	PRINT+3, PRINT+58
LIST	EN+1~, EN+4*, EN+7, PROMPT~, PROMPT+12
RTN	EN+1~, EN+5*, EN+7
SC	PROMPT+5~, PROMPT+6*, PROMPT+10, PROMPT+13, PROMPT+17, PRINT+4
SCBDT	PROMPT+5~, PROMPT+10
SCBDT("B"	PROMPT+9*
SCDESC	PROMPT~, PROMPT+7, PROMPT+20
SCDIV	PROMPT+5~, PRINT+13, PRINT+14, PRINT+15, PRINT+16, PRINT+26, PRINT+27, PRINT+29, PRINT+31, PRINT+33 , PRINT+34, PRINT+35, PRINT+43, PRINT+44*, PRINT+46, PRINT+48, PRINT+50, PRINT+51, PRINT+52, TLINE~ , TLINE+9, PLINE~, PLINE+9
SCEDT	PROMPT+5~, PROMPT+10
SCEDT("B"	PROMPT+9*
SCFF	PRINT+1~, PRINT+2*
SCI	PROMPT+5~, PROMPT+12, RUN+1~, PRINT+32, PRINT+33, PRINT+34, PRINT+49, PRINT+50, PRINT+51, SLINE+6~ , SLINE+18, TLINE+6~, TLINE+7, PLINE+6~, PLINE+7, SHDR+2~, SHDR+7, SHDR+11, SHDR+16*
SCLF	PRINT+1~, PRINT+2, PRINT+14, PRINT+17, PRINT+21, SLINE~, SLINE+8, SLINE+9, SLINE+19*
SCLINE	PRINT+1~, HINI+3*, SHDR+7, SHDR+11, SHDR+16, SHDR+17
SCN	SLINE~, SLINE+15, SLINE+16
SCOUT	PROMPT+5~, PROMPT+6, PROMPT+12, PROMPT+13, PROMPT+15, STOP+1, RUN+1~, RUN+3, RUN+4, BUILD+4 , BUILD+9, PRINT+4*, PRINT+5, PRINT+7, PRINT+12, PRINT+13, PRINT+15, PRINT+20, PRINT+22, PRINT+25 , PRINT+27, PRINT+29, PRINT+31, PRINT+33, PRINT+41, PRINT+42, PRINT+44, PRINT+46, PRINT+48, PRINT+50 , PRINT+58, SLINE+9, TLINE+8, PLINE+8, SHDR+1
SCPAGE	PRINT+1~, PRINT+11, HINI+3
SCPF	SLINE~, SLINE+8, SLINE+9
SCPNAM	PRINT+30, PRINT+31, PRINT+33, PRINT+34, PRINT+35, PRINT+47, PRINT+48, PRINT+50, PRINT+51, PRINT+52 , TLINE~, TLINE+9, PLINE~, PLINE+9
SCPNOW	PRINT+1~, HINI+4*
SCRTN	PROMPT~, PROMPT+20
SCT	PROMPT+5~, PROMPT+17
SCT(1	PROMPT+16*
SCTEAM	PRINT+14, PRINT+15, PRINT+16, PRINT+17, PRINT+28, PRINT+29, PRINT+31, PRINT+33, PRINT+34, PRINT+35 , PRINT+45, PRINT+46, PRINT+48, PRINT+50, PRINT+51, PRINT+52, TLINE~, TLINE+9, PLINE~, PLINE+9
SCTITL	PRINT+1~, PRINT+4, PRINT+7, PRINT+12, PRINT+25, PRINT+42, SLINE+8, TLINE+8, PLINE+8
SCTITL(1	HINI+2*
SCTITL(2	PRINT+4, PRINT+7!, PRINT+12, PRINT+25, PRINT+42
SCTM	BUILD+1~, BUILD+3, BUILD+4, BUILD+5, BUILD+9*, BUILD+10
SCX	PROMPT+5~, PROMPT+12, PROMPT+13, PRINT+8, PRINT+9, PRINT+14, PRINT+16, PRINT+17, PRINT+21, PRINT+34 , PRINT+35, PRINT+51, PRINT+52, SLINE~, SLINE+16, SLINE+18, TLINE~, TLINE+7, TLINE+10, PLINE~ , PLINE+7*, PLINE+9, PLINE+10, HDRX~, HDRX+4, HDRX+5, HDRX+6, HDRX+7
SCY	SLINE+6~, SLINE+7*, SLINE+18
>> SUMON	EN+2, EN+3, PRINT+23
U	SLINE+15, SLINE+16, SLINE+18, TLINE+7, TLINE+9, TLINE+10, PLINE+7, PLINE+9, PLINE+10
X	SHDR~, SHDR+3, SHDR+9, SHDR+14
Y	TLINE+6~, TLINE+7, PLINE+6~, PLINE+7, HINI+1~, HINI+4*
>> ZTQUEUED	STOP+1
ZTSAVE	PROMPT+19~, PROMPT+20
ZTSAVE("SC"	PROMPT+19*
ZTSAVE("SUMON"	PROMPT+19*
ZTSAVE("^TMP(""SC"",$J,"	PROMPT+19*
>> ZTSTOP	STOP+1*

Customize PDF page

Package: Scheduling