Routine: ECXDTASK

Package	Total	Call Graph
Kernel	4	($$ASKSTOP,STAT)^%ZTLOAD $$H3^%ZTM $$HTE^XLFDT $$NAME^XUSER
VA FileMan	2	DD^%DT ^DIR

Package	Total	Caller Graph
DSS Extracts	1	ECX KILL TASK

Entry Points

Name	Comments	DBIA/ICR reference
ENV	;Establish Routine Environment
START	;
VALID	; Task is either running or scheduled - add to list
EOP	;Simulate DIR(0)="E" Call To DIR (For Use Within DIR calls)
EOL	;Simulate DIR(0)="E" call to DIR for end of listings
PROMPT	; Prompt the user for a task number
SETPARAM	;
XFORM	; XFORM--Does task have an intact ^%ZTSK(#,0)
HELP1	;SELECT--Default Help For '?'
HELP2	;SELECT--Default Help For '??'
STOPTASK	;Lookup Task File Data And Set Stop Flag
REPORT	;Report Results Of Lookup And Stop

External References

Name	Field # of Occurrence
DD^%DT	START+24, START+25
$$ASKSTOP^%ZTLOAD	STOPTASK+6
STAT^%ZTLOAD	START+8
$$H3^%ZTM	VALID+3
^DIR	PROMPT+2
$$HTE^XLFDT	START+29, START+31
$$NAME^XUSER	START+35

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF Line Location: START+4
Function Call: WRITE	Prompt: ! Line Location: START+15
Function Call: WRITE	Prompt: !,"There are no extract-related tasks queued.",! Line Location: START+16
Function Call: WRITE	Prompt: !,LISTNO_": (Task #"_TASKNO_")" Line Location: START+32
Function Call: WRITE	Prompt: !?3,PRINTNM_" Extract from "_STARTDT_" to "_ENDDT_"." Line Location: START+34
Function Call: WRITE	Prompt: !?5,"Task created at "_$P(DTCREATE,"@",2)_" on "_$P(DTCREATE,"@",1)_" by "_$$NAME^XUSER($P(QREC,U,3),"F") Line Location: START+35
Function Call: WRITE	Prompt: !?5,"Scheduled to start at "_$P(SCHED,"@",2)_" on "_$P(SCHED,"@",1) Line Location: START+36
Function Call: WRITE	Prompt: !,LN Line Location: START+37
Function Call: WRITE	Prompt: @IOF Line Location: START+38
Function Call: WRITE	Prompt: ! Line Location: START+39
Function Call: WRITE	Prompt: !?7,"No task selected. Returning to the DSS Extracts Transmission",!?7,"Management menu." Line Location: START+41
Function Call: READ	Formatting: ! Prompt: "Press RETURN to continue or '^' to exit: " Variable: Y Timeout: $S($D(DTIME)#2:DTIME,1:60) Line Location: EOP+1
Function Call: READ	Formatting: ! Prompt: "End of listing. Press RETURN to continue: " Variable: Y Timeout: $S($D(DTIME)#2:DTIME,1:60) Line Location: EOL+1
Function Call: WRITE	Prompt: !?5,"Select an extract task by its Task # (an integer between 1 and 999999999)" Line Location: HELP1+1
Function Call: WRITE	Prompt: ",",!?5,"or by its index number from the list." Line Location: HELP1+2
Function Call: WRITE	Prompt: !!,"Only tasks for DSS Extracts that are running or queued can be stopped." Line Location: STOPTASK+5
Function Call: WRITE	Prompt: !!?5,"Task unscheduled and stopped." Line Location: REPORT+1
Function Call: WRITE	Prompt: !,"This task was already stopped." Line Location: REPORT+2
Function Call: WRITE	Prompt: !!?5,"Task stopped!" Line Location: REPORT+3
Routine Call	DIR Line Location: PROMPT+2

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZTSK - [#14.4]	VALID+6, PROMPT+3, XFORM+1
^ECX(727.1 - [#727.1]	START+22, START+23
^TMP($J	START+1!, START+17, START+18, START+20, START+21, VALID+4, VALID+5, VALID+6, PROMPT+3, XFORM+1 , HELP1+2, STOPTASK+3, STOPTASK+4
^XTMP("ECX EXTRACT"	START+6, START+7

Label References

Name	Line Occurrences
EOL	START+39
EOP	START+38
PROMPT	START+40
REPORT	STOPTASK+7
SETPARAM	PROMPT+2
START	HELP2+1
STOPTASK	START+42
VALID	START+11, START+12

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ABBR	START+2~, START+6*, START+7, VALID+5
DA	STOPTASK+1~, STOPTASK+2, STOPTASK+3, STOPTASK+4
DA7271	START+2~, START+22*, START+23
DIR	ENV+1~, HELP2+1~
DIR("?"	SETPARAM+3*
DIR("??"	SETPARAM+4*!
DIR("A"	SETPARAM+2*
DIR("T"	SETPARAM+6*
DIR(0	SETPARAM+1*
DIRUT	ENV+2!, PROMPT+1~, PROMPT+2, PROMPT+3, HELP2+1~
DTCREATE	START+3~, START+28, START+29, START+35
DTIME	EOP+1, EOL+1, SETPARAM+6
DTOUT	ENV+2!, ENV+3~, START+38, EOP+1, EOL+1
DUOUT	ENV+2!, ENV+3~, START+38, EOP+1, EOL+1
ENDDT	START+3~, START+25*, START+34
FOUND	START+2~, START+5, START+16, VALID+1, STOPTASK+2, STOPTASK+3, STOPTASK+4, STOPTASK+5
HSEC	START+3~, VALID+3*, VALID+4, VALID+5, VALID+6
IOF	START+4, START+38
JOBNO	START+2~, START+10, START+27, START+33
LISTNO	START+2~, START+17, START+19, START+20, START+32
LN	ENV+3~, ENV+4, START+5, START+37
PRINTNM	START+2~, START+23*, START+34
QCOUNT	START+2~, START+5, VALID+1, VALID+4
QREC	START+2~, START+7, START+8, START+10, START+21, START+22, START+24, START+25, START+26, START+27 , START+28, START+30, START+35, VALID+2, VALID+3, VALID+5
RET	STOPTASK+1~, STOPTASK+6*
SCHED	START+3~, START+26, START+31, START+36
SECNODE	START+3~, START+17*, START+18, START+21
STARTDT	START+3~, START+24*, START+34
STAT	START+2~, START+11, START+12, VALID+6
TASKDA	VALID+1~, VALID+2*, VALID+4, VALID+5, VALID+6
TASKNO	START+2~, START+18*, START+20, START+21, START+32
U	ENV+3~, ENV+4*, START+8, START+10, START+22, START+23, START+24, START+25, START+26, START+27 , START+28, START+30, START+35, VALID+2, VALID+3, VALID+5, VALID+6, REPORT+2
VERB	START+2~, START+30*
X	ENV+3~, PROMPT+1~, XFORM+1*, HELP2+1~
XUTMT	ENV+1~, START+41, PROMPT+4*, STOPTASK+4, STOPTASK+6, REPORT+1!, REPORT+2!, REPORT+3!
Y	ENV+3~, START+24, START+25, EOP+1, EOL+1, PROMPT+1~, PROMPT+2, PROMPT+3, HELP2+1~
ZT	ENV+3~, EOP+1, EOL+1, PROMPT+1~
ZTOUT	ENV+3~, START+5, START+17, START+18, START+38, START+39
ZTS	ENV+3~
ZTSK	ENV+1~, START+8, VALID+6, PROMPT+3, PROMPT+4
ZTSK(	REPORT+1, REPORT+2
ZTSK(0	START+9
ZTSK(1	START+11, START+12
ZTSK(2	START+11, START+12

Customize PDF page

Package: DSS Extracts

Routine: ECXDTASK

Information

Source Information

Call Graph

Call Graph Total: 6

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: