コード例 #1
0
        public void FormatReport()
        {
            PTSProject.clsTraining TrainCL = Container.Resolve <clsTraining>();

            if (ViewModel.FirstTime)
            {
                return;
            }
            ViewModel.sprReport.Row       = 7;
            ViewModel.sprReport.Row2      = ViewModel.sprReport.MaxRows;
            ViewModel.sprReport.Col       = 1;
            ViewModel.sprReport.Col2      = ViewModel.sprReport.MaxCols;
            ViewModel.sprReport.BlockMode = true;
            ViewModel.sprReport.Text      = "";
            ViewModel.sprReport.BlockMode = false;

            if (TrainCL.GetTrainingFCCQuarterlyStandardReport(ViewModel.CurrYear, ViewModel.CurrQuarter, ViewModel.CurrShift) != 0)
            {
                //continue
            }
            else
            {
                ViewManager.ShowMessage("There are no Employee/Training Records to report for Year/Quarter!", "Training Quarterly Report", UpgradeHelpers.Helpers.BoxButtons.OK);
                return;
            }

            string sEmployeeName = "";
            int    iCodeRow      = 6;
            int    iCurrRow      = 7;
            int    iCurrCol      = 1;

            while (!TrainCL.TrainingRecord.EOF)
            {
                ViewModel.sprReport.Row = iCurrRow;
                ViewModel.sprReport.Col = iCurrCol;
                if (sEmployeeName == "")
                {                 //first time
                    sEmployeeName            = modGlobal.Clean(TrainCL.TrainingRecord["name_full"]);
                    ViewModel.sprReport.Text = sEmployeeName;
                    ViewModel.sprReport.Col  = iCurrCol + 1;
                    ViewModel.sprReport.Text = modGlobal.Clean(TrainCL.TrainingRecord["unit_code"]);
                    ViewModel.sprReport.Col  = iCurrCol + 2;
                    ViewModel.sprReport.Text = modGlobal.Clean(TrainCL.TrainingRecord["shift_code"]);
                    ViewModel.sprReport.Col  = iCurrCol + 3;
                    ViewModel.sprReport.Text = modGlobal.Clean(TrainCL.TrainingRecord["battalion_code"]);
                    if (modGlobal.Clean(TrainCL.TrainingRecord["report_column"]) != "")
                    {
                        ViewModel.sprReport.Row = iCodeRow;
                        for (int i = 5; i <= 18; i++)
                        {
                            ViewModel.sprReport.Col = i;
                            if (modGlobal.Clean(TrainCL.TrainingRecord["report_column"]) == modGlobal.Clean(ViewModel.sprReport.Text))
                            {
                                ViewModel.sprReport.Col = i;
                                ViewModel.sprReport.Row = iCurrRow;
                                //UPGRADE_WARNING: (1068) GetVal() of type Variant is being forced to string. More Information: http://www.vbtonet.com/ewis/ewi1068.aspx
                                ViewModel.sprReport.Text = Convert.ToString(modGlobal.GetVal(TrainCL.TrainingRecord["total_occurances"]));
                                break;
                            }
                        }
                    }
                }
                else if (sEmployeeName == modGlobal.Clean(TrainCL.TrainingRecord["name_full"]))
                {
                    if (modGlobal.Clean(TrainCL.TrainingRecord["report_column"]) != "")
                    {
                        ViewModel.sprReport.Row = iCodeRow;
                        for (int i = 5; i <= 18; i++)
                        {
                            ViewModel.sprReport.Col = i;
                            if (modGlobal.Clean(TrainCL.TrainingRecord["report_column"]) == modGlobal.Clean(ViewModel.sprReport.Text))
                            {
                                ViewModel.sprReport.Col = i;
                                ViewModel.sprReport.Row = iCurrRow;
                                //UPGRADE_WARNING: (1068) GetVal() of type Variant is being forced to string. More Information: http://www.vbtonet.com/ewis/ewi1068.aspx
                                ViewModel.sprReport.Text = Convert.ToString(modGlobal.GetVal(TrainCL.TrainingRecord["total_occurances"]));
                                break;
                            }
                        }
                    }
                }
                else
                {
                    iCurrRow++;
                    ViewModel.sprReport.Row  = iCurrRow;
                    sEmployeeName            = modGlobal.Clean(TrainCL.TrainingRecord["name_full"]);
                    ViewModel.sprReport.Text = sEmployeeName;
                    ViewModel.sprReport.Col  = iCurrCol + 1;
                    ViewModel.sprReport.Text = modGlobal.Clean(TrainCL.TrainingRecord["unit_code"]);
                    ViewModel.sprReport.Col  = iCurrCol + 2;
                    ViewModel.sprReport.Text = modGlobal.Clean(TrainCL.TrainingRecord["shift_code"]);
                    ViewModel.sprReport.Col  = iCurrCol + 3;
                    ViewModel.sprReport.Text = modGlobal.Clean(TrainCL.TrainingRecord["battalion_code"]);
                    if (modGlobal.Clean(TrainCL.TrainingRecord["report_column"]) != "")
                    {
                        ViewModel.sprReport.Row = iCodeRow;
                        for (int i = 5; i <= 18; i++)
                        {
                            ViewModel.sprReport.Col = i;
                            if (modGlobal.Clean(TrainCL.TrainingRecord["report_column"]) == modGlobal.Clean(ViewModel.sprReport.Text))
                            {
                                ViewModel.sprReport.Col = i;
                                ViewModel.sprReport.Row = iCurrRow;
                                //UPGRADE_WARNING: (1068) GetVal() of type Variant is being forced to string. More Information: http://www.vbtonet.com/ewis/ewi1068.aspx
                                ViewModel.sprReport.Text = Convert.ToString(modGlobal.GetVal(TrainCL.TrainingRecord["total_occurances"]));
                                break;
                            }
                        }
                    }
                }
                TrainCL.TrainingRecord.MoveNext();
            }
            ;
        }