First there was awk, then there was perl.

perl is a great language for this sort of thing.
Its so easy, even an MPE caveman can do it.

---
open(F,"test.txt") || die;

while (<F>) {

  chop;

  ($season,$year,$grade,$studentid,$name,$test,$score) = split('\t');
  #print "season=$season year=$year grade=$grade studentid=$studentid name=$name test=$test score=$score\n";

  if ($studentid ne $savestudentid) {

    if ($savestudentid ne "") {
      print "$saveseason\t$saveyear\t$savegrade\t$savestudentid\t$savename\t$savereadtest\t$savereadscore\t$savemathtest\t$savemathscore\n";
      }

    $saveseason = $season;
    $saveyear = $year;
    $savegrade = $grade;
    $savestudentid = $studentid;
    $savename = $name;
    $savereadtest = "";
    $savereadscore = "";
    $savemathtest = "";
    $savemathscore = "";

    }

  $savereadtest = $test if $test eq "Reading";
  $savereadscore = $score if $test eq "Reading";
  $savemathtest = $test if $test eq "Mathemati";
  $savemathscore = $score if $test eq "Mathemati";

  }

print "$saveseason\t$saveyear\t$savegrade\t$savestudentid\t$savename\t$savereadingtest\t$savereadscore\t$savemathtest\t$savemathscore\n";

close(F);
---

PS: I'm sure this could be shorter, cleaner, etc
 

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *