//************************************************************* // Training Annual Paramedic Base Station Report // Filtered by Year, Battalion/Shift/Groups //************************************************************* public void FormatReport() { PTSProject.clsTraining TrainCL = Container.Resolve <clsTraining>(); if (ViewModel.FirstTime) { return; } ViewModel.sprReport.Row = 6; 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; int iGroup = ViewModel.CurrGroup; if (TrainCL.GetPMAnnualBaseStationReport(ViewModel.CurrYear, ViewModel.CurrBatt, ViewModel.CurrShift, iGroup) != 0) { //continue } else { ViewManager.ShowMessage("There are no Paramedic/Training Records to report for Year!", "Training Annual OTEPReport", UpgradeHelpers.Helpers.BoxButtons.OK); return; } string sEmployeeName = ""; int iCodeRow = 5; int iCurrRow = 6; while (!TrainCL.TrainingRecord.EOF) { ViewModel.sprReport.Row = iCurrRow; if (sEmployeeName == "") { //first time ViewModel.sprReport.Col = 1; sEmployeeName = modGlobal.Clean(TrainCL.TrainingRecord["name_full"]); ViewModel.sprReport.Text = sEmployeeName; ViewModel.sprReport.Col = 2; ViewModel.sprReport.Text = modGlobal.Clean(TrainCL.TrainingRecord["state_number"]); ViewModel.sprReport.Col = 3; ViewModel.sprReport.Text = modGlobal.Clean(TrainCL.TrainingRecord["unit_code"]) + "-" + modGlobal.Clean(TrainCL.TrainingRecord["shift_code"]); ViewModel.sprReport.Col = 4; //UPGRADE_WARNING: (1068) GetVal(TrainCL.TrainingRecord(group_number)) of type Variant is being forced to double. More Information: http://www.vbtonet.com/ewis/ewi1068.aspx if (modGlobal.Clean(TrainCL.TrainingRecord["group_number"]) == "") { ViewModel.sprReport.Text = ""; } else if (Convert.ToDouble(modGlobal.GetVal(TrainCL.TrainingRecord["group_number"])) > 0) { //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["group_number"])); } else { ViewModel.sprReport.Text = ""; } if (modGlobal.Clean(TrainCL.TrainingRecord["trn_month"]) != "") { ViewModel.sprReport.Row = iCodeRow; int tempForVar = ViewModel.sprReport.MaxCols; for (int i = 5; i <= tempForVar; i++) { ViewModel.sprReport.Col = i; if (modGlobal.Clean(TrainCL.TrainingRecord["trn_month"]) == modGlobal.Clean(ViewModel.sprReport.Text)) { ViewModel.sprReport.Row = iCurrRow; ViewModel.sprReport.Col = i; //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_occurrences"])); ViewModel.sprReport.Col = i + 1; //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_hrs"])); break; } } } } else if (sEmployeeName == modGlobal.Clean(TrainCL.TrainingRecord["name_full"])) { if (modGlobal.Clean(TrainCL.TrainingRecord["trn_month"]) != "") { ViewModel.sprReport.Row = iCodeRow; int tempForVar2 = ViewModel.sprReport.MaxCols; for (int i = 5; i <= tempForVar2; i++) { ViewModel.sprReport.Col = i; if (modGlobal.Clean(TrainCL.TrainingRecord["trn_month"]) == modGlobal.Clean(ViewModel.sprReport.Text)) { ViewModel.sprReport.Row = iCurrRow; ViewModel.sprReport.Col = i; //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_occurrences"])); ViewModel.sprReport.Col = i + 1; //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_hrs"])); break; } } } } else { iCurrRow++; ViewModel.sprReport.Row = iCurrRow; ViewModel.sprReport.Col = 1; sEmployeeName = modGlobal.Clean(TrainCL.TrainingRecord["name_full"]); ViewModel.sprReport.Text = sEmployeeName; ViewModel.sprReport.Col = 2; ViewModel.sprReport.Text = modGlobal.Clean(TrainCL.TrainingRecord["state_number"]); ViewModel.sprReport.Col = 3; ViewModel.sprReport.Text = modGlobal.Clean(TrainCL.TrainingRecord["unit_code"]) + "-" + modGlobal.Clean(TrainCL.TrainingRecord["shift_code"]); ViewModel.sprReport.Col = 4; //UPGRADE_WARNING: (1068) GetVal(TrainCL.TrainingRecord(group_number)) of type Variant is being forced to double. More Information: http://www.vbtonet.com/ewis/ewi1068.aspx if (modGlobal.Clean(TrainCL.TrainingRecord["group_number"]) == "") { ViewModel.sprReport.Text = ""; } else if (Convert.ToDouble(modGlobal.GetVal(TrainCL.TrainingRecord["group_number"])) > 0) { //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["group_number"])); } else { ViewModel.sprReport.Text = ""; } if (modGlobal.Clean(TrainCL.TrainingRecord["trn_month"]) != "") { ViewModel.sprReport.Row = iCodeRow; int tempForVar3 = ViewModel.sprReport.MaxCols; for (int i = 5; i <= tempForVar3; i++) { ViewModel.sprReport.Col = i; if (modGlobal.Clean(TrainCL.TrainingRecord["trn_month"]) == modGlobal.Clean(ViewModel.sprReport.Text)) { ViewModel.sprReport.Row = iCurrRow; ViewModel.sprReport.Col = i; //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_occurrences"])); ViewModel.sprReport.Col = i + 1; //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_hrs"])); break; } } } } TrainCL.TrainingRecord.MoveNext(); } ; }