#!/usr/bin/perl
#!
#!
#! ***********************************************************************************
#!  This program is written by David Ma, on Nov. 1,2001.  It generates
#!  job execution times from a data file.  This data file is a product of
#!  of the Production Server Loadleveler.
#!  Color Bar Code:
#!          Green   - Job is Good.
#!          Red     - Job is starting/turning bad.  It means job ran pass the last job time.
#!          White   - Job is just initiated to run.
#!          Yellow  - Job does not have last job time.
#!          Magenta - Job is in 95% - 100% of the last job time.
#!          Black   - Job is not in running/initial status.
#!
#!  Name Code:
#!          Red          - Job aborted last time or in submit more than 5 minutes.
#!          Black(solid) - Job is over 1 to 5 times of the last job time.
#!          Red Blink    - Job is over 5 times of the last job time.
#! 
#!  No Write Time Code(NWrTm):
#!          Red          - Job has not write to output file for over 5 minutes.
#!          
#!  Date        Name                  Description
#!  ---------   --------------------  ------------------------------------------------
#!  12/16/01    David Ma              Added the last write time.
#!  11/21/02    David Ma              Added the above descriptions.
#!  01/03/03    David Ma              Modified to run on the New SPs.
#!  02/13/03    David Ma              Added the Submit status check.
#!  04/03/03    David Ma              Modified the way to detect when
#!                                    jobview webpage not updated
#! ***********************************************************************************
#!
($infile, $outfile, $jhdate) = split(/ /,"@ARGV");

open (zlqfile, "<$infile") or die "Can't find the $infile file: @ARGV\n";

open (jobgraph, ">$outfile") or die "Problem opening $outfile";

$qi = 0;
$qsp="a";
$sary="0.00";
$rary="'00:00'";
$nary="''";
$mary="''";
$cary="''";
$lary="'  00:00'";
$idary="' 00.00'";
$strary="'00:00'";
$hstary="'00:00'";
$hatary="'00:00'";
$errary="'00000'";
$tmpary="'00:00'";
$tnaary="'00:00'";
$htmlpath="";
$legend="dislegend.html";
$statuscode="disstatuscode.html";
$jobgraph=join("",$outfile,"");
$goodcolor="ltgreen.gif";
$badcolor="red.gif";
$initcolor="white.gif";
$noavgcolor="yellow.gif";
$donecolor="magenta.gif";
$rpcolor="black.gif";
#! $bustcolor="red4.gif";
$bustcolor="violet.gif";
$logo="nceplogo.gif";
$qdate=0;
while ($line = <zlqfile>)
{
  if ($qdate == 0)
  {
    @qyp=split(" ",$line);
    $wdate=join("'",$wdate,"");
    $wdate=join(" ",$wdate,$qyp[0],$qyp[1],$qyp[2],$qyp[3],$qyp[4],$qyp[5],$gyp[6]);
    $wdate=join("",$wdate,"'");
    @qspp=split(":",$qyp[4]);
    $qdate=2;
  }
  else
  {
    @qyp = split(" ",$line);
    @qsp = split(":",$qyp[2]);
    @qwp = split(":",$qyp[3]);
    if ($qwp[1] <= $qspp[1])
    {
      if ($qwp[2]-$qspp[2] > 5)
      {
         $qmp[$qi]=1
      }
    }
#! name
    $nary=join(",",$nary,"");
    $nary=join("'",$nary,$qyp[0]);
    $nary=join("    '",$nary,"");
#! code
    $cary=join(",",$cary,"");
    $cary=join("'",$cary,$qyp[1]);
    $cary=join("    '",$cary,"");
#! percent 
    $sary=join(",",$sary,$qyp[2]);
#! job run time
    $rary=join(",",$rary,"");
    $rary=join("' ",$rary,$qyp[3]);
    $rary=join("  '",$rary,"");
#! job start time
    $strary=join(",",$strary,"");
    $strary=join("' ",$strary,$qyp[4]);
    $strary=join("  '",$strary,"");
#! last write time
    $lary=join(",",$lary,"");
    $lary=join("' ",$lary,$qyp[5]);
    $lary=join("   '",$lary,"");
#! history runtime
    $hstary=join(",",$hstary,"");
    $hstary=join("'",$hstary,$qyp[6]);
    $hstary=join("'",$hstary,"");
#! idle time
    $idary=join(",",$idary,"");
    $idary=join("' ",$idary,$qyp[7]);
    $idary=join(" '",$idary,"");
#! machine
    $mary=join(",",$mary,"");
    $mary=join("'",$mary,$qyp[8]);
    $mary=join("'",$mary,"");
#! history runtime
    $hatary=join(",",$hatary,"");
    $hatary=join("'",$hatary,$qyp[9]);
    $hatary=join("'",$hatary,"");
#! error message
    $errary=join(",",$errary,"");
    $errary=join("'",$errary,$qyp[10]);
    $errary=join("'",$errary,"");
#! tmpnwprd time
    $tmpary=join(",",$tmpary,"");
    $tmpary=join("'",$tmpary,$qyp[11]);
    $tmpary=join("'",$tmpary,"");
#! tmpnwprd time
    $tnaary=join(",",$tnaary,"");
    $tnaary=join("'",$tnaary,$qyp[12]);
    $tnaary=join("'",$tnaary,"");
    ++$qi;
  }
}
$maxrecord = --$qi;
print jobgraph "<HTML>\n";
if ($qyp[8] eq "s")
{
   print jobgraph "      <TITLE>JOBVIEW ON STRATUS </TITLE>\n";
}
else
{
   print jobgraph "      <TITLE>JOBVIEW ON CIRRUS</TITLE>\n";
}
print jobgraph "<HEAD>\n";
#!print jobgraph "<meta http-equiv=\"Expires\" CONTENT=\"0\">\n";
#!print jobgraph "<meta http-equiv=\"Cache-Control\" CONTENT=\"no-cache\">\n";
#!print jobgraph "<meta http-equiv=\"Pragma\" CONTENT=\"no-cache\">\n";
print jobgraph "</HEAD>\n";
print jobgraph "<BODY bgcolor=#CDCDCD onload=\"timer=setTimeout(\'getgraph()\',15000)\">\n";
#! print jobgraph "<BODY bgcolor=#CDCDCD onload=\"timer=setTimeout(\'getgraph()\',15000)\">\n";
print jobgraph "  <FRAME scrolling=yes nowrap>\n";
print jobgraph "<align=center><IMG src=$htmlpath$logo height=i120 width=200 align=left><b><H3 align=center>PRODUCTION MANAGEMENT BRANCH</b></H3>\n";
#! 
if ($qyp[8] eq "s")
{
   print jobgraph "      <H4 align=center><b>JOB RUN TIME ON STRATUS</b></H4>\n";
}
else
{
   print jobgraph "      <H4 align=center><b>JOB RUN TIME ON CIRRUS</b></H4>\n";
}
print jobgraph "   <SCRIPT>\n";
print jobgraph "         var time=null\n";
print jobgraph "            function getgraph()\n";
print jobgraph "            {\n";
print jobgraph "               window.location='$jobgraph'\n";
print jobgraph "            }\n";
print jobgraph "            function zwin(p)\n";
print jobgraph "            {\n";
print jobgraph "               window.open(p,'Legend','scrollbar=yes, toolbar=no,status=no,location=no,menubar=no,directories=no,width=450,height=670')\n";
print jobgraph "            }\n";
print jobgraph "         var stats_array=new Array($sary);\n";
print jobgraph "         var code_array=new Array($cary);\n";
print jobgraph "         var name_array=new Array($nary);\n";
print jobgraph "         var strtime_array=new Array($strary);\n";
print jobgraph "         var rtime_array=new Array($rary);\n";
print jobgraph "         var lwrtm_array=new Array($lary);\n";
print jobgraph "         var idtime_array=new Array($idary);\n";
print jobgraph "         var mach_array=new Array($mary);\n";
print jobgraph "         var jobdate = '$jhdate';\n";
print jobgraph "         var hstart_array=new Array($hstary);\n";
print jobgraph "         var hrun_array=new Array($hatary);\n";
print jobgraph "         var error_array=new Array($errary);\n";
print jobgraph "         var tmpnwprd_array=new Array($tmpary);\n";
print jobgraph "         var tmpna_array=new Array($tnaary);\n";
print jobgraph "         var expdate = new Date();\n";
print jobgraph "         var mach_color = 'red';\n";
print jobgraph "         var mach_color_last = 'black';\n";
print jobgraph "         var last_abort = 'red';\n";
print jobgraph "         var mach_last = 'f';\n";
#!
print jobgraph "         var edate = $wdate;\n";
print jobgraph "         var etime = edate.split(\" \");\n";
print jobgraph "         var ejobtime = Date.parse(edate);\n";
print jobgraph "         var expdate   = new Date();\n";
print jobgraph "         var cpdate    = expdate.toGMTString();\n";
print jobgraph "         var cjobtime  = Date.parse(cpdate);\n";
print jobgraph "         var jetime = cpdate.split(\" \");\n";
print jobgraph "         var jdiftime  = (cjobtime - ejobtime)/1000;\n";
#!
print jobgraph "              document.write('<STYLE type=\"text\/css\"><!-- A {text-decoration:underline } --></STYLE>') \n";
print jobgraph "              document.write('<H3 align=center nowrap>');\n";
print jobgraph "         if (jdiftime >= 600)\n";
print jobgraph "         {\n";
print jobgraph "            document.write('<font color=#FF0000 align=left nowrap><blink><B>Job Time <U><A href=dhistory.html>.Vs.</A></U> History Time </B></blink></font>');\n";
print jobgraph "         }\n";
print jobgraph "         else\n";
print jobgraph "         {\n";
print jobgraph "              document.write('Job Time <U><font color=#FF0000><A href=dhistory.html>.Vs.</A></font></U> History Time');\n";
print jobgraph "         }\n";
#!
#!print jobgraph "              document.write('Job Time <U><font color=#FF0000><A href=dhistory.html>.Vs.</A></font></U> History Time');\n";
print jobgraph "              document.write('</H3>');\n";
print jobgraph "              document.write('<HR>');\n";
print jobgraph "              document.write('<table cellpadding=0 cellspacing=0 nowrap><td colspan=11 align=left><font size=5>');\n";
#!
print jobgraph "              document.write('<H4 align=left nowrap><tr><td><U><b><A href=dname.html>JOB NAME</b></td><td><U><b><A href=drunstatus.html>STa </b></td><td><U><b><A href=dstartwritetime.html>SWrTm </b></td><td><U><b><A href=dlastwritetime.html>LWrTm </b></td><td><U><b><A href=djobruntime.html>JRnTm </b></td><td><left><U><b><A href=dhiststart.html>HStTm </td><td><left><U><b><A href=dhistrun.html>HRnTm </td><td><U><b><A href=dnoactivity.html>NWrTm </b></td><td><left><U><b><A href=dnoactivity.html>Tmpnwprd</b></td><td><left><U><b><A href=dnoactivity.html>TmpNA</b></td><td><left><U><b><A href=dstatistic.html>STATISTIC</b></left></td> </tr></H4>');\n";
#!
print jobgraph "              document.write('</font></td><tr valign=Bottom><td> </td></tr>');\n";
print jobgraph "              var lmach=mach_array[1];\n";
print jobgraph "              mach_color='black';\n";
print jobgraph "              for(var i=1;i<stats_array.length;i++)\n";
print jobgraph "              {\n";
#! name of the job
print jobgraph "                 mach_color='black';\n";
print jobgraph "                 if (mach_array[i] == 's')\n";
print jobgraph "                 {\n";
print jobgraph "                     mach_color='blue';\n";
print jobgraph "                     mach_last=mach_array[i];\n";
print jobgraph "                 }\n";
print jobgraph "                 document.write('<tr><td align=left><STYLE type=\"text\/css\"><!-- A { text-decoration:underline } --></STYLE>');\n";
print jobgraph "                 document.write('<A href=');\n";
print jobgraph "                 document.write(name_array[i]);\n";
print jobgraph "                 document.write('\".html\" style=\"text-decoration:none\">');\n";
print jobgraph "                 if ((stats_array[i] > 100.00) && (stats_array[i] <= 500.00))\n";
print jobgraph "                 {\n";
print jobgraph "                    if ((error_array[i] == 11440) || (error_array[i] == 20001))\n";
print jobgraph "                    {\n";
print jobgraph "                        document.write(name_array[i].fontsize(3).fontcolor(last_abort));\n";
print jobgraph "                    }\n";
print jobgraph "                    else \n";
print jobgraph "                    {\n";
print jobgraph "                        document.write(name_array[i].fontsize(3).bold().fontcolor(mach_color));\n";
print jobgraph "                    }\n";
print jobgraph "                 }\n";
print jobgraph "                 else if ((stats_array[i] > 500.00) && (stats_array[i] <= 9999.95))\n";
print jobgraph "                 {\n";
print jobgraph "                    if ((error_array[i] == 11440) || (error_array[i] == 20001))\n";
print jobgraph "                    {\n";
print jobgraph "                        document.write(name_array[i].fontsize(3).fontcolor(last_abort));\n";
print jobgraph "                    }\n";
print jobgraph "                    else \n";
print jobgraph "                    {\n";
print jobgraph "                        document.write(name_array[i].fontsize(3).blink().fontcolor(mach_color));\n";
print jobgraph "                    }\n";
print jobgraph "                 }\n";
print jobgraph "                 else if ((stats_array[i] > 9999.96) && (stats_array[i] <= 9999.99))\n";
print jobgraph "                 {\n";
print jobgraph "                    if ((error_array[i] == 11440) || (error_array[i] == 20001))\n";
print jobgraph "                    {\n";
print jobgraph "                        document.write(name_array[i].fontsize(3).fontcolor(last_abort));\n";
print jobgraph "                    }\n";
print jobgraph "                    else \n";
print jobgraph "                    {\n";
print jobgraph "                       document.write(name_array[i].fontsize(3).fontcolor(mach_color));\n";
print jobgraph "                    }\n";
print jobgraph "                 }\n";
print jobgraph "                 else if (stats_array[i] > 9999.99)\n";
print jobgraph "                 {\n";
print jobgraph "                    mach_color_last=mach_color;\n";
print jobgraph "                    mach_color='red';\n";
print jobgraph "                    if ((error_array[i] == 11440) || (error_array[i] == 20001))\n";
print jobgraph "                    {\n";
print jobgraph "                        document.write(name_array[i].fontsize(3).fontcolor(last_abort));\n";
print jobgraph "                    }\n";
print jobgraph "                    else \n";
print jobgraph "                    {\n";
print jobgraph "                        document.write(name_array[i].fontsize(3).fontcolor(mach_color));\n";
print jobgraph "                    }\n";
print jobgraph "                    mach_color=mach_color_last;\n";
print jobgraph "                 }\n";
print jobgraph "                 else\n";
print jobgraph "                 {\n";
print jobgraph "                    if ((error_array[i] == 11440) || (error_array[i] == 20001))\n";
print jobgraph "                    {\n";
print jobgraph "                        document.write(name_array[i].fontsize(3).fontcolor(last_abort));\n";
print jobgraph "                    }\n";
print jobgraph "                    else \n";
print jobgraph "                    {\n";
print jobgraph "                        document.write(name_array[i].fontsize(3).fontcolor(mach_color));\n";
print jobgraph "                    }\n";
print jobgraph "                 }\n";
print jobgraph "                    document.write('</td></font>');\n";

#! write status code
print jobgraph "                 document.write('<td align=right>');\n";
print jobgraph "                 document.write(code_array[i].fontsize(3));\n";
print jobgraph "                 document.write('</td>');\n";
#! write start time
print jobgraph "                 document.write('<td align=right>');\n";
print jobgraph "                 document.write(strtime_array[i].fontsize(3));\n";
print jobgraph "                 document.write('</td>');\n";
#! write last write time
print jobgraph "                 document.write('<td align=right>');\n";
print jobgraph "                 document.write(lwrtm_array[i].fontsize(3));\n";
print jobgraph "                 document.write('</td>');\n";
#! write job run time
print jobgraph "                 document.write('<td align=right>');\n";
print jobgraph "                 document.write(rtime_array[i].fontsize(3));\n";
print jobgraph "                 document.write('</td>');\n";
#! write history start time
print jobgraph "                 document.write('<td align=right>');\n";
print jobgraph "                 document.write(hstart_array[i].fontsize(3));\n";
print jobgraph "                 document.write('</td>');\n";
#! write history run time
print jobgraph "                 document.write('<td align=right>');\n";
print jobgraph "                 document.write(hrun_array[i].fontsize(3));\n";
print jobgraph "                 document.write('</td>');\n";
#! write idle time 
#! write last write time
print jobgraph "                 document.write('<td align=right>');\n";
print jobgraph "                 if (idtime_array[i] == ' 00:00 ' || idtime_array[i] == ' 00:01 ' || idtime_array[i] == ' 00:02 ' || idtime_array[i] == ' 00:03 ' || idtime_array[i] == ' 00:04 ' || idtime_array[i] == ' 00:05 ')\n";
print jobgraph "                 {\n";
print jobgraph "                    document.write(idtime_array[i].fontsize(3));\n";
print jobgraph "                 }\n";
print jobgraph "                 else\n";
print jobgraph "                 {\n";
print jobgraph "                    mach_color_last=mach_color;\n";
print jobgraph "                    mach_color='red';\n";
print jobgraph "                    document.write(idtime_array[i].fontsize(3).fontcolor(mach_color));\n";
print jobgraph "                    mach_color=mach_color_last;\n";
print jobgraph "                 }\n";
print jobgraph "                 document.write('</td>');\n";
#! added 6/4/03
#! write tmpnwprd idle time
print jobgraph "                 document.write('<td align=center>');\n";
#! print jobgraph "                 if (tmpna_array[i] == '00:00' || tmpna_array[i] == '00:01' || tmpna_array[i] == '00:02' || tmpna_array[i] == '00:03' || tmpna_array[i] == '00:04' || tmpna_array[i] == '00:05')\n";
#! print jobgraph "                 {\n";
print jobgraph "                    document.write(tmpnwprd_array[i].fontsize(3));\n";
#! print jobgraph "                 }\n";
#! print jobgraph "                 else\n";
#! print jobgraph "                 {\n";
#! print jobgraph "                    mach_color_last=mach_color;\n";
#! print jobgraph "                    mach_color='red';\n";
#! print jobgraph "                    document.write(tmpnwprd_array[i].fontsize(3).fontcolor(mach_color));\n";
#! print jobgraph "                    mach_color=mach_color_last;\n";
#! print jobgraph "                 }\n";
print jobgraph "                 document.write('</td>');\n";
#!
print jobgraph "                 document.write('<td align=center>');\n";
print jobgraph "                 if (tmpna_array[i] == '00:00' || tmpna_array[i] == '00:01' || tmpna_array[i]== '00:02' || tmpna_array[i] == '00:03' || tmpna_array[i] == '00:04' || tmpna_array[i] == '00:05')\n";
print jobgraph "                 {\n";
print jobgraph "                    document.write(tmpna_array[i].fontsize(3));\n";
print jobgraph "                 }\n";
print jobgraph "                 else\n";
print jobgraph "                 {\n";
print jobgraph "                    mach_color_last=mach_color;\n";
print jobgraph "                    mach_color='red';\n";
print jobgraph "                    document.write(tmpna_array[i].fontsize(3).fontcolor(mach_color));\n";
print jobgraph "                    mach_color=mach_color_last;\n";
print jobgraph "                 }\n";
print jobgraph "                 document.write('</td>');\n";
#! write image bar width 
print jobgraph "                 if (stats_array[i] <= 1.00)\n";
print jobgraph "                 {\n";
print jobgraph "                    document.write('<td align=left width=2');\n";
print jobgraph "                 }\n";
print jobgraph "                 else if ((stats_array[i] > 1.00) && (stats_array[i] <= 100.00))\n";
print jobgraph "                 {\n";
print jobgraph "                    document.write('<td align=left  width=');\n";
print jobgraph "                    document.write(stats_array[i]+100);\n";
print jobgraph "                 }\n";
print jobgraph "                 else if ((stats_array[i] > 100.00) && (stats_array[i] <= 125.00))\n";
print jobgraph "                 {\n";
print jobgraph "                    document.write('<td align=left  width=');\n";
print jobgraph "                    document.write(stats_array[i]);\n";
print jobgraph "                 }\n";
print jobgraph "                 else if ((stats_array[i] > 125.00) && (stats_array[i] <= 500.00))\n";
print jobgraph "                 {\n";
print jobgraph "                    document.write('<td align=left  width=50');\n";
print jobgraph "                 }\n";
print jobgraph "                 else if ((stats_array[i] > 500.00) && (stats_array[i] <= 9999.97))\n";
print jobgraph "                 {\n";
print jobgraph "                    document.write('<td align=left  width=100');\n";
print jobgraph "                 }\n";
print jobgraph "                 else if ((stats_array[i] > 9999.97) && (stats_array[i] <= 9999.98))\n";
print jobgraph "                 {\n";
print jobgraph "                    document.write('<td align=left  width=2');\n";
print jobgraph "                 }\n";
print jobgraph "                 else if ((stats_array[i] > 9999.98) && (stats_array[i] <= 9999.99))\n";
print jobgraph "                 {\n";
print jobgraph "                    document.write('<td align=left  width=100');\n";
print jobgraph "                 }\n";
print jobgraph "                 else if (stats_array[i] > 9999.99)\n";
print jobgraph "                 {\n";
print jobgraph "                    document.write('<td align=left  width=100');\n";
print jobgraph "                 }\n";
print jobgraph "                 else \n";
print jobgraph "                 {\n";
print jobgraph "                    document.write('<td align=left width=');\n";
print jobgraph "                    document.write(stats_array[i]+100);\n";
print jobgraph "                 }\n";
#! write image bar
print jobgraph "                 if (stats_array[i] <= 95.0)\n";
print jobgraph "                 {\n";
print jobgraph "                    document.write('><img src=$htmlpath$goodcolor height= 6');\n";
print jobgraph "                 }\n";
print jobgraph "                 else if ((stats_array[i] > 95.00) && (stats_array[i] < 100.00))\n";
print jobgraph "                 {\n";
print jobgraph "                    document.write('><img src=$dhtmpath$noavgcolor height= 6');\n";
print jobgraph "                 }\n";
print jobgraph "                 else if ((stats_array[i] >= 100.00) && (stats_array[i] <= 125.00))\n";
print jobgraph "                 {\n";
print jobgraph "                    document.write('><img src=$dhtmpath$badcolor height= 6');\n";
print jobgraph "                 }\n";
print jobgraph "                 else if ((stats_array[i] > 125.00) && (stats_array[i] <= 500.00))\n";
print jobgraph "                 {\n";
print jobgraph "                    document.write('><img src=$htmlpath$donecolor height= 6');\n";
print jobgraph "                 }\n";
print jobgraph "                 else if ((stats_array[i] > 500.00) && (stats_array[i] <= 9999.94))\n";
print jobgraph "                 {\n";
print jobgraph "                    document.write('><img src=$htmlpath$rpcolor height= 6');\n";
print jobgraph "                 }\n";
print jobgraph "                 else if ((stats_array[i] > 9999.96) && (stats_array[i] <= 9999.97))\n";
print jobgraph "                 {\n";
print jobgraph "                    document.write('><img src=$htmlpath$rpcolor height= 6');\n";
print jobgraph "                 }\n";
print jobgraph "                 else if ((stats_array[i] > 9999.97) && (stats_array[i] <= 9999.98))\n";
print jobgraph "                 {\n";
print jobgraph "                    document.write('><img src=$htmlpath$initcolor height= 6');\n";
print jobgraph "                 }\n";
print jobgraph "                 else if ((stats_array[i] > 9999.98) && (stats_array[i] <= 9999.99))\n";
print jobgraph "                 {\n";
print jobgraph "                    document.write('><img src=$htmlpath$noavgcolor height= 6');\n";
print jobgraph "                 }\n";
print jobgraph "                 else if (stats_array[i] == 9999.99)\n";
print jobgraph "                 {\n";
print jobgraph "                    document.write('><img src=$htmlpath$noavgcolor height= 6');\n";
print jobgraph "                 }\n";
print jobgraph "                 else if (stats_array[i] > 9999.99)\n";
print jobgraph "                 {\n";
print jobgraph "                    document.write('><img src=$htmlpath$bustcolor height= 6');\n";
print jobgraph "                 }\n";
print jobgraph "                 else \n";
print jobgraph "                 {\n";
print jobgraph "                    document.write('><img src=$htmlpath$bustcolor height= 6');\n";
print jobgraph "                 }\n";
#!
print jobgraph "                 if (stats_array[i] <= 0.01)\n";
print jobgraph "                 {\n";
print jobgraph "                    document.write(' width=1');\n";
print jobgraph "                 }\n";
print jobgraph "                 else if ((stats_array[i] > 0.01) && (stats_array[i] <= 95.00))\n";
print jobgraph "                 {\n";
print jobgraph "                    document.write(' width=');\n";
print jobgraph "                    document.write(stats_array[i]);\n";
print jobgraph "                 }\n";
#!  added the below
print jobgraph "                 else if ((stats_array[i] > 95.00) && (stats_array[i] <= 100.00))\n";
print jobgraph "                 {\n";
print jobgraph "                    document.write(' width=');\n";
print jobgraph "                    document.write(stats_array[i]);\n";
print jobgraph "                 }\n";
print jobgraph "                 else if ((stats_array[i] > 100.00) && (stats_array[i] <= 125.00))\n";
print jobgraph "                 {\n";
print jobgraph "                    document.write(' width=');\n";
print jobgraph "                    document.write(stats_array[i]);\n";
print jobgraph "                 }\n";
#!  added the above
print jobgraph "                 else if ((stats_array[i] > 125.00) && (stats_array[i] <= 200.00))\n";
print jobgraph "                 {\n";
print jobgraph "                    document.write(' width=50 ');\n";
print jobgraph "                 }\n";
print jobgraph "                 else if ((stats_array[i] > 200.00) && (stats_array[i] <= 9999.96))\n";
print jobgraph "                 {\n";
print jobgraph "                    document.write(' width=50 ');\n";
print jobgraph "                 }\n";
print jobgraph "                 else if ((stats_array[i] > 9999.96) && (stats_array[i] <= 9999.97))\n";
print jobgraph "                 {\n";
print jobgraph "                    document.write(' width=50 ');\n";
print jobgraph "                 }\n";
print jobgraph "                 else if ((stats_array[i] > 9999.97) && (stats_array[i] <= 9999.98))\n";
print jobgraph "                 {\n";
print jobgraph "                    document.write(' width=2 ');\n";
print jobgraph "                 }\n";
print jobgraph "                 else if ((stats_array[i] > 9999.98) && (stats_array[i] <= 9999.99))\n";
print jobgraph "                 {\n";
print jobgraph "                    document.write(' width=50');\n";
print jobgraph "                 }\n";
print jobgraph "                 else if (stats_array[i] == 9999.99)\n";
print jobgraph "                 {\n";
print jobgraph "                    document.write(' width=50');\n";
print jobgraph "                 }\n";
print jobgraph "                 else if (stats_array[i] > 9999.99)\n";
print jobgraph "                 {\n";
print jobgraph "                    document.write(' width=50 ');\n";
print jobgraph "                 }\n";
print jobgraph "                 else \n";
print jobgraph "                 {\n";
print jobgraph "                   document.write(' width= 50');\n";
print jobgraph "                 }\n";
#! write % at end of image bar
print jobgraph "                 document.write(' border=2 hspace=1 >');\n";
#! 97 is RP, 99 is no stat, 98 is init.
print jobgraph "                 if (stats_array[i] == 9999.97)\n";
print jobgraph "                 {\n";
print jobgraph "                    document.write('XXXX </td><td align=right>');\n";
print jobgraph "                 }\n";
print jobgraph "                 else if (stats_array[i] == 9999.98)\n";
print jobgraph "                 {\n";
print jobgraph "                    document.write('00.00%</td><td align=right>');\n";
print jobgraph "                 }\n";
print jobgraph "                 else if (stats_array[i] == 9999.99)\n";
print jobgraph "                 {\n";
print jobgraph "                    document.write('???? </td><td align=right>');\n";
print jobgraph "                 }\n";
print jobgraph "                 else \n";
print jobgraph "                 {\n";
print jobgraph "                    document.write(stats_array[i]);\n";
print jobgraph "                    document.write('%</td><td align=right>');\n";
print jobgraph "                 }\n";
print jobgraph "                 document.write('</td></tr>');\n";
print jobgraph "                 mach_last=mach_array[i];\n";
#!
print jobgraph "              }\n";
print jobgraph "              document.write('<td> </td></tr></table>');\n";
#! print jobgraph "              document.write('<H4 align=center nowrap>      Current Time:       ');\n";
#! print jobgraph "              document.write(expdate.toGMTString());\n";
#! print jobgraph "              document.write('</H4>');\n";
#! ----
#! print jobgraph "              document.write('<H4 align=center> Update Time:  ');\n";
#! print jobgraph "              document.write(edate);\n";
#! print jobgraph "              document.write('</H4>');\n";

#!
print jobgraph "      </SCRIPT>\n";
print jobgraph "       <HR>\n";
print jobgraph "      <SCRIPT>\n";
print jobgraph "         document.write('<font color=#555555 align=left nowrap> Current Time: &nbsp;&nbsp;');\n";
print jobgraph "         document.write(expdate.toGMTString());\n";
print jobgraph "         document.write('</font><BR>');\n";
#!
print jobgraph "         if (jdiftime >= 600)\n";
print jobgraph "         {\n";
print jobgraph "            document.write('<font color=#FF0000 align=left nowrap><blink><B>Jobview Not Updating... </B></blink></font>');\n";
print jobgraph "         }\n";
print jobgraph "         else\n";
print jobgraph "         {\n";
print jobgraph "            document.write('<font color=#555555 align=left nowrap>Update Time: &nbsp;&nbsp;');\n";
print jobgraph "         }\n";
#!
print jobgraph "         document.write(edate);\n";
print jobgraph "         document.write('</font><BR>');\n";
print jobgraph "         document.write('<font color=#555555 align=left nowrap>History Date: &nbsp;&nbsp;');\n";
print jobgraph "         document.write(jobdate);\n";
print jobgraph "         document.write('</font>');\n";
print jobgraph "      </SCRIPT>\n";
print jobgraph " <HR>\n";
print jobgraph "<font color=#000000 size=2><b>Designed by:  </b></font><A HREF=\"mailto\:david.ma\@noaa.gov\">\n";

print jobgraph "<font color=#FF0000 size=2>  <I><b>David Ma</b></I></font></A> <font color=#000000 size=3> for NCEP</a><BR>\n";

print jobgraph "<font color=#555555 size=2><b>Last Revision: </font><font color=#888888> October 13, 2002</b></font> \n";
#!
print jobgraph "   </P>\n";
#!
print jobgraph "      </SCRIPT>\n";
print jobgraph "    </FRAME>\n";
print jobgraph "  </BODY>\n";
#!
print jobgraph "  <FORM NAME=formx>\n";
print jobgraph "  <INPUT TYPE=\"button\" COLOR=#FF0000 NAME=\"Legend\" VALUE=\"Legend\" onClick=\"javascript:zwin('$legend')\">\n";

print jobgraph "  <INPUT TYPE=\"button\" COLOR=#FF0000 NAME=\"Status Code\" VALUE=\"Status Code\" onClick=\"javascript:zwin('$statuscode')\">\n";

print jobgraph "  <INPUT TYPE=\"button\" COLOR=#FF0000 NAME=\"Refresh\" VALUE=\"Refresh\" onClick=\"javascript:location.replace('$jobgraph')\">\n";

print jobgraph "  <RIGHT><INPUT TYPE=\"button\" COLOR=#FF0000 NAME=\"Close Window\" VALUE=\"Close Window\" onClick=\"javascript:window.close()\"></RIGHT>\n";

#!
print jobgraph "</HTML>\n";