YAYABRUCE
Novice
Aug 14, 2008, 8:36 AM
Post #1 of 2
(5151 views)
|
|
Trying to find the Median Time Please help
|
Can't Post
|
|
Hello,
I am trying to find the median time in perl. I am getting all my data from a database. Now, there is a table name Defect that has a column name priority. In priority, I have 0-critical, 1-high and so on. I am trying to get the median time for each of these . Please see below. When I run the entire program, it basically give me the count of the tickets instead of the median time. Please see below.
@data = ();
my @priorities = ("0-critical","1-high","2-medium","3-low");
$median = $Array[($#Array /2)];
$SQLcmd = "SELECT COUNT(*) ";
$SQLcmd = $SQLcmd . "FROM Defect INNER JOIN statedef ON Defect.state = statedef.id ";
$SQLcmd = $SQLcmd . "WHERE (solution_date BETWEEN '${startDate}' AND '${endDate}') ";
$SQLcmd = $SQLcmd . "AND (priority = '${thispriority}') ";
$SQLcmd = $SQLcmd . "AND (found_in = ('MAL') OR found_in = ('KOL')) ";
$SQLcmd = $SQLcmd . "AND (keyword_1 = ('Financials') OR keyword_1 = ('Claims') OR keyword_1=('DSS') ";
$SQLcmd = $SQLcmd . "OR keyword_1=('Conversions') OR keyword_1=('Medical Necessity') OR keyword_1 = ('Rules')) ";
$SQLcmd = $SQLcmd . "AND (defect.prod_proc = ('ClearCase') OR defect.prod_proc = ('CharmNT') ";
$SQLcmd = $SQLcmd . "OR defect.prod_proc=('CM Tools') OR defect.prod_proc=('File Ship') ";
$SQLcmd = $SQLcmd . "OR defect.prod_proc=('Website') OR defect.prod_proc is null) ";
$SQLcmd = $SQLcmd . "AND (statedef.name = ('solved') OR statedef.name = ('validated'))";
print "$SQLcmd\n";
getDBData($SQLcmd,"CEP");
print "$temp_sql_data\n";
print "$median\n";
}
$MedianCriticalCount = $data[0];
$MedianHighCount = $data[1];
$MedianMediumCount = $data[2];
$MedianLowCount = $data[3];
This is the result I get:
0-critical 3
1-high 5
2-medium 4
3-low 1
The result I am suppose to get is 1.72 for 0-critical
1-high 1.15
2-medium 2.49
3-low 1.10
|
MAIN
SEARCH
WHO'S 
LOG 
