Changeset 217
- Timestamp:
- 06/27/08 16:41:12
- Files:
-
- obskml/trunk/QAQC/CalcPlatformUptimePercentage.pl (modified) (4 diffs)
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
obskml/trunk/QAQC/CalcPlatformUptimePercentage.pl
r159 r217 1 ####################################################################################################### 2 #Revisions 3 #Rev: 1.1.0.0 4 #Author: DWR 5 #Date: 6/27/2008 6 #Sub: TabulatePlatformResults() 7 #Changes: Added the sensor count out of expected interval value in the percentage output. 8 ####################################################################################################### 1 9 ####################################################################################################### 2 10 #This script uses a Test Profile XML file to query each platform's sensors and do a percentage uptime … … 22 30 #of shell commands. 23 31 24 use constant MICROSOFT_PLATFORM => 0;32 use constant MICROSOFT_PLATFORM => 1; 25 33 26 34 #1 enables the various debug print statements, 0 turns them off. … … 542 550 print( "WARNING: Platform: $strPlatformID Sensor: $Sensor has $iMaxCnt updates when the specified update interval is $iUpdateInterval.\n"); 543 551 } 544 $fSensorAvg = (( $fSensorAvg / $iDayCnt ) / $iUpdateInterval) * 100.0 ; 552 #DWR v1.1.0.0 553 my $fAvg = $fSensorAvg / $iDayCnt; 554 $fSensorAvg = ($fAvg / $iUpdateInterval) * 100.0 ; 545 555 if( $iSensorCnt == 0 ) 546 556 { … … 552 562 } 553 563 my $strSensorAvg = sprintf( "%.2f",$fSensorAvg ); 554 $strRow = $strRow."$strSensorAvg ";564 $strRow = $strRow."$strSensorAvg($fAvg/$iUpdateInterval)"; 555 565 if( $iUpdateDatabase ) 556 566 {
