internal void cmdAddRecord_Click(Object eventSender, System.EventArgs eventArgs)
{
PTSProject.clsEMSInformation cImmune = Container.Resolve <clsEMSInformation>();
if (ViewModel.cboType.SelectedIndex == -1)
{
return;
}
if (ViewModel.lstSelectedStaff.Items.Count == 0)
{
return;
}
ViewModel.cmdAddRecord.Enabled = false;
//Need to edit and fill fields
//UPGRADE_WARNING: (1068) GetVal() of type Variant is being forced to int. More Information: http://www.vbtonet.com/ewis/ewi1068.aspx
cImmune.EMSImmunizeID = Convert.ToInt32(modGlobal.GetVal(ViewModel.cboType.GetItemData(ViewModel.cboType.SelectedIndex)));
if (ViewModel.chkImmuneDate.CheckState == UpgradeHelpers.Helpers.CheckState.Unchecked)
{
cImmune.EMSImmunizeDate = "";
}
else
{
cImmune.EMSImmunizeDate = DateTime.Parse(ViewModel.dteShotDate.Text).ToString("M/d/yyyy");
}
cImmune.EMSCreatedDate = DateTime.Now.ToString("M/d/yyyy HH:mm:ss");
cImmune.EMSCreatedBy = modGlobal.Shared.gUser;
if (ViewModel.chkResults.CheckState == UpgradeHelpers.Helpers.CheckState.Unchecked)
{
cImmune.EMSResultflag = "";
}
else if (ViewModel.optPositive.Checked)
{
cImmune.EMSResultflag = "P";
}
else
{
cImmune.EMSResultflag = "N";
}
cImmune.EMSComments = modGlobal.Clean(ViewModel.txtComments.Text);
//will need to loop through the lstSelectedStaff
for (int i = 0; i <= ViewModel.lstSelectedStaff.Items.Count - 1; i++)
{
cImmune.EMSEmployeeID = ViewModel.lstSelectedStaff.GetListItem(i).Substring(Math.Max(ViewModel.lstSelectedStaff.GetListItem(i).Length - 5, 0));
if (~cImmune.InsertEMSPersonnelImmunizations() != 0)
{
ViewManager.ShowMessage("Ooops! Something is wrong!! Immunization Record was not added.", "Add New Immunization Record", UpgradeHelpers.Helpers.BoxButtons.OK);
ViewModel.cmdAddRecord.Enabled = true;
}
}
ViewModel.lbSaveMsg.Visible = true;
UpgradeSolution1Support.PInvoke.SafeNative.kernel32.Sleep(1500);
ViewModel.lbSaveMsg.Visible = false;
}
//*************************************************************
//Immunization Query Screen
// Filtered by Battalion/Shift/Unit
// Date Range, Immunization Type,
// Assignment Group (HZM, PM, REG, CIV, VOL, etc)
// Employee Name (like statement)
//
//*************************************************************
public void RefreshEmployeeList()
{
PTSProject.clsEMSInformation cImmune = Container.Resolve <clsEMSInformation>();
int iType = 0;
int iFlag = 0;
string sText = "";
if (ViewModel.FirstTime)
{
return;
}
if (ViewModel.SkipLogic)
{
return;
}
int CurrRow = 0;
ViewModel.sprReport.MaxRows = 500;
string sStartDate = DateTime.Parse(ViewModel.dtStart.Text).ToString("M/d/yyyy");
string sEndDate = DateTime.Parse(ViewModel.dtEnd.Text).AddDays(1).ToString("M/d/yyyy");
ViewModel.sHeadingFilter = "Displaying ";
string sName = modGlobal.Clean(Strings.Replace(ViewModel.txtNameSearch.Text, "'", "''", 1, -1, CompareMethod.Binary));
if (ViewModel.chkNotReceived.CheckState == UpgradeHelpers.Helpers.CheckState.Checked)
{
iFlag = 0;
ViewModel.sHeadingFilter = ViewModel.sHeadingFilter + "Immunization NotReceived; ";
}
else
{
iFlag = 1;
}
if (ViewModel.CurrBatt != "")
{
if (ViewModel.CurrShift != "")
{
ViewModel.sHeadingFilter = ViewModel.sHeadingFilter + "for Batt\\Shift= " + ViewModel.CurrBatt + "\\" + ViewModel.CurrShift + "; ";
}
}
else if (ViewModel.CurrShift != "")
{
ViewModel.sHeadingFilter = ViewModel.sHeadingFilter + "for Shift= " + ViewModel.CurrShift + "; ";
}
if (modGlobal.Clean(ViewModel.CurrUnit) != "")
{
ViewModel.sHeadingFilter = ViewModel.sHeadingFilter + "Unit = " + modGlobal.Clean(ViewModel.CurrUnit) + "; ";
}
if (modGlobal.Clean(ViewModel.CurrGroup) != "")
{
ViewModel.sHeadingFilter = ViewModel.sHeadingFilter + "Assignment Group = " + modGlobal.Clean(ViewModel.CurrGroup) + "; ";
}
ViewModel.sHeadingFilter = ViewModel.sHeadingFilter + "from " + sStartDate + " To " + sEndDate + "; ";
if (ViewModel.cboType.ListIndex == -1)
{
iType = 0;
}
else
{
//UPGRADE_ISSUE: (2064) LpADOLib.fpComboAdo property cboType.ItemData was not upgraded. More Information: http://www.vbtonet.com/ewis/ewi2064.aspx
iType = ViewModel.cboType.ItemData(ViewModel.cboType.ListIndex);
ViewModel.sHeadingFilter = ViewModel.sHeadingFilter + ViewModel.cboType.Text + "; ";
}
//UPGRADE_ISSUE: (2064) FPSpreadADO.fpSpread method sprReport.ClearRange was not upgraded. More Information: http://www.vbtonet.com/ewis/ewi2064.aspx
ViewModel.sprReport.ClearRange(1, 1, ViewModel.sprReport.MaxCols, ViewModel.sprReport.MaxRows, false);
if (cImmune.GetImmunizationQueryResults(ViewModel.CurrBatt, ViewModel.CurrUnit, ViewModel.CurrShift, ViewModel.CurrGroup, sName, iType, sStartDate, sEndDate, iFlag) != 0)
{
//continue
}
else
{
ViewManager.ShowMessage("There were no rows returned. Try changing your options.", "Immunization Query", UpgradeHelpers.Helpers.BoxButtons.OK);
return;
}
while (!cImmune.EMSPersonnelImmunizations.EOF)
{
CurrRow++;
ViewModel.sprReport.Row = CurrRow;
ViewModel.sprReport.Col = 1;
ViewModel.sprReport.Text = modGlobal.Clean(cImmune.EMSPersonnelImmunizations["name_full"]);
ViewModel.sprReport.Col = 2;
ViewModel.sprReport.Text = modGlobal.Clean(cImmune.EMSPersonnelImmunizations["shift_code"]);
ViewModel.sprReport.Col = 3;
ViewModel.sprReport.Text = modGlobal.Clean(cImmune.EMSPersonnelImmunizations["unit_code"]);
ViewModel.sprReport.Col = 4;
ViewModel.sprReport.Text = modGlobal.Clean(cImmune.EMSPersonnelImmunizations["battalion_code"]);
ViewModel.sprReport.Col = 5;
ViewModel.sprReport.Text = modGlobal.Clean(cImmune.EMSPersonnelImmunizations["immunize_type"]);
//cell note
sText = "";
if (modGlobal.Clean(cImmune.EMSPersonnelImmunizations["created_date"]) != "")
{
sText = "Record created on " +
Convert.ToDateTime(cImmune.EMSPersonnelImmunizations["created_date"]).ToString("M/d/yyyy") + " ";
ViewModel.sprReport.TextTip = FarPoint.ViewModels.TextTipPolicy.Floating;
ViewModel.sprReport.Col = 5;
ViewModel.sprReport.CellNoteIndicator = true;
if (modGlobal.Clean(cImmune.EMSPersonnelImmunizations["CreatedBy"]) != "")
{
sText = sText + "by " + modGlobal.Clean(cImmune.EMSPersonnelImmunizations["CreatedBy"]);
}
//UPGRADE_ISSUE: (2064) FPSpreadADO.fpSpread property sprReport.CellNote was not upgraded. More Information: http://www.vbtonet.com/ewis/ewi2064.aspx
ViewModel.sprReport.CellNote = modGlobal.Clean(sText);
}
ViewModel.sprReport.Col = 6;
if (modGlobal.Clean(cImmune.EMSPersonnelImmunizations["immunize_date"]) != "")
{
ViewModel.sprReport.Text = Convert.ToDateTime(cImmune.EMSPersonnelImmunizations["immunize_date"]).ToString("MM/dd/yyyy");
}
else
{
ViewModel.sprReport.Text = "";
}
ViewModel.sprReport.Col = 7;
if (modGlobal.Clean(cImmune.EMSPersonnelImmunizations["result_flag"]) != "")
{
ViewModel.sprReport.Text = modGlobal.Clean(cImmune.EMSPersonnelImmunizations["result_flag"]);
}
else
{
ViewModel.sprReport.Text = "";
}
ViewModel.sprReport.Col = 8;
if (modGlobal.Clean(cImmune.EMSPersonnelImmunizations["comments"]) != "")
{
ViewModel.sprReport.Text = modGlobal.Clean(cImmune.EMSPersonnelImmunizations["Comments"]);
}
else
{
ViewModel.sprReport.Text = "";
}
cImmune.EMSPersonnelImmunizations.MoveNext();
}
;
ViewModel.lbCount.Text = "Total Count: " + ViewModel.sprReport.DataRowCnt.ToString();
}
