Exemplo n.º 1
0
        /// <summary>
        /// Called after the calculation of the report has been finished.
        /// </summary>
        /// <param name="Calculator"></param>
        /// <param name="ACallerForm"></param>
        /// <param name="AReportName"></param>
        /// <param name="AWrapColumn"></param>
        public static void PreviewReport(TRptCalculator Calculator, Form ACallerForm, String AReportName, bool AWrapColumn)
        {
            // Create a print window with all kinds of output options
            TFrmPrintPreview printWindow = new TFrmPrintPreview(ACallerForm, AReportName, Calculator.GetDuration(),
                Calculator.GetResults(), Calculator.GetParameters(), AWrapColumn, Calculator);

            ACallerForm.AddOwnedForm(printWindow);
            printWindow.Owner = ACallerForm;

// TODO     printWindow.SetPrintChartProcedure(GenerateChart);
            printWindow.ShowDialog();
        }
Exemplo n.º 2
0
        /// <summary>
        ///
        /// </summary>
        /// <param name="ACalculator"></param>
        protected void PreviewDetailReport(TRptCalculator ACalculator)
        {
            TFrmPrintPreview printWindow;

            // show a print window with all kinds of output options
            printWindow = new TFrmPrintPreview(this, ACalculator.GetParameters().Get("currentReport").ToString(),
                ACalculator.GetDuration(), ACalculator.GetResults(
                    ), ACalculator.GetParameters(), FWrapColumn, ACalculator);
            this.AddOwnedForm(printWindow);
            printWindow.Owner = this;

            // printWindow.SetPrintChartProcedure(GenerateChart);
            printWindow.ShowDialog();

            // EnableDisableToolbar(true);
        }
Exemplo n.º 3
0
        /// <summary>
        /// Called at the end of GenerateReport
        /// </summary>
        /// <param name="Calculator"></param>
        /// <param name="ACallerForm"></param>
        /// <param name="AReportName"></param>
        /// <param name="AWrapColumn"></param>
        public static void ReportCalculationSuccess(TRptCalculator Calculator, Form ACallerForm, String AReportName, bool AWrapColumn)
        {
            if (TClientSettings.DebugLevel >= TClientSettings.DEBUGLEVEL_REPORTINGDATA)
            {
                Calculator.GetParameters().Save(TClientSettings.PathLog + Path.DirectorySeparatorChar + "debugParameterReturn.xml", true);
                Calculator.GetResults().WriteCSV(
                    Calculator.GetParameters(), TClientSettings.PathLog + Path.DirectorySeparatorChar + "debugResultReturn.csv");
            }

            if (Calculator.GetParameters().Exists("SaveCSVFilename")
                && (Calculator.GetParameters().Get("SaveCSVFilename").ToString().Length > 0))
            {
                Calculator.GetResults().WriteCSV(Calculator.GetParameters(), Calculator.GetParameters().Get("SaveCSVFilename").ToString());
            }

            if (!Calculator.CalculatesExtract)
            {
                // this only needs to be considered when running reports
                if (Calculator.GetParameters().GetOrDefault("OnlySaveCSV", -1, new TVariant(false)).ToBool() == false)
                {
                    PreviewReport(Calculator, ACallerForm, AReportName, AWrapColumn);
                }
            }
        }
Exemplo n.º 4
0
        private void GenerateReport()
        {
            try
            {
                FPreviewForm.Cursor = Cursors.WaitCursor;
                TLogging.SetStatusBarProcedure(FPetraUtilsObject.WriteToStatusBar);

                // calculate the report
                FCalculator = new TRptCalculator();
                FCalculator.GetParameters().LoadFromDataTable(FDetailParameters.ToDataTable());

                if (FCalculator.GenerateResultRemoteClient())
                {
                    if (TClientSettings.DebugLevel >= TClientSettings.DEBUGLEVEL_REPORTINGDATA)
                    {
                        FCalculator.GetParameters().Save(TClientSettings.PathLog + Path.DirectorySeparatorChar + "debugParameterReturn.xml", true);
                        FCalculator.GetResults().WriteCSV(
                            FCalculator.GetParameters(), TClientSettings.PathLog + Path.DirectorySeparatorChar + "debugResultReturn.csv");
                    }

                    FPreviewForm.Cursor = Cursors.Default;
                    object[] Args = new object[1];
                    Args[0] = FCalculator;
                    FPreviewForm.Invoke((System.Delegate) new TPreviewDelegate(FPreviewDelegate), Args);
                    TLogging.Log("", TLoggingType.ToStatusBar);
                }
                else
                {
                    // if generateResult failed
                    FPreviewForm.Cursor = Cursors.Default;

                    // EnableDisableToolbar(true);
                }
            }
            catch (Exception e)
            {
                TLogging.Log("Exception in GenerateReport: " + e.ToString());
                // EnableDisableToolbar(true);
            }
        }