%returnVals = (); %X_Axis = (); %Y_Axis = (); $ExcelLink = &swOpenExcel("FILE", $lAppName, $wbFullDirectory, $wbChartDirectory, $wbExcelName, $wbExcelData, $dataCol, $strtRow, $labelCol, $endRow, $typeGraph, $ChartName, $lChartTitle, 'JPG', $lLegendKey, $lData_Labels, $fields{$q->param(X_Col)}, $fields{$q->param(Y_Col)}, \%returnVals, \%X_Axis, \%Y_Axis); #### ($typeData, $AppName, $wbFullDirectory, $wbChartDirectory, $wbExcelName, $wbExcelData, $dataCol, $strtRow, $labelCol, $endRow, $typeGraph, $ChartName, $ChartTitle, $filter, $LegendKey, $LegendType, $rVals, $X, $Y) = @_; my %X_Axis = %$X; my %Y_Axis = %$Y; my %returnValues = %$rVals; $returnValues{"ExcelLink"} = "/Web$AppName/Charts/" . $wbExcelName . "_" . $extension . "\.xls";