internal void cboUnitList_SelectionChangeCommitted(Object eventSender, System.EventArgs eventArgs)
{
//Get Staff for Selected Unit / Date
string ListString = "";
PTSProject.clsUnit UnitCL = Container.Resolve <clsUnit>();
PTSProject.clsTraining TrainCL = Container.Resolve <clsTraining>();
if (ViewModel.cboUnitList.SelectedIndex == -1)
{
return;
}
string TrainUnit = ViewModel.cboUnitList.Text;
string TrainDate = ViewModel.calTrainDate.SelectionRange.Start.ToString("MM/dd/yyyy") + " 8:00AM";
// ClearScreen
if (UnitCL.GetPTSPersonnel(TrainUnit, TrainDate) != 0)
{
while (!UnitCL.UnitPersonnel.EOF)
{
ListString = modGlobal.Clean(UnitCL.UnitPersonnel["emp_id"]);
if (TrainCL.GetEmployee(ListString) != 0)
{
ListString = modGlobal.Clean(TrainCL.Employee["name_full"]) + " :" + Convert.ToString(TrainCL.Employee["employee_id"]);
ViewModel.lstUnitStaff.AddItem(ListString);
}
UnitCL.UnitPersonnel.MoveNext();
}
;
}
// CheckForSave
}
internal void calTrainDate_MouseUp(Object eventSender, UpgradeHelpers.Events.MouseEventArgs eventArgs)
{
//Get Staff for Selected Unit / Date
string ListString = "";
PTSProject.clsUnit UnitCL = Container.Resolve <clsUnit>();
PTSProject.clsTraining TrainCL = Container.Resolve <clsTraining>();
string TrainDate = UpgradeHelpers.Helpers.DateTimeHelper.ToString(ViewModel.calTrainDate.SelectionRange.Start);
TrainDate = TrainDate + " 8:00AM";
if (ViewModel.cboUnitList.SelectedIndex == -1)
{
return;
}
string TrainUnit = modGlobal.Clean(ViewModel.cboUnitList.Text);
ViewModel.lstUnitStaff.Items.Clear();
if (UnitCL.GetPTSPersonnel(TrainUnit, TrainDate) != 0)
{
while (!UnitCL.UnitPersonnel.EOF)
{
ListString = modGlobal.Clean(UnitCL.UnitPersonnel["emp_id"]);
if (TrainCL.GetEmployee(ListString) != 0)
{
ListString = modGlobal.Clean(TrainCL.Employee["name_full"]) + " :" + Convert.ToString(TrainCL.Employee["employee_id"]);
ViewModel.lstUnitStaff.AddItem(ListString);
}
UnitCL.UnitPersonnel.MoveNext();
}
;
}
}
public void FillLists()
{
PTSProject.clsTraining TrainCL = Container.Resolve <clsTraining>();
PTSProject.clsUnit UnitCL = Container.Resolve <clsUnit>();
ViewModel.cboUnit.Clear();
UnitCL.TFDUnitListRS();
//cboUnit.ADDItem "CSRD"
while (!UnitCL.Unit.EOF)
{
ViewModel.cboUnit.AddItem(modGlobal.Clean(UnitCL.Unit["unit_code"]));
UnitCL.Unit.MoveNext();
}
;
ViewModel.cboPrimary.Clear();
TrainCL.GetPrimaryCodes();
while (!TrainCL.TrainingPrimaryCode.EOF)
{
ViewModel.cboPrimary.AddItem(modGlobal.Clean(TrainCL.TrainingPrimaryCode["description"]));
//UPGRADE_ISSUE: (2064) LpADOLib.fpComboAdo property cboPrimary.NewIndex was not upgraded. More Information: http://www.vbtonet.com/ewis/ewi2064.aspx
//UPGRADE_ISSUE: (2064) LpADOLib.fpComboAdo property cboPrimary.ItemData was not upgraded. More Information: http://www.vbtonet.com/ewis/ewi2064.aspx
ViewModel.cboPrimary.setItemData(Convert.ToInt32(TrainCL.TrainingPrimaryCode["trn_primary_code"]), ViewModel.cboPrimary.getNewIndex());
TrainCL.TrainingPrimaryCode.MoveNext();
}
;
}
public void LoadLists()
{
DbCommand oCmd = UpgradeHelpers.DB.AdoFactoryManager.GetFactory().CreateCommand();
PTSProject.clsUnit UnitCL = Container.Resolve <clsUnit>();
oCmd.Connection = modGlobal.oConn;
oCmd.CommandType = CommandType.Text;
//Fill Assignment Type List box
oCmd.CommandText = "spSelect_AssignmentTypeList ";
ADORecordSetHelper oRec = ADORecordSetHelper.Open(oCmd, "");
ViewModel.cboAssignmentCode.Items.Clear();
while (!oRec.EOF)
{
ViewModel.cboAssignmentCode.AddItem(modGlobal.Clean(oRec["assignment_type_code"]));
oRec.MoveNext();
}
;
ViewModel.cboAssignmentCode.SelectedIndex = -1;
ViewModel.cboAssignmentCode.Text = "";
//Fill Unit List box
ViewModel.cboUnit.Clear();
oCmd.CommandText = "spUnitList ";
oRec = ADORecordSetHelper.Open(oCmd, "");
ViewModel.cboUnit.Clear();
while (!oRec.EOF)
{
ViewModel.cboUnit.AddItem((string)oRec["unit_code"]);
oRec.MoveNext();
}
;
ViewModel.cboUnit.ListIndex = -1;
ViewModel.cboUnit.Text = "";
//Fill Immunization List box
oCmd.CommandText = "spSelect_EMSImmunizationTypeList ";
oRec = ADORecordSetHelper.Open(oCmd, "");
ViewModel.cboType.Clear();
while (!oRec.EOF)
{
ViewModel.cboType.AddItem(oRec["immunize_type"]);
//UPGRADE_ISSUE: (2064) LpADOLib.fpComboAdo property cboType.NewIndex was not upgraded. More Information: http://www.vbtonet.com/ewis/ewi2064.aspx
//UPGRADE_WARNING: (1068) GetVal(oRec(immunize_id)) of type Variant is being forced to int. More Information: http://www.vbtonet.com/ewis/ewi1068.aspx
//UPGRADE_ISSUE: (2064) LpADOLib.fpComboAdo property cboType.ItemData was not upgraded. More Information: http://www.vbtonet.com/ewis/ewi2064.aspx
//UPGRADE_WARNING: (1068) GetVal() of type Variant is being forced to int. More Information: http://www.vbtonet.com/ewis/ewi1068.aspx
ViewModel.cboType.setItemData(Convert.ToInt32(modGlobal.GetVal(oRec["immunize_id"])), ViewModel.cboType.getNewIndex());
oRec.MoveNext();
}
;
ViewModel.cboType.ListIndex = -1;
ViewModel.cboType.Text = "";
}
private void LoadLists()
{
//Load Lists
DbCommand oCmd = UpgradeHelpers.DB.AdoFactoryManager.GetFactory().CreateCommand();
string strName = "";
PTSProject.clsTraining TrainCL = Container.Resolve <clsTraining>();
PTSProject.clsUnit UnitCL = Container.Resolve <clsUnit>();
ViewModel.cboUnitList.Items.Clear();
UnitCL.TFDUnitListRS();
// cboUnitList.ADDItem "OPER"
while (!UnitCL.Unit.EOF)
{
ViewModel.cboUnitList.AddItem(modGlobal.Clean(UnitCL.Unit["unit_code"]));
UnitCL.Unit.MoveNext();
}
;
ViewModel.cboAllStaff.Items.Clear();
oCmd.Connection = modGlobal.oConn;
oCmd.CommandType = CommandType.Text;
if (modGlobal.Shared.gSecurity != "ADM")
{
oCmd.CommandText = "spOpNameListForField";
}
else
{
// oCmd.CommandText = "spOpNameList"
oCmd.CommandText = "spFullNameList";
}
ADORecordSetHelper oRec = ADORecordSetHelper.Open(oCmd, "");
while (!oRec.EOF)
{
strName = Convert.ToString(oRec["name_full"]).Trim() + " :" + Convert.ToString(oRec["employee_id"]);
this.ViewModel.cboAllStaff.AddItem(strName);
oRec.MoveNext();
}
;
ViewModel.cboPrimary.Clear();
TrainCL.GetPrimaryCodesForField();
while (!TrainCL.TrainingPrimaryCode.EOF)
{
ViewModel.cboPrimary.AddItem(modGlobal.Clean(TrainCL.TrainingPrimaryCode["description"]));
//UPGRADE_ISSUE: (2064) LpADOLib.fpComboAdo property cboPrimary.NewIndex was not upgraded. More Information: http://www.vbtonet.com/ewis/ewi2064.aspx
//UPGRADE_ISSUE: (2064) LpADOLib.fpComboAdo property cboPrimary.ItemData was not upgraded. More Information: http://www.vbtonet.com/ewis/ewi2064.aspx
ViewModel.cboPrimary.setItemData(Convert.ToInt32(TrainCL.TrainingPrimaryCode["trn_primary_code"]), ViewModel.cboPrimary.getNewIndex());
TrainCL.TrainingPrimaryCode.MoveNext();
}
;
}
public void LoadLists()
{
DbCommand oCmd = UpgradeHelpers.DB.AdoFactoryManager.GetFactory().CreateCommand();
string strName = "";
PTSProject.clsUnit UnitCL = Container.Resolve <clsUnit>();
oCmd.Connection = modGlobal.oConn;
oCmd.CommandType = CommandType.Text;
//Fill Assignment Type List box
oCmd.CommandText = "spSelect_AssignmentTypeList ";
ADORecordSetHelper oRec = ADORecordSetHelper.Open(oCmd, "");
ViewModel.cboAssignmentCode.Items.Clear();
while (!oRec.EOF)
{
ViewModel.cboAssignmentCode.AddItem(modGlobal.Clean(oRec["assignment_type_code"]));
oRec.MoveNext();
}
;
//Fill Unit List box
ViewModel.cboUnit.Items.Clear();
oCmd.CommandText = "spUnitList ";
oRec = ADORecordSetHelper.Open(oCmd, "");
ViewModel.cboUnit.Items.Clear();
while (!oRec.EOF)
{
ViewModel.cboUnit.AddItem(Convert.ToString(oRec["unit_code"]));
oRec.MoveNext();
}
;
//Fill Immunization List box
oCmd.CommandText = "spSelect_EMSImmunizationTypeList ";
oRec = ADORecordSetHelper.Open(oCmd, "");
ViewModel.cboType.Items.Clear();
while (!oRec.EOF)
{
ViewModel.cboType.AddItem(Convert.ToString(oRec["immunize_type"]));
//UPGRADE_WARNING: (1068) GetVal() of type Variant is being forced to int. More Information: http://www.vbtonet.com/ewis/ewi1068.aspx
ViewModel.cboType.SetItemData(ViewModel.cboType.GetNewIndex(), Convert.ToInt32(modGlobal.GetVal(oRec["immunize_id"])));
oRec.MoveNext();
}
;
ViewModel.cboType.BackColor = modGlobal.Shared.REQUIRED;
//Fill All Staff List box
oCmd.CommandText = "spFullNameList ";
oRec = ADORecordSetHelper.Open(oCmd, "");
ViewModel.cboAllStaff.Items.Clear();
while (!oRec.EOF)
{
strName = Convert.ToString(oRec["name_full"]).Trim() + " :" + Convert.ToString(oRec["employee_id"]);
this.ViewModel.cboAllStaff.AddItem(strName);
oRec.MoveNext();
}
;
}
