pro GrabBegEnd,DumpData,DumpMissVal,XYear0,XYear1 DimDumpData=size(DumpData) & DumpYearN=DimDumpData(2) XYear0=-1 & XDumpYear=-1 while (XYear0 LT 0 AND XDumpYear NE DumpYearN) do begin XDumpYear = XDumpYear + 1 for XMonth = 0, 11 do begin if (DumpData(XMonth,XDumpYear) NE DumpMissVal) then XYear0 = XDumpYear endfor endwhile XYear1=-1 & XDumpYear=DumpYearN while (XYear1 LT 0 AND XDumpYear NE -1) do begin XDumpYear = XDumpYear - 1 for XMonth = 0, 11 do begin if (DumpData(XMonth,XDumpYear) NE DumpMissVal) then XYear1 = XDumpYear endfor endwhile end