Routine: SCRPU3

Package	Total	Call Graph
Kernel	3	^%ZIS ^%ZISC $$FMTE^XLFDT
VA Fileman	2	NOW^%DTC ^DIR
Registration	1	(STOPCHK,STOPPED)^DGUTL
Scheduling	1	$$SDAPI^SDAMA301

Package	Total	Caller Graph
Scheduling	15	SCRPEC SCRPEC2 SCRPEC3 SCRPITP SCRPPAT SCRPPAT3 SCRPRAC SCRPSLT SCRPSLT2 SCRPTA SCRPTM SCRPTM2 SCRPTP SCRPTP2 SCRPU1
IHS Changes To Scheduling	1	BSDSCEC

Entry Points

Name	Comments	DBIA/ICR reference
NEWP1(PAGE,TITL,MARG)	;
TITLE(PG,TITL,MARG)	;
HELP
PDEVICE()	;
OPEN	;opens device
GETLAST(DFN,CLN)	;
GETNEXT(DFN,CLN)	;
GETTIME()	;
CONV(ORIGA,NEWA)	;
CLOSE	;close device
ELIG(DFN)	;
NODATA(TITL)	;
HOLD(PAGE,TIT,MARG)	;

External References

Name	Field # of Occurrence
NOW^%DTC	GETNEXT+18, GETLAST+17
^%ZIS	PDEVICE+3, OPEN+3
^%ZISC	CLOSE+1
STOPCHK^DGUTL	NEWP1+5
STOPPED^DGUTL	NEWP1+6
^DIR	GETTIME+4
$$SDAPI^SDAMA301	GETNEXT+20, GETLAST+20
$$FMTE^XLFDT	GETNEXT+22, GETLAST+23, TITLE+4

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Press Any Key to Continue or '^' to Quit" Line Location: HOLD+4
Function Call: WRITE	Prompt: SCX,! Line Location: TITLE+9
Function Call: WRITE	Prompt: !,"No data to report" Line Location: NODATA+6
Function Call: WRITE	Prompt: !?5,"Imprecise selections will yield an additional prompt." Line Location: HELP+4
Function Call: WRITE	Prompt: !?5,"- An entry preceeded by a minus [-] sign to remove entry from list." Line Location: HELP+5
Function Call: WRITE	Prompt: !,"NOTE, you have already selected:" Line Location: HELP+6
Function Call: WRITE	Prompt: !?8,$S(VAUTNI=1:VAJ,1:@VAUTVB@(VAJ)) Line Location: HELP+6
Routine Call	DIR Line Location: GETTIME+4
Routine Call	%ZIS Line Location: PDEVICE+3 OPEN+3

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(8 - [#8]	ELIG+4, ELIG+5
^DIC(8.1 - [#8.1]	ELIG+7
^DPT - [#2]	ELIG+3, ELIG+4, ELIG+5
^TMP($J	GETNEXT+21, GETNEXT+27!, GETLAST+22, GETLAST+27!

Label References

Name	Line Occurrences
CLOSE	NODATA+7
NEWP1	HOLD+6
OPEN	NODATA+4
TITLE	NEWP1+9, NODATA+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	GETNEXT+5~, GETNEXT+18, GETLAST+4~, GETLAST+17
%ZIS	PDEVICE+3*!
APPT	GETNEXT+3~, GETLAST+3~
CLN	GETNEXT~, GETNEXT+17, GETNEXT+19, GETNEXT+21, GETLAST~, GETLAST+16, GETLAST+18, GETLAST+22
CNT	CONV+4~, CONV+5, CONV+8, CONV+9
DFN	ELIG~, ELIG+3, ELIG+4, ELIG+5, GETNEXT~, GETNEXT+17, GETNEXT+19, GETNEXT+21, GETLAST~, GETLAST+16 , GETLAST+18, GETLAST+22
DIR	GETTIME+7!
DIR("A"	GETTIME+3*
DIR("B"	GETTIME+3*
DIR(0	GETTIME+3*
DIROUT	GETTIME+6, GETTIME+7!
DT	TITLE+4
DTIME	HOLD+4
DTOUT	GETTIME+5, GETTIME+7!
DUOUT	GETTIME+6, GETTIME+7!
ENT	CONV+4~, CONV+5, CONV+7, CONV+9
FOUND	GETNEXT+3~, GETNEXT+16, GETLAST+3~, GETLAST+15
IO	OPEN+5
IO("Q"	PDEVICE+5
IOF	NEWP1+7, OPEN+2
IOM	TITLE+5, TITLE+8
ION	PDEVICE+3, PDEVICE+4
IOST	PDEVICE+6, CLOSE+1, OPEN+1
LAST	GETLAST+3~, GETLAST+15, GETLAST+16, GETLAST+23, GETLAST+28
MARG	HOLD~, HOLD+3, HOLD+6, NEWP1~, NEWP1+4, NEWP1+9, TITLE~, TITLE+3*
NEWA	CONV~, CONV+6*
NEWA(	CONV+9*
NEXT	GETNEXT+3~, GETNEXT+16, GETNEXT+17, GETNEXT+22, GETNEXT+28
ORIGA	CONV~, CONV+6
ORIGA(	CONV+7, CONV+9
PAGE	HOLD~, HOLD+6, NEWP1~, NEWP1+7, NEWP1+8*, NEWP1+9
PDATE	TITLE+2~, TITLE+4*, TITLE+6
PG	TITLE~, TITLE+8
POP	PDEVICE+2~, PDEVICE+3, OPEN+4
PRIM	ELIG+2~, ELIG+5, ELIG+7, ELIG+9, ELIG+10, ELIG+11, ELIG+12, ELIG+13, ELIG+14, ELIG+15* , ELIG+16
SCI	TITLE+2~, TITLE+5*, TITLE+7
SCX	TITLE+2~, TITLE+6, TITLE+7, TITLE+8*, TITLE+9
SDAPPT	GETNEXT+5~, GETLAST+4~
SDARRAY	GETNEXT+5~, GETNEXT+20, GETLAST+4~, GETLAST+20
SDARRAY("FLDS"	GETNEXT+19, GETLAST+19
SDARRAY("MAX"	GETNEXT+19, GETLAST+18
SDARRAY(1	GETNEXT+18, GETLAST+17
SDARRAY(2	GETNEXT+19, GETLAST+18
SDARRAY(3	GETNEXT+19, GETLAST+18
SDARRAY(4	GETNEXT+19, GETLAST+18
SDCOUNT	GETNEXT+5~, GETNEXT+20, GETNEXT+21, GETNEXT+23, GETLAST+4~, GETLAST+20, GETLAST+21, GETLAST+24
SDDATE	GETNEXT+5~, GETNEXT+21, GETNEXT+22, GETLAST+4~, GETLAST+21, GETLAST+22*, GETLAST+23
SDSTATUS	GETNEXT+5~, GETLAST+4~
STATUS	GETLAST+3~
>> STOP	HOLD+5*, NEWP1+6
TION	PDEVICE+2~, PDEVICE+4, PDEVICE+5, PDEVICE+6
TIT	HOLD~, HOLD+6
TITL	NEWP1~, NEWP1+9, TITLE~, TITLE+5, TITLE+7, NODATA~, NODATA+5
>> VAJ	HELP+6*
>> VAJ1	HELP+6*
>> VALM	NEWP1+1, TITLE+1, NODATA+4
>> VAUTNA	HELP
>> VAUTNI	HELP+6
>> VAUTPO	HELP+2, HELP+3
>> VAUTSTR	HELP, HELP+1, HELP+2, HELP+3
>> VAUTTN	HELP+1
>> VAUTVB	HELP+5, HELP+6
X	GETTIME+2~, GETTIME+5, HOLD+2~, HOLD+4*, HOLD+5
Y	GETTIME+2~, GETTIME+5, GETTIME+6, GETTIME+8

Customize PDF page

Package: Scheduling

Routine: SCRPU3

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Caller Graph Total: 16

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: