Unfound Derived Object History
Object <% $ssm->objectName %>

% if ($event->ssmId) {

SSM Orbit

Orbit <& ssmtable, ssmId => $event->ssmId &>

% } % if ($event->orbitId) {

Initial Orbit Determination

Orbit <& otable, orbitId => $event->orbitId, showdets => 0 &>

% }

Tracklets Event ID <% $event->eventId %> <% $event->eventTime %>

% my $trk; % foreach my $trk_id (@{$event->trackletIds}) { % $trk = modct_retrieve($inst, trackletId => $trk_id); <& ttable, trk => $trk &> % }

<& /htmlfooter &> <%args> $eventId => undef <%init> # Display a table of tracklets/detection history data for specified field ID. use PS::MOPS::DC::History::Derivation; use PS::MOPS::DC::Tracklet; use PS::MOPS::DC::SSM; use PS::MOPS::DC::Orbit; my $inst = $m->notes('INST'); my $model = $m->notes('MODEL'); my $event = modchd_retrieve($inst, eventId => $eventId); my $ssm = modcs_retrieve($inst, ssmId => $event->ssmId);