//*************************************************************
// 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();
}
;
}