Warn if no maneuver summary is found for a quaternion

   push @{$self->{yellow_warn}}, sprintf("$alarm Did not find match in MAN summary for MP_TARGQUAT at $c->{date}\n")
   unless ($found);

Warn if quaternion in maneuver error file doesn't match target

   push @{$self->{yellow_warn}}, sprintf("$alarm Mismatch in target quaternion ($c->{date}) and maneuver error file\n");

Warn if acquisition star has non-zero aspq1

   push @yellow_warn, sprintf "$alarm Centroid Perturbation Warning. [%2d]- %s: ASPQ1 = %2d\n", 
      $i, $sid, $c->{"GS_ASPQ$i"} 
      if ($type =~ /BOT|ACQ|GUI/ && defined $c->{"GS_ASPQ$i"} && $c->{"GS_ASPQ$i"} != 0);

Warn if AGASC ID is non-numeric

   push @yellow_warn,sprintf "$alarm Non-numeric AGASC ID. [%2d]: %s\n",$i,$sid if ($sid ne '---' && $sid =~ /\D/);

Warn if any star has a large position error or large magnitude error

   my $marginal_note = '';
   if (defined $c->{"GS_CLASS$i"}) {
      $c->{"GS_NOTES$i"} .= 'b' if ($c->{"GS_CLASS$i"} != 0);
      $c->{"GS_NOTES$i"} .= 'c' if ($c->{"GS_BV$i"} == 0.700);
      $c->{"GS_NOTES$i"} .= 'm' if ($c->{"GS_MAGERR$i"} > 99);
      $c->{"GS_NOTES$i"} .= 'p' if ($c->{"GS_POSERR$i"} > 399);
      $note = sprintf("B-V = %.3f, Mag_Err = %.2f, Pos_Err = %.2f",$c->{"GS_BV$i"},($c->{"GS_MAGERR$i"})/100,
                      ($c->{"GS_POSERR$i"})/1000) if ($c->{"GS_NOTES$i"} =~ /[cmp]/);
      $marginal_note = sprintf("$alarm Marginal star. [%2d]: %s\n",$i,$note) if ($c->{"GS_NOTES$i"} =~ /[^b]/);
      if ( $c->{"GS_NOTES$i"} =~ /c/ && $type =~ /BOT|GUI/ ) { push @warn, $marginal_note }
      elsif ($marginal_note) { push @yellow_warn, $marginal_note }
      push @warn, sprintf("$alarm Bad star. [%2d]: Class = %s %s\n",
      $i,$c->{"GS_CLASS$i"},$note) if ($c->{"GS_NOTES$i"} =~ /b/);
   }

Warn if Guide star is near a quandrant boundary

   push @yellow_warn, sprintf "$alarm Quadrant Boundary. [%2d]\n",$i 
      unless ($type eq 'ACQ' or $type eq 'MON' or 
      (abs($yag-$y0) > $qb_dist + $slot_dither and abs($zag-$z0) > $qb_dist + $slot_dither ));

Warn if a star is fainter than 10.2 but brighter than 10.6

   elsif ($mag > $mag_faint_yellow) {
      push @yellow_warn, sprintf "$alarm Magnitude. [%2d]: %6.3f\n",$i,$mag;
   }

Warn if a Fidlight is between 4 and 5 magnitudes brighter than a spoiler star

   if ($type eq 'FID'
      and $dz < $dither+25 and $dy < $dither+25
      and $dm > -5.0) {
      my $warn = sprintf("$alarm Fid spoiler. [%2d]- %10d: " .
   		      "Y,Z,Radial,Mag seps: %3d %3d %3d %4s\n",$i,$star->{id},$dy,$dz,$dr,$dm_string);
      if ($dm > -4.0)  { push @warn, $warn } 
      else { push @yellow_warn, $warn }
   }

Warn if an non-Monitor slot is between 0.2 and 1.0 magnitudes brighter than a star within slew error + half width (slew_err is maneuver error + pad)

   if ($type ne 'MON' and $dz < $halfw + $search_err and $dy < $halfw + $search_err and $dm > -1.0) {
      my $warn = sprintf("$alarm Search spoiler. [%2d]- %10d: " .
      		      "Y,Z,Radial,Mag seps: %3d %3d %3d %4s\n",$i,$star->{id},$dy,$dz,$dr,$dm_string);
      if ($dm > -0.2)  { push @warn, $warn }
      else { push @yellow_warn, $warn }
   }