<& /htmlheader &> <& modelheader &>

## Linking and Orbit Determination Efficiency
MJD <% $epoch_mjd %>
Derivations

<& httable, title => 'By Object Type', data => $derived_goo2, category => $EFF_DERIVEDOBJECTS, details => 'effldd' &> <& hftable, title => 'By Field', data => $derived_goo, category => $EFF_DERIVEDOBJECTS, details => 'effldd' &> <& /htmlfooter &> <%args> $epoch_mjd => undef $nn => undef <%init> use PS::MOPS::Lib qw(:all); use PS::MOPS::DC::Efficiency; my $inst = $m->notes('INST'); my $config = $inst->getConfig(); my $gmt_offset_hours = $config->{site}->{gmt_offset_hours}; if ($nn) { $epoch_mjd = mopslib_nn2mjd($nn, $gmt_offset_hours); } my $derived_goo = modce_retrieve($inst, category => $EFF_DERIVEDOBJECTS, byField => 1, epoch_mjd => $epoch_mjd); my $derived_goo2 = modce_retrieve($inst, category => $EFF_DERIVEDOBJECTS, byObjectType => 1, epoch_mjd => $epoch_mjd);