nsmcp::QuestionService method continuationJobs (protected)

 <instance of nsmcp::QuestionService> continuationJobs record

Defined in /usr/local/ns/tcl/nsmcp/question-service.tcl

Parameters:

record (required)

Testcases:

No testcase defined.

Source code:

if {[dict get $record status] ni {failed cancelled complete} || [dict get $record turns] eq {}} {return {}}
set last {}
# A failed continuation can stop before its first job event. Keep the
# most recent retained batch available in that case, without combining
# unbounded batches from every historical question.
foreach previous [lreverse [dict get $record turns]] {
    if {[dict exists $previous jobs] && [dict size [dict get $previous jobs]]>0} {set last $previous; break}
}
if {$last eq {}} {return {}}
set handles {}
dict for {handle job} [dict get $last jobs] {
    if {![regexp {^[0-9a-f]{64}$} $handle] || [dict get $job status] ni {queued running complete}} continue
    if {[dict get $last status] eq "complete" && [dict get $job status] eq "complete"} continue
    lappend handles $handle
}
return $handles

XQL Not present:

Generic, PostgreSQL, Oracle