//**********************************************
//*** frmTransferRequest/Management Screen ***
//**********************************************
//*** This screen will only be available to ***
//*** Admin Security only will use this ***
//*** Screen. The dlgRequestTransfer screen ***
//*** will allow field personnel to request ***
//*** transfers. ***
//**********************************************
public void RefreshPositionLists()
{
PTSProject.clsScheduler cTransfer = Container.Resolve <clsScheduler>();
string sText = "";
ViewModel.cboPositionList.Items.Clear();
ViewModel.lstAvailPositions.Items.Clear();
ViewModel.cboReqPositionList.Items.Clear();
if (cTransfer.GetTransferPositionActiveList() != 0)
{
while (!cTransfer.TransferPosition.EOF)
{
sText = modGlobal.Clean(cTransfer.TransferPosition["unit_code"]);
sText = sText + modGlobal.Clean(cTransfer.TransferPosition["shift_code"]);
sText = sText + " " + modGlobal.Clean(cTransfer.TransferPosition["position_code"]);
if (modGlobal.Clean(cTransfer.TransferPosition["paramedic_only"]) == "Y")
{
sText = sText + " (Paramedic)";
}
ViewModel.cboPositionList.AddItem(sText);
ViewModel.lstAvailPositions.AddItem(sText);
ViewModel.cboReqPositionList.AddItem(sText);
ViewModel.cboPositionList.SetItemData(ViewModel.cboPositionList.GetNewIndex(), Convert.ToInt32(cTransfer.TransferPosition["position_id"]));
ViewModel.lstAvailPositions.SetItemData(ViewModel.lstAvailPositions.GetNewIndex(), Convert.ToInt32(cTransfer.TransferPosition["position_id"]));
ViewModel.cboReqPositionList.SetItemData(ViewModel.cboReqPositionList.GetNewIndex(), Convert.ToInt32(cTransfer.TransferPosition["position_id"]));
cTransfer.TransferPosition.MoveNext();
}
;
}
}
private void GetEmployeeDetail()
{
PTSProject.clsScheduler cSched = Container.Resolve <clsScheduler>();
ViewModel.txtComment.Text = "";
if (cSched.GetEmployeeAvailableToWorkByID(ViewModel.CurrRecord) != 0)
{
ViewModel.txtComment.Text = modGlobal.Clean(cSched.EmpAvailToWorkComment);
}
ViewModel.sprPhoneList.Col = 1;
ViewModel.sprPhoneList.Col2 = ViewModel.sprPhoneList.MaxCols;
ViewModel.sprPhoneList.Row = 1;
ViewModel.sprPhoneList.Row2 = 1;
ViewModel.sprPhoneList.BlockMode = true;
ViewModel.sprPhoneList.Text = "";
ViewModel.sprPhoneList.BlockMode = false;
int iRow = 0;
if (cSched.GetEmployeeCallBackPhoneList(ViewModel.CurrEmpID) != 0)
{
while (!cSched.EmployeeAvailableToWork.EOF)
{
iRow++;
ViewModel.sprPhoneList.Row = iRow;
ViewModel.sprPhoneList.Col = 1;
ViewModel.sprPhoneList.Text = modGlobal.Clean(cSched.EmployeeAvailableToWork["phone_type"]);
ViewModel.sprPhoneList.Col = 2;
ViewModel.sprPhoneList.Text = modGlobal.Clean(cSched.EmployeeAvailableToWork["phone_number"]);
cSched.EmployeeAvailableToWork.MoveNext();
}
;
}
}
//UPGRADE_WARNING: (2080) Form_Load event was upgraded to Form_Load method and has a new behavior. More Information: http://www.vbtonet.com/ewis/ewi2080.aspx
private void Form_Load()
{
//This dialog form requests Start and End dates
//for Employee Transfers
PTSProject.clsScheduler cScheduler = Container.Resolve <clsScheduler>();
int iYear = DateTime.Now.AddYears(1).Year;
//Get the maximum shift_start year from Schedule... just incase
if (cScheduler.GetScheduleMaxYear() != 0)
{
if (!cScheduler.ScheduleRecord.EOF)
{
//UPGRADE_WARNING: (1068) GetVal() of type Variant is being forced to int. More Information: http://www.vbtonet.com/ewis/ewi1068.aspx
iYear = Convert.ToInt32(modGlobal.GetVal(cScheduler.ScheduleRecord["MaxYear"]));
}
}
modGlobal.Shared.gStartTrans = "";
modGlobal.Shared.gEndTrans = "";
modGlobal.Shared.gTempTrans = 0;
//Set Max and Min Date properties for date controls
System
.DateTime TempDate = DateTime.FromOADate(0);
ViewModel.calStartDate.MinDate = DateTime.Parse((DateTime.TryParse("1/1/" + DateTime.Now.Year.ToString(), out TempDate)) ? TempDate.ToString("M/d/yyyy") : "1/1/" + DateTime.Now.Year.ToString());
System.DateTime TempDate2 = DateTime.FromOADate(0);
ViewModel.calEndDate.MinDate = DateTime.Parse((DateTime.TryParse("1/1/" + DateTime.Now.Year.ToString(), out TempDate2)) ? TempDate2.ToString("M/d/yyyy") : "1/1/" + DateTime.Now.Year.ToString());
//TRANSFER END DATE CHANGE
ViewModel.calStartDate.MaxDate = DateTime.Parse("2/1/" + iYear.ToString()).AddYears(1);
//TRANSFER END DATE CHANGE
ViewModel.calEndDate.MaxDate = DateTime.Parse("2/1/" + iYear.ToString()).AddYears(1);
}
public void FillLists()
{
PTSProject.clsScheduler cTransfer = Container.Resolve <clsScheduler>();
DbCommand oCmd = UpgradeHelpers.DB.AdoFactoryManager.GetFactory().CreateCommand();
ADORecordSetHelper oRec = null;
string strName = "";
ViewModel.cboPriority.Items.Clear();
if (cTransfer.GetTransferPriorityCodeList() != 0)
{
while (!cTransfer.TransferPriorityCode.EOF)
{
ViewModel.cboPriority.AddItem(modGlobal.Clean(cTransfer.TransferPriorityCode["description"]));
//UPGRADE_WARNING: (1068) GetVal() of type Variant is being forced to int. More Information: http://www.vbtonet.com/ewis/ewi1068.aspx
ViewModel.cboPriority.SetItemData(ViewModel.cboPriority.GetNewIndex(), Convert.ToInt32(modGlobal.GetVal(cTransfer.TransferPriorityCode["priority_code"])));
cTransfer.TransferPriorityCode.MoveNext();
}
;
}
oCmd.Connection = modGlobal.oConn;
oCmd.CommandType = CommandType.Text;
//Fill Employee Name Lists
ViewModel.cboReqNameList.Items.Clear();
ViewModel.cboNameList.Items.Clear();
if (modGlobal.Shared.gSecurity != "RO")
{
oCmd.CommandText = "spOpNameList";
oRec = ADORecordSetHelper.Open(oCmd, "");
while (!oRec.EOF)
{
strName = Convert.ToString(oRec["name_full"]).Trim() + " :" + Convert.ToString(oRec["employee_id"]);
ViewModel.cboNameList.AddItem(strName);
ViewModel.cboReqNameList.AddItem(strName);
oRec.MoveNext();
}
;
ViewModel.cboNameList.SelectedIndex = -1;
ViewModel.cboReqNameList.SelectedIndex = -1;
}
ViewModel.cboReqPositionList.Items.Clear();
ViewModel.cboPositionList.Items.Clear();
ViewModel.cboShiftList.Items.Clear();
ViewModel.cboUnitList.Items.Clear();
oCmd.CommandText = "spUnitList";
oRec = ADORecordSetHelper.Open(oCmd, "");
ViewModel.cboUnitList.Items.Clear();
while (!oRec.EOF)
{
ViewModel.cboUnitList.AddItem(Convert.ToString(oRec["unit_code"]));
oRec.MoveNext();
}
;
}
//***********************************
//* Query Personnel Schedule Notes *
//* By Date / Comment text *
//***********************************
public void FillGrid()
{
PTSProject.clsScheduler cSched = Container.Resolve <clsScheduler>();
ViewModel.sprReport.MaxRows = 10000;
ViewModel.sprReport.Col = 1;
ViewModel.sprReport.Col2 = ViewModel.sprReport.MaxCols;
ViewModel.sprReport.Row = 1;
ViewModel.sprReport.Row2 = ViewModel.sprReport.MaxRows;
ViewModel.sprReport.BlockMode = true;
ViewModel.sprReport.Text = "";
ViewModel.sprReport.BlockMode = false;
string sText = modGlobal.Clean(ViewModel.txtCommentSearch.Text);
string StartDate = DateTime.Parse(ViewModel.dtStartDate.Text).ToString("MM/dd/yyyy");
string EndDate = DateTime.Parse(ViewModel.dtEndDate.Text).ToString("MM/dd/yyyy");
if (!Information.IsDate(StartDate))
{
return;
}
if (!Information.IsDate(EndDate))
{
return;
}
int CurrRow = 0;
if (cSched.GetPersonnelSchedNotesFiltered(StartDate, EndDate, sText) != 0)
{
}
else
{
ViewManager.ShowMessage("No Records were found.", "Query Personnel Sched Notes", UpgradeHelpers.Helpers.BoxButtons.OK);
ViewModel.sprReport.MaxRows = 50;
ViewModel.lbCount.Text = "List Count: " + "0";
return;
}
while (!cSched.ScheduleRecord.EOF)
{
CurrRow++;
ViewModel.sprReport.Row = CurrRow;
ViewModel.sprReport.Col = 1;
ViewModel.sprReport.Text = modGlobal.Clean(cSched.ScheduleRecord["name_full"]);
ViewModel.sprReport.Col = 2;
ViewModel.sprReport.Text = Convert.ToDateTime(cSched.ScheduleRecord["shift_start"]).ToString("MM/dd/yyyy");
ViewModel.sprReport.Col = 3;
ViewModel.sprReport.Text = modGlobal.Clean(cSched.ScheduleRecord["AuthoredBy"]);
ViewModel.sprReport.Col = 4;
ViewModel.sprReport.Text = modGlobal.Clean(cSched.ScheduleRecord["note"]);
cSched.ScheduleRecord.MoveNext();
}
;
ViewModel.sprReport.MaxRows = CurrRow;
ViewModel.lbCount.Text = "List Count: " + CurrRow.ToString();
}
//*********************************************
//*** dlgAvailableToWork ***
//*********************************************
//*** This screen is called from any of the ***
//*** Batt Scheduler Screens. It lists ***
//*** everyone who said they were available ***
//*** to work... ***
//*********************************************
//UPGRADE_NOTE: (7001) The following declaration (FormatReport) seems to be dead code More Information: http://www.vbtonet.com/ewis/ewi7001.aspx
//private void FormatReport()
//{
//clsScheduler cSched = new clsScheduler();
//clsScheduler cCommentInfo = new clsScheduler();
//clsScheduler cPhoneInfo = new clsScheduler();
//int iNameRow = 0;
//
//
////UPGRADE_ISSUE: (2064) FPSpreadADO.fpSpread method sprReport.ClearRange was not upgraded. More Information: http://www.vbtonet.com/ewis/ewi2064.aspx
//sprReport.ClearRange(1, 4, sprReport.MaxCols, sprReport.MaxRows, false);
//
//sprReport.Row = 2;
//sprReport.Col = 1;
//sprReport.Text = this.Text;
//
//if (~cSched.GetEmployeeAvailableToWorkByDate(CurrDate) != 0)
//{
//return;
//}
//
//this.Cursor = Cursors.WaitCursor;
//
//int iRow = 3;
//string sEmpID = "";
//
//
//while(!cSched.EmployeeAvailableToWork.EOF)
//{
//if (sEmpID == "")
//{ //First Time
//sEmpID = modGlobal.Clean(cSched.EmployeeAvailableToWork["employee_id"]);
//iRow++;
//sprReport.Row = iRow;
//iNameRow = iRow;
//
//sprReport.Col = 1;
//sprReport.Text = modGlobal.Clean(cSched.EmployeeAvailableToWork["name_full"]);
//
//sprReport.Col = 3;
//sprReport.TypeHAlign = FarPoint.Win.Spread.CellHorizontalAlignment.Center;
//sprReport.Text = "AM";
//
//sprReport.Col = 4;
//sprReport.TypeHAlign = FarPoint.Win.Spread.CellHorizontalAlignment.Center;
//sprReport.Text = "PM";
//
//sprReport.Col = 5;
//sprReport.TypeHAlign = FarPoint.Win.Spread.CellHorizontalAlignment.Center;
//sprReport.Text = "Phone(s)";
//
//iRow++;
//sprReport.Row = iRow;
//
//if (DateAndTime.DatePart("h", Convert.ToDateTime(cSched.EmployeeAvailableToWork["shift_start"]), FirstDayOfWeek.Sunday, FirstWeekOfYear.Jan1) < 12)
//{
//sprReport.Col = 3;
//sprReport.TypeHAlign = FarPoint.Win.Spread.CellHorizontalAlignment.Center;
//sprReport.Text = "X";
//}
//
//if (DateAndTime.DatePart("h", Convert.ToDateTime(cSched.EmployeeAvailableToWork["shift_start"]), FirstDayOfWeek.Sunday, FirstWeekOfYear.Jan1) > 12)
//{
//sprReport.Col = 4;
//sprReport.TypeHAlign = FarPoint.Win.Spread.CellHorizontalAlignment.Center;
//sprReport.Text = "X";
//}
//
//}
//else if (sEmpID == modGlobal.Clean(cSched.EmployeeAvailableToWork["employee_id"]))
//{
//Get PhoneNumbers and Comments...
//
//}
//else
//{
//Next Person
//iRow++;
//sprReport.Row = iRow;
//sprReport.Col = 1;
////UPGRADE_ISSUE: (2064) FPSpreadADO.fpSpread method sprReport.AddCellSpan was not upgraded. More Information: http://www.vbtonet.com/ewis/ewi2064.aspx
//sprReport.AddCellSpan(1, iRow, sprReport.MaxCols, iRow);
//sprReport.BackColor = modGlobal.LT_GRAY;
//
//sEmpID = modGlobal.Clean(cSched.EmployeeAvailableToWork["employee_id"]);
//iRow++;
//sprReport.Row = iRow;
//iNameRow = iRow;
//
//sprReport.Col = 1;
//sprReport.Text = modGlobal.Clean(cSched.EmployeeAvailableToWork["name_full"]);
//
//sprReport.Col = 3;
//sprReport.TypeHAlign = FarPoint.Win.Spread.CellHorizontalAlignment.Center;
//sprReport.Text = "AM";
//
//sprReport.Col = 4;
//sprReport.TypeHAlign = FarPoint.Win.Spread.CellHorizontalAlignment.Center;
//sprReport.Text = "PM";
//
//sprReport.Col = 5;
//sprReport.TypeHAlign = FarPoint.Win.Spread.CellHorizontalAlignment.Center;
//sprReport.Text = "Phone(s)";
//
//
//
//}
//cSched.EmployeeAvailableToWork.MoveNext();
//};
//this.Cursor = Cursors.Default;
//
//}
private void FillAvailableGrid()
{
PTSProject.clsScheduler cSched = Container.Resolve <clsScheduler>();
ViewModel.sprAvailable.Row = 1;
ViewModel.sprAvailable.Row2 = ViewModel.sprAvailable.MaxRows;
ViewModel.sprAvailable.Col = 1;
ViewModel.sprAvailable.Col2 = ViewModel.sprAvailable.MaxCols;
ViewModel.sprAvailable.BlockMode = true;
ViewModel.sprAvailable.Text = "";
ViewModel.sprAvailable.BackColor = modGlobal.Shared.WHITE;
ViewModel.sprAvailable.BlockMode = false;
if (~cSched.GetEmployeeAvailableToWorkByDate(ViewModel.CurrDate) != 0)
{
return;
}
ViewModel.CurrRow = 0;
while (!cSched.EmployeeAvailableToWork.EOF)
{
(ViewModel.CurrRow)++;
ViewModel.sprAvailable.Row = ViewModel.CurrRow;
ViewModel.sprAvailable.Col = 1;
ViewModel.sprAvailable.Text = modGlobal.Clean(cSched.EmployeeAvailableToWork["name_full"]);
ViewModel.sprAvailable.Col = 2;
ViewModel.sprAvailable.Text = Convert.ToDateTime(cSched.EmployeeAvailableToWork["shift_start"]).ToString("MM/dd/yyyy HH:mm");
ViewModel.sprAvailable.Col = 3;
ViewModel.sprAvailable.Text = Convert.ToDateTime(cSched.EmployeeAvailableToWork["created_on"]).ToString("MM/dd/yyyy HH:mm");
ViewModel.sprAvailable.Col = 4;
ViewModel.sprAvailable.Text = Convert.ToDateTime(cSched.EmployeeAvailableToWork["LastWorked"]).ToString("MM/dd/yyyy HH:mm");
ViewModel.sprAvailable.Col = 5;
ViewModel.sprAvailable.Text = Convert.ToDateTime(cSched.EmployeeAvailableToWork["NextWorkSched"]).ToString("MM/dd/yyyy HH:mm");
ViewModel.sprAvailable.Col = 6;
//UPGRADE_WARNING: (1068) GetVal() of type Variant is being forced to string. More Information: http://www.vbtonet.com/ewis/ewi1068.aspx
ViewModel.sprAvailable.Text = Convert.ToString(modGlobal.GetVal(cSched.EmployeeAvailableToWork["available_id"]));
ViewModel.sprAvailable.Col = 7;
ViewModel.sprAvailable.Text = modGlobal.Clean(cSched.EmployeeAvailableToWork["employee_id"]);
if (ViewModel.CurrRow == 1)
{
ViewModel.CurrEmpID = modGlobal.Clean(cSched.EmployeeAvailableToWork["employee_id"]);
//UPGRADE_WARNING: (1068) GetVal() of type Variant is being forced to int. More Information: http://www.vbtonet.com/ewis/ewi1068.aspx
ViewModel.CurrRecord = Convert.ToInt32(modGlobal.GetVal(cSched.EmployeeAvailableToWork["available_id"]));
}
cSched.EmployeeAvailableToWork.MoveNext();
}
;
if (ViewModel.CurrEmpID != "")
{
GetEmployeeDetail();
// FormatReport
}
}
private void FillPositionGrid()
{
PTSProject.clsScheduler cTransfer = Container.Resolve <clsScheduler>();
int CurrRow = 0;
string sText = "";
ViewModel.sprPositions.Row = 1;
ViewModel.sprPositions.Row2 = ViewModel.sprPositions.MaxRows;
ViewModel.sprPositions.Col = 1;
ViewModel.sprPositions.Col2 = ViewModel.sprPositions.MaxCols;
ViewModel.sprPositions.BlockMode = true;
ViewModel.sprPositions.Text = "";
ViewModel.sprPositions.BackColor = modGlobal.Shared.WHITE;
ViewModel.sprPositions.BlockMode = false;
//UPGRADE_ISSUE: (2064) FPSpreadADO.fpSpread method sprPositions.ClearSelection was not upgraded. More Information: http://www.vbtonet.com/ewis/ewi2064.aspx
ViewModel.sprPositions.ClearSelection();
if (cTransfer.GetTransferPositionActiveList() != 0)
{
while (!cTransfer.TransferPosition.EOF)
{
CurrRow++;
ViewModel.sprPositions.Row = CurrRow;
sText = "";
ViewModel.sprPositions.Col = 1;
ViewModel.sprPositions.TypeHAlign = FarPoint.ViewModels.CellHorizontalAlignment.Center;
sText = modGlobal.Clean(cTransfer.TransferPosition["unit_code"]);
if (modGlobal.Clean(cTransfer.TransferPosition["paramedic_only"]) == "Y")
{
sText = "*" + sText;
}
ViewModel.sprPositions.Text = sText;
ViewModel.sprPositions.Col = 2;
ViewModel.sprPositions.TypeHAlign = FarPoint.ViewModels.CellHorizontalAlignment.Center;
ViewModel.sprPositions.Text = modGlobal.Clean(cTransfer.TransferPosition["shift_code"]);
ViewModel.sprPositions.Col = 3;
ViewModel.sprPositions.TypeHAlign = FarPoint.ViewModels.CellHorizontalAlignment.Left;
ViewModel.sprPositions.Text = modGlobal.Clean(cTransfer.TransferPosition["position_code"]);
ViewModel.sprPositions.Col = 4;
ViewModel.sprPositions.TypeHAlign = FarPoint.ViewModels.CellHorizontalAlignment.Left;
ViewModel.sprPositions.Text = Convert.ToDateTime(cTransfer.TransferPosition["date_open"]).ToString("M/d/yyyy");
ViewModel.sprPositions.Col = 5;
ViewModel.sprPositions.TypeHAlign = FarPoint.ViewModels.CellHorizontalAlignment.Left;
ViewModel.sprPositions.Text = Convert.ToDateTime(cTransfer.TransferPosition["date_closed"]).ToString("M/d/yyyy");
ViewModel.sprPositions.Col = 6;
ViewModel.sprPositions.Text = Convert.ToInt32(cTransfer.TransferPosition["position_id"]).ToString();
cTransfer.TransferPosition.MoveNext();
}
;
}
}
private void FillRequestGrid()
{
PTSProject.clsScheduler cTransfer = Container.Resolve <clsScheduler>();
StringBuilder sText = new System.Text.StringBuilder();
ViewModel.sprRequests.Row = 1;
ViewModel.sprRequests.Row2 = ViewModel.sprRequests.MaxRows;
ViewModel.sprRequests.Col = 1;
ViewModel.sprRequests.Col2 = ViewModel.sprRequests.MaxCols;
ViewModel.sprRequests.BlockMode = true;
ViewModel.sprRequests.Text = "";
ViewModel.sprRequests.BackColor = modGlobal.Shared.WHITE;
ViewModel.sprRequests.BlockMode = false;
//UPGRADE_ISSUE: (2064) FPSpreadADO.fpSpread method sprRequests.ClearSelection was not upgraded. More Information: http://www.vbtonet.com/ewis/ewi2064.aspx
ViewModel.sprRequests.ClearSelection();
int CurrRow = 0;
if (ViewModel.CurrEmployee == "")
{
return;
}
if (cTransfer.GetActiveTransferRequestsForEmployee(ViewModel.CurrEmployee) != 0)
{
while (!cTransfer.TransferRequest.EOF)
{
CurrRow++;
ViewModel.sprRequests.Row = CurrRow;
ViewModel.sprRequests.Col = 1;
ViewModel.sprRequests.TypeHAlign = FarPoint.ViewModels.CellHorizontalAlignment.Center;
//UPGRADE_WARNING: (1068) GetVal() of type Variant is being forced to string. More Information: http://www.vbtonet.com/ewis/ewi1068.aspx
ViewModel.sprRequests.Text = Convert.ToString(modGlobal.GetVal(cTransfer.TransferRequest["priority_value"]));
ViewModel.sprRequests.Col = 2;
sText = new System.Text.StringBuilder(modGlobal.Clean(cTransfer.TransferRequest["unit_code"]));
sText.Append(modGlobal.Clean(cTransfer.TransferRequest["shift_code"]));
sText.Append(" " + modGlobal.Clean(cTransfer.TransferRequest["position_code"]));
ViewModel.sprRequests.TypeHAlign = FarPoint.ViewModels.CellHorizontalAlignment.Left;
ViewModel.sprRequests.Text = sText.ToString();
ViewModel.sprRequests.Col = 3;
ViewModel.sprRequests.TypeHAlign = FarPoint.ViewModels.CellHorizontalAlignment.Left;
ViewModel.sprRequests.Text = Convert.ToDateTime(cTransfer.TransferRequest["created_date"]).ToString("M/d/yyyy HH:mm:ss");
ViewModel.sprRequests.Col = 4;
ViewModel.sprRequests.Text = Convert.ToInt32(cTransfer.TransferRequest["request_id"]).ToString();
cTransfer.TransferRequest.MoveNext();
}
;
}
}
//*******************************
//* TFD Watch Duty Assignment *
//*******************************
private int DetermineSecurity()
{
int result = 0;
PTSProject.clsScheduler cSched = Container.Resolve <clsScheduler>();
//This should always be NoLimitUpdate = True... because
//GetEMSForSecurity is done before loading the screen...
result = 0;
if (cSched.GetWatchDutySecurity(modGlobal.Shared.gUser) != 0)
{
result = -1;
}
return(result);
}
//UPGRADE_WARNING: (2080) Form_Load event was upgraded to Form_Load method and has a new behavior. More Information: http://www.vbtonet.com/ewis/ewi2080.aspx
private void Form_Load()
{
PTSProject.clsScheduler sScheduler = Container.Resolve <clsScheduler>();
int iYear = DateTime.Now.Year + 1;
if (sScheduler.GetScheduleMaxYear() != 0)
{
if (!sScheduler.ScheduleRecord.EOF)
{
//UPGRADE_WARNING: (1068) GetVal() of type Variant is being forced to int. More Information: http://www.vbtonet.com/ewis/ewi1068.aspx
iYear = Convert.ToInt32(modGlobal.GetVal(sScheduler.ScheduleRecord["MaxYear"]));
}
}
//Set Min and Max Dates for calendar controls
if (~modGlobal.Shared.gTradeDefault != 0)
{
ViewModel.calStart.MinDate = DateTime.Parse(modGlobal.Shared.gStartTrans);
ViewModel.calStart.MaxDate = DateTime.Parse("12/31/" + DateTime.Parse(modGlobal.Shared.gStartTrans).Year.ToString());
ViewModel.calStart.Value = ViewModel.calStart.MinDate;
ViewModel.calEnd.MinDate = DateTime.Parse(modGlobal.Shared.gStartTrans);
//TRANSFER END DATE CHANGE
ViewModel.calEnd.MaxDate = DateTime.Parse("2/1/" + iYear.ToString());
//Change the default from MaxDate to MinDate
// calEnd.Date = calEnd.MaxDate
ViewModel.calEnd.Value = ViewModel.calEnd.MinDate;
ViewModel.chkBothShifts.Visible = modGlobal.Shared.gFullShift != 0;
}
else
{
//For employees working a trade give option only
//for this day
ViewModel.lbStart.Visible = false;
ViewModel.lbEnd.Visible = false;
ViewModel.calStart.Visible = false;
ViewModel.calEnd.Visible = false;
ViewModel.optType[1].Enabled = false;
ViewModel.optType[2].Enabled = false;
ViewModel.chkBothShifts.Visible = modGlobal.Shared.gFullShift != 0;
}
}
internal void cmdDone_Click(Object eventSender, System.EventArgs eventArgs)
{
PTSProject.clsScheduler cScheduler = Container.Resolve <clsScheduler>();
//Check for Date Selection
//exit sub
int iYear = DateTime.Now.AddYears(1).Year;
//Get the maximum shift_start year from Schedule... just incase
if (cScheduler.GetScheduleMaxYear() != 0)
{
if (!cScheduler.ScheduleRecord.EOF)
{
//UPGRADE_WARNING: (1068) GetVal() of type Variant is being forced to int. More Information: http://www.vbtonet.com/ewis/ewi1068.aspx
iYear = Convert.ToInt32(modGlobal.GetVal(cScheduler.ScheduleRecord["MaxYear"]));
}
}
if (!ViewModel.lbEndDate.Visible)
{
//TRANSFER END DATE CHANGE
System
.DateTime TempDate = DateTime.FromOADate(0);
modGlobal.Shared.gEndTrans = (DateTime.TryParse("2/1/" + iYear.ToString(), out TempDate)) ? TempDate.ToString("MM/dd/yyyy") : "2/1/" + iYear.ToString();
}
else if (modGlobal.Shared.gEndTrans == "")
{
modGlobal.Shared.gEndTrans = ViewModel.calEndDate.Value.Date.ToString("MM/dd/yyyy");
}
else
{
modGlobal.Shared.gEndTrans = ViewModel.calEndDate.Value.Date.ToString("MM/dd/yyyy");
}
modGlobal.Shared.gStartTrans = ViewModel.calStartDate.Value.Date.ToString("MM/dd/yyyy");
modGlobal.Shared.gTransCancel = 0;
ViewManager.DisposeView(this);
}
internal void cmdAdd_Click(Object eventSender, System.EventArgs eventArgs)
{
PTSProject.clsScheduler cSched = Container.Resolve <clsScheduler>();
cSched.EmpAvailToWorkEmpID = ViewModel.CurrEmployee;
cSched.EmpAvailToWorkCreatedBy = modGlobal.Shared.gUser;
cSched.EmpAvailToWorkCreatedOn = DateTime.Now.ToString("MM/dd/yyyy HH:mm:ss");
cSched.EmpAvailToWorkComment = modGlobal.Clean(ViewModel.txtComment.Text);
//Private cEmpAvailToWorkShiftDate As String
if (ViewModel.chkAM.CheckState == UpgradeHelpers.Helpers.CheckState.Checked)
{
cSched.EmpAvailToWorkShiftDate = ViewModel.SelectedDate + " 7:00:00";
if (cSched.AddEmployeeAvailableToWork())
{
//continue
}
else
{
ViewManager.ShowMessage("Oooops! Something went wrong when trying to add AM record.", "Add Available To Work Record", UpgradeHelpers.Helpers.BoxButtons.OK);
return;
}
}
if (ViewModel.chkPM.CheckState == UpgradeHelpers.Helpers.CheckState.Checked)
{
cSched.EmpAvailToWorkShiftDate = ViewModel.SelectedDate + " 19:00:00";
if (cSched.AddEmployeeAvailableToWork())
{
//continue
}
else
{
ViewManager.ShowMessage("Oooops! Something went wrong when trying to add PM record.", "Add Available To Work Record", UpgradeHelpers.Helpers.BoxButtons.OK);
return;
}
}
FillAvailableGrid();
}
internal void cmdReqDone_Click(Object eventSender, System.EventArgs eventArgs)
{
PTSProject.clsScheduler cTransfer = Container.Resolve <clsScheduler>();
//int i = 0;
//the following should never happen...
if (modGlobal.Clean(ViewModel.CurrEmployee) == "")
{
return;
}
if (ViewModel.lstAvailPositions.SelectedIndex == -1)
{
return;
}
if (ViewModel.cboPriority.SelectedIndex == -1)
{
return;
}
cTransfer.TransferRequestEmployeeID = modGlobal.Clean(ViewModel.CurrEmployee);
cTransfer.TransferRequestPositionID = ViewModel.lstAvailPositions.GetItemData(ViewModel.lstAvailPositions.SelectedIndex);
//UPGRADE_WARNING: (1068) GetVal() of type Variant is being forced to int. More Information: http://www.vbtonet.com/ewis/ewi1068.aspx
cTransfer.TransferRequestPriorityCode = Convert.ToInt32(modGlobal.GetVal(ViewModel.cboPriority.GetItemData(ViewModel.cboPriority.SelectedIndex)));
cTransfer.TransferRequestCreatedDate = DateTime.Now.ToString("M/d/yyyy HH:mm:ss");
cTransfer.TransferRequestCreatedBy = modGlobal.Shared.gUser;
cTransfer.TransferRequestComment = modGlobal.Clean(ViewModel.txtComment.Text);
if (cTransfer.InsertTransferRequest())
{
}
else
{
ViewManager.ShowMessage("Ooooops! Something went wrong with Adding the Transfer Request!", "Insert Transfer Request", UpgradeHelpers.Helpers.BoxButtons.OK);
}
ViewModel.lstAvailPositions.RemoveItem(ViewModel.lstAvailPositions.SelectedIndex);
UpgradeHelpers.Helpers.ListBoxHelper.SetSelectedIndex(ViewModel.lstAvailPositions, -1);
ViewModel.cboPriority.SelectedIndex = -1;
ViewModel.txtComment.Text = "";
FillGrids();
}
internal void cmdDelete_Click(Object eventSender, System.EventArgs eventArgs)
{
PTSProject.clsScheduler cSched = Container.Resolve <clsScheduler>();
if (ViewModel.CurrRecordID == 0)
{
return;
}
cSched.EmpAvailToWorkID = ViewModel.CurrRecordID;
if (cSched.DeleteEmployeeAvailableToWork() != 0)
{
ViewManager.ShowMessage("Record was successfully deleted.", "Delete Available To Work Record", UpgradeHelpers.Helpers.BoxButtons.OK);
}
else
{
ViewManager.ShowMessage("Oooops! Something went wrong!", "Delete Available To Work Record", UpgradeHelpers.Helpers.BoxButtons.OK);
}
FillAvailableGrid();
}
internal void cmdDelete_Click(Object eventSender, System.EventArgs eventArgs)
{
PTSProject.clsScheduler cTransfer = Container.Resolve <clsScheduler>();
// MsgBox "This feature is under construction!", vbOKOnly, "Coming Soon"
if (modGlobal.Clean(ViewModel.CurrEmployee) == "")
{
return;
}
if (ViewModel.CurrRequest == 0)
{
return;
}
cTransfer.TransferRequestID = ViewModel.CurrRequest;
if (cTransfer.DeleteTransferRequest() != 0)
{
//success
}
else
{
ViewManager.ShowMessage("Ooooops! Something went wrong with deleting Transfer Request!", "Delete Transfer Request", UpgradeHelpers.Helpers.BoxButtons.OK);
}
ViewModel.CurrRequest = 0;
if (ViewModel.CurrReqRow != 0)
{
ViewModel.sprRequests.Row = ViewModel.CurrReqRow;
int tempForVar = ViewModel.sprRequests.MaxCols;
for (int i = 1; i <= tempForVar; i++)
{
ViewModel.sprRequests.Col = i;
ViewModel.sprRequests.BackColor = modGlobal.Shared.WHITE;
}
ViewModel.CurrReqRow = 0;
}
ViewModel.lbRequest.Text = "";
FillRequestGrid();
}
//**********************************************
//*** frmIndAvailableToWork ***
//**********************************************
//*** This screen is available to CSRs ***
//*** from the Individulal Scheduler to ***
//*** manage specific date/shifts available ***
//*** to work. The results are display for ***
//*** BCs /ISOs for callbacks... ***
//**********************************************
private void FillAvailableGrid()
{
PTSProject.clsScheduler cSched = Container.Resolve <clsScheduler>();
ViewModel.sprAvailable.Row = 1;
ViewModel.sprAvailable.Row2 = ViewModel.sprAvailable.MaxRows;
ViewModel.sprAvailable.Col = 1;
ViewModel.sprAvailable.Col2 = ViewModel.sprAvailable.MaxCols;
ViewModel.sprAvailable.BlockMode = true;
ViewModel.sprAvailable.Text = "";
ViewModel.sprAvailable.BlockMode = false;
if (~cSched.GetEmployeeAvailableToWorkByEmp(ViewModel.CurrEmployee) != 0)
{
return;
}
ViewModel.CurrRow = 0;
while (!cSched.EmployeeAvailableToWork.EOF)
{
(ViewModel.CurrRow)++;
ViewModel.sprAvailable.Row = ViewModel.CurrRow;
this.ViewModel.Text = "Dates Available To Work For " + modGlobal.Clean(cSched.EmployeeAvailableToWork["name_full"]);
ViewModel.sprAvailable.Col = 1;
ViewModel.sprAvailable.Text = Convert.ToDateTime(cSched.EmployeeAvailableToWork["shift_start"]).ToString("MM/dd/yyyy HH:mm");
ViewModel.sprAvailable.Col = 2;
ViewModel.sprAvailable.Text = Convert.ToDateTime(cSched.EmployeeAvailableToWork["created_on"]).ToString("MM/dd/yyyy HH:mm");
ViewModel.sprAvailable.Col = 3;
ViewModel.sprAvailable.Text = modGlobal.Clean(cSched.EmployeeAvailableToWork["comment"]);
ViewModel.sprAvailable.Col = 4;
//UPGRADE_WARNING: (1068) GetVal() of type Variant is being forced to string. More Information: http://www.vbtonet.com/ewis/ewi1068.aspx
ViewModel.sprAvailable.Text = Convert.ToString(modGlobal.GetVal(cSched.EmployeeAvailableToWork["available_id"]));
cSched.EmployeeAvailableToWork.MoveNext();
}
;
}
internal void cmdReqDone_Click(Object eventSender, System.EventArgs eventArgs)
{
PTSProject.clsScheduler cTransfer = Container.Resolve <clsScheduler>();
// MsgBox "This feature is under construction!", vbOKOnly, "Coming Soon"
if (modGlobal.Clean(ViewModel.CurrEmployee) == "")
{
return;
}
if (ViewModel.CurrPosition == 0)
{
return;
}
if (ViewModel.cboPriority.SelectedIndex == -1)
{
return;
}
if (~cTransfer.CheckIfTransferClosed(ViewModel.CurrPosition) != 0)
{
ViewManager.ShowMessage("It''s too late to request a transfer for this position.", "Request Transfer", UpgradeHelpers.Helpers.BoxButtons.OK);
return;
}
// Add logic to see if employee has already requested position or priority
cTransfer.TransferRequestEmployeeID = modGlobal.Clean(ViewModel.CurrEmployee);
cTransfer.TransferRequestPositionID = ViewModel.CurrPosition;
//UPGRADE_WARNING: (1068) GetVal() of type Variant is being forced to int. More Information: http://www.vbtonet.com/ewis/ewi1068.aspx
cTransfer.TransferRequestPriorityCode = Convert.ToInt32(modGlobal.GetVal(ViewModel.cboPriority.GetItemData(ViewModel.cboPriority.SelectedIndex)));
cTransfer.TransferRequestCreatedDate = DateTime.Now.ToString("M/d/yyyy HH:mm:ss");
cTransfer.TransferRequestCreatedBy = modGlobal.Shared.gUser;
cTransfer.TransferRequestComment = modGlobal.Clean(ViewModel.txtComment.Text);
if (cTransfer.CheckRequestForPositionPriority() != 0)
{
ViewManager.ShowMessage("You have already have a request for Position or Priority.", "Request Transfer", UpgradeHelpers.Helpers.BoxButtons.OK);
return;
}
if (cTransfer.InsertTransferRequest())
{
}
else
{
ViewManager.ShowMessage("Ooooops! Something went wrong with Adding the Transfer Request!", "Insert Transfer Request", UpgradeHelpers.Helpers.BoxButtons.OK);
}
ViewModel.CurrPosition = 0;
if (ViewModel.CurrPosRow != 0)
{
ViewModel.sprPositions.Row = ViewModel.CurrPosRow;
int tempForVar = ViewModel.sprPositions.MaxCols;
for (int i = 1; i <= tempForVar; i++)
{
ViewModel.sprPositions.Col = i;
ViewModel.sprPositions.BackColor = modGlobal.Shared.WHITE;
}
ViewModel.CurrPosRow = 0;
}
ViewModel.lbPosition.Text = "";
ViewModel.txtComment.Text = "";
ViewModel.cboPriority.SelectedIndex = -1;
FillRequestGrid();
}
//**************************************
// PTS -vs- CAD Staffing Discrepancy
// Displays StaffingErrorLog Table
// which lists staff descrepancies
// between PTS and CAD...
//**************************************
public void FillReportGrid()
{
PTSProject.clsScheduler cSched = Container.Resolve <clsScheduler>();
string sStartDate = "";
string sEndDate = "";
ViewModel.lbTotal.Text = "";
ViewModel.sprReport.MaxRows = 50000;
ViewModel.sprReport.Row = 1;
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;
if (ViewModel.chkDateFilter.CheckState == UpgradeHelpers.Helpers.CheckState.Unchecked)
{
sStartDate = "";
sEndDate = "";
}
else
{
sStartDate = ViewModel.dtStartDate.Text;
sEndDate = ViewModel.dtEndDate.Text;
}
int iCADRow = 0;
int iPTSRow = 0;
string CurrUnit = "";
string CurrIncident = "";
bool FirstPTS = false;
if (cSched.GetStaffingDiscrepancyList(sStartDate, sEndDate) != 0)
{
//continue
}
else
{
ViewManager.ShowMessage("There were no records found.", "Staffing Discrepancy List", UpgradeHelpers.Helpers.BoxButtons.OK);
return;
}
while (!cSched.ScheduleRecord.EOF)
{
if (CurrUnit == "")
{ //First Time
iCADRow++;
ViewModel.sprReport.Row = iCADRow;
CurrUnit = modGlobal.Clean(cSched.ScheduleRecord["unit_id"]);
CurrIncident = modGlobal.Clean(cSched.ScheduleRecord["incident_number"]);
ViewModel.sprReport.Col = 1;
ViewModel.sprReport.TypeHAlign = FarPoint.ViewModels.CellHorizontalAlignment.Center;
ViewModel.sprReport.Text = CurrUnit;
ViewModel.sprReport.Col = 2; //Incident #
ViewModel.sprReport.TypeHAlign = FarPoint.ViewModels.CellHorizontalAlignment.Center;
ViewModel.sprReport.Text = CurrIncident;
ViewModel.sprReport.Col = 3; //Datetime
ViewModel.sprReport.TypeHAlign = FarPoint.ViewModels.CellHorizontalAlignment.Left;
ViewModel.sprReport.Text = Convert.ToDateTime(cSched.ScheduleRecord["error_time"]).ToString("MM/dd/yy HH:mm:ss");
if (modGlobal.Clean(cSched.ScheduleRecord["staffed_in"]) == "CAD")
{
ViewModel.sprReport.Col = 4; //CAD Name
ViewModel.sprReport.TypeHAlign = FarPoint.ViewModels.CellHorizontalAlignment.Left;
ViewModel.sprReport.Text = modGlobal.Clean(cSched.ScheduleRecord["name_full"]);
}
else
{
ViewModel.sprReport.Col = 5; //PTS Name
ViewModel.sprReport.TypeHAlign = FarPoint.ViewModels.CellHorizontalAlignment.Left;
ViewModel.sprReport.Text = modGlobal.Clean(cSched.ScheduleRecord["name_full"]);
}
iPTSRow = iCADRow;
FirstPTS = true;
}
else if (CurrUnit == modGlobal.Clean(cSched.ScheduleRecord["unit_id"]))
{
if (CurrIncident == modGlobal.Clean(cSched.ScheduleRecord["incident_number"]))
{
//SAME Unit / Incident
if (modGlobal.Clean(cSched.ScheduleRecord["staffed_in"]) == "CAD")
{
iCADRow++;
ViewModel.sprReport.Row = iCADRow;
ViewModel.sprReport.Col = 4; //CAD Name
ViewModel.sprReport.TypeHAlign = FarPoint.ViewModels.CellHorizontalAlignment.Left;
ViewModel.sprReport.Text = modGlobal.Clean(cSched.ScheduleRecord["name_full"]);
}
else
{
if (FirstPTS)
{
iPTSRow = iCADRow;
FirstPTS = false;
}
else
{
iPTSRow++;
}
ViewModel.sprReport.Row = iPTSRow;
ViewModel.sprReport.Col = 5; //PTS Name
ViewModel.sprReport.TypeHAlign = FarPoint.ViewModels.CellHorizontalAlignment.Left;
ViewModel.sprReport.Text = modGlobal.Clean(cSched.ScheduleRecord["name_full"]);
}
}
else
{
//SAME Unit, Different Incident
iCADRow++;
if (iCADRow > iPTSRow)
{
iPTSRow = iCADRow - 1; //because will be adding a row later
// iPTSRow = iCADRow
}
else if (iPTSRow > iCADRow)
{
iCADRow = iPTSRow;
}
ViewModel.sprReport.Row = iCADRow;
CurrIncident = modGlobal.Clean(cSched.ScheduleRecord["incident_number"]);
ViewModel.sprReport.Col = 2; //Incident #
ViewModel.sprReport.TypeHAlign = FarPoint.ViewModels.CellHorizontalAlignment.Center;
ViewModel.sprReport.Text = CurrIncident;
ViewModel.sprReport.Col = 3; //Datetime
ViewModel.sprReport.TypeHAlign = FarPoint.ViewModels.CellHorizontalAlignment.Left;
ViewModel.sprReport.Text = Convert.ToDateTime(cSched.ScheduleRecord["error_time"]).ToString("MM/dd/yy HH:mm:ss");
if (modGlobal.Clean(cSched.ScheduleRecord["staffed_in"]) == "CAD")
{
ViewModel.sprReport.Col = 4; //CAD Name
ViewModel.sprReport.TypeHAlign = FarPoint.ViewModels.CellHorizontalAlignment.Left;
ViewModel.sprReport.Text = modGlobal.Clean(cSched.ScheduleRecord["name_full"]);
}
else
{
iPTSRow++;
ViewModel.sprReport.Row = iPTSRow;
ViewModel.sprReport.Col = 5; //PTS Name
ViewModel.sprReport.TypeHAlign = FarPoint.ViewModels.CellHorizontalAlignment.Left;
ViewModel.sprReport.Text = modGlobal.Clean(cSched.ScheduleRecord["name_full"]);
}
}
}
else
{
//Change both Unit / Inceident
iCADRow++;
if (iCADRow > iPTSRow)
{
iPTSRow = iCADRow - 1; //because will be adding a row later
// iPTSRow = iCADRow
}
else if (iPTSRow > iCADRow)
{
iCADRow = iPTSRow;
iCADRow++;
}
ViewModel.sprReport.Row = iCADRow;
CurrUnit = modGlobal.Clean(cSched.ScheduleRecord["unit_id"]);
CurrIncident = modGlobal.Clean(cSched.ScheduleRecord["incident_number"]);
ViewModel.sprReport.Col = 1;
ViewModel.sprReport.TypeHAlign = FarPoint.ViewModels.CellHorizontalAlignment.Center;
ViewModel.sprReport.Text = CurrUnit;
ViewModel.sprReport.Col = 2; //Incident #
ViewModel.sprReport.TypeHAlign = FarPoint.ViewModels.CellHorizontalAlignment.Center;
ViewModel.sprReport.Text = CurrIncident;
ViewModel.sprReport.Col = 3; //Datetime
ViewModel.sprReport.TypeHAlign = FarPoint.ViewModels.CellHorizontalAlignment.Left;
ViewModel.sprReport.Text = Convert.ToDateTime(cSched.ScheduleRecord["error_time"]).ToString("MM/dd/yy HH:mm:ss");
if (modGlobal.Clean(cSched.ScheduleRecord["staffed_in"]) == "CAD")
{
ViewModel.sprReport.Col = 4; //CAD Name
ViewModel.sprReport.TypeHAlign = FarPoint.ViewModels.CellHorizontalAlignment.Left;
ViewModel.sprReport.Text = modGlobal.Clean(cSched.ScheduleRecord["name_full"]);
}
else
{
iPTSRow++;
ViewModel.sprReport.Row = iPTSRow;
ViewModel.sprReport.Col = 5; //PTS Name
ViewModel.sprReport.TypeHAlign = FarPoint.ViewModels.CellHorizontalAlignment.Left;
ViewModel.sprReport.Text = modGlobal.Clean(cSched.ScheduleRecord["name_full"]);
}
}
cSched.ScheduleRecord.MoveNext();
}
;
if (iCADRow > iPTSRow)
{
ViewModel.sprReport.MaxRows = iCADRow;
}
else if (iPTSRow > iCADRow)
{
ViewModel.sprReport.MaxRows = iPTSRow;
}
else
{
ViewModel.sprReport.MaxRows = iCADRow;
}
ViewModel.lbTotal.Text = "";
}
public void FillReport2Grid()
{
PTSProject.clsScheduler cSched = Container.Resolve <clsScheduler>();
string sStartDate = "";
string sEndDate = "";
ViewModel.lbTotal.Text = "";
ViewModel.sprReport2.MaxRows = 50000;
ViewModel.sprReport2.Row = 1;
ViewModel.sprReport2.Row2 = ViewModel.sprReport2.MaxRows;
ViewModel.sprReport2.Col = 1;
ViewModel.sprReport2.Col2 = ViewModel.sprReport2.MaxCols;
ViewModel.sprReport2.BlockMode = true;
ViewModel.sprReport2.Text = "";
ViewModel.sprReport2.BlockMode = false;
if (ViewModel.chkDateFilter.CheckState == UpgradeHelpers.Helpers.CheckState.Unchecked)
{
sStartDate = "";
sEndDate = "";
}
else
{
ViewModel.dtStartDate.Text = DateTime.Now.AddDays(-1).ToString("MM/dd/yyyy");
ViewModel.dtEndDate.Text = DateTime.Now.ToString("MM/dd/yyyy");
}
int iRow = 0;
if (cSched.GetStaffingDiscrepancyList(sStartDate, sEndDate) != 0)
{
//continue
}
else
{
ViewManager.ShowMessage("There were no records found.", "Staffing Discrepancy List", UpgradeHelpers.Helpers.BoxButtons.OK);
return;
}
while (!cSched.ScheduleRecord.EOF)
{
iRow++;
ViewModel.sprReport2.Row = iRow;
ViewModel.sprReport2.Col = 1; //Name
ViewModel.sprReport2.TypeHAlign = FarPoint.ViewModels.CellHorizontalAlignment.Left;
ViewModel.sprReport2.Text = modGlobal.Clean(cSched.ScheduleRecord["name_full"]);
ViewModel.sprReport2.Col = 2; //Unit
ViewModel.sprReport2.TypeHAlign = FarPoint.ViewModels.CellHorizontalAlignment.Center;
ViewModel.sprReport2.Text = modGlobal.Clean(cSched.ScheduleRecord["unit_id"]);
ViewModel.sprReport2.Col = 3; //Incident #
ViewModel.sprReport2.TypeHAlign = FarPoint.ViewModels.CellHorizontalAlignment.Center;
ViewModel.sprReport2.Text = modGlobal.Clean(cSched.ScheduleRecord["incident_number"]);
ViewModel.sprReport2.Col = 4; //Datetime
ViewModel.sprReport2.TypeHAlign = FarPoint.ViewModels.CellHorizontalAlignment.Left;
ViewModel.sprReport2.Text = Convert.ToDateTime(cSched.ScheduleRecord["error_time"]).ToString("MM/dd/yy HH:mm:ss");
ViewModel.sprReport2.Col = 5; //Staffed In
ViewModel.sprReport2.TypeHAlign = FarPoint.ViewModels.CellHorizontalAlignment.Center;
ViewModel.sprReport2.Text = modGlobal.Clean(cSched.ScheduleRecord["staffed_in"]);
ViewModel.sprReport2.Col = 6; //Record ID
ViewModel.sprReport2.TypeHAlign = FarPoint.ViewModels.CellHorizontalAlignment.Center;
//UPGRADE_WARNING: (1068) GetVal() of type Variant is being forced to string. More Information: http://www.vbtonet.com/ewis/ewi1068.aspx
ViewModel.sprReport2.Text = Convert.ToString(modGlobal.GetVal(cSched.ScheduleRecord["staff_error_id"]));
cSched.ScheduleRecord.MoveNext();
}
;
ViewModel.sprReport2.MaxRows = iRow;
ViewModel.lbTotal.Text = "Total Rows = " + iRow.ToString();
}
public void FillGrid()
{
string AssignOnly = "";
PTSProject.clsScheduler cSched = Container.Resolve <clsScheduler>();
ViewModel.FillingTheGrid = true;
//clear grid
ViewModel.sprReport.MaxRows = 500;
ViewModel.sprReport.Row = 1;
ViewModel.sprReport.Row2 = ViewModel.sprReport.MaxRows;
ViewModel.sprReport.Col = 1;
ViewModel.sprReport.Col2 = 1;
ViewModel.sprReport.BlockMode = true;
ViewModel.sprReport.CellType = FarPoint.ViewModels.Cells.FpCellType.CellTypeCheckBox;
ViewModel.sprReport.TypeHAlign = FarPoint.ViewModels.CellHorizontalAlignment.Center;
ViewModel.sprReport.Value = 0;
ViewModel.sprReport.BlockMode = false;
ViewModel.sprReport.Row = 1;
ViewModel.sprReport.Row2 = ViewModel.sprReport.MaxRows;
ViewModel.sprReport.Col = 2;
ViewModel.sprReport.Col2 = ViewModel.sprReport.MaxCols;
ViewModel.sprReport.BlockMode = true;
ViewModel.sprReport.Text = "";
ViewModel.sprReport.BlockMode = false;
string sDate = DateTime.Parse(ViewModel.dtReportDate.Text).ToString("MM/dd/yyyy");
if (ViewModel.chkOnlyAssigned.CheckState == UpgradeHelpers.Helpers.CheckState.Unchecked)
{
AssignOnly = "N";
}
else
{
AssignOnly = "Y";
}
if (cSched.GetEmployeeWatchDutyList(sDate, ViewModel.FacilityID, AssignOnly) != 0)
{
//continue
}
else
{
ViewManager.ShowMessage("Oooops! No records were retrieved. Clear filters and try again.", "Employee Watch Duty Assignment", UpgradeHelpers.Helpers.BoxButtons.OK);
return;
}
ViewModel.CurrRow = 0;
while (!cSched.WatchDutyAssignment.EOF)
{
(ViewModel.CurrRow)++;
ViewModel.sprReport.Row = ViewModel.CurrRow;
if (modGlobal.Clean(cSched.WatchDutyAssignment["duty_id"]) != "")
{
ViewModel.sprReport.Col = 1;
ViewModel.sprReport.Value = 1;
ViewModel.sprReport.Col = 7;
//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(cSched.WatchDutyAssignment["duty_id"]));
}
else
{
ViewModel.sprReport.Col = 1;
ViewModel.sprReport.Value = 0;
ViewModel.sprReport.Col = 7;
ViewModel.sprReport.Text = "";
}
ViewModel.sprReport.Col = 2;
ViewModel.sprReport.Text = modGlobal.Clean(cSched.WatchDutyAssignment["name_full"]);
ViewModel.sprReport.Col = 3;
ViewModel.sprReport.Text = modGlobal.Clean(cSched.WatchDutyAssignment["facility_name"]);
ViewModel.sprReport.Col = 4;
ViewModel.sprReport.TypeHAlign = FarPoint.ViewModels.CellHorizontalAlignment.Center;
ViewModel.sprReport.Text = modGlobal.Clean(cSched.WatchDutyAssignment["unit_code"]);
ViewModel.sprReport.Col = 5;
ViewModel.sprReport.Text = modGlobal.Clean(cSched.WatchDutyAssignment["position_code"]);
ViewModel.sprReport.Col = 6;
ViewModel.sprReport.Text = modGlobal.Clean(cSched.WatchDutyAssignment["employee_id"]);
cSched.WatchDutyAssignment.MoveNext();
}
;
ViewModel.sprReport.MaxRows = ViewModel.CurrRow;
ViewModel.lbCount.Text = "List Count: " + ViewModel.CurrRow.ToString();
ViewModel.FillingTheGrid = false;
}
private void sprPositions_CellClick(object eventSender, Stubs._FarPoint.Win.Spread.CellClickEventArgs eventArgs)
{
int Col = eventArgs.Column;
int Row = eventArgs.Row;
PTSProject.clsScheduler cTransfer = Container.Resolve <clsScheduler>();
if (ViewModel.CurrPosRow != 0)
{
ViewModel.sprPositions.Row = ViewModel.CurrPosRow;
int tempForVar = ViewModel.sprPositions.MaxCols;
for (int i = 1; i <= tempForVar; i++)
{
ViewModel.sprPositions.Col = i;
ViewModel.sprPositions.BackColor = modGlobal.Shared.WHITE;
}
}
if (Row == 0)
{
return;
}
ViewModel.lbPosition.Text = "";
ViewModel.CurrPosition = 0;
ViewModel.CurrPosRow = Row;
ViewModel.sprPositions.Row = ViewModel.CurrPosRow;
ViewModel.sprPositions.Col = 6;
if (modGlobal.Clean(ViewModel.sprPositions.Text) == "")
{
ViewModel.CurrPosition = 0;
ViewModel.CurrPosRow = 0;
}
else
{
ViewModel.CurrPosition = Convert.ToInt32(Double.Parse(ViewModel.sprPositions.Text));
}
if (ViewModel.CurrPosition == 0)
{
ViewModel.CurrPosRow = 0;
return;
}
if (~cTransfer.GetTransferPositionByID(ViewModel.CurrPosition) != 0)
{
ViewManager.ShowMessage("Oooops! Can't find Position Record... Try Again!", "Get Position Record", UpgradeHelpers.Helpers.BoxButtons.OK);
ViewModel.CurrPosition = 0;
ViewModel.CurrPosRow = 0;
return;
}
ViewModel.sprPositions.Col = 1;
string sText = modGlobal.Clean(ViewModel.sprPositions.Text);
ViewModel.sprPositions.Col = 2;
sText = sText + modGlobal.Clean(ViewModel.sprPositions.Text);
ViewModel.sprPositions.Col = 3;
sText = sText + " " + modGlobal.Clean(ViewModel.sprPositions.Text);
ViewModel.lbPosition.Text = sText;
if (ViewModel.CurrPosRow != 0)
{
ViewModel.sprPositions.Row = ViewModel.CurrPosRow;
int tempForVar2 = ViewModel.sprPositions.MaxCols;
for (int i = 1; i <= tempForVar2; i++)
{
ViewModel.sprPositions.Col = i;
ViewModel.sprPositions.BackColor = UpgradeHelpers.Helpers.ColorTranslator.FromOle(modGlobal.LT_BLUE);
}
}
EnableButtons();
}
private void sprRequests_CellClick(object eventSender, Stubs._FarPoint.Win.Spread.CellClickEventArgs eventArgs)
{
int Col = eventArgs.Column;
int Row = eventArgs.Row;
PTSProject.clsScheduler cTransfer = Container.Resolve <clsScheduler>();
if (ViewModel.CurrReqRow != 0)
{
ViewModel.sprRequests.Row = ViewModel.CurrReqRow;
int tempForVar = ViewModel.sprRequests.MaxRows;
for (int i = 1; i <= tempForVar; i++)
{
ViewModel.sprRequests.Col = i;
ViewModel.sprRequests.BackColor = modGlobal.Shared.WHITE;
}
}
if (Row == 0)
{
return;
}
ViewModel.lbRequest.Text = "";
ViewModel.CurrRequest = 0;
ViewModel.CurrReqRow = Row;
ViewModel.sprRequests.Row = ViewModel.CurrReqRow;
ViewModel.sprRequests.Col = 4;
if (modGlobal.Clean(ViewModel.sprRequests.Text) == "")
{
ViewModel.CurrRequest = 0;
ViewModel.CurrReqRow = 0;
}
else
{
ViewModel.CurrRequest = Convert.ToInt32(Double.Parse(ViewModel.sprRequests.Text));
}
if (ViewModel.CurrRequest == 0)
{
ViewModel.CurrReqRow = 0;
return;
}
if (~cTransfer.GetTransferRequestByID(ViewModel.CurrRequest) != 0)
{
ViewManager.ShowMessage("Oooops! Can't find Request Record... Try Again!", "Get Request Record", UpgradeHelpers.Helpers.BoxButtons.OK);
ViewModel.CurrRequest = 0;
ViewModel.CurrReqRow = 0;
return;
}
ViewModel.sprRequests.Col = 2;
ViewModel.lbRequest.Text = modGlobal.Clean(ViewModel.sprRequests.Text);
if (ViewModel.CurrReqRow != 0)
{
ViewModel.sprRequests.Row = ViewModel.CurrReqRow;
int tempForVar2 = ViewModel.sprRequests.MaxRows;
for (int i = 1; i <= tempForVar2; i++)
{
ViewModel.sprRequests.Col = i;
ViewModel.sprRequests.BackColor = modGlobal.Shared.YELLOW;
}
}
EnableButtons();
}
internal void cmdAddPosition_Click(Object eventSender, System.EventArgs eventArgs)
{
//check assignment selections to determine if valid
//combination of unit, position & shift have been selected
PTSProject.clsScheduler cTransfer = Container.Resolve <clsScheduler>();
DbCommand oCmd = UpgradeHelpers.DB.AdoFactoryManager.GetFactory().CreateCommand();
int AssignmentID = 0;
ViewModel.cmdAddPosition.Enabled = false;
oCmd.Connection = modGlobal.oConn;
oCmd.CommandType = CommandType.Text;
string SqlString = "sp_GetAssign '" + modGlobal.Clean(ViewModel.cboUnitList.Text) + "','";
SqlString = SqlString + modGlobal.Clean(ViewModel.cboPositionList.Text) + "','" + modGlobal.Clean(ViewModel.cboShiftList.Text) + "'";
oCmd.CommandText = SqlString;
ADORecordSetHelper oRec = ADORecordSetHelper.Open(oCmd, "");
if (oRec.EOF)
{
ViewManager.ShowMessage("Invalid assignment - Please check shift selection", "Assignment Error", UpgradeHelpers.Helpers.BoxButtons.OK);
return;
}
else
{
//UPGRADE_WARNING: (1068) GetVal() of type Variant is being forced to int. More Information: http://www.vbtonet.com/ewis/ewi1068.aspx
AssignmentID = Convert.ToInt32(modGlobal.GetVal(oRec["assignment_id"]));
}
cTransfer.TransferPositionAssignmentID = AssignmentID.ToString();
cTransfer.TransferPositionDateOpen = DateTime.Parse(ViewModel.dteOpenDate.Text).ToString("M/d/yyyy");
cTransfer.TransferPositionDateClosed = DateTime.Parse(ViewModel.dteCloseDate.Text).ToString("M/d/yyyy");
//cTransfer.TransferPositionDateClosed = Format$(dteCloseDate.Text, "m/d/yyyy") & " 12:00:00"
cTransfer.TransferPositionActiveFlag = "Y";
cTransfer.TransferPositionDateCreated = DateTime.Now.ToString("M/d/yyyy HH:mm:ss");
cTransfer.TransferPositionCreatedBy = modGlobal.Shared.gUser;
cTransfer.TransferPositionStatusChanged = "";
cTransfer.TransferPositionChangedBy = "";
if (ViewModel.chkPMOnly.CheckState == UpgradeHelpers.Helpers.CheckState.Checked)
{
cTransfer.TransferPositionParamedicOnly = "Y";
}
else
{
cTransfer.TransferPositionParamedicOnly = "N";
}
if (cTransfer.InsertTransferPosition())
{
}
else
{
ViewManager.ShowMessage("Ooooops! Something went wrong with Adding the Transfer Position!", "Insert Transfer Position", UpgradeHelpers.Helpers.BoxButtons.OK);
}
FillGrids();
RefreshPositionLists();
ClearFields();
}
public void FillGrids()
{
PTSProject.clsScheduler cTransfer = Container.Resolve <clsScheduler>();
string sText = "";
int lPositionID = 0;
if (ViewModel.NoRefresh)
{
return;
}
ViewModel.sprRequests.MaxRows = 1000;
ViewModel.sprPositions.MaxRows = 1000;
//UPGRADE_ISSUE: (2064) FPSpreadADO.fpSpread method sprRequests.ClearRange was not upgraded. More Information: http://www.vbtonet.com/ewis/ewi2064.aspx
ViewModel.sprRequests.ClearRange(1, 1, ViewModel.sprRequests.MaxCols, ViewModel.sprRequests.MaxRows, false);
//UPGRADE_ISSUE: (2064) FPSpreadADO.fpSpread method sprPositions.ClearRange was not upgraded. More Information: http://www.vbtonet.com/ewis/ewi2064.aspx
ViewModel.sprPositions.ClearRange(1, 1, ViewModel.sprPositions.MaxCols, ViewModel.sprPositions.MaxRows, false);
int CurrRow = 0;
if (ViewModel.chkActiveOnly.CheckState == UpgradeHelpers.Helpers.CheckState.Checked)
{
if (cTransfer.GetTransferPositionActiveList() != 0)
{
while (!cTransfer.TransferPosition.EOF)
{
CurrRow++;
ViewModel.sprPositions.Row = CurrRow;
ViewModel.sprPositions.Col = 1;
sText = modGlobal.Clean(cTransfer.TransferPosition["unit_code"]);
sText = sText + modGlobal.Clean(cTransfer.TransferPosition["shift_code"]);
sText = sText + " " + modGlobal.Clean(cTransfer.TransferPosition["position_code"]);
if (modGlobal.Clean(cTransfer.TransferPosition["paramedic_only"]) == "Y")
{
sText = sText + " (Paramedic)";
}
ViewModel.sprPositions.TypeHAlign = FarPoint.ViewModels.CellHorizontalAlignment.Left;
ViewModel.sprPositions.Text = sText;
if (modGlobal.Clean(cTransfer.TransferPosition["CurrentlyAssigned"]) != "")
{
ViewModel.sprPositions.TextTip = FarPoint.ViewModels.TextTipPolicy.Floating;
ViewModel.sprPositions.Col = 1;
ViewModel.sprPositions.CellNoteIndicator = true;
//UPGRADE_ISSUE: (2064) FPSpreadADO.fpSpread property sprPositions.CellNote was not upgraded. More Information: http://www.vbtonet.com/ewis/ewi2064.aspx
ViewModel.sprPositions.CellNote = modGlobal.Clean(cTransfer.TransferPosition["CurrentlyAssigned"]) + " is currently Assigned";
}
ViewModel.sprPositions.Col = 2;
ViewModel.sprPositions.Text = Convert.ToDateTime(cTransfer.TransferPosition["date_open"]).ToString("M/d/yyyy");
ViewModel.sprPositions.Col = 3;
ViewModel.sprPositions.Text = Convert.ToDateTime(cTransfer.TransferPosition["date_closed"]).ToString("M/d/yyyy");
ViewModel.sprPositions.Col = 4;
//UPGRADE_WARNING: (1068) GetVal() of type Variant is being forced to string. More Information: http://www.vbtonet.com/ewis/ewi1068.aspx
ViewModel.sprPositions.Text = Convert.ToString(modGlobal.GetVal(cTransfer.TransferPosition["NumberOfRequests"]));
ViewModel.sprPositions.Col = 5;
ViewModel.sprPositions.Text = Convert.ToDateTime(cTransfer.TransferPosition["created_date"]).ToString("M/d/yyyy HH:mm:ss");
sText = "Created By " + modGlobal.Clean(cTransfer.TransferPosition["CreatedByName"]);
ViewModel.sprPositions.TextTip = FarPoint.ViewModels.TextTipPolicy.Floating;
ViewModel.sprPositions.Col = 3;
ViewModel.sprPositions.CellNoteIndicator = true;
//UPGRADE_ISSUE: (2064) FPSpreadADO.fpSpread property sprPositions.CellNote was not upgraded. More Information: http://www.vbtonet.com/ewis/ewi2064.aspx
ViewModel.sprPositions.CellNote = sText;
ViewModel.sprPositions.Col = 6;
ViewModel.sprPositions.Text = Convert.ToInt32(cTransfer.TransferPosition["position_id"]).ToString();
ViewModel.sprPositions.Row = CurrRow;
ViewModel.sprPositions.Row2 = CurrRow;
ViewModel.sprPositions.Col = 1;
ViewModel.sprPositions.Col2 = ViewModel.sprPositions.MaxCols;
ViewModel.sprPositions.BlockMode = true;
ViewModel.sprPositions.BackColor = modGlobal.Shared.WHITE;
ViewModel.sprPositions.BlockMode = false;
cTransfer.TransferPosition.MoveNext();
}
;
}
}
else
{
if (cTransfer.GetTransferPositionList() != 0)
{
while (!cTransfer.TransferPosition.EOF)
{
CurrRow++;
ViewModel.sprPositions.Row = CurrRow;
ViewModel.sprPositions.Col = 1;
sText = modGlobal.Clean(cTransfer.TransferPosition["unit_code"]);
sText = sText + modGlobal.Clean(cTransfer.TransferPosition["shift_code"]);
sText = sText + " " + modGlobal.Clean(cTransfer.TransferPosition["position_code"]);
if (modGlobal.Clean(cTransfer.TransferPosition["paramedic_only"]) == "Y")
{
sText = sText + " (Paramedic)";
}
ViewModel.sprPositions.TypeHAlign = FarPoint.ViewModels.CellHorizontalAlignment.Left;
ViewModel.sprPositions.Text = sText;
if (modGlobal.Clean(cTransfer.TransferPosition["CurrentlyAssigned"]) != "")
{
ViewModel.sprPositions.TextTip = FarPoint.ViewModels.TextTipPolicy.Floating;
ViewModel.sprPositions.Col = 1;
ViewModel.sprPositions.CellNoteIndicator = true;
//UPGRADE_ISSUE: (2064) FPSpreadADO.fpSpread property sprPositions.CellNote was not upgraded. More Information: http://www.vbtonet.com/ewis/ewi2064.aspx
ViewModel.sprPositions.CellNote = modGlobal.Clean(cTransfer.TransferPosition["CurrentlyAssigned"]) + " is currently Assigned";
}
ViewModel.sprPositions.Col = 2;
ViewModel.sprPositions.Text = Convert.ToDateTime(cTransfer.TransferPosition["date_open"]).ToString("M/d/yyyy");
ViewModel.sprPositions.Col = 3;
ViewModel.sprPositions.Text = Convert.ToDateTime(cTransfer.TransferPosition["date_closed"]).ToString("M/d/yyyy");
ViewModel.sprPositions.Col = 4;
//UPGRADE_WARNING: (1068) GetVal() of type Variant is being forced to string. More Information: http://www.vbtonet.com/ewis/ewi1068.aspx
ViewModel.sprPositions.Text = Convert.ToString(modGlobal.GetVal(cTransfer.TransferPosition["NumberOfRequests"]));
ViewModel.sprPositions.Col = 5;
ViewModel.sprPositions.Text = Convert.ToDateTime(cTransfer.TransferPosition["created_date"]).ToString("M/d/yyyy HH:mm:ss");
sText = "Created By " + modGlobal.Clean(cTransfer.TransferPosition["CreatedByName"]);
ViewModel.sprPositions.TextTip = FarPoint.ViewModels.TextTipPolicy.Floating;
ViewModel.sprPositions.Col = 3;
ViewModel.sprPositions.CellNoteIndicator = true;
//UPGRADE_ISSUE: (2064) FPSpreadADO.fpSpread property sprPositions.CellNote was not upgraded. More Information: http://www.vbtonet.com/ewis/ewi2064.aspx
ViewModel.sprPositions.CellNote = sText;
ViewModel.sprPositions.Col = 6;
ViewModel.sprPositions.Text = Convert.ToInt32(cTransfer.TransferPosition["position_id"]).ToString();
if (Convert.ToString(cTransfer.TransferPosition["active_flag"]) == "Y")
{
ViewModel.sprPositions.Row = CurrRow;
ViewModel.sprPositions.Row2 = CurrRow;
ViewModel.sprPositions.Col = 1;
ViewModel.sprPositions.Col2 = ViewModel.sprPositions.MaxCols;
ViewModel.sprPositions.BlockMode = true;
ViewModel.sprPositions.BackColor = modGlobal.Shared.WHITE;
ViewModel.sprPositions.BlockMode = false;
}
else
{
ViewModel.sprPositions.Row = CurrRow;
ViewModel.sprPositions.Row2 = CurrRow;
ViewModel.sprPositions.Col = 1;
ViewModel.sprPositions.Col2 = ViewModel.sprPositions.MaxCols;
ViewModel.sprPositions.BlockMode = true;
ViewModel.sprPositions.BackColor = UpgradeHelpers.Helpers.ColorTranslator.FromOle(modGlobal.LT_BLUE);
ViewModel.sprPositions.BlockMode = false;
}
cTransfer.TransferPosition.MoveNext();
}
;
}
}
ViewModel.sprPositions.MaxRows = CurrRow + 1;
if (ViewModel.cboReqPositionList.SelectedIndex == -1)
{
lPositionID = 0;
}
else
{
lPositionID = ViewModel.cboReqPositionList.GetItemData(ViewModel.cboReqPositionList.SelectedIndex);
}
CurrRow = 0;
if (cTransfer.GetTransferRequestActiveList(modGlobal.Clean(ViewModel.FilterEmployee), lPositionID) != 0)
{
while (!cTransfer.TransferRequest.EOF)
{
CurrRow++;
ViewModel.sprRequests.Row = CurrRow;
ViewModel.sprRequests.Col = 1;
ViewModel.sprRequests.TypeHAlign = FarPoint.ViewModels.CellHorizontalAlignment.Left;
ViewModel.sprRequests.Text = modGlobal.Clean(cTransfer.TransferRequest["EmployeeName"]);
ViewModel.sprRequests.Col = 2;
//UPGRADE_WARNING: (1068) GetVal() of type Variant is being forced to string. More Information: http://www.vbtonet.com/ewis/ewi1068.aspx
ViewModel.sprRequests.Text = Convert.ToString(modGlobal.GetVal(cTransfer.TransferRequest["priority_value"]));
ViewModel.sprRequests.Col = 3;
sText = modGlobal.Clean(cTransfer.TransferRequest["unit_code"]);
sText = sText + modGlobal.Clean(cTransfer.TransferRequest["shift_code"]);
sText = sText + " " + modGlobal.Clean(cTransfer.TransferRequest["position_code"]);
ViewModel.sprRequests.Text = sText;
sText = "Created on ";
sText = sText + Convert.ToDateTime(cTransfer.TransferRequest["created_date"]).ToString("M/d/yyyy HH:mm:ss");
sText = sText + " by " + modGlobal.Clean(cTransfer.TransferRequest["CreatedByName"]);
ViewModel.sprRequests.TextTip = FarPoint.ViewModels.TextTipPolicy.Floating;
ViewModel.sprRequests.Col = 3;
ViewModel.sprRequests.CellNoteIndicator = true;
//UPGRADE_ISSUE: (2064) FPSpreadADO.fpSpread property sprRequests.CellNote was not upgraded. More Information: http://www.vbtonet.com/ewis/ewi2064.aspx
ViewModel.sprRequests.CellNote = sText;
ViewModel.sprRequests.Col = 4;
//UPGRADE_WARNING: (1068) GetVal() of type Variant is being forced to string. More Information: http://www.vbtonet.com/ewis/ewi1068.aspx
ViewModel.sprRequests.Text = Convert.ToString(modGlobal.GetVal(cTransfer.TransferRequest["ranking"]));
ViewModel.sprRequests.Col = 5;
if (modGlobal.Clean(cTransfer.TransferRequest["PromotionDate"]) == "")
{
ViewModel.sprRequests.Text = Convert.ToDateTime(cTransfer.TransferRequest["AdjustedHireDate"]).ToString("M/d/yyyy");
}
else
{
ViewModel.sprRequests.Text = Convert.ToDateTime(cTransfer.TransferRequest["PromotionDate"]).ToString("M/d/yyyy");
}
ViewModel.sprRequests.Col = 6;
ViewModel.sprRequests.Text = modGlobal.Clean(cTransfer.TransferRequest["CurrentAssign"]);
ViewModel.sprRequests.Col = 7;
ViewModel.sprRequests.Text = Convert.ToInt32(cTransfer.TransferRequest["request_id"]).ToString();
ViewModel.sprRequests.Col = 8;
ViewModel.sprRequests.Text = modGlobal.Clean(cTransfer.TransferRequest["employee_id"]);
ViewModel.sprRequests.Col = 9;
if (modGlobal.Clean(cTransfer.TransferRequest["LastChange"]) == "")
{
ViewModel.sprRequests.Text = "";
}
else
{
//UPGRADE_WARNING: (1068) GetVal() of type Variant is being forced to string. More Information: http://www.vbtonet.com/ewis/ewi1068.aspx
ViewModel.sprRequests.Text = Convert.ToString(modGlobal.GetVal(cTransfer.TransferRequest["NumOfAssign"]));
sText = "Assignment Last Changed On ";
sText = sText + Convert.ToDateTime(cTransfer.TransferRequest["LastChange"]).ToString("M/d/yyyy");
ViewModel.sprRequests.TextTip = FarPoint.ViewModels.TextTipPolicy.Floating;
ViewModel.sprRequests.Col = 9;
ViewModel.sprRequests.CellNoteIndicator = true;
//UPGRADE_ISSUE: (2064) FPSpreadADO.fpSpread property sprRequests.CellNote was not upgraded. More Information: http://www.vbtonet.com/ewis/ewi2064.aspx
ViewModel.sprRequests.CellNote = sText;
}
cTransfer.TransferRequest.MoveNext();
}
;
}
ViewModel.sprRequests.MaxRows = CurrRow + 1;
}
private void FillLists()
{
PTSProject.clsScheduler cTransfer = Container.Resolve <clsScheduler>();
DbCommand oCmd = UpgradeHelpers.DB.AdoFactoryManager.GetFactory().CreateCommand();
ADORecordSetHelper oRec = null;
string strName = "";
ViewModel.cboPriority.Items.Clear();
if (cTransfer.GetTransferPriorityCodeList() != 0)
{
while (!cTransfer.TransferPriorityCode.EOF)
{
ViewModel.cboPriority.AddItem(modGlobal.Clean(cTransfer.TransferPriorityCode["description"]));
//UPGRADE_WARNING: (1068) GetVal() of type Variant is being forced to int. More Information: http://www.vbtonet.com/ewis/ewi1068.aspx
ViewModel.cboPriority.SetItemData(ViewModel.cboPriority.GetNewIndex(), Convert.ToInt32(modGlobal.GetVal(cTransfer.TransferPriorityCode["priority_code"])));
cTransfer.TransferPriorityCode.MoveNext();
}
;
}
oCmd.Connection = modGlobal.oConn;
oCmd.CommandType = CommandType.Text;
//Fill Employee Name Lists
ViewModel.cboDelNameList.Items.Clear();
ViewModel.cboNameList.Items.Clear();
if (modGlobal.Shared.gSecurity != "RO" && modGlobal.Shared.gSecurity != "CPT")
{
oCmd.CommandText = "spOpNameList";
oRec = ADORecordSetHelper.Open(oCmd, "");
while (!oRec.EOF)
{
strName = Convert.ToString(oRec["name_full"]).Trim() + " :" + Convert.ToString(oRec["employee_id"]);
ViewModel.cboNameList.AddItem(strName);
ViewModel.cboDelNameList.AddItem(strName);
oRec.MoveNext();
}
;
ViewModel.cboNameList.SelectedIndex = -1;
ViewModel.cboDelNameList.SelectedIndex = -1;
if (modGlobal.Shared.gReportUser != "")
{
ViewModel.CurrEmployee = modGlobal.Shared.gReportUser;
modGlobal.Shared.gReportUser = "";
for (int x = 0; x <= ViewModel.cboNameList.Items.Count - 1; x++)
{
if (ViewModel.CurrEmployee == ViewModel.cboNameList.GetListItem(x).Substring(Math.Max(ViewModel.cboNameList.GetListItem(x).Length - 5, 0)))
{
ViewModel.cboNameList.SelectedIndex = x;
ViewModel.cboDelNameList.SelectedIndex = x;
ViewModel.Text = "Transfer for " + modGlobal.Clean(ViewModel.cboNameList.Text);
break;
}
}
}
}
else
{
strName = modGlobal.Shared.gUserName + " :" + modGlobal.Shared.gUser;
ViewModel.cboNameList.AddItem(strName);
ViewModel.cboNameList.SelectedIndex = 0;
ViewModel.cboDelNameList.AddItem(strName);
ViewModel.cboDelNameList.SelectedIndex = 0;
ViewModel.CurrEmployee = modGlobal.Shared.gUser;
ViewModel.Text = "Transfer for " + modGlobal.Clean(ViewModel.cboNameList.Text);
}
if (ViewModel.CurrEmployee != "")
{
FillRequestGrid();
}
}
private void sprReport_ButtonClicked(object eventSender, Stubs._FarPoint.Win.Spread.EditorNotifyEventArgs eventArgs)
{
int Col = eventArgs.Column;
int Row = eventArgs.Row;
int ButtonDown = 0;
PTSProject.clsScheduler cSched = Container.Resolve <clsScheduler>();
//string sEmpID = "";
//string sDate = "";
//do not continue if in the middle of filling the grid
if (ViewModel.FillingTheGrid)
{
return;
}
//if col = 1 wasn't clicked... no use continuing
if (Col != 1)
{
return;
}
ViewModel.CurrRow = Row;
ViewModel.sprReport.Row = ViewModel.CurrRow;
ViewModel.sprReport.Col = 6;
cSched.WatchDutyAssignEmpID = modGlobal.Clean(ViewModel.sprReport.Text);
cSched.WatchDutyAssignDutyDate = DateTime.Parse(ViewModel.dtReportDate.Text).ToString("MM/dd/yyyy");
cSched.WatchDutyAssignedBy = modGlobal.Shared.gUser;
cSched.WatchDutyAssignedDate = DateTime.Now.ToString("MM/dd/yyyy HH:mm:ss");
if (ButtonDown != 0)
{ //Checkbox = True
ViewModel.sprReport.Col = 7;
if (modGlobal.Clean(ViewModel.sprReport.Text) == "")
{
//Need to Add PersonnelWatchDutyAssignment Record for Employee/Date
if (cSched.AddWatchDutyAssignmentRecord())
{
ViewModel.UpdateJustHappened = true;
ViewModel.sprReport.Col = 7;
ViewModel.sprReport.Row = ViewModel.CurrRow;
ViewModel.sprReport.Text = cSched.WatchDutyAssignDutyID.ToString();
}
else
{
ViewManager.ShowMessage("Oooops! Something went wrong... record not inserted.", "Add New Record", UpgradeHelpers.Helpers.BoxButtons.OK);
return;
}
}
}
else
{
//Checkbox = False
if (ViewModel.UpdateJustHappened)
{
ViewModel.UpdateJustHappened = false;
return;
}
else
{
//delete the PersonnelWatchDutyAssignment by RecordID
ViewModel.sprReport.Col = 7;
cSched.WatchDutyAssignDutyID = Convert.ToInt32(Double.Parse(ViewModel.sprReport.Text));
if (Convert.ToInt32(Double.Parse(ViewModel.sprReport.Text)) != 0)
{
if (cSched.DeleteWatchDutyAssignmentRecord() != 0)
{
ViewModel.UpdateJustHappened = true;
FillGrid();
}
}
}
}
ViewModel.UpdateJustHappened = false;
}
internal void optType_CheckedChanged(Object eventSender, System.EventArgs eventArgs)
{
if (((UpgradeHelpers.BasicViewModels.RadioButtonViewModel)eventSender).Checked)
{
if (ViewModel.isInitializingComponent)
{
return;
}
int Index = this.ViewModel.optType.IndexOf((UpgradeHelpers.BasicViewModels.RadioButtonViewModel)eventSender);
PTSProject.clsScheduler sScheduler = Container.Resolve <clsScheduler>();
int iYear = DateTime.Now.AddYears(1).Year;
if (sScheduler.GetScheduleMaxYear() != 0)
{
if (!sScheduler.ScheduleRecord.EOF)
{
//UPGRADE_WARNING: (1068) GetVal() of type Variant is being forced to int. More Information: http://www.vbtonet.com/ewis/ewi1068.aspx
iYear = Convert.ToInt32(modGlobal.GetVal(sScheduler.ScheduleRecord["MaxYear"]));
}
}
switch (Index)
{
case 0:
ViewModel.lbStart.Visible = false;
ViewModel.lbEnd.Visible = false;
ViewModel.calStart.Visible = false;
ViewModel.calEnd.Visible = false;
ViewModel.lbWarning.Visible = false;
if (modGlobal.Shared.gFullShift != 0)
{
ViewModel.chkBothShifts.Visible = true;
modGlobal.Shared.gEndTrans = DateTime.Parse(modGlobal.Shared.gStartTrans).AddDays(1).ToString("M/d/yyyy") + " 7:00AM";
}
else
{
ViewModel.chkBothShifts.Visible = false;
if (modGlobal.Shared.gStartTrans.Substring(Math.Max(modGlobal.Shared.gStartTrans.Length - 2, 0)) == "PM")
{
modGlobal.Shared.gEndTrans = DateTime.Parse(modGlobal.Shared.gStartTrans).AddDays(1).ToString("M/d/yyyy") + " 7:00AM";
}
else
{
modGlobal.Shared.gEndTrans = modGlobal.Shared.gStartTrans.Substring(0, Math.Min(Strings.Len(modGlobal.Shared.gStartTrans) - 2, modGlobal.Shared.gStartTrans.Length)) + "PM";
}
}
break;
case 1:
ViewModel.lbStart.Visible = true;
ViewModel.lbEnd.Visible = true;
ViewModel.calStart.Visible = true;
ViewModel.calEnd.Visible = true;
ViewModel.chkBothShifts.Visible = false;
ViewModel.lbWarning.Visible = false;
break;
case 2:
//TRANSFER END DATE CHANGE
modGlobal
.Shared.gEndTrans = "2/1/" + iYear.ToString() + " 7:00AM";
ViewModel.chkBothShifts.Visible = false;
ViewModel.lbStart.Visible = false;
ViewModel.lbEnd.Visible = false;
ViewModel.calStart.Visible = false;
ViewModel.calEnd.Visible = false;
ViewModel.lbWarning.Visible = true;
break;
}
}
}
internal void cmdInactivate_Click(Object eventSender, System.EventArgs eventArgs)
{
using (var async1 = this.Async(true))
{
PTSProject.clsScheduler cTransfer = Container.Resolve <clsScheduler>();
UpgradeHelpers.Helpers.DialogResult resp = (UpgradeHelpers.Helpers.DialogResult) 0;
ViewModel.cmdInactivate.Enabled = false;
if (ViewModel.CurrPosition == 0)
{
this.Return();
return;
}
if (cTransfer.GetTransferPositionByID(ViewModel.CurrPosition) != 0)
{
async1.Append <UpgradeHelpers.Helpers.DialogResult>(()
=> ViewManager.ShowMessage("Are you sure you want to Inactivate this Posted Position?", "Inactivate Posted Position", UpgradeHelpers.Helpers.BoxButtons.YesNo));
async1.Append <UpgradeHelpers.Helpers.DialogResult, UpgradeHelpers.Helpers.DialogResult>(tempNormalized0 => tempNormalized0);
async1.Append <UpgradeHelpers.Helpers.DialogResult>(tempNormalized1 =>
{
resp = tempNormalized1;
});
async1.Append(() =>
{
if (resp != UpgradeHelpers.Helpers.DialogResult.Yes)
{
//UPGRADE_ISSUE: (2064) FPSpreadADO.fpSpread method sprPositions.ClearSelection was not upgraded. More Information: http://www.vbtonet.com/ewis/ewi2064.aspx
ViewModel.sprPositions.ClearSelection();
ViewModel.CurrPosition = 0;
this.Return();
return;
}
});
}
else
{
ViewManager.ShowMessage("Ooooops! There was a problem finding the record in the database. Try Again", "Find Position Record", UpgradeHelpers.Helpers.BoxButtons.OK);
//UPGRADE_ISSUE: (2064) FPSpreadADO.fpSpread method sprPositions.ClearSelection was not upgraded. More Information: http://www.vbtonet.com/ewis/ewi2064.aspx
ViewModel.sprPositions.ClearSelection();
ViewModel.CurrPosition = 0;
this.Return();
return;
}
async1.Append(() =>
{
//If you're here... then procede in updating the record and refreshing the list...
cTransfer.TransferPositionActiveFlag = "N";
cTransfer.TransferPositionStatusChanged = DateTime.Now.ToString("M/d/yyyy HH:mm:ss");
cTransfer.TransferPositionChangedBy = modGlobal.Shared.gUser;
if (cTransfer.UpdateTransferPosition())
{
//success!!
}
else
{
ViewManager.ShowMessage("Ooooops! Something went wrong updating the Position Record!", "Update Position Record", UpgradeHelpers.Helpers.BoxButtons.OK);
}
ViewModel.cboReqNameList.SelectedIndex = -1;
ViewModel.FilterEmployee = "";
ViewModel.cboReqPositionList.SelectedIndex = -1;
//UPGRADE_ISSUE: (2064) FPSpreadADO.fpSpread method sprPositions.ClearSelection was not upgraded. More Information: http://www.vbtonet.com/ewis/ewi2064.aspx
ViewModel.sprPositions.ClearSelection();
ViewModel.CurrPosition = 0;
RefreshPositionLists();
FillGrids();
});
}
}
