Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: ECXDTASK

Package: DSS Extracts

Routine: ECXDTASK


Information

ECXDTASK ;ALB/TJL - Option, ECX KILL TASK ;3/19/24 14:35

Source Information

Source file <ECXDTASK.m>

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

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
Info |  Source |  Entry Points |  Interaction Calls