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