8864818a-e7b1-4f98-bb47-3b103b9dc48f
CRM Dashboard
Copy of the standard Jiwa CRM dashboard, but as a plugin. An entry will need to be made to the SY_Forms table by opening the Form Maintenance form, and adding the CRM form defined in this plugin. Then quit Jiwa, log back in and add the new form to a menu via the menu maintenance form.
true
false
0
Jiwa Financials
7.2.1.0
Imports JiwaFinancials.Jiwa
Imports Microsoft.VisualBasic
Imports System.Windows.Forms
Imports System.Data.SqlClient
Imports System.Drawing
Imports System.Data
Imports System
Imports System.Runtime.CompilerServices
Imports System.IO
Imports FarPoint.Win.Spread
Imports System.ComponentModel
Imports Infragistics.UltraChart.Shared.Styles
Imports Infragistics.UltraChart.Resources.Appearance
Imports Infragistics.UltraChart.Core.Layers
Imports System.Collections
#Region "Standard Plugin Code"
Public Class FormPlugin
Inherits System.MarshalByRefObject
Implements JiwaApplication.IJiwaFormPlugin
Public Overrides Function InitializeLifetimeService() As Object
' returning null here will prevent the lease manager
' from deleting the Object.
Return Nothing
End Function
Public Sub SetupBeforeHandlers(ByVal JiwaForm As JiwaApplication.IJiwaForm, ByVal Plugin As JiwaApplication.Plugin.Plugin) Implements JiwaApplication.IJiwaFormPlugin.SetupBeforeHandlers
End Sub
Public Sub Setup(ByVal JiwaForm As JiwaApplication.IJiwaForm, ByVal Plugin As JiwaApplication.Plugin.Plugin) Implements JiwaApplication.IJiwaFormPlugin.Setup
End Sub
End Class
Public Class BusinessLogicPlugin
Inherits System.MarshalByRefObject
Implements JiwaApplication.IJiwaBusinessLogicPlugin
Public Overrides Function InitializeLifetimeService() As Object
' returning null here will prevent the lease manager
' from deleting the Object.
Return Nothing
End Function
Public Sub Setup(ByVal JiwaBusinessLogic As JiwaApplication.IJiwaBusinessLogic, ByVal Plugin As JiwaApplication.Plugin.Plugin) Implements JiwaApplication.IJiwaBusinessLogicPlugin.Setup
End Sub
End Class
Public Class ApplicationManagerPlugin
Inherits System.MarshalByRefObject
Implements JiwaApplication.IJiwaApplicationManagerPlugin
Public Overrides Function InitializeLifetimeService() As Object
' returning null here will prevent the lease manager
' from deleting the Object.
Return Nothing
End Function
Public Sub Setup(ByVal Plugin As JiwaApplication.Plugin.Plugin) Implements JiwaApplication.IJiwaApplicationManagerPlugin.Setup
End Sub
End Class
Public Class CustomFieldPlugin
Inherits System.MarshalByRefObject
Implements JiwaApplication.IJiwaCustomFieldPlugin
Public Overrides Function InitializeLifetimeService() As Object
' returning null here will prevent the lease manager
' from deleting the Object.
Return Nothing
End Function
Public Sub FormatCell(ByVal BusinessLogicHost As JiwaApplication.IJiwaBusinessLogic, ByVal GridObject As JiwaApplication.Controls.JiwaGrid, ByVal FormObject As JiwaApplication.IJiwaForm, ByVal Col As Integer, ByVal Row As Integer, ByVal HostObject As JiwaApplication.IJiwaCustomFieldValues, ByVal CustomField As JiwaApplication.CustomFields.CustomField, ByVal CustomFieldValue As JiwaApplication.CustomFields.CustomFieldValue) Implements JiwaApplication.IJiwaCustomFieldPlugin.FormatCell
End Sub
Public Sub ReadData(ByVal BusinessLogicHost As JiwaApplication.IJiwaBusinessLogic, ByVal GridObject As JiwaApplication.Controls.JiwaGrid, ByVal FormObject As JiwaApplication.IJiwaForm, ByVal Row As Integer, ByVal HostObject As JiwaApplication.IJiwaCustomFieldValues, ByVal CustomField As JiwaApplication.CustomFields.CustomField, ByVal CustomFieldValue As JiwaApplication.CustomFields.CustomFieldValue) Implements JiwaApplication.IJiwaCustomFieldPlugin.ReadData
End Sub
Public Sub ButtonClicked(ByVal BusinessLogicHost As JiwaApplication.IJiwaBusinessLogic, ByVal GridObject As JiwaApplication.Controls.JiwaGrid, ByVal FormObject As JiwaApplication.IJiwaForm, ByVal Col As Integer, ByVal Row As Integer, ByVal HostObject As JiwaApplication.IJiwaCustomFieldValues, ByVal CustomField As JiwaApplication.CustomFields.CustomField, ByVal CustomFieldValue As JiwaApplication.CustomFields.CustomFieldValue) Implements JiwaApplication.IJiwaCustomFieldPlugin.ButtonClicked
End Sub
End Class
Public Class LineCustomFieldPlugin
Inherits System.MarshalByRefObject
Implements JiwaApplication.IJiwaLineCustomFieldPlugin
Public Overrides Function InitializeLifetimeService() As Object
' returning null here will prevent the lease manager
' from deleting the Object.
Return Nothing
End Function
Public Sub FormatCell(ByVal BusinessLogicHost As JiwaApplication.IJiwaBusinessLogic, ByVal GridObject As JiwaApplication.Controls.JiwaGrid, ByVal FormObject As JiwaApplication.IJiwaForm, ByVal Col As Integer, ByVal Row As Integer, ByVal HostItem As JiwaApplication.IJiwaLineCustomFieldValues, ByVal CustomField As JiwaApplication.CustomFields.CustomField, ByVal CustomFieldValue As JiwaApplication.CustomFields.CustomFieldValue) Implements JiwaApplication.IJiwaLineCustomFieldPlugin.FormatCell
End Sub
Public Sub ReadData(ByVal BusinessLogicHost As JiwaApplication.IJiwaBusinessLogic, ByVal GridObject As JiwaApplication.Controls.JiwaGrid, ByVal FormObject As JiwaApplication.IJiwaForm, ByVal Row As Integer, ByVal HostItem As JiwaApplication.IJiwaLineCustomFieldValues, ByVal CustomField As JiwaApplication.CustomFields.CustomField, ByVal CustomFieldValue As JiwaApplication.CustomFields.CustomFieldValue) Implements JiwaApplication.IJiwaLineCustomFieldPlugin.ReadData
End Sub
Public Sub ButtonClicked(ByVal BusinessLogicHost As JiwaApplication.IJiwaBusinessLogic, ByVal GridObject As JiwaApplication.Controls.JiwaGrid, ByVal FormObject As JiwaApplication.IJiwaForm, ByVal Col As Integer, ByVal Row As Integer, ByVal HostItem As JiwaApplication.IJiwaLineCustomFieldValues, ByVal CustomField As JiwaApplication.CustomFields.CustomField, ByVal CustomFieldValue As JiwaApplication.CustomFields.CustomFieldValue) Implements JiwaApplication.IJiwaLineCustomFieldPlugin.ButtonClicked
End Sub
End Class
Public Class SystemSettingPlugin
Inherits System.MarshalByRefObject
Implements JiwaApplication.IJiwaSystemSettingPlugin
Public Overrides Function InitializeLifetimeService() As Object
' returning null here will prevent the lease manager
' from deleting the Object.
Return Nothing
End Function
Public Sub FormatCell(ByVal BusinessLogicHost As JiwaApplication.IJiwaBusinessLogic, ByVal GridObject As JiwaApplication.Controls.JiwaGrid, ByVal FormObject As JiwaApplication.IJiwaForm, ByVal Col As Integer, ByVal Row As Integer, ByVal SystemSetting As JiwaApplication.SystemSettings.Setting) Implements JiwaApplication.IJiwaSystemSettingPlugin.FormatCell
End Sub
Public Sub ReadData(ByVal BusinessLogicHost As JiwaApplication.IJiwaBusinessLogic, ByVal GridObject As JiwaApplication.Controls.JiwaGrid, ByVal FormObject As JiwaApplication.IJiwaForm, ByVal Row As Integer, ByVal SystemSetting As JiwaApplication.SystemSettings.Setting) Implements JiwaApplication.IJiwaSystemSettingPlugin.ReadData
End Sub
Public Sub ButtonClicked(ByVal BusinessLogicHost As JiwaApplication.IJiwaBusinessLogic, ByVal GridObject As JiwaApplication.Controls.JiwaGrid, ByVal FormObject As JiwaApplication.IJiwaForm, ByVal Col As Integer, ByVal Row As Integer, ByVal SystemSetting As JiwaApplication.SystemSettings.Setting) Implements JiwaApplication.IJiwaSystemSettingPlugin.ButtonClicked
End Sub
End Class
Public Class ScheduledExecutionPlugin
Inherits System.MarshalByRefObject
Implements JiwaApplication.IJiwaScheduledExecutionPlugin
Public Sub Execute(ByVal Plugin As JiwaApplication.Plugin.Plugin, ByVal Schedule As JiwaApplication.Schedule.Schedule) Implements JiwaApplication.IJiwaScheduledExecutionPlugin.Execute
End Sub
Public Sub OnServiceStart(ByVal Plugin As JiwaApplication.Plugin.Plugin) Implements JiwaApplication.IJiwaScheduledExecutionPlugin.OnServiceStart
End Sub
Public Sub OnServiceStopping(ByVal Plugin As JiwaApplication.Plugin.Plugin) Implements JiwaApplication.IJiwaScheduledExecutionPlugin.OnServiceStopping
End Sub
End Class
#End Region
Public Class CRM
Inherits JiwaApplication.ProcessAction.UserInterface
Private WithEvents _ToDoList As JiwaApplication.JiwaToDos.Lister.ToDoList
Private QuotesDataTable As New DataTable
Private QuotesCollection As JiwaApplication.JiwaCollection(Of QuoteSummary)
Private SalesMonthlyDataTable As New DataTable
Private SalesMonthlyBalanceCollection As JiwaApplication.JiwaCollection(Of SalesSummary)
Private WithEvents indicatorsBackgroundWorker As System.ComponentModel.BackgroundWorker
Private WithEvents quotesBackgroundWorker As System.ComponentModel.BackgroundWorker
Private WithEvents salesBackgroundWorker As System.ComponentModel.BackgroundWorker
Private WithEvents myCustomersBackgroundWorker As System.ComponentModel.BackgroundWorker
Private MyCustomersSQLReader As SqlClient.SqlDataReader = Nothing
Public Overrides Sub SetupBeforeHandlers()
MyBase.SetupBeforeHandlers()
Me.MdiParent = Manager.MDIParentForm
'SetupObjects()
End Sub
Public Overrides Sub Setup()
MyBase.Setup()
QuotesCollection = Manager.CollectionFactory.CreateCollection(Of QuoteSummary)()
SalesMonthlyBalanceCollection = Manager.CollectionFactory.CreateCollection(Of SalesSummary)()
_ToDoList = Manager.BusinessLogicFactory.CreateBusinessLogic(Of JiwaApplication.JiwaToDos.Lister.ToDoList)(Nothing)
SetupForm()
AddHandlers()
End Sub
Public Overrides Sub SetToolBar(ByVal EditMode As Boolean)
MyBase.SetToolBar(EditMode)
UltraToolbarsManager1.Tools("ID_RecordRefresh").SharedProps.Enabled = True
End Sub
Public Overrides Sub AddHandlers()
AddHandler Me.Shown, AddressOf Form_Shown
AddHandler UltraToolbarsManager1.ToolClick, AddressOf UltraToolbarsManager1_ToolClick1
AddHandler IncludeLastYearSalesUltraCheckEditor.CheckedChanged, AddressOf IncludeLastYearSalesUltraCheckEditor_CheckedChanged
AddHandler ShowAllStagesUltraCheckEditor.CheckedChanged, AddressOf ShowAllStagesUltraCheckEditor_CheckedChanged
AddHandler QuotesFunnelUltraChart.ChartDataClicked, AddressOf QuotesFunnelUltraChart_ChartDataClicked
AddHandler SalesTransactionUltraChart.ChartDataClicked, AddressOf SalesTransactionUltraChart_ChartDataClicked
AddHandler MyCustomersJiwaGrid.SelectionChanged, AddressOf MyCustomersJiwaGrid_SelectionChanged
MyBase.AddHandlers()
End Sub
Public Sub SetupForm()
UltraToolbarsManager1.Tools("ID_RecordProcess").SharedProps.Visible = False
SetupWindow()
SetupControls()
End Sub
Private Sub Form_Shown(sender As Object, e As EventArgs)
indicatorsBackgroundWorker.RunWorkerAsync()
quotesBackgroundWorker.RunWorkerAsync()
salesBackgroundWorker.RunWorkerAsync()
myCustomersBackgroundWorker.RunWorkerAsync()
If Manager.Staff.Picture Is Nothing Then
StaffPicture.Image = Manager.Staff.DefaultStaffPicture
Else
StaffPicture.Image = Manager.Staff.Picture
End If
UserNameUltraLabel.Text = String.Format("CRM Dashboard For {0}", Manager.Staff.FullName)
DateUltraLabel.Text = String.Format("As At {0}", Manager.SysDateTime.ToLongDateString)
PopulateToDosGrid()
End Sub
Public Sub SetupControls()
Me.indicatorsBackgroundWorker = New System.ComponentModel.BackgroundWorker
Me.indicatorsBackgroundWorker.WorkerReportsProgress = True
Me.indicatorsBackgroundWorker.WorkerSupportsCancellation = True
Me.quotesBackgroundWorker = New System.ComponentModel.BackgroundWorker
Me.quotesBackgroundWorker.WorkerReportsProgress = True
Me.quotesBackgroundWorker.WorkerSupportsCancellation = True
Me.salesBackgroundWorker = New System.ComponentModel.BackgroundWorker
Me.salesBackgroundWorker.WorkerReportsProgress = True
Me.salesBackgroundWorker.WorkerSupportsCancellation = True
Me.myCustomersBackgroundWorker = New System.ComponentModel.BackgroundWorker
Me.myCustomersBackgroundWorker.WorkerReportsProgress = True
Me.myCustomersBackgroundWorker.WorkerSupportsCancellation = True
UltraToolbarsManager1.Tools("ID_RecordRefresh").SharedProps.Enabled = False
CRM_MyQuotesExpiringIn7Days.Manager = Manager
CRM_MyQuotesExpiringIn7Days.Setup()
CRM_MyQuotesExpiringIn7Days.StoredProcName = "usp_JIWA_Dashboard_Indicator_CRM_MyQuotesExpiring"
CRM_MyQuotesExpiringIn7Days.Caption = "My Quotes Expiring in 7 Days" ' This is actually set when we call the stored proc, but we set it here so we can see it in the designer
CRM_MyQuotesExpiringIn7Days.SQLParameters.Add(New SqlClient.SqlParameter("@SP_AsAtDate", System.Data.SqlDbType.DateTime) With {.Value = Manager.SysDateTime})
CRM_MyQuotesExpiringIn7Days.SQLParameters.Add(New SqlClient.SqlParameter("@HR_Staff_StaffID", System.Data.SqlDbType.Char) With {.Value = Manager.Staff.RecID})
CRM_MyQuotesExpiringIn7Days.SQLParameters.Add(New SqlClient.SqlParameter("@IN_Logical_LogicalID", System.Data.SqlDbType.Char) With {.Value = Manager.CurrentLogicalWarehouse.IN_LogicalID})
CRM_MyQuotesExpiringIn7Days.SQLParameters.Add(New SqlClient.SqlParameter("@StackScale", System.Data.SqlDbType.Int) With {.Value = 5})
CRM_MyQuotesExpiringIn7Days.SQLParameters.Add(New SqlClient.SqlParameter("@ExpiryDays", System.Data.SqlDbType.Int) With {.Value = 7})
IndicatorPanelSalesOrdersEnteredNotProcessed.Manager = Manager
IndicatorPanelSalesOrdersEnteredNotProcessed.Setup()
IndicatorPanelSalesOrdersEnteredNotProcessed.StoredProcName = "usp_JIWA_Dashboard_Indicator_CRM_MySalesOrdersEnteredNotProcessed"
IndicatorPanelSalesOrdersEnteredNotProcessed.Caption = "Sales Orders Entered Not Processed" ' This is actually set when we call the stored proc, but we set it here so we can see it in the designer
IndicatorPanelSalesOrdersEnteredNotProcessed.SQLParameters.Add(New SqlClient.SqlParameter("@SP_AsAtDate", System.Data.SqlDbType.DateTime) With {.Value = Manager.SysDateTime})
IndicatorPanelSalesOrdersEnteredNotProcessed.SQLParameters.Add(New SqlClient.SqlParameter("@HR_Staff_StaffID", System.Data.SqlDbType.Char) With {.Value = Manager.Staff.RecID})
IndicatorPanelSalesOrdersEnteredNotProcessed.SQLParameters.Add(New SqlClient.SqlParameter("@IN_Logical_LogicalID", System.Data.SqlDbType.Char) With {.Value = Manager.CurrentLogicalWarehouse.IN_LogicalID})
IndicatorPanelSalesOrdersEnteredNotProcessed.SQLParameters.Add(New SqlClient.SqlParameter("@StackScale", System.Data.SqlDbType.Int) With {.Value = 5})
IndicatorPanelSalesOrdersWithBackorders.Manager = Manager
IndicatorPanelSalesOrdersWithBackorders.Setup()
IndicatorPanelSalesOrdersWithBackorders.StoredProcName = "usp_JIWA_Dashboard_Indicator_CRM_MySalesOrdersWithBackorders"
IndicatorPanelSalesOrdersWithBackorders.Caption = "Sales Orders With Back Orders" ' This is actually set when we call the stored proc, but we set it here so we can see it in the designer
IndicatorPanelSalesOrdersWithBackorders.SQLParameters.Add(New SqlClient.SqlParameter("@SP_AsAtDate", System.Data.SqlDbType.DateTime) With {.Value = Manager.SysDateTime})
IndicatorPanelSalesOrdersWithBackorders.SQLParameters.Add(New SqlClient.SqlParameter("@HR_Staff_StaffID", System.Data.SqlDbType.Char) With {.Value = Manager.Staff.RecID})
IndicatorPanelSalesOrdersWithBackorders.SQLParameters.Add(New SqlClient.SqlParameter("@IN_Logical_LogicalID", System.Data.SqlDbType.Char) With {.Value = Manager.CurrentLogicalWarehouse.IN_LogicalID})
IndicatorPanelSalesOrdersWithBackorders.SQLParameters.Add(New SqlClient.SqlParameter("@StackScale", System.Data.SqlDbType.Int) With {.Value = 5})
IndicatorPanelSalesOrdersReadyToShip.Manager = Manager
IndicatorPanelSalesOrdersReadyToShip.Setup()
IndicatorPanelSalesOrdersReadyToShip.StoredProcName = "usp_JIWA_Dashboard_Indicator_CRM_MySalesOrdersReadyToShip"
IndicatorPanelSalesOrdersReadyToShip.Caption = "Sales Orders Ready to Ship" ' This is actually set when we call the stored proc, but we set it here so we can see it in the designer
IndicatorPanelSalesOrdersReadyToShip.SQLParameters.Add(New SqlClient.SqlParameter("@SP_AsAtDate", System.Data.SqlDbType.DateTime) With {.Value = Manager.SysDateTime})
IndicatorPanelSalesOrdersReadyToShip.SQLParameters.Add(New SqlClient.SqlParameter("@HR_Staff_StaffID", System.Data.SqlDbType.Char) With {.Value = Manager.Staff.RecID})
IndicatorPanelSalesOrdersReadyToShip.SQLParameters.Add(New SqlClient.SqlParameter("@IN_Logical_LogicalID", System.Data.SqlDbType.Char) With {.Value = Manager.CurrentLogicalWarehouse.IN_LogicalID})
IndicatorPanelSalesOrdersReadyToShip.SQLParameters.Add(New SqlClient.SqlParameter("@StackScale", System.Data.SqlDbType.Int) With {.Value = 5})
IndicatorPanelSalesQuotesOpen.Manager = Manager
IndicatorPanelSalesQuotesOpen.Setup()
IndicatorPanelSalesQuotesOpen.StoredProcName = "usp_JIWA_Dashboard_Indicator_CRM_MySalesQuotesOpen"
IndicatorPanelSalesQuotesOpen.Caption = "My Open Quotes" ' This is actually set when we call the stored proc, but we set it here so we can see it in the designer
IndicatorPanelSalesQuotesOpen.SQLParameters.Add(New SqlClient.SqlParameter("@SP_AsAtDate", System.Data.SqlDbType.DateTime) With {.Value = Manager.SysDateTime})
IndicatorPanelSalesQuotesOpen.SQLParameters.Add(New SqlClient.SqlParameter("@HR_Staff_StaffID", System.Data.SqlDbType.Char) With {.Value = Manager.Staff.RecID})
IndicatorPanelSalesQuotesOpen.SQLParameters.Add(New SqlClient.SqlParameter("@IN_Logical_LogicalID", System.Data.SqlDbType.Char) With {.Value = Manager.CurrentLogicalWarehouse.IN_LogicalID})
IndicatorPanelSalesQuotesOpen.SQLParameters.Add(New SqlClient.SqlParameter("@StackScale", System.Data.SqlDbType.Int) With {.Value = 5})
IndicatorPanelDebtorInvoicesOverdue.Manager = Manager
IndicatorPanelDebtorInvoicesOverdue.Setup()
IndicatorPanelDebtorInvoicesOverdue.StoredProcName = "usp_JIWA_Dashboard_Indicator_CRM_MyDebtorInvoicesOverdue"
IndicatorPanelDebtorInvoicesOverdue.Caption = "My Customer Invoices Overdue" ' This is actually set when we call the stored proc, but we set it here so we can see it in the designer
IndicatorPanelDebtorInvoicesOverdue.SQLParameters.Add(New SqlClient.SqlParameter("@SP_AsAtDate", System.Data.SqlDbType.DateTime) With {.Value = Manager.SysDateTime})
IndicatorPanelDebtorInvoicesOverdue.SQLParameters.Add(New SqlClient.SqlParameter("@HR_Staff_StaffID", System.Data.SqlDbType.Char) With {.Value = Manager.Staff.RecID})
IndicatorPanelDebtorInvoicesOverdue.SQLParameters.Add(New SqlClient.SqlParameter("@IN_Logical_LogicalID", System.Data.SqlDbType.Char) With {.Value = Manager.CurrentLogicalWarehouse.IN_LogicalID})
IndicatorPanelDebtorInvoicesOverdue.SQLParameters.Add(New SqlClient.SqlParameter("@StackScale", System.Data.SqlDbType.Int) With {.Value = 5})
SalesTransactionUltraChart.EmptyChartText = "Reading sales data..."
SetupToDosGrid()
End Sub
Public Sub SetupToDosGrid()
With ToDosAssignedToMeJiwaGrid
.AddColumn("Key", New JiwaApplication.JiwaManageGrid.JiwaTextCellType, "Key", 10, True, False, True, True, 255, False, False, 0, False, False)
.AddColumn("ToDoNo", New JiwaApplication.JiwaManageGrid.JiwaTextCellType, "To-Do No.", 8, False, True, True, True, , True)
.AddColumn("Type", New JiwaApplication.JiwaManageGrid.JiwaTextCellType, "Type", 5, False, True, True, True)
.AddColumn("Subject", New JiwaApplication.JiwaManageGrid.JiwaTextCellType, "Subject", 25, False, True, True, True, , True)
.AddColumn("DueDate", New FarPoint.Win.Spread.CellType.DateTimeCellType, "Due Date", 8, False, True, True, True)
DirectCast(.ActiveSheet.Columns("DueDate").CellType, FarPoint.Win.Spread.CellType.DateTimeCellType).DateTimeFormat = FarPoint.Win.Spread.CellType.DateTimeFormat.ShortDate
.AddColumn("DueTime", New FarPoint.Win.Spread.CellType.DateTimeCellType, "Due Time", 8, False, True, True, True)
DirectCast(.ActiveSheet.Columns("DueTime").CellType, FarPoint.Win.Spread.CellType.DateTimeCellType).DateTimeFormat = CellType.DateTimeFormat.TimeOnly
'.AddColumn("AssignedToName", New JiwaApplication.JiwaManageGrid.JiwaTextCellType, "Assigned To Name", 6, False, True, True, True)
'.AddColumn("AssignedByName", New JiwaApplication.JiwaManageGrid.JiwaTextCellType, "Assigned By Name", 6, False, True, True, True)
'.AddColumn("LastSavedDateTime", New FarPoint.Win.Spread.CellType.DateTimeCellType, "Last Modified", 8, False, True, True, True)
'DirectCast(.ActiveSheet.Columns("LastSavedDateTime").CellType, FarPoint.Win.Spread.CellType.DateTimeCellType).DateTimeFormat = FarPoint.Win.Spread.CellType.DateTimeFormat.ShortDateWithTime
'.AddColumn("LastSavedBy", New JiwaApplication.JiwaManageGrid.JiwaTextCellType, "Last Modified By", 5, False, True, True, True)
'.AddColumn("DurationInHours", New FarPoint.Win.Spread.CellType.NumberCellType, "Duration (Hours)", 5, False, True, True, True)
'.AddColumn("Priority", New JiwaApplication.JiwaManageGrid.JiwaTextCellType, "Priority", 5, False, True, True, True)
'.AddColumn("UsesStatusTracking", New FarPoint.Win.Spread.CellType.CheckBoxCellType, "Status Tracking", 8, False, True, True, True)
.AddColumn("Status", New JiwaApplication.JiwaManageGrid.JiwaTextCellType, "Status", 8, False, True, True, True)
.AddColumn("CompletePercentage", New FarPoint.Win.Spread.CellType.PercentCellType, "Complete", 8, False, True, True, True)
'.AddColumn("ReminderEnabled", New FarPoint.Win.Spread.CellType.CheckBoxCellType, "Reminder", 5, False, True, True, True)
'.AddColumn("ReminderDateTime", New FarPoint.Win.Spread.CellType.DateTimeCellType, "Reminder Date / Time", 8, False, True, True, True)
'DirectCast(.ActiveSheet.Columns("ReminderDateTime").CellType, FarPoint.Win.Spread.CellType.DateTimeCellType).DateTimeFormat = CellType.DateTimeFormat.ShortDateWithTime
.FocusRenderer = Nothing
.ActiveSheet.OperationMode = FarPoint.Win.Spread.OperationMode.SingleSelect
.SetupComplete()
End With
End Sub
Public Function ReadIndicatorDataAsync(ByVal worker As BackgroundWorker, ByVal e As DoWorkEventArgs) As Boolean
ReadIndicatorData()
Return True
End Function
Delegate Sub ReadIndicatorDataCallback()
Private Sub ReadIndicatorData()
' Can't update the control from another thread, so we use the delegate technique to add to message queue which will be pumped when .NET sees fit.
If Me.InvokeRequired Then
Dim delegateReadIndicatorDataCallback As New ReadIndicatorDataCallback(AddressOf ReadIndicatorData)
Me.Invoke(delegateReadIndicatorDataCallback, New Object() {})
Else
CRM_MyQuotesExpiringIn7Days.Read()
IndicatorPanelSalesOrdersEnteredNotProcessed.Read()
IndicatorPanelSalesOrdersWithBackorders.Read()
IndicatorPanelSalesOrdersReadyToShip.Read()
IndicatorPanelSalesQuotesOpen.Read()
IndicatorPanelDebtorInvoicesOverdue.Read()
End If
End Sub
Public Function ReadQuotesDataAsync(ByVal worker As BackgroundWorker, ByVal e As DoWorkEventArgs) As Boolean
ReadQuotesData()
Return True
End Function
Public Function ReadSalesDataAsync(ByVal worker As BackgroundWorker, ByVal e As DoWorkEventArgs) As Boolean
ReadSalesSummary()
Return True
End Function
Public Function ReadMyCustomersDataAsync(ByVal worker As BackgroundWorker, ByVal e As DoWorkEventArgs) As Boolean
ReadMyCustomers()
Return True
End Function
Public Sub UltraToolbarsManager1_ToolClick1(sender As Object, e As Infragistics.Win.UltraWinToolbars.ToolClickEventArgs)
Select Case e.Tool.Key
Case "ID_RecordRefresh"
're - read
UltraToolbarsManager1.Tools("ID_RecordRefresh").SharedProps.Enabled = False
indicatorsBackgroundWorker.RunWorkerAsync()
quotesBackgroundWorker.RunWorkerAsync()
salesBackgroundWorker.RunWorkerAsync()
myCustomersBackgroundWorker.RunWorkerAsync()
End Select
End Sub
Private Sub indicatorsBackgroundWorker_DoWork(ByVal sender As Object, ByVal e As DoWorkEventArgs) Handles indicatorsBackgroundWorker.DoWork
' Get the BackgroundWorker object that raised this event.
Dim worker As BackgroundWorker = CType(sender, BackgroundWorker)
' Assign the result of the computation
' to the Result property of the DoWorkEventArgs
' object. This is will be available to the
' RunWorkerCompleted eventhandler.
e.Result = ReadIndicatorDataAsync(worker, e)
End Sub 'backgroundWorker1_DoWork
Private Sub indicatorsBackgroundWorker_RunWorkerCompleted(ByVal sender As Object, ByVal e As RunWorkerCompletedEventArgs) Handles indicatorsBackgroundWorker.RunWorkerCompleted
' First, handle the case where an exception was thrown.
If (e.Error IsNot Nothing) Then
MessageBox.Show(e.Error.Message)
ElseIf e.Cancelled Then
' Next, handle the case where the user canceled the
' operation.
' Note that due to a race condition in
' the DoWork event handler, the Cancelled
' flag may not have been set, even though
' CancelAsync was called.
'resultLabel.Text = "Canceled"
Else
' Finally, handle the case where the operation succeeded.
'resultLabel.Text = e.Result.ToString()
End If
' Enable the refresh tool
UpdateRefreshTool()
End Sub
Private Sub quotesBackgroundWorker_DoWork(ByVal sender As Object, ByVal e As DoWorkEventArgs) Handles quotesBackgroundWorker.DoWork
' Get the BackgroundWorker object that raised this event.
Dim worker As BackgroundWorker = CType(sender, BackgroundWorker)
' Assign the result of the computation
' to the Result property of the DoWorkEventArgs
' object. This is will be available to the
' RunWorkerCompleted eventhandler.
e.Result = ReadQuotesDataAsync(worker, e)
End Sub 'backgroundWorker1_DoWork
Private Sub quotesBackgroundWorker_RunWorkerCompleted(ByVal sender As Object, ByVal e As RunWorkerCompletedEventArgs) Handles quotesBackgroundWorker.RunWorkerCompleted
' First, handle the case where an exception was thrown.
If (e.Error IsNot Nothing) Then
MessageBox.Show(e.Error.Message)
ElseIf e.Cancelled Then
' Next, handle the case where the user canceled the
' operation.
' Note that due to a race condition in
' the DoWork event handler, the Cancelled
' flag may not have been set, even though
' CancelAsync was called.
'resultLabel.Text = "Canceled"
Else
' Finally, handle the case where the operation succeeded.
'resultLabel.Text = e.Result.ToString()
DrawQuotesChart()
End If
' Enable the refresh tool
UpdateRefreshTool()
End Sub
Private Sub salesBackgroundWorker_DoWork(ByVal sender As Object, ByVal e As DoWorkEventArgs) Handles salesBackgroundWorker.DoWork
' Get the BackgroundWorker object that raised this event.
Dim worker As BackgroundWorker = CType(sender, BackgroundWorker)
' Assign the result of the computation
' to the Result property of the DoWorkEventArgs
' object. This is will be available to the
' RunWorkerCompleted eventhandler.
e.Result = ReadSalesDataAsync(worker, e)
End Sub 'backgroundWorker1_DoWork
Private Sub salesBackgroundWorker_RunWorkerCompleted(ByVal sender As Object, ByVal e As RunWorkerCompletedEventArgs) Handles salesBackgroundWorker.RunWorkerCompleted
' First, handle the case where an exception was thrown.
If (e.Error IsNot Nothing) Then
MessageBox.Show(e.Error.Message)
ElseIf e.Cancelled Then
' Next, handle the case where the user canceled the
' operation.
' Note that due to a race condition in
' the DoWork event handler, the Cancelled
' flag may not have been set, even though
' CancelAsync was called.
'resultLabel.Text = "Canceled"
Else
' Finally, handle the case where the operation succeeded.
'resultLabel.Text = e.Result.ToString()
DrawSalesChart()
End If
' Enable the refresh tool
UpdateRefreshTool()
End Sub
Private Sub myCustomersBackgroundWorker_DoWork(ByVal sender As Object, ByVal e As DoWorkEventArgs) Handles myCustomersBackgroundWorker.DoWork
' Get the BackgroundWorker object that raised this event.
Dim worker As BackgroundWorker = CType(sender, BackgroundWorker)
' Assign the result of the computation
' to the Result property of the DoWorkEventArgs
' object. This is will be available to the
' RunWorkerCompleted eventhandler.
e.Result = ReadMyCustomersDataAsync(worker, e)
End Sub 'backgroundWorker1_DoWork
Private Sub myCustomersBackgroundWorker_RunWorkerCompleted(ByVal sender As Object, ByVal e As RunWorkerCompletedEventArgs) Handles myCustomersBackgroundWorker.RunWorkerCompleted
' First, handle the case where an exception was thrown.
If (e.Error IsNot Nothing) Then
MessageBox.Show(e.Error.Message)
ElseIf e.Cancelled Then
' Next, handle the case where the user canceled the
' operation.
' Note that due to a race condition in
' the DoWork event handler, the Cancelled
' flag may not have been set, even though
' CancelAsync was called.
'resultLabel.Text = "Canceled"
Else
' Finally, handle the case where the operation succeeded.
'resultLabel.Text = e.Result.ToString()
MyCustomersJiwaGrid.BuildGridFromDataReader(MyCustomersSQLReader)
' Set the row mode to allow multiple selections of debtors
With MyCustomersJiwaGrid
.EditModePermanent = False
.EditModeReplace = False
.SelectionBlockOptions = FarPoint.Win.Spread.SelectionBlockOptions.Rows
.ActiveSheet.OperationMode = FarPoint.Win.Spread.OperationMode.MultiSelect
End With
End If
If Not MyCustomersSQLReader Is Nothing Then
MyCustomersSQLReader.Close()
MyCustomersSQLReader = Nothing
End If
' Enable the refresh tool
UpdateRefreshTool()
End Sub
Public Sub UpdateRefreshTool()
If indicatorsBackgroundWorker.IsBusy OrElse quotesBackgroundWorker.IsBusy OrElse salesBackgroundWorker.IsBusy OrElse myCustomersBackgroundWorker.IsBusy Then
UltraToolbarsManager1.Tools("ID_RecordRefresh").SharedProps.Enabled = False
Else
UltraToolbarsManager1.Tools("ID_RecordRefresh").SharedProps.Enabled = True
End If
End Sub
Public Sub DrawQuotesChart()
QuotesDataTable = New DataTable
QuotesDataTable.Columns.Add("Sales Stage", GetType(System.String))
QuotesDataTable.Columns.Add("PercentComplete", GetType(System.Decimal))
QuotesDataTable.Columns.Add("Count", GetType(System.Decimal))
QuotesDataTable.Columns.Add("Value", GetType(System.Decimal))
QuotesDataTable.Columns.Add("RecID", GetType(System.String))
For Each QuoteSummary As QuoteSummary In QuotesCollection
If ShowAllStagesUltraCheckEditor.Checked OrElse QuoteSummary.Count > 0 Then
QuotesDataTable.Rows.Add(New Object() {QuoteSummary.SalesStage, 1, QuoteSummary.Count, QuoteSummary.Value, QuoteSummary.RecID})
End If
Next
Dim colours As Color() = Manager.ColourPalette_Primary
Me.QuotesFunnelUltraChart.ColorModel.ModelStyle = ColorModels.CustomLinear
Me.QuotesFunnelUltraChart.ColorModel.CustomPalette = colours
Me.QuotesFunnelUltraChart.Tooltips.Format = Infragistics.UltraChart.Shared.Styles.TooltipStyle.Custom
Dim labelHash As New Hashtable()
labelHash.Add("MYCUSTOMTOOLTIP", New MyCustomTooltip())
labelHash.Add("MYCUSTOMLABEL", New MyCustomLabel())
labelHash.Add("QuotesDataTable", QuotesDataTable)
Me.QuotesFunnelUltraChart.LabelHash = labelHash
Me.QuotesFunnelUltraChart.Tooltips.FormatString = "<MYCUSTOMTOOLTIP>"
Me.QuotesFunnelUltraChart.FunnelChart.Labels.FormatString = "<MYCUSTOMLABEL>"
Me.QuotesFunnelUltraChart.ChartType = Infragistics.UltraChart.Shared.Styles.ChartType.FunnelChart
Me.QuotesFunnelUltraChart.FunnelChart.Axis = Infragistics.UltraChart.Shared.Styles.HierarchicalChartAxis.HeightWithSlopeConstant
Me.QuotesFunnelUltraChart.FunnelChart.Sort = Infragistics.UltraChart.Shared.Styles.SortStyle.Ascending
Me.QuotesFunnelUltraChart.Data.DataSource = QuotesDataTable
Me.QuotesFunnelUltraChart.Data.DataBind()
'Dim Series1 As System.Windows.Forms.DataVisualization.Charting.Series = Chart1.Series("Series1")
'Series1.Name = "Opportunities"
'Series1.ChartType = DataVisualization.Charting.SeriesChartType.Funnel
'Chart1.Series(Series1.Name).MarkerSize = 10
'Chart1.Series(Series1.Name).LabelFormat = "0.00%"
'Chart1.Series(Series1.Name).XValueMember = "Sales Stage"
'Chart1.Series(Series1.Name).YValueMembers = "Count"
'Chart1.Series(Series1.Name).AxisLabel = "Sales Stage"
'Chart1.Series(Series1.Name).IsValueShownAsLabel = True
'Chart1.Series(Series1.Name).IsXValueIndexed = True
'Me.Chart1.DataSource = QuotesDataTable
End Sub
Public Sub ReadQuotesData()
Dim Sql As String
Dim SQLReader As SqlDataReader = Nothing
Dim SQLParam As SqlParameter = Nothing
Try
With Manager.Database
QuotesCollection.Clear()
Sql = "usp_JIWA_Dashboard_CRM_QuoteOpportunity "
Using SQLCmd As SqlCommand = New SqlCommand(Sql, .SQLConnection, .SQLTransaction)
' timeout is in seconds.
SQLCmd.CommandType = CommandType.StoredProcedure
SQLParam = New SqlParameter("@SP_AsAtDate", System.Data.SqlDbType.DateTime)
SQLParam.Value = Manager.SysDateTime
SQLCmd.Parameters.Add(SQLParam)
SQLParam = New SqlParameter("@HR_Staff_StaffID", System.Data.SqlDbType.Char)
SQLParam.Value = Manager.Staff.RecID
SQLCmd.Parameters.Add(SQLParam)
SQLParam = New SqlParameter("@IN_Logical_LogicalID", System.Data.SqlDbType.Char)
SQLParam.Value = Manager.CurrentLogicalWarehouse.IN_LogicalID
SQLCmd.Parameters.Add(SQLParam)
SQLReader = .ExecuteReader(SQLCmd)
Do While SQLReader.Read = True
Dim quoteSummary As QuoteSummary = Manager.CollectionItemFactory.CreateCollectionItem(Of QuoteSummary)()
quoteSummary.RecID = .Sanitise(SQLReader, "RecID")
quoteSummary.SalesStage = .Sanitise(SQLReader, "Description")
quoteSummary.Count = .Sanitise(SQLReader, "Count")
quoteSummary.Value = .Sanitise(SQLReader, "Value")
quoteSummary.PercentComplete = .Sanitise(SQLReader, "PercentComplete")
QuotesCollection.Add(quoteSummary)
Loop
SQLReader.Close()
End Using
End With
Finally
If Not SQLReader Is Nothing Then
SQLReader.Close()
End If
End Try
End Sub
Public Sub ReadSalesSummary()
Dim Sql As String
Dim SQLReader As SqlDataReader = Nothing
Dim SQLParam As SqlParameter = Nothing
Try
SalesMonthlyBalanceCollection.Clear()
Dim summaryDate As Date = New Date(Manager.SysDateTime.Year, Manager.SysDateTime.Month, 1)
For monthLoop As Integer = 1 To 12
Dim salesSummary As SalesSummary = Manager.CollectionItemFactory.CreateCollectionItem(Of SalesSummary)()
salesSummary.SummaryDate = summaryDate
salesSummary.RecID = summaryDate.Year.ToString + "-" + summaryDate.Month.ToString
SalesMonthlyBalanceCollection.Add(salesSummary)
summaryDate = summaryDate.AddMonths(-1)
Next
With Manager.Database
Sql = "usp_JIWA_Dashboard_CRM_MyDebtorSales"
Using SQLCmd As SqlCommand = New SqlCommand(Sql, .SQLConnection, .SQLTransaction)
' timeout is in seconds.
SQLCmd.CommandType = CommandType.StoredProcedure
SQLParam = New SqlParameter("@SP_AsAtDate", System.Data.SqlDbType.DateTime)
SQLParam.Value = Manager.SysDateTime
SQLCmd.Parameters.Add(SQLParam)
SQLParam = New SqlParameter("@HR_Staff_StaffID", System.Data.SqlDbType.Char)
SQLParam.Value = Manager.Staff.RecID
SQLCmd.Parameters.Add(SQLParam)
SQLParam = New SqlParameter("@IN_Logical_LogicalID", System.Data.SqlDbType.Char)
SQLParam.Value = Manager.CurrentLogicalWarehouse.IN_LogicalID
SQLCmd.Parameters.Add(SQLParam)
Dim debtorIDs As New DataTable
debtorIDs.Clear()
debtorIDs.Columns.Add("RecID")
' Add the selected debtors from the MyCustomersJiwaGrid (Note if none are selected, then the stored proc is smart enough to link in the debtors linked to the staff member)
Dim selectedCells As FarPoint.Win.Spread.Model.CellRange()
selectedCells = MyCustomersJiwaGrid.ActiveSheet.GetSelections()
For Each selectedCellRange As FarPoint.Win.Spread.Model.CellRange In selectedCells
Dim debtorRow As DataRow = debtorIDs.NewRow()
debtorRow("RecID") = MyCustomersJiwaGrid.GridText("DebtorID", selectedCellRange.Row)
debtorIDs.Rows.Add(debtorRow)
Next
SQLParam = SQLCmd.Parameters.AddWithValue("@DebtorList", debtorIDs)
SQLParam.SqlDbType = SqlDbType.Structured
SQLReader = .ExecuteReader(SQLCmd)
Do While SQLReader.Read = True
Dim salesSummary As SalesSummary = SalesMonthlyBalanceCollection(.Sanitise(SQLReader, "YearNo").ToString + "-" + .Sanitise(SQLReader, "MonthNo").ToString)
If Not salesSummary Is Nothing Then
salesSummary.Amount = .Sanitise(SQLReader, "Amount")
Else
Dim yearNo As Integer = CInt(.Sanitise(SQLReader, "YearNo")) + 1
salesSummary = SalesMonthlyBalanceCollection(yearNo.ToString + "-" + .Sanitise(SQLReader, "MonthNo").ToString)
If Not salesSummary Is Nothing Then
salesSummary.LYAmount = .Sanitise(SQLReader, "Amount")
End If
End If
Loop
SQLReader.Close()
End Using
End With
Finally
If Not SQLReader Is Nothing Then
SQLReader.Close()
End If
End Try
End Sub
' Note the below was an attempt to make the chart use datetime data for the x-axis - so when we click on the bar for a particular month we have a date value, not a string,
' But the chart does not support datetime for x-axis of bar charts, only line charts.
'Public Sub DrawSalesChart()
' SalesMonthlyDataTable = New DataTable
' SalesMonthlyDataTable.Columns.Add("Date", GetType(System.DateTime))
' SalesMonthlyDataTable.Columns.Add("This Year", GetType(System.Decimal))
' If IncludeLastYearSalesUltraCheckEditor.Checked Then
' SalesMonthlyDataTable.Columns.Add("Last Year", GetType(System.Decimal))
' End If
' For index As Integer = 12 To 1 Step -1
' If IncludeLastYearSalesUltraCheckEditor.Checked Then
' SalesMonthlyDataTable.Rows.Add(New Object() {New DateTime(SalesMonthlyBalanceCollection(index).SummaryDate.Year, SalesMonthlyBalanceCollection(index).SummaryDate.Month, 1), SalesMonthlyBalanceCollection(index).Amount, SalesMonthlyBalanceCollection(index).LYAmount})
' Else
' SalesMonthlyDataTable.Rows.Add(New Object() {New DateTime(SalesMonthlyBalanceCollection(index).SummaryDate.Year, SalesMonthlyBalanceCollection(index).SummaryDate.Month, 1), SalesMonthlyBalanceCollection(index).Amount})
' End If
' Next
' ' Setup Chart
' Me.SalesTransactionUltraChart.Tooltips.Format = Infragistics.UltraChart.Shared.Styles.TooltipStyle.Custom
' Me.SalesTransactionUltraChart.Tooltips.FormatString = "$<DATA_VALUE:###,###,###,###>"
' ' Change Chart type to "composite"
' Me.SalesTransactionUltraChart.ChartType = ChartType.Composite
' ' Add a Chart Area
' Dim myChartArea As New ChartArea()
' myChartArea.Bounds = New Rectangle(0, 0, 100, 100)
' myChartArea.BoundsMeasureType = MeasureType.Percentage
' Me.SalesTransactionUltraChart.CompositeChart.ChartAreas.Add(myChartArea)
' ' Add the X Axis to the chart
' Dim axisX As New AxisItem()
' axisX.OrientationType = AxisNumber.X_Axis
' axisX.DataType = AxisDataType.Time
' axisX.Labels.ItemFormat = AxisItemLabelFormat.Custom
' axisX.Labels.ItemFormatString = "<ITEM_LABEL: MMM yy>"
' axisX.Labels.Layout.Behavior = AxisLabelLayoutBehaviors.UseCollection
' ' Add the Y Axis to the chart
' Dim axisY As New AxisItem()
' axisY.OrientationType = AxisNumber.Y_Axis
' axisY.DataType = AxisDataType.Numeric
' axisY.Labels.ItemFormatString = "$<DATA_VALUE:###,###,###,###>"
' myChartArea.Axes.Add(axisX)
' myChartArea.Axes.Add(axisY)
' ' Add the series data
' Dim series1 As New Infragistics.UltraChart.Resources.Appearance.NumericTimeSeries
' series1.Label = "This Year"
' series1.DataBind(SalesMonthlyDataTable, "Date", "This Year")
' Me.SalesTransactionUltraChart.CompositeChart.Series.Add(series1)
' Dim series2 As New Infragistics.UltraChart.Resources.Appearance.NumericTimeSeries
' If IncludeLastYearSalesUltraCheckEditor.Checked Then
' series2.Label = "Last Year"
' series2.DataBind(SalesMonthlyDataTable, "Date", "Last Year")
' Me.SalesTransactionUltraChart.CompositeChart.Series.Add(series2)
' End If
' ' Add a Chart Layer
' Dim ChartLayer As New ChartLayerAppearance()
' ChartLayer.ChartType = ChartType.BarChart
' ChartLayer.ChartArea = myChartArea
' ChartLayer.AxisX = axisX
' ChartLayer.AxisY = axisY
' ChartLayer.Series.Add(series1)
' If IncludeLastYearSalesUltraCheckEditor.Checked Then
' ChartLayer.Series.Add(series2)
' End If
' Me.SalesTransactionUltraChart.CompositeChart.ChartLayers.Add(ChartLayer)
' ' Add a Legend
' 'Dim myLegend As New CompositeLegend()
' 'myLegend.ChartLayers.Add(ChartLayer)
' 'myLegend.Bounds = New Rectangle(0, 10, 20, 25)
' 'myLegend.BoundsMeasureType = MeasureType.Percentage
' 'myLegend.PE.ElementType = PaintElementType.Gradient
' 'myLegend.PE.FillGradientStyle = GradientStyle.Circular
' 'myLegend.PE.Fill = Color.Cornsilk
' 'myLegend.PE.FillStopColor = Color.White
' 'myLegend.Border.CornerRadius = 10
' 'myLegend.Border.Thickness = 0
' 'Me.SalesTransactionUltraChart.CompositeChart.Legends.Add(myLegend)
' Me.SalesTransactionUltraChart.Legend.SpanPercentage = 10
' Me.SalesTransactionUltraChart.TitleTop.Text = "Sales younger than 12 months (Ex-GST)"
' If IncludeLastYearSalesUltraCheckEditor.Checked Then
' Me.SalesTransactionUltraChart.Legend.Visible = True
' Else
' Me.SalesTransactionUltraChart.Legend.Visible = False
' End If
'End Sub
Public Sub DrawSalesChart()
SalesMonthlyDataTable = New DataTable
SalesMonthlyDataTable.Columns.Add("Date", GetType(System.String))
SalesMonthlyDataTable.Columns.Add("This Year", GetType(System.Decimal))
If IncludeLastYearSalesUltraCheckEditor.Checked Then
SalesMonthlyDataTable.Columns.Add("Last Year", GetType(System.Decimal))
End If
For index As Integer = 12 To 1 Step -1
If IncludeLastYearSalesUltraCheckEditor.Checked Then
SalesMonthlyDataTable.Rows.Add(New Object() {SalesMonthlyBalanceCollection(index).SummaryDate.ToString("MMM yy"), SalesMonthlyBalanceCollection(index).Amount, SalesMonthlyBalanceCollection(index).LYAmount})
Else
SalesMonthlyDataTable.Rows.Add(New Object() {SalesMonthlyBalanceCollection(index).SummaryDate.ToString("MMM yy"), SalesMonthlyBalanceCollection(index).Amount})
End If
Next
Dim colours As Color() = Manager.ColourPalette_Primary
Me.SalesTransactionUltraChart.ColorModel.ModelStyle = ColorModels.CustomLinear
Me.SalesTransactionUltraChart.ColorModel.CustomPalette = colours
Me.SalesTransactionUltraChart.Tooltips.Format = Infragistics.UltraChart.Shared.Styles.TooltipStyle.Custom
Me.SalesTransactionUltraChart.Tooltips.FormatString = "$<DATA_VALUE:###,###,###,###>"
Me.SalesTransactionUltraChart.Data.DataSource = SalesMonthlyDataTable
Me.SalesTransactionUltraChart.Data.DataBind()
Me.SalesTransactionUltraChart.Axis.Y.Labels.ItemFormat = Infragistics.UltraChart.Shared.Styles.AxisItemLabelFormat.Custom
Me.SalesTransactionUltraChart.Axis.Y.Labels.ItemFormatString = "$<DATA_VALUE:###,###,###,###>"
Me.SalesTransactionUltraChart.Axis.Y.Extent = 55
Me.SalesTransactionUltraChart.ColumnChart.SeriesSpacing = 0
Me.SalesTransactionUltraChart.Axis.X.Labels.Visible = False
Me.SalesTransactionUltraChart.Axis.X.Labels.SeriesLabels.Visible = True
Me.SalesTransactionUltraChart.Axis.X.Labels.SeriesLabels.Orientation = Infragistics.UltraChart.Shared.Styles.TextOrientation.Horizontal
Me.SalesTransactionUltraChart.Axis.X.Extent = 10
Me.SalesTransactionUltraChart.Legend.SpanPercentage = 10
Me.SalesTransactionUltraChart.TitleTop.Text = "Sales younger than 12 months (Ex-GST)"
If IncludeLastYearSalesUltraCheckEditor.Checked Then
Me.SalesTransactionUltraChart.Legend.Visible = True
Else
Me.SalesTransactionUltraChart.Legend.Visible = False
End If
End Sub
Public Sub ReadMyCustomers()
If MyCustomersSQLReader IsNot Nothing Then
MyCustomersSQLReader.Close()
MyCustomersSQLReader = Nothing
End If
With Manager.Database
Using SQLCmd As SqlClient.SqlCommand = New SqlClient.SqlCommand("usp_JIWA_NavigationList_MyCustomers", .SQLConnection, .SQLTransaction)
SQLCmd.CommandType = CommandType.StoredProcedure
Dim staffSQLParameter As New SqlClient.SqlParameter("@HR_Staff_StaffID", SqlDbType.Char) With {.Value = Manager.Staff.RecID}
SQLCmd.Parameters.Add(staffSQLParameter)
Dim currentFinancialYearStart As Date
Manager.GeneralLedgerConfiguration.GetCurrentYearStartingDate(currentFinancialYearStart)
Dim financialYearStartDateSQLParameter As New SqlClient.SqlParameter("@SP_FinancialYearStartDate", SqlDbType.DateTime) With {.Value = currentFinancialYearStart}
SQLCmd.Parameters.Add(financialYearStartDateSQLParameter)
Dim dateSQLParameter As New SqlClient.SqlParameter("@SP_AsAtDate", SqlDbType.DateTime) With {.Value = Manager.SysDateTime}
SQLCmd.Parameters.Add(dateSQLParameter)
MyCustomersSQLReader = .ExecuteReader(SQLCmd)
End Using
End With
End Sub
Private Sub IncludeLastYearSalesUltraCheckEditor_CheckedChanged(sender As Object, e As EventArgs)
DrawSalesChart()
End Sub
Private Sub ShowAllStagesUltraCheckEditor_CheckedChanged(sender As Object, e As EventArgs)
DrawQuotesChart()
End Sub
Private Sub SalesTransactionUltraChart_ChartDataClicked(sender As Object, e As Infragistics.UltraChart.Shared.Events.ChartDataEventArgs)
' Turn the date string into a date (need to do this due to limitations on the chart not allowing time series data for barcharts)
Dim dateString As String = SalesMonthlyDataTable.Rows(e.DataRow).Item("Date")
Dim year As Integer = Integer.Parse(dateString.Substring(4)) + 2000
Dim month As Integer
Select Case dateString.Substring(0, 3).ToUpper
Case "JAN"
month = 1
Case "FEB"
month = 2
Case "MAR"
month = 3
Case "APR"
month = 4
Case "MAY"
month = 5
Case "JUN"
month = 6
Case "JUL"
month = 7
Case "AUG"
month = 8
Case "SEP"
month = 9
Case "OCT"
month = 10
Case "NOV"
month = 11
Case "DEC"
month = 12
End Select
Dim dateValue As Date = New DateTime(year, month, 1)
If e.ColumnLabel = "Last Year" Then
dateValue = dateValue.AddYears(-1)
End If
Dim NavigationList As JiwaApplication.NavigationListUI.NavigationList = Manager.FormFactory.CreateForm(Of JiwaApplication.NavigationListUI.NavigationList)(String.Format("Sales For Month {0}", dateValue.ToString("MMM yy")))
NavigationList.StoredProcName = "usp_JIWA_NavigationList_Dashboard_CRM_MyDebtorSales"
Dim newSQLParameter1 As New SqlClient.SqlParameter("@HR_Staff_StaffID", SqlDbType.Char) With {.Value = Manager.Staff.RecID}
NavigationList.SQLParameters.Add(newSQLParameter1)
Dim newSQLParameter2 As New SqlClient.SqlParameter("@IN_Logical_LogicalID", SqlDbType.Char) With {.Value = Manager.CurrentLogicalWarehouse.IN_LogicalID}
NavigationList.SQLParameters.Add(newSQLParameter2)
Dim newSQLParameter3 As New SqlClient.SqlParameter("@SP_AsAtDate", SqlDbType.DateTime) With {.Value = dateValue}
NavigationList.SQLParameters.Add(newSQLParameter3)
Dim debtorIDs As New DataTable
debtorIDs.Clear()
debtorIDs.Columns.Add("RecID")
' Add the selected debtors from the MyCustomersJiwaGrid (Note if none are selected, then the stored proc is smart enough to link in the debtors linked to the staff member)
Dim selectedCells As FarPoint.Win.Spread.Model.CellRange()
selectedCells = MyCustomersJiwaGrid.ActiveSheet.GetSelections()
For Each selectedCellRange As FarPoint.Win.Spread.Model.CellRange In selectedCells
Dim debtorRow As DataRow = debtorIDs.NewRow()
debtorRow("RecID") = MyCustomersJiwaGrid.GridText("DebtorID", selectedCellRange.Row)
debtorIDs.Rows.Add(debtorRow)
Next
Dim newSQLParameter4 As New SqlClient.SqlParameter("@DebtorList", SqlDbType.Structured)
newSQLParameter4.Value = debtorIDs
NavigationList.SQLParameters.Add(newSQLParameter4)
NavigationList.Start()
With NavigationList.JiwaGrid1
'Show the footer.
.ActiveSheet.ColumnFooter.Visible = True
.ActiveSheet.ColumnFooter.RowCount = 1
.ActiveSheet.ColumnFooter.Cells(0, 1).Text = "Total"
For Each column As FarPoint.Win.Spread.Column In .ActiveSheet.Columns
If TypeOf column.CellType Is JiwaFinancials.Jiwa.JiwaApplication.JiwaManageGrid.JiwaCurrencyCellType Then
.ActiveSheet.ColumnFooter.SetAggregationType(0, column.Index, FarPoint.Win.Spread.Model.AggregationType.Sum)
.ActiveSheet.ColumnFooter.Cells(0, column.Index).CellType = column.CellType
.ActiveSheet.ColumnFooter.Cells(0, column.Index).HorizontalAlignment = .ActiveSheet.Cells(0, column.Index).HorizontalAlignment
End If
Next
End With
End Sub
Private Sub QuotesFunnelUltraChart_ChartDataClicked(sender As Object, e As Infragistics.UltraChart.Shared.Events.ChartDataEventArgs)
Dim NavigationList As JiwaApplication.NavigationListUI.NavigationList = Manager.FormFactory.CreateForm(Of JiwaApplication.NavigationListUI.NavigationList)(String.Format("My Quotes ({0})", QuotesDataTable.Rows(e.DataRow).Item("Sales Stage")))
NavigationList.StoredProcName = "usp_JIWA_NavigationList_MyQuotes"
Dim newSQLParameter1 As New SqlClient.SqlParameter("@HR_Staff_StaffID", SqlDbType.Char) With {.Value = Manager.Staff.RecID}
NavigationList.SQLParameters.Add(newSQLParameter1)
Dim newSQLParameter2 As New SqlClient.SqlParameter("@QO_OpportunityStatusReasons_RecID", SqlDbType.Char) With {.Value = QuotesDataTable.Rows(e.DataRow).Item("RecID")}
NavigationList.SQLParameters.Add(newSQLParameter2)
NavigationList.Start()
With NavigationList.JiwaGrid1
' Show the footer.
.ActiveSheet.ColumnFooter.Visible = True
.ActiveSheet.ColumnFooter.RowCount = 1
.ActiveSheet.ColumnFooter.Cells(0, 1).Text = "Total"
For Each column As FarPoint.Win.Spread.Column In .ActiveSheet.Columns
If TypeOf column.CellType Is JiwaFinancials.Jiwa.JiwaApplication.JiwaManageGrid.JiwaCurrencyCellType Then
.ActiveSheet.ColumnFooter.SetAggregationType(0, column.Index, FarPoint.Win.Spread.Model.AggregationType.Sum)
.ActiveSheet.ColumnFooter.Cells(0, column.Index).CellType = column.CellType
.ActiveSheet.ColumnFooter.Cells(0, column.Index).HorizontalAlignment = .ActiveSheet.Cells(0, column.Index).HorizontalAlignment
End If
Next
End With
End Sub
Private Sub MyCustomersJiwaGrid_SelectionChanged(ByVal sender As Object, ByVal e As FarPoint.Win.Spread.SelectionChangedEventArgs)
salesBackgroundWorker.RunWorkerAsync()
End Sub
Public Sub PopulateToDosGrid()
_ToDoList.ReadAssignedToMe()
DisplayAssignedToMeToDoLines()
End Sub
Public Sub DisplayAssignedToMeToDoLines()
With ToDosAssignedToMeJiwaGrid
'Clear grid
If .ActiveSheet.RowCount > 0 Then
.ActiveSheet.RemoveRows(0, .ActiveSheet.RowCount)
End If
'Display each ToDo in the grid.
For Each exisitingToDo As JiwaApplication.JiwaToDos.Lister.ToDo In _ToDoList.ToDosAssignedToMe
.ActiveSheet.RowCount += 1
.GridText("Key", .ActiveSheet.RowCount - 1) = exisitingToDo.RecID
DisplayAssignedToMeToDoLine(exisitingToDo, .ActiveSheet.RowCount - 1)
.ActiveSheet.Rows(.ActiveSheet.RowCount - 1).Locked = True
Next exisitingToDo
End With
End Sub
Public Sub DisplayAssignedToMeToDoLine(ByVal ToDo As JiwaApplication.JiwaToDos.Lister.ToDo, Optional ByVal Row As Integer = -1)
With ToDosAssignedToMeJiwaGrid
If Row = -1 Then
Dim Key As String
For MyLoop As Integer = 0 To .ActiveSheet.RowCount - 1
Key = .GridText("Key", MyLoop)
If Key.Trim = ToDo.RecID.Trim Then
Row = MyLoop
Exit For
End If
Next
End If
If Row <> -1 Then
' copy col header tag into each cell tag.
For Each column As FarPoint.Win.Spread.Column In .ActiveSheet.Columns
.ActiveSheet.Cells(Row, column.Index).Tag = .ActiveSheet.ColumnHeader.Cells(1, column.Index).Tag
Next
.GridText("Key", Row) = ToDo.RecID
.GridText("ToDoNo", Row) = ToDo.ToDoNo
.SetDrillDown("ToDoNo", Row, "JiwaFinancials.Jiwa.JiwaApplication.JiwaToDosUI.MainForm", ToDo.RecID)
.GridText("Type", Row) = ToDo.ToDoType.Description
.GridText("Subject", Row) = ToDo.Subject
.GridText("DueDate", Row) = ToDo.DueDateTime.ToShortDateString
.GridText("DueTime", Row) = ToDo.DueDateTime.ToShortTimeString
.GridText("Status", Row) = ToDo.Status.Description
.GridText("Status", Row) = ToDo.Status.Name
.GridText("CompletePercentage", Row) = ToDo.CompletePercentage / 100
' set font for entire row
If ToDo.IsOverdue Then
.ActiveSheet.Rows(Row).ForeColor = System.Drawing.Color.Red
ElseIf ToDo.IsDueToday Then
.ActiveSheet.Rows(Row).ForeColor = System.Drawing.Color.Blue
Else
.ActiveSheet.Rows(Row).ForeColor = System.Drawing.Color.Black
End If
If ToDo.HasBeenRead = False Then
.ActiveSheet.Rows(Row).Font = New System.Drawing.Font(.Font.FontFamily.Name, .Font.Size, Drawing.FontStyle.Bold)
Else
.ActiveSheet.Rows(Row).Font = New System.Drawing.Font(.Font.FontFamily.Name, .Font.Size, Drawing.FontStyle.Regular)
End If
If ToDo.IsCompleted Then
.ActiveSheet.Rows(Row).Font = New System.Drawing.Font(.Font.FontFamily.Name, .Font.Size, Drawing.FontStyle.Strikeout)
.ActiveSheet.Rows(Row).ForeColor = System.Drawing.Color.Gray
End If
End If
End With
End Sub
End Class
Public Class QuoteSummary
Inherits JiwaApplication.JiwaCollectionItem(Of QuoteSummary)
Public Property SalesStage As String
Public Property Count As Decimal
Public Property PercentComplete As Decimal
Public Property Value As Decimal
Protected Overrides Sub iSave()
End Sub
End Class
Public Class MyCustomTooltip
Implements Infragistics.UltraChart.Resources.IRenderLabel
Public Sub New()
End Sub 'New
Public Overloads Function ToString(ByVal Context As System.Collections.Hashtable) As String Implements Infragistics.UltraChart.Resources.IRenderLabel.ToString
Dim dataValue As Double = System.Convert.ToDouble(Context("DATA_VALUE"))
Dim dataRow As Integer = System.Convert.ToInt32(Context("DATA_ROW"))
Dim QuotesDataTable As DataTable = Context("QuotesDataTable")
Dim quoteCount As Decimal = QuotesDataTable.Rows(dataRow).Item("Count")
Dim quoteValue As Decimal = QuotesDataTable.Rows(dataRow).Item("Value")
Return String.Format("{0} {1} ({2:C})", quoteCount, If(quoteCount > 1, "quotes", "quote"), quoteValue)
End Function
End Class
Public Class MyCustomLabel
Implements Infragistics.UltraChart.Resources.IRenderLabel
Public Sub New()
End Sub 'New
Public Overloads Function ToString(ByVal Context As System.Collections.Hashtable) As String Implements Infragistics.UltraChart.Resources.IRenderLabel.ToString
Dim dataValue As Double = System.Convert.ToDouble(Context("DATA_VALUE"))
Dim dataRow As Integer = System.Convert.ToInt32(Context("DATA_ROW"))
Dim QuotesDataTable As DataTable = Context("QuotesDataTable")
Dim quoteCount As Decimal = QuotesDataTable.Rows(dataRow).Item("Count")
Dim quoteValue As Decimal = QuotesDataTable.Rows(dataRow).Item("Value")
Dim quoteStage As String = QuotesDataTable.Rows(dataRow).Item("Sales Stage")
Return String.Format("{0}: {1} {2} ({3:C})", quoteStage, quoteCount, If(quoteCount > 1, "quotes", "quote"), quoteValue)
End Function
End Class
Public Class SalesSummary
Inherits JiwaApplication.JiwaCollectionItem(Of SalesSummary)
Public Property SummaryDate As Date
Public Property Amount As Decimal
Public Property LYAmount As Decimal
Protected Overrides Sub iSave()
End Sub
End Class
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class CRM
Inherits JiwaApplication.ProcessAction.UserInterface
'Form overrides dispose to clean up the component list.
<System.Diagnostics.DebuggerNonUserCode()> _
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
Try
If disposing AndAlso components IsNot Nothing Then
components.Dispose()
End If
Finally
MyBase.Dispose(disposing)
End Try
End Sub
'Required by the Windows Form Designer
Private components As System.ComponentModel.IContainer
'NOTE: The following procedure is required by the Windows Form Designer
'It can be modified using the Windows Form Designer.
'Do not modify it using the code editor.
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Dim EnhancedFocusIndicatorRenderer1 As FarPoint.Win.Spread.EnhancedFocusIndicatorRenderer = New FarPoint.Win.Spread.EnhancedFocusIndicatorRenderer()
Dim EnhancedScrollBarRenderer1 As FarPoint.Win.Spread.EnhancedScrollBarRenderer = New FarPoint.Win.Spread.EnhancedScrollBarRenderer()
Dim EnhancedScrollBarRenderer2 As FarPoint.Win.Spread.EnhancedScrollBarRenderer = New FarPoint.Win.Spread.EnhancedScrollBarRenderer()
Dim MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal As FarPoint.Win.Spread.InputMap
Dim EnhancedScrollBarRenderer3 As FarPoint.Win.Spread.EnhancedScrollBarRenderer = New FarPoint.Win.Spread.EnhancedScrollBarRenderer()
Dim EnhancedScrollBarRenderer4 As FarPoint.Win.Spread.EnhancedScrollBarRenderer = New FarPoint.Win.Spread.EnhancedScrollBarRenderer()
Dim ToDosAssignedToMeJiwaGrid_InputMapWhenAncestorOfFocusedNormal As FarPoint.Win.Spread.InputMap
Dim PaintElement1 As Infragistics.UltraChart.Resources.Appearance.PaintElement = New Infragistics.UltraChart.Resources.Appearance.PaintElement()
Dim GradientEffect1 As Infragistics.UltraChart.Resources.Appearance.GradientEffect = New Infragistics.UltraChart.Resources.Appearance.GradientEffect()
Dim Appearance1 As Infragistics.Win.Appearance = New Infragistics.Win.Appearance()
Dim Appearance2 As Infragistics.Win.Appearance = New Infragistics.Win.Appearance()
Dim Appearance3 As Infragistics.Win.Appearance = New Infragistics.Win.Appearance()
'Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(CRM))
Dim PaintElement2 As Infragistics.UltraChart.Resources.Appearance.PaintElement = New Infragistics.UltraChart.Resources.Appearance.PaintElement()
Dim GradientEffect2 As Infragistics.UltraChart.Resources.Appearance.GradientEffect = New Infragistics.UltraChart.Resources.Appearance.GradientEffect()
Me.UltraPanel1 = New Infragistics.Win.Misc.UltraPanel()
Me.UltraPanel12 = New Infragistics.Win.Misc.UltraPanel()
Me.MyCustomersDashboardPanel = New JiwaFinancials.Jiwa.JiwaDashboardUI.DashboardPanel()
Me.MyCustomersJiwaGrid = New JiwaFinancials.Jiwa.JiwaApplication.Controls.JiwaGrid()
Me.MyToDosDashboardPanel = New JiwaFinancials.Jiwa.JiwaDashboardUI.DashboardPanel()
Me.ToDosAssignedToMeJiwaGrid = New JiwaFinancials.Jiwa.JiwaApplication.Controls.JiwaGrid()
Me.SalesChartDashboardPanel = New JiwaFinancials.Jiwa.JiwaDashboardUI.DashboardPanel()
Me.IncludeLastYearSalesUltraCheckEditor = New Infragistics.Win.UltraWinEditors.UltraCheckEditor()
Me.SalesTransactionUltraChart = New Infragistics.Win.UltraWinChart.UltraChart()
Me.UltraPanel2 = New Infragistics.Win.Misc.UltraPanel()
Me.DateUltraLabel = New Infragistics.Win.Misc.UltraLabel()
Me.UserNameUltraLabel = New Infragistics.Win.Misc.UltraLabel()
Me.StaffPicture = New Infragistics.Win.UltraWinEditors.UltraPictureBox()
Me.DashboardPanelOpportunitiesFunnel = New JiwaFinancials.Jiwa.JiwaDashboardUI.DashboardPanel()
Me.ShowAllStagesUltraCheckEditor = New Infragistics.Win.UltraWinEditors.UltraCheckEditor()
Me.QuotesFunnelUltraChart = New Infragistics.Win.UltraWinChart.UltraChart()
Me.DashboardPanelQuotes = New JiwaFinancials.Jiwa.JiwaDashboardUI.DashboardPanel()
Me.IndicatorPanelDebtorInvoicesOverdue = New JiwaFinancials.Jiwa.JiwaDashboardUI.IndicatorPanel()
Me.IndicatorPanelSalesOrdersReadyToShip = New JiwaFinancials.Jiwa.JiwaDashboardUI.IndicatorPanel()
Me.IndicatorPanelSalesOrdersWithBackorders = New JiwaFinancials.Jiwa.JiwaDashboardUI.IndicatorPanel()
Me.IndicatorPanelSalesOrdersEnteredNotProcessed = New JiwaFinancials.Jiwa.JiwaDashboardUI.IndicatorPanel()
Me.IndicatorPanelSalesQuotesOpen = New JiwaFinancials.Jiwa.JiwaDashboardUI.IndicatorPanel()
Me.CRM_MyQuotesExpiringIn7Days = New JiwaFinancials.Jiwa.JiwaDashboardUI.IndicatorPanel()
Me.UltraFlowLayoutManager1 = New Infragistics.Win.Misc.UltraFlowLayoutManager(Me.components)
MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal = New FarPoint.Win.Spread.InputMap()
MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal.Parent = New FarPoint.Win.Spread.InputMap()
ToDosAssignedToMeJiwaGrid_InputMapWhenAncestorOfFocusedNormal = New FarPoint.Win.Spread.InputMap()
CType(Me.UltraToolbarsManager1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.UserInterface_Fill_Panel.ClientArea.SuspendLayout()
Me.UserInterface_Fill_Panel.SuspendLayout()
CType(Me.UltraStatusBar1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.InboxControlStyler1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.UltraPanel1.ClientArea.SuspendLayout()
Me.UltraPanel1.SuspendLayout()
Me.UltraPanel12.ClientArea.SuspendLayout()
Me.UltraPanel12.SuspendLayout()
Me.MyCustomersDashboardPanel.ControlArea.ClientArea.SuspendLayout()
Me.MyCustomersDashboardPanel.ControlArea.SuspendLayout()
Me.MyCustomersDashboardPanel.SuspendLayout()
CType(Me.MyCustomersJiwaGrid, System.ComponentModel.ISupportInitialize).BeginInit()
Me.MyToDosDashboardPanel.ControlArea.ClientArea.SuspendLayout()
Me.MyToDosDashboardPanel.ControlArea.SuspendLayout()
Me.MyToDosDashboardPanel.SuspendLayout()
CType(Me.ToDosAssignedToMeJiwaGrid, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SalesChartDashboardPanel.ControlArea.ClientArea.SuspendLayout()
Me.SalesChartDashboardPanel.ControlArea.SuspendLayout()
Me.SalesChartDashboardPanel.SuspendLayout()
CType(Me.IncludeLastYearSalesUltraCheckEditor, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.SalesTransactionUltraChart, System.ComponentModel.ISupportInitialize).BeginInit()
Me.UltraPanel2.ClientArea.SuspendLayout()
Me.UltraPanel2.SuspendLayout()
Me.DashboardPanelOpportunitiesFunnel.ControlArea.ClientArea.SuspendLayout()
Me.DashboardPanelOpportunitiesFunnel.ControlArea.SuspendLayout()
Me.DashboardPanelOpportunitiesFunnel.SuspendLayout()
CType(Me.ShowAllStagesUltraCheckEditor, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.QuotesFunnelUltraChart, System.ComponentModel.ISupportInitialize).BeginInit()
Me.DashboardPanelQuotes.ControlArea.ClientArea.SuspendLayout()
Me.DashboardPanelQuotes.ControlArea.SuspendLayout()
Me.DashboardPanelQuotes.SuspendLayout()
CType(Me.UltraFlowLayoutManager1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'_UserInterface_Toolbars_Dock_Area_Left
'
Me._UserInterface_Toolbars_Dock_Area_Left.InitialResizeAreaExtent = 4
Me._UserInterface_Toolbars_Dock_Area_Left.Size = New System.Drawing.Size(4, 748)
'
'_UserInterface_Toolbars_Dock_Area_Right
'
Me._UserInterface_Toolbars_Dock_Area_Right.Location = New System.Drawing.Point(1509, 147)
Me._UserInterface_Toolbars_Dock_Area_Right.Size = New System.Drawing.Size(4, 748)
'
'_UserInterface_Toolbars_Dock_Area_Top
'
Me._UserInterface_Toolbars_Dock_Area_Top.Size = New System.Drawing.Size(1513, 147)
'
'_UserInterface_Toolbars_Dock_Area_Bottom
'
Me._UserInterface_Toolbars_Dock_Area_Bottom.InitialResizeAreaExtent = 0
Me._UserInterface_Toolbars_Dock_Area_Bottom.Location = New System.Drawing.Point(0, 895)
Me._UserInterface_Toolbars_Dock_Area_Bottom.Size = New System.Drawing.Size(1513, 0)
'
'UltraToolbarsManager1
'
Me.UltraToolbarsManager1.MenuSettings.ForceSerialization = True
Me.UltraToolbarsManager1.Ribbon.FileMenuStyle = Infragistics.Win.UltraWinToolbars.FileMenuStyle.None
Me.UltraToolbarsManager1.Ribbon.QuickAccessToolbar.Visible = False
Me.UltraToolbarsManager1.Ribbon.Visible = True
Me.UltraToolbarsManager1.ToolbarSettings.ForceSerialization = True
'
'UserInterface_Fill_Panel
'
'
'UserInterface_Fill_Panel.ClientArea
'
Me.UserInterface_Fill_Panel.ClientArea.Controls.Add(Me.UltraPanel1)
Me.UserInterface_Fill_Panel.Location = New System.Drawing.Point(4, 147)
Me.UserInterface_Fill_Panel.Size = New System.Drawing.Size(1505, 748)
'
'UltraStatusBar1
'
Me.UltraStatusBar1.Location = New System.Drawing.Point(0, 895)
Me.UltraStatusBar1.Size = New System.Drawing.Size(1513, 23)
'
'UltraPanel1
'
'
'UltraPanel1.ClientArea
'
Me.UltraPanel1.ClientArea.Controls.Add(Me.UltraPanel12)
Me.UltraPanel1.Dock = System.Windows.Forms.DockStyle.Fill
Me.UltraPanel1.Location = New System.Drawing.Point(0, 0)
Me.UltraPanel1.Name = "UltraPanel1"
Me.UltraPanel1.Size = New System.Drawing.Size(1505, 748)
Me.UltraPanel1.TabIndex = 0
'
'UltraPanel12
'
'
'UltraPanel12.ClientArea
'
Me.UltraPanel12.ClientArea.Controls.Add(Me.MyCustomersDashboardPanel)
Me.UltraPanel12.ClientArea.Controls.Add(Me.MyToDosDashboardPanel)
Me.UltraPanel12.ClientArea.Controls.Add(Me.SalesChartDashboardPanel)
Me.UltraPanel12.ClientArea.Controls.Add(Me.UltraPanel2)
Me.UltraPanel12.ClientArea.Controls.Add(Me.DashboardPanelOpportunitiesFunnel)
Me.UltraPanel12.ClientArea.Controls.Add(Me.DashboardPanelQuotes)
Me.UltraPanel12.Dock = System.Windows.Forms.DockStyle.Fill
Me.UltraPanel12.Location = New System.Drawing.Point(0, 0)
Me.UltraPanel12.Name = "UltraPanel12"
Me.UltraPanel12.Size = New System.Drawing.Size(1505, 748)
Me.UltraPanel12.TabIndex = 3
'
'MyCustomersDashboardPanel
'
'
'MyCustomersDashboardPanel.ControlArea
'
Me.MyCustomersDashboardPanel.ControlArea.BorderStyle = Infragistics.Win.UIElementBorderStyle.Solid
'
'MyCustomersDashboardPanel.ControlArea.ClientArea
'
Me.MyCustomersDashboardPanel.ControlArea.ClientArea.Controls.Add(Me.MyCustomersJiwaGrid)
Me.MyCustomersDashboardPanel.ControlArea.Dock = System.Windows.Forms.DockStyle.Fill
Me.MyCustomersDashboardPanel.ControlArea.Location = New System.Drawing.Point(0, 23)
Me.MyCustomersDashboardPanel.ControlArea.Name = "ControlArea"
Me.MyCustomersDashboardPanel.ControlArea.Size = New System.Drawing.Size(514, 377)
Me.MyCustomersDashboardPanel.ControlArea.TabIndex = 2
Me.MyCustomersDashboardPanel.ControlAreaPanel = Me.MyCustomersDashboardPanel.ControlArea
Me.MyCustomersDashboardPanel.Location = New System.Drawing.Point(983, 109)
Me.MyCustomersDashboardPanel.Name = "MyCustomersDashboardPanel"
Me.MyCustomersDashboardPanel.Size = New System.Drawing.Size(514, 400)
Me.MyCustomersDashboardPanel.TabIndex = 89
Me.MyCustomersDashboardPanel.Title = "My Customers"
'
'MyCustomersJiwaGrid
'
Me.MyCustomersJiwaGrid.AccessibleDescription = ""
Me.MyCustomersJiwaGrid.AllowColumnMove = True
Me.MyCustomersJiwaGrid.AllowColumnMoveMultiple = True
Me.MyCustomersJiwaGrid.AllowSorting = True
Me.MyCustomersJiwaGrid.ButtonDrawMode = FarPoint.Win.Spread.ButtonDrawModes.CurrentRow
Me.MyCustomersJiwaGrid.ClipboardOptions = FarPoint.Win.Spread.ClipboardOptions.ColumnHeaders
Me.MyCustomersJiwaGrid.EditModePermanent = True
Me.MyCustomersJiwaGrid.EditModeReplace = True
Me.MyCustomersJiwaGrid.FocusRenderer = EnhancedFocusIndicatorRenderer1
Me.MyCustomersJiwaGrid.HorizontalScrollBar.Buttons = New FarPoint.Win.Spread.FpScrollBarButtonCollection("BackwardLineButton,ThumbTrack,ForwardLineButton")
Me.MyCustomersJiwaGrid.HorizontalScrollBar.Name = ""
Me.MyCustomersJiwaGrid.HorizontalScrollBar.Renderer = EnhancedScrollBarRenderer1
Me.MyCustomersJiwaGrid.HorizontalScrollBar.TabIndex = 2
Me.MyCustomersJiwaGrid.HorizontalScrollBarPolicy = FarPoint.Win.Spread.ScrollBarPolicy.AsNeeded
Me.MyCustomersJiwaGrid.InputMapWhenAncestorOfFocusedNormal = Nothing
Me.MyCustomersJiwaGrid.Location = New System.Drawing.Point(2, 8)
Me.MyCustomersJiwaGrid.Name = "MyCustomersJiwaGrid"
Me.MyCustomersJiwaGrid.RetainSelectionBlock = False
Me.MyCustomersJiwaGrid.ScrollBarTrackPolicy = FarPoint.Win.Spread.ScrollBarTrackPolicy.Both
Me.MyCustomersJiwaGrid.selectedCellRanges = Nothing
Me.MyCustomersJiwaGrid.ShowCellErrors = True
Me.MyCustomersJiwaGrid.ShowingTotals = False
Me.MyCustomersJiwaGrid.Size = New System.Drawing.Size(508, 356)
Me.MyCustomersJiwaGrid.Skin = FarPoint.Win.Spread.DefaultSpreadSkins.Office2007
Me.MyCustomersJiwaGrid.SourceCollection = Nothing
Me.InboxControlStyler1.SetStyleSettings(Me.MyCustomersJiwaGrid, New Infragistics.Win.AppStyling.Runtime.InboxControlStyleSettings(Infragistics.Win.DefaultableBoolean.[Default]))
Me.MyCustomersJiwaGrid.TabIndex = 0
Me.MyCustomersJiwaGrid.TypeCurrencyDecimalPlaces = New Decimal(New Integer() {2, 0, 0, 0})
Me.MyCustomersJiwaGrid.VerticalScrollBar.Buttons = New FarPoint.Win.Spread.FpScrollBarButtonCollection("BackwardLineButton,ThumbTrack,ForwardLineButton")
Me.MyCustomersJiwaGrid.VerticalScrollBar.Name = ""
Me.MyCustomersJiwaGrid.VerticalScrollBar.Renderer = EnhancedScrollBarRenderer2
Me.MyCustomersJiwaGrid.VerticalScrollBar.TabIndex = 3
Me.MyCustomersJiwaGrid.VerticalScrollBarPolicy = FarPoint.Win.Spread.ScrollBarPolicy.AsNeeded
MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal.Put(New FarPoint.Win.Spread.Keystroke(System.Windows.Forms.Keys.Delete, System.Windows.Forms.Keys.None), "DeleteKey")
MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal.Parent.Put(New FarPoint.Win.Spread.Keystroke(System.Windows.Forms.Keys.Up, System.Windows.Forms.Keys.None), FarPoint.Win.Spread.SpreadActions.MoveToPreviousRow)
MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal.Parent.Put(New FarPoint.Win.Spread.Keystroke(System.Windows.Forms.Keys.Down, System.Windows.Forms.Keys.None), FarPoint.Win.Spread.SpreadActions.MoveToNextRow)
MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal.Parent.Put(New FarPoint.Win.Spread.Keystroke(System.Windows.Forms.Keys.Left, System.Windows.Forms.Keys.None), FarPoint.Win.Spread.SpreadActions.MoveToPreviousColumnVisual)
MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal.Parent.Put(New FarPoint.Win.Spread.Keystroke(System.Windows.Forms.Keys.Right, System.Windows.Forms.Keys.None), FarPoint.Win.Spread.SpreadActions.MoveToNextColumnVisual)
MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal.Parent.Put(New FarPoint.Win.Spread.Keystroke(System.Windows.Forms.Keys.Up, CType((System.Windows.Forms.Keys.Shift Or System.Windows.Forms.Keys.None), System.Windows.Forms.Keys)), FarPoint.Win.Spread.SpreadActions.ExtendToPreviousRow)
MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal.Parent.Put(New FarPoint.Win.Spread.Keystroke(System.Windows.Forms.Keys.Down, CType((System.Windows.Forms.Keys.Shift Or System.Windows.Forms.Keys.None), System.Windows.Forms.Keys)), FarPoint.Win.Spread.SpreadActions.ExtendToNextRow)
MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal.Parent.Put(New FarPoint.Win.Spread.Keystroke(System.Windows.Forms.Keys.Left, CType((System.Windows.Forms.Keys.Shift Or System.Windows.Forms.Keys.None), System.Windows.Forms.Keys)), FarPoint.Win.Spread.SpreadActions.ExtendToPreviousColumnVisual)
MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal.Parent.Put(New FarPoint.Win.Spread.Keystroke(System.Windows.Forms.Keys.Right, CType((System.Windows.Forms.Keys.Shift Or System.Windows.Forms.Keys.None), System.Windows.Forms.Keys)), FarPoint.Win.Spread.SpreadActions.ExtendToNextColumnVisual)
MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal.Parent.Put(New FarPoint.Win.Spread.Keystroke(System.Windows.Forms.Keys.Up, CType((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.None), System.Windows.Forms.Keys)), FarPoint.Win.Spread.SpreadActions.MoveToPreviousRow)
MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal.Parent.Put(New FarPoint.Win.Spread.Keystroke(System.Windows.Forms.Keys.Down, CType((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.None), System.Windows.Forms.Keys)), FarPoint.Win.Spread.SpreadActions.MoveToNextRow)
MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal.Parent.Put(New FarPoint.Win.Spread.Keystroke(System.Windows.Forms.Keys.Left, CType((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.None), System.Windows.Forms.Keys)), FarPoint.Win.Spread.SpreadActions.MoveToPreviousColumnVisual)
MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal.Parent.Put(New FarPoint.Win.Spread.Keystroke(System.Windows.Forms.Keys.Right, CType((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.None), System.Windows.Forms.Keys)), FarPoint.Win.Spread.SpreadActions.MoveToNextColumnVisual)
MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal.Parent.Put(New FarPoint.Win.Spread.Keystroke(System.Windows.Forms.Keys.Up, CType(((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.Shift) _
Or System.Windows.Forms.Keys.None), System.Windows.Forms.Keys)), FarPoint.Win.Spread.SpreadActions.ExtendToPreviousRow)
MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal.Parent.Put(New FarPoint.Win.Spread.Keystroke(System.Windows.Forms.Keys.Down, CType(((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.Shift) _
Or System.Windows.Forms.Keys.None), System.Windows.Forms.Keys)), FarPoint.Win.Spread.SpreadActions.ExtendToNextRow)
MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal.Parent.Put(New FarPoint.Win.Spread.Keystroke(System.Windows.Forms.Keys.Left, CType(((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.Shift) _
Or System.Windows.Forms.Keys.None), System.Windows.Forms.Keys)), FarPoint.Win.Spread.SpreadActions.ExtendToPreviousColumnVisual)
MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal.Parent.Put(New FarPoint.Win.Spread.Keystroke(System.Windows.Forms.Keys.Right, CType(((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.Shift) _
Or System.Windows.Forms.Keys.None), System.Windows.Forms.Keys)), FarPoint.Win.Spread.SpreadActions.ExtendToNextColumnVisual)
MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal.Parent.Put(New FarPoint.Win.Spread.Keystroke(System.Windows.Forms.Keys.PageUp, System.Windows.Forms.Keys.None), FarPoint.Win.Spread.SpreadActions.MoveToPreviousPageOfRows)
MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal.Parent.Put(New FarPoint.Win.Spread.Keystroke(System.Windows.Forms.Keys.[Next], System.Windows.Forms.Keys.None), FarPoint.Win.Spread.SpreadActions.MoveToNextPageOfRows)
MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal.Parent.Put(New FarPoint.Win.Spread.Keystroke(System.Windows.Forms.Keys.PageUp, CType((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.None), System.Windows.Forms.Keys)), FarPoint.Win.Spread.SpreadActions.MoveToPreviousPageOfColumns)
MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal.Parent.Put(New FarPoint.Win.Spread.Keystroke(System.Windows.Forms.Keys.[Next], CType((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.None), System.Windows.Forms.Keys)), FarPoint.Win.Spread.SpreadActions.MoveToNextPageOfColumns)
MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal.Parent.Put(New FarPoint.Win.Spread.Keystroke(System.Windows.Forms.Keys.PageUp, CType((System.Windows.Forms.Keys.Shift Or System.Windows.Forms.Keys.None), System.Windows.Forms.Keys)), FarPoint.Win.Spread.SpreadActions.ExtendToPreviousPageOfRows)
MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal.Parent.Put(New FarPoint.Win.Spread.Keystroke(System.Windows.Forms.Keys.[Next], CType((System.Windows.Forms.Keys.Shift Or System.Windows.Forms.Keys.None), System.Windows.Forms.Keys)), FarPoint.Win.Spread.SpreadActions.ExtendToNextPageOfRows)
MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal.Parent.Put(New FarPoint.Win.Spread.Keystroke(System.Windows.Forms.Keys.PageUp, CType(((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.Shift) _
Or System.Windows.Forms.Keys.None), System.Windows.Forms.Keys)), FarPoint.Win.Spread.SpreadActions.ExtendToPreviousPageOfColumns)
MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal.Parent.Put(New FarPoint.Win.Spread.Keystroke(System.Windows.Forms.Keys.[Next], CType(((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.Shift) _
Or System.Windows.Forms.Keys.None), System.Windows.Forms.Keys)), FarPoint.Win.Spread.SpreadActions.ExtendToNextPageOfColumns)
MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal.Parent.Put(New FarPoint.Win.Spread.Keystroke(System.Windows.Forms.Keys.Home, System.Windows.Forms.Keys.None), FarPoint.Win.Spread.SpreadActions.MoveToFirstColumn)
MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal.Parent.Put(New FarPoint.Win.Spread.Keystroke(System.Windows.Forms.Keys.[End], System.Windows.Forms.Keys.None), FarPoint.Win.Spread.SpreadActions.MoveToLastColumn)
MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal.Parent.Put(New FarPoint.Win.Spread.Keystroke(System.Windows.Forms.Keys.Home, CType((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.None), System.Windows.Forms.Keys)), FarPoint.Win.Spread.SpreadActions.MoveToFirstCell)
MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal.Parent.Put(New FarPoint.Win.Spread.Keystroke(System.Windows.Forms.Keys.[End], CType((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.None), System.Windows.Forms.Keys)), FarPoint.Win.Spread.SpreadActions.MoveToLastCell)
MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal.Parent.Put(New FarPoint.Win.Spread.Keystroke(System.Windows.Forms.Keys.Home, CType((System.Windows.Forms.Keys.Shift Or System.Windows.Forms.Keys.None), System.Windows.Forms.Keys)), FarPoint.Win.Spread.SpreadActions.ExtendToFirstColumn)
MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal.Parent.Put(New FarPoint.Win.Spread.Keystroke(System.Windows.Forms.Keys.[End], CType((System.Windows.Forms.Keys.Shift Or System.Windows.Forms.Keys.None), System.Windows.Forms.Keys)), FarPoint.Win.Spread.SpreadActions.ExtendToLastColumn)
MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal.Parent.Put(New FarPoint.Win.Spread.Keystroke(System.Windows.Forms.Keys.Home, CType(((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.Shift) _
Or System.Windows.Forms.Keys.None), System.Windows.Forms.Keys)), FarPoint.Win.Spread.SpreadActions.ExtendToFirstCell)
MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal.Parent.Put(New FarPoint.Win.Spread.Keystroke(System.Windows.Forms.Keys.[End], CType(((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.Shift) _
Or System.Windows.Forms.Keys.None), System.Windows.Forms.Keys)), FarPoint.Win.Spread.SpreadActions.ExtendToLastCell)
MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal.Parent.Put(New FarPoint.Win.Spread.Keystroke(System.Windows.Forms.Keys.Space, CType((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.None), System.Windows.Forms.Keys)), FarPoint.Win.Spread.SpreadActions.SelectColumn)
MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal.Parent.Put(New FarPoint.Win.Spread.Keystroke(System.Windows.Forms.Keys.Space, CType(((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.Shift) _
Or System.Windows.Forms.Keys.None), System.Windows.Forms.Keys)), FarPoint.Win.Spread.SpreadActions.SelectSheet)
MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal.Parent.Put(New FarPoint.Win.Spread.Keystroke(System.Windows.Forms.Keys.Escape, System.Windows.Forms.Keys.None), FarPoint.Win.Spread.SpreadActions.CancelEditing)
MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal.Parent.Put(New FarPoint.Win.Spread.Keystroke(System.Windows.Forms.Keys.[Return], System.Windows.Forms.Keys.None), FarPoint.Win.Spread.SpreadActions.StopEditing)
MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal.Parent.Put(New FarPoint.Win.Spread.Keystroke(System.Windows.Forms.Keys.Tab, System.Windows.Forms.Keys.None), FarPoint.Win.Spread.SpreadActions.MoveToNextColumnWrap)
MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal.Parent.Put(New FarPoint.Win.Spread.Keystroke(System.Windows.Forms.Keys.Tab, CType((System.Windows.Forms.Keys.Shift Or System.Windows.Forms.Keys.None), System.Windows.Forms.Keys)), FarPoint.Win.Spread.SpreadActions.MoveToPreviousColumnWrap)
MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal.Parent.Put(New FarPoint.Win.Spread.Keystroke(System.Windows.Forms.Keys.F2, System.Windows.Forms.Keys.None), FarPoint.Win.Spread.SpreadActions.ClearCell)
MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal.Parent.Put(New FarPoint.Win.Spread.Keystroke(System.Windows.Forms.Keys.F3, System.Windows.Forms.Keys.None), FarPoint.Win.Spread.SpreadActions.DateTimeNow)
MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal.Parent.Put(New FarPoint.Win.Spread.Keystroke(System.Windows.Forms.Keys.F4, System.Windows.Forms.Keys.None), FarPoint.Win.Spread.SpreadActions.ShowSubEditor)
MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal.Parent.Put(New FarPoint.Win.Spread.Keystroke(System.Windows.Forms.Keys.Down, CType((System.Windows.Forms.Keys.Alt Or System.Windows.Forms.Keys.None), System.Windows.Forms.Keys)), FarPoint.Win.Spread.SpreadActions.ComboShowList)
MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal.Parent.Put(New FarPoint.Win.Spread.Keystroke(System.Windows.Forms.Keys.Up, CType((System.Windows.Forms.Keys.Alt Or System.Windows.Forms.Keys.None), System.Windows.Forms.Keys)), FarPoint.Win.Spread.SpreadActions.ComboShowList)
Me.MyCustomersJiwaGrid.SetInputMap(FarPoint.Win.Spread.InputMapMode.WhenAncestorOfFocused, FarPoint.Win.Spread.OperationMode.Normal, MyCustomersJiwaGrid_InputMapWhenAncestorOfFocusedNormal)
'
'MyToDosDashboardPanel
'
'
'MyToDosDashboardPanel.ControlArea
'
Me.MyToDosDashboardPanel.ControlArea.BorderStyle = Infragistics.Win.UIElementBorderStyle.Solid
'
'MyToDosDashboardPanel.ControlArea.ClientArea
'
Me.MyToDosDashboardPanel.ControlArea.ClientArea.Controls.Add(Me.ToDosAssignedToMeJiwaGrid)
Me.MyToDosDashboardPanel.ControlArea.Dock = System.Windows.Forms.DockStyle.Fill
Me.MyToDosDashboardPanel.ControlArea.Location = New System.Drawing.Point(0, 23)
Me.MyToDosDashboardPanel.ControlArea.Name = "ControlArea"
Me.MyToDosDashboardPanel.ControlArea.Size = New System.Drawing.Size(514, 206)
Me.MyToDosDashboardPanel.ControlArea.TabIndex = 2
Me.MyToDosDashboardPanel.ControlAreaPanel = Me.MyToDosDashboardPanel.ControlArea
Me.MyToDosDashboardPanel.Location = New System.Drawing.Point(983, 515)
Me.MyToDosDashboardPanel.Name = "MyToDosDashboardPanel"
Me.MyToDosDashboardPanel.Size = New System.Drawing.Size(514, 229)
Me.MyToDosDashboardPanel.TabIndex = 88
Me.MyToDosDashboardPanel.Title = "My To-Do's"
'
'ToDosAssignedToMeJiwaGrid
'
Me.ToDosAssignedToMeJiwaGrid.AccessibleDescription = ""
Me.ToDosAssignedToMeJiwaGrid.AllowColumnMove = True
Me.ToDosAssignedToMeJiwaGrid.AllowColumnMoveMultiple = True
Me.ToDosAssignedToMeJiwaGrid.AllowSorting = True
Me.ToDosAssignedToMeJiwaGrid.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
Me.ToDosAssignedToMeJiwaGrid.ButtonDrawMode = FarPoint.Win.Spread.ButtonDrawModes.CurrentRow
Me.ToDosAssignedToMeJiwaGrid.ClipboardOptions = FarPoint.Win.Spread.ClipboardOptions.ColumnHeaders
Me.ToDosAssignedToMeJiwaGrid.EditModePermanent = True
Me.ToDosAssignedToMeJiwaGrid.EditModeReplace = True
Me.ToDosAssignedToMeJiwaGrid.FocusRenderer = EnhancedFocusIndicatorRenderer1
Me.ToDosAssignedToMeJiwaGrid.HorizontalScrollBar.Buttons = New FarPoint.Win.Spread.FpScrollBarButtonCollection("BackwardLineButton,ThumbTrack,ForwardLineButton")
Me.ToDosAssignedToMeJiwaGrid.HorizontalScrollBar.Name = ""
Me.ToDosAssignedToMeJiwaGrid.HorizontalScrollBar.Renderer = EnhancedScrollBarRenderer3
Me.ToDosAssignedToMeJiwaGrid.HorizontalScrollBar.TabIndex = 2
Me.ToDosAssignedToMeJiwaGrid.HorizontalScrollBarPolicy = FarPoint.Win.Spread.ScrollBarPolicy.AsNeeded
Me.ToDosAssignedToMeJiwaGrid.InputMapWhenAncestorOfFocusedNormal = Nothing
Me.ToDosAssignedToMeJiwaGrid.Location = New System.Drawing.Point(2, 5)
Me.ToDosAssignedToMeJiwaGrid.Name = "ToDosAssignedToMeJiwaGrid"
Me.ToDosAssignedToMeJiwaGrid.RetainSelectionBlock = False
Me.ToDosAssignedToMeJiwaGrid.ScrollBarTrackPolicy = FarPoint.Win.Spread.ScrollBarTrackPolicy.Both
Me.ToDosAssignedToMeJiwaGrid.selectedCellRanges = Nothing
Me.ToDosAssignedToMeJiwaGrid.ShowCellErrors = True
Me.ToDosAssignedToMeJiwaGrid.ShowingTotals = False
Me.ToDosAssignedToMeJiwaGrid.Size = New System.Drawing.Size(508, 195)
Me.ToDosAssignedToMeJiwaGrid.Skin = FarPoint.Win.Spread.DefaultSpreadSkins.Office2007
Me.ToDosAssignedToMeJiwaGrid.SourceCollection = Nothing
Me.InboxControlStyler1.SetStyleSettings(Me.ToDosAssignedToMeJiwaGrid, New Infragistics.Win.AppStyling.Runtime.InboxControlStyleSettings(Infragistics.Win.DefaultableBoolean.[Default]))
Me.ToDosAssignedToMeJiwaGrid.TabIndex = 36
Me.ToDosAssignedToMeJiwaGrid.TypeCurrencyDecimalPlaces = New Decimal(New Integer() {2, 0, 0, 0})
Me.ToDosAssignedToMeJiwaGrid.VerticalScrollBar.Buttons = New FarPoint.Win.Spread.FpScrollBarButtonCollection("BackwardLineButton,ThumbTrack,ForwardLineButton")
Me.ToDosAssignedToMeJiwaGrid.VerticalScrollBar.Name = ""
Me.ToDosAssignedToMeJiwaGrid.VerticalScrollBar.Renderer = EnhancedScrollBarRenderer4
Me.ToDosAssignedToMeJiwaGrid.VerticalScrollBar.TabIndex = 3
Me.ToDosAssignedToMeJiwaGrid.VerticalScrollBarPolicy = FarPoint.Win.Spread.ScrollBarPolicy.AsNeeded
ToDosAssignedToMeJiwaGrid_InputMapWhenAncestorOfFocusedNormal.Put(New FarPoint.Win.Spread.Keystroke(System.Windows.Forms.Keys.Delete, System.Windows.Forms.Keys.None), "DeleteKey")
Me.ToDosAssignedToMeJiwaGrid.SetInputMap(FarPoint.Win.Spread.InputMapMode.WhenAncestorOfFocused, FarPoint.Win.Spread.OperationMode.Normal, ToDosAssignedToMeJiwaGrid_InputMapWhenAncestorOfFocusedNormal)
'
'SalesChartDashboardPanel
'
'
'SalesChartDashboardPanel.ControlArea
'
Me.SalesChartDashboardPanel.ControlArea.BorderStyle = Infragistics.Win.UIElementBorderStyle.Solid
'
'SalesChartDashboardPanel.ControlArea.ClientArea
'
Me.SalesChartDashboardPanel.ControlArea.ClientArea.Controls.Add(Me.IncludeLastYearSalesUltraCheckEditor)
Me.SalesChartDashboardPanel.ControlArea.ClientArea.Controls.Add(Me.SalesTransactionUltraChart)
Me.SalesChartDashboardPanel.ControlArea.Dock = System.Windows.Forms.DockStyle.Fill
Me.SalesChartDashboardPanel.ControlArea.Location = New System.Drawing.Point(0, 23)
Me.SalesChartDashboardPanel.ControlArea.Name = "ControlArea"
Me.SalesChartDashboardPanel.ControlArea.Size = New System.Drawing.Size(967, 206)
Me.SalesChartDashboardPanel.ControlArea.TabIndex = 2
Me.SalesChartDashboardPanel.ControlAreaPanel = Me.SalesChartDashboardPanel.ControlArea
Me.SalesChartDashboardPanel.Location = New System.Drawing.Point(10, 515)
Me.SalesChartDashboardPanel.Name = "SalesChartDashboardPanel"
Me.SalesChartDashboardPanel.Size = New System.Drawing.Size(967, 229)
Me.SalesChartDashboardPanel.TabIndex = 87
Me.SalesChartDashboardPanel.Title = "Sales History (Last 12 Months)"
'
'IncludeLastYearSalesUltraCheckEditor
'
Me.IncludeLastYearSalesUltraCheckEditor.Location = New System.Drawing.Point(2, 5)
Me.IncludeLastYearSalesUltraCheckEditor.Name = "IncludeLastYearSalesUltraCheckEditor"
Me.IncludeLastYearSalesUltraCheckEditor.Size = New System.Drawing.Size(192, 20)
Me.IncludeLastYearSalesUltraCheckEditor.TabIndex = 36
Me.IncludeLastYearSalesUltraCheckEditor.Text = "Include Last Year"
'
'SalesTransactionUltraChart
'
Me.SalesTransactionUltraChart.Axis.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(248, Byte), Integer), CType(CType(220, Byte), Integer))
PaintElement1.ElementType = Infragistics.UltraChart.[Shared].Styles.PaintElementType.None
PaintElement1.Fill = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(248, Byte), Integer), CType(CType(220, Byte), Integer))
Me.SalesTransactionUltraChart.Axis.PE = PaintElement1
Me.SalesTransactionUltraChart.Axis.X.Labels.Font = New System.Drawing.Font("Verdana", 7.0!)
Me.SalesTransactionUltraChart.Axis.X.Labels.FontColor = System.Drawing.Color.DimGray
Me.SalesTransactionUltraChart.Axis.X.Labels.HorizontalAlign = System.Drawing.StringAlignment.Near
Me.SalesTransactionUltraChart.Axis.X.Labels.ItemFormatString = "<ITEM_LABEL>"
Me.SalesTransactionUltraChart.Axis.X.Labels.Layout.Behavior = Infragistics.UltraChart.[Shared].Styles.AxisLabelLayoutBehaviors.[Auto]
Me.SalesTransactionUltraChart.Axis.X.Labels.Orientation = Infragistics.UltraChart.[Shared].Styles.TextOrientation.VerticalLeftFacing
Me.SalesTransactionUltraChart.Axis.X.Labels.SeriesLabels.Font = New System.Drawing.Font("Verdana", 7.0!)
Me.SalesTransactionUltraChart.Axis.X.Labels.SeriesLabels.FontColor = System.Drawing.Color.DimGray
Me.SalesTransactionUltraChart.Axis.X.Labels.SeriesLabels.HorizontalAlign = System.Drawing.StringAlignment.Center
Me.SalesTransactionUltraChart.Axis.X.Labels.SeriesLabels.Layout.Behavior = Infragistics.UltraChart.[Shared].Styles.AxisLabelLayoutBehaviors.[Auto]
Me.SalesTransactionUltraChart.Axis.X.Labels.SeriesLabels.Orientation = Infragistics.UltraChart.[Shared].Styles.TextOrientation.Horizontal
Me.SalesTransactionUltraChart.Axis.X.Labels.SeriesLabels.VerticalAlign = System.Drawing.StringAlignment.Center
Me.SalesTransactionUltraChart.Axis.X.Labels.VerticalAlign = System.Drawing.StringAlignment.Center
Me.SalesTransactionUltraChart.Axis.X.LineThickness = 1
Me.SalesTransactionUltraChart.Axis.X.MajorGridLines.AlphaLevel = CType(255, Byte)
Me.SalesTransactionUltraChart.Axis.X.MajorGridLines.Color = System.Drawing.Color.Gainsboro
Me.SalesTransactionUltraChart.Axis.X.MajorGridLines.DrawStyle = Infragistics.UltraChart.[Shared].Styles.LineDrawStyle.Dot
Me.SalesTransactionUltraChart.Axis.X.MajorGridLines.Visible = True
Me.SalesTransactionUltraChart.Axis.X.MinorGridLines.AlphaLevel = CType(255, Byte)
Me.SalesTransactionUltraChart.Axis.X.MinorGridLines.Color = System.Drawing.Color.LightGray
Me.SalesTransactionUltraChart.Axis.X.MinorGridLines.DrawStyle = Infragistics.UltraChart.[Shared].Styles.LineDrawStyle.Dot
Me.SalesTransactionUltraChart.Axis.X.MinorGridLines.Visible = False
Me.SalesTransactionUltraChart.Axis.X.TickmarkStyle = Infragistics.UltraChart.[Shared].Styles.AxisTickStyle.Smart
Me.SalesTransactionUltraChart.Axis.X.Visible = True
Me.SalesTransactionUltraChart.Axis.X2.Labels.Font = New System.Drawing.Font("Verdana", 7.0!)
Me.SalesTransactionUltraChart.Axis.X2.Labels.FontColor = System.Drawing.Color.Gray
Me.SalesTransactionUltraChart.Axis.X2.Labels.HorizontalAlign = System.Drawing.StringAlignment.Far
Me.SalesTransactionUltraChart.Axis.X2.Labels.ItemFormatString = "<ITEM_LABEL>"
Me.SalesTransactionUltraChart.Axis.X2.Labels.Layout.Behavior = Infragistics.UltraChart.[Shared].Styles.AxisLabelLayoutBehaviors.[Auto]
Me.SalesTransactionUltraChart.Axis.X2.Labels.Orientation = Infragistics.UltraChart.[Shared].Styles.TextOrientation.VerticalLeftFacing
Me.SalesTransactionUltraChart.Axis.X2.Labels.SeriesLabels.Font = New System.Drawing.Font("Verdana", 7.0!)
Me.SalesTransactionUltraChart.Axis.X2.Labels.SeriesLabels.FontColor = System.Drawing.Color.Gray
Me.SalesTransactionUltraChart.Axis.X2.Labels.SeriesLabels.HorizontalAlign = System.Drawing.StringAlignment.Center
Me.SalesTransactionUltraChart.Axis.X2.Labels.SeriesLabels.Layout.Behavior = Infragistics.UltraChart.[Shared].Styles.AxisLabelLayoutBehaviors.[Auto]
Me.SalesTransactionUltraChart.Axis.X2.Labels.SeriesLabels.Orientation = Infragistics.UltraChart.[Shared].Styles.TextOrientation.Horizontal
Me.SalesTransactionUltraChart.Axis.X2.Labels.SeriesLabels.VerticalAlign = System.Drawing.StringAlignment.Center
Me.SalesTransactionUltraChart.Axis.X2.Labels.VerticalAlign = System.Drawing.StringAlignment.Center
Me.SalesTransactionUltraChart.Axis.X2.Labels.Visible = False
Me.SalesTransactionUltraChart.Axis.X2.LineThickness = 1
Me.SalesTransactionUltraChart.Axis.X2.MajorGridLines.AlphaLevel = CType(255, Byte)
Me.SalesTransactionUltraChart.Axis.X2.MajorGridLines.Color = System.Drawing.Color.Gainsboro
Me.SalesTransactionUltraChart.Axis.X2.MajorGridLines.DrawStyle = Infragistics.UltraChart.[Shared].Styles.LineDrawStyle.Dot
Me.SalesTransactionUltraChart.Axis.X2.MajorGridLines.Visible = True
Me.SalesTransactionUltraChart.Axis.X2.MinorGridLines.AlphaLevel = CType(255, Byte)
Me.SalesTransactionUltraChart.Axis.X2.MinorGridLines.Color = System.Drawing.Color.LightGray
Me.SalesTransactionUltraChart.Axis.X2.MinorGridLines.DrawStyle = Infragistics.UltraChart.[Shared].Styles.LineDrawStyle.Dot
Me.SalesTransactionUltraChart.Axis.X2.MinorGridLines.Visible = False
Me.SalesTransactionUltraChart.Axis.X2.TickmarkStyle = Infragistics.UltraChart.[Shared].Styles.AxisTickStyle.Smart
Me.SalesTransactionUltraChart.Axis.X2.Visible = False
Me.SalesTransactionUltraChart.Axis.Y.Labels.Font = New System.Drawing.Font("Verdana", 7.0!)
Me.SalesTransactionUltraChart.Axis.Y.Labels.FontColor = System.Drawing.Color.DimGray
Me.SalesTransactionUltraChart.Axis.Y.Labels.HorizontalAlign = System.Drawing.StringAlignment.Far
Me.SalesTransactionUltraChart.Axis.Y.Labels.ItemFormatString = "<DATA_VALUE:00.##>"
Me.SalesTransactionUltraChart.Axis.Y.Labels.Layout.Behavior = Infragistics.UltraChart.[Shared].Styles.AxisLabelLayoutBehaviors.[Auto]
Me.SalesTransactionUltraChart.Axis.Y.Labels.Orientation = Infragistics.UltraChart.[Shared].Styles.TextOrientation.Horizontal
Me.SalesTransactionUltraChart.Axis.Y.Labels.SeriesLabels.Font = New System.Drawing.Font("Verdana", 7.0!)
Me.SalesTransactionUltraChart.Axis.Y.Labels.SeriesLabels.FontColor = System.Drawing.Color.DimGray
Me.SalesTransactionUltraChart.Axis.Y.Labels.SeriesLabels.FormatString = ""
Me.SalesTransactionUltraChart.Axis.Y.Labels.SeriesLabels.HorizontalAlign = System.Drawing.StringAlignment.Far
Me.SalesTransactionUltraChart.Axis.Y.Labels.SeriesLabels.Layout.Behavior = Infragistics.UltraChart.[Shared].Styles.AxisLabelLayoutBehaviors.[Auto]
Me.SalesTransactionUltraChart.Axis.Y.Labels.SeriesLabels.Orientation = Infragistics.UltraChart.[Shared].Styles.TextOrientation.VerticalLeftFacing
Me.SalesTransactionUltraChart.Axis.Y.Labels.SeriesLabels.VerticalAlign = System.Drawing.StringAlignment.Center
Me.SalesTransactionUltraChart.Axis.Y.Labels.VerticalAlign = System.Drawing.StringAlignment.Center
Me.SalesTransactionUltraChart.Axis.Y.LineThickness = 1
Me.SalesTransactionUltraChart.Axis.Y.MajorGridLines.AlphaLevel = CType(255, Byte)
Me.SalesTransactionUltraChart.Axis.Y.MajorGridLines.Color = System.Drawing.Color.Gainsboro
Me.SalesTransactionUltraChart.Axis.Y.MajorGridLines.DrawStyle = Infragistics.UltraChart.[Shared].Styles.LineDrawStyle.Dot
Me.SalesTransactionUltraChart.Axis.Y.MajorGridLines.Visible = True
Me.SalesTransactionUltraChart.Axis.Y.MinorGridLines.AlphaLevel = CType(255, Byte)
Me.SalesTransactionUltraChart.Axis.Y.MinorGridLines.Color = System.Drawing.Color.LightGray
Me.SalesTransactionUltraChart.Axis.Y.MinorGridLines.DrawStyle = Infragistics.UltraChart.[Shared].Styles.LineDrawStyle.Dot
Me.SalesTransactionUltraChart.Axis.Y.MinorGridLines.Visible = False
Me.SalesTransactionUltraChart.Axis.Y.TickmarkInterval = 100.0R
Me.SalesTransactionUltraChart.Axis.Y.TickmarkStyle = Infragistics.UltraChart.[Shared].Styles.AxisTickStyle.Smart
Me.SalesTransactionUltraChart.Axis.Y.Visible = True
Me.SalesTransactionUltraChart.Axis.Y2.Labels.Font = New System.Drawing.Font("Verdana", 7.0!)
Me.SalesTransactionUltraChart.Axis.Y2.Labels.FontColor = System.Drawing.Color.Gray
Me.SalesTransactionUltraChart.Axis.Y2.Labels.HorizontalAlign = System.Drawing.StringAlignment.Near
Me.SalesTransactionUltraChart.Axis.Y2.Labels.ItemFormatString = "<DATA_VALUE:00.##>"
Me.SalesTransactionUltraChart.Axis.Y2.Labels.Layout.Behavior = Infragistics.UltraChart.[Shared].Styles.AxisLabelLayoutBehaviors.[Auto]
Me.SalesTransactionUltraChart.Axis.Y2.Labels.Orientation = Infragistics.UltraChart.[Shared].Styles.TextOrientation.Horizontal
Me.SalesTransactionUltraChart.Axis.Y2.Labels.SeriesLabels.Font = New System.Drawing.Font("Verdana", 7.0!)
Me.SalesTransactionUltraChart.Axis.Y2.Labels.SeriesLabels.FontColor = System.Drawing.Color.Gray
Me.SalesTransactionUltraChart.Axis.Y2.Labels.SeriesLabels.FormatString = ""
Me.SalesTransactionUltraChart.Axis.Y2.Labels.SeriesLabels.HorizontalAlign = System.Drawing.StringAlignment.Near
Me.SalesTransactionUltraChart.Axis.Y2.Labels.SeriesLabels.Layout.Behavior = Infragistics.UltraChart.[Shared].Styles.AxisLabelLayoutBehaviors.[Auto]
Me.SalesTransactionUltraChart.Axis.Y2.Labels.SeriesLabels.Orientation = Infragistics.UltraChart.[Shared].Styles.TextOrientation.VerticalLeftFacing
Me.SalesTransactionUltraChart.Axis.Y2.Labels.SeriesLabels.VerticalAlign = System.Drawing.StringAlignment.Center
Me.SalesTransactionUltraChart.Axis.Y2.Labels.VerticalAlign = System.Drawing.StringAlignment.Center
Me.SalesTransactionUltraChart.Axis.Y2.Labels.Visible = False
Me.SalesTransactionUltraChart.Axis.Y2.LineThickness = 1
Me.SalesTransactionUltraChart.Axis.Y2.MajorGridLines.AlphaLevel = CType(255, Byte)
Me.SalesTransactionUltraChart.Axis.Y2.MajorGridLines.Color = System.Drawing.Color.Gainsboro
Me.SalesTransactionUltraChart.Axis.Y2.MajorGridLines.DrawStyle = Infragistics.UltraChart.[Shared].Styles.LineDrawStyle.Dot
Me.SalesTransactionUltraChart.Axis.Y2.MajorGridLines.Visible = True
Me.SalesTransactionUltraChart.Axis.Y2.MinorGridLines.AlphaLevel = CType(255, Byte)
Me.SalesTransactionUltraChart.Axis.Y2.MinorGridLines.Color = System.Drawing.Color.LightGray
Me.SalesTransactionUltraChart.Axis.Y2.MinorGridLines.DrawStyle = Infragistics.UltraChart.[Shared].Styles.LineDrawStyle.Dot
Me.SalesTransactionUltraChart.Axis.Y2.MinorGridLines.Visible = False
Me.SalesTransactionUltraChart.Axis.Y2.TickmarkInterval = 100.0R
Me.SalesTransactionUltraChart.Axis.Y2.TickmarkStyle = Infragistics.UltraChart.[Shared].Styles.AxisTickStyle.Smart
Me.SalesTransactionUltraChart.Axis.Y2.Visible = False
Me.SalesTransactionUltraChart.Axis.Z.Labels.Font = New System.Drawing.Font("Verdana", 7.0!)
Me.SalesTransactionUltraChart.Axis.Z.Labels.FontColor = System.Drawing.Color.DimGray
Me.SalesTransactionUltraChart.Axis.Z.Labels.HorizontalAlign = System.Drawing.StringAlignment.Near
Me.SalesTransactionUltraChart.Axis.Z.Labels.ItemFormatString = "<ITEM_LABEL>"
Me.SalesTransactionUltraChart.Axis.Z.Labels.Layout.Behavior = Infragistics.UltraChart.[Shared].Styles.AxisLabelLayoutBehaviors.[Auto]
Me.SalesTransactionUltraChart.Axis.Z.Labels.Orientation = Infragistics.UltraChart.[Shared].Styles.TextOrientation.Horizontal
Me.SalesTransactionUltraChart.Axis.Z.Labels.SeriesLabels.Font = New System.Drawing.Font("Verdana", 7.0!)
Me.SalesTransactionUltraChart.Axis.Z.Labels.SeriesLabels.FontColor = System.Drawing.Color.DimGray
Me.SalesTransactionUltraChart.Axis.Z.Labels.SeriesLabels.HorizontalAlign = System.Drawing.StringAlignment.Near
Me.SalesTransactionUltraChart.Axis.Z.Labels.SeriesLabels.Layout.Behavior = Infragistics.UltraChart.[Shared].Styles.AxisLabelLayoutBehaviors.[Auto]
Me.SalesTransactionUltraChart.Axis.Z.Labels.SeriesLabels.Orientation = Infragistics.UltraChart.[Shared].Styles.TextOrientation.Horizontal
Me.SalesTransactionUltraChart.Axis.Z.Labels.SeriesLabels.VerticalAlign = System.Drawing.StringAlignment.Center
Me.SalesTransactionUltraChart.Axis.Z.Labels.VerticalAlign = System.Drawing.StringAlignment.Center
Me.SalesTransactionUltraChart.Axis.Z.Labels.Visible = False
Me.SalesTransactionUltraChart.Axis.Z.LineThickness = 1
Me.SalesTransactionUltraChart.Axis.Z.MajorGridLines.AlphaLevel = CType(255, Byte)
Me.SalesTransactionUltraChart.Axis.Z.MajorGridLines.Color = System.Drawing.Color.Gainsboro
Me.SalesTransactionUltraChart.Axis.Z.MajorGridLines.DrawStyle = Infragistics.UltraChart.[Shared].Styles.LineDrawStyle.Dot
Me.SalesTransactionUltraChart.Axis.Z.MajorGridLines.Visible = True
Me.SalesTransactionUltraChart.Axis.Z.MinorGridLines.AlphaLevel = CType(255, Byte)
Me.SalesTransactionUltraChart.Axis.Z.MinorGridLines.Color = System.Drawing.Color.LightGray
Me.SalesTransactionUltraChart.Axis.Z.MinorGridLines.DrawStyle = Infragistics.UltraChart.[Shared].Styles.LineDrawStyle.Dot
Me.SalesTransactionUltraChart.Axis.Z.MinorGridLines.Visible = False
Me.SalesTransactionUltraChart.Axis.Z.TickmarkStyle = Infragistics.UltraChart.[Shared].Styles.AxisTickStyle.Smart
Me.SalesTransactionUltraChart.Axis.Z.Visible = False
Me.SalesTransactionUltraChart.Axis.Z2.Labels.Font = New System.Drawing.Font("Verdana", 7.0!)
Me.SalesTransactionUltraChart.Axis.Z2.Labels.FontColor = System.Drawing.Color.Gray
Me.SalesTransactionUltraChart.Axis.Z2.Labels.HorizontalAlign = System.Drawing.StringAlignment.Near
Me.SalesTransactionUltraChart.Axis.Z2.Labels.ItemFormatString = "<ITEM_LABEL>"
Me.SalesTransactionUltraChart.Axis.Z2.Labels.Layout.Behavior = Infragistics.UltraChart.[Shared].Styles.AxisLabelLayoutBehaviors.[Auto]
Me.SalesTransactionUltraChart.Axis.Z2.Labels.Orientation = Infragistics.UltraChart.[Shared].Styles.TextOrientation.Horizontal
Me.SalesTransactionUltraChart.Axis.Z2.Labels.SeriesLabels.Font = New System.Drawing.Font("Verdana", 7.0!)
Me.SalesTransactionUltraChart.Axis.Z2.Labels.SeriesLabels.FontColor = System.Drawing.Color.Gray
Me.SalesTransactionUltraChart.Axis.Z2.Labels.SeriesLabels.HorizontalAlign = System.Drawing.StringAlignment.Near
Me.SalesTransactionUltraChart.Axis.Z2.Labels.SeriesLabels.Layout.Behavior = Infragistics.UltraChart.[Shared].Styles.AxisLabelLayoutBehaviors.[Auto]
Me.SalesTransactionUltraChart.Axis.Z2.Labels.SeriesLabels.Orientation = Infragistics.UltraChart.[Shared].Styles.TextOrientation.Horizontal
Me.SalesTransactionUltraChart.Axis.Z2.Labels.SeriesLabels.VerticalAlign = System.Drawing.StringAlignment.Center
Me.SalesTransactionUltraChart.Axis.Z2.Labels.VerticalAlign = System.Drawing.StringAlignment.Center
Me.SalesTransactionUltraChart.Axis.Z2.Labels.Visible = False
Me.SalesTransactionUltraChart.Axis.Z2.LineThickness = 1
Me.SalesTransactionUltraChart.Axis.Z2.MajorGridLines.AlphaLevel = CType(255, Byte)
Me.SalesTransactionUltraChart.Axis.Z2.MajorGridLines.Color = System.Drawing.Color.Gainsboro
Me.SalesTransactionUltraChart.Axis.Z2.MajorGridLines.DrawStyle = Infragistics.UltraChart.[Shared].Styles.LineDrawStyle.Dot
Me.SalesTransactionUltraChart.Axis.Z2.MajorGridLines.Visible = True
Me.SalesTransactionUltraChart.Axis.Z2.MinorGridLines.AlphaLevel = CType(255, Byte)
Me.SalesTransactionUltraChart.Axis.Z2.MinorGridLines.Color = System.Drawing.Color.LightGray
Me.SalesTransactionUltraChart.Axis.Z2.MinorGridLines.DrawStyle = Infragistics.UltraChart.[Shared].Styles.LineDrawStyle.Dot
Me.SalesTransactionUltraChart.Axis.Z2.MinorGridLines.Visible = False
Me.SalesTransactionUltraChart.Axis.Z2.TickmarkStyle = Infragistics.UltraChart.[Shared].Styles.AxisTickStyle.Smart
Me.SalesTransactionUltraChart.Axis.Z2.Visible = False
Me.SalesTransactionUltraChart.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center
Me.SalesTransactionUltraChart.ColorModel.AlphaLevel = CType(150, Byte)
Me.SalesTransactionUltraChart.ColorModel.ColorBegin = System.Drawing.Color.Pink
Me.SalesTransactionUltraChart.ColorModel.ColorEnd = System.Drawing.Color.DarkRed
Me.SalesTransactionUltraChart.ColorModel.ModelStyle = Infragistics.UltraChart.[Shared].Styles.ColorModels.CustomLinear
Me.SalesTransactionUltraChart.Effects.Effects.Add(GradientEffect1)
Me.SalesTransactionUltraChart.Location = New System.Drawing.Point(2, 29)
Me.SalesTransactionUltraChart.Name = "SalesTransactionUltraChart"
Me.SalesTransactionUltraChart.Size = New System.Drawing.Size(961, 171)
Me.SalesTransactionUltraChart.TabIndex = 35
Me.SalesTransactionUltraChart.Tooltips.HighlightFillColor = System.Drawing.Color.DimGray
Me.SalesTransactionUltraChart.Tooltips.HighlightOutlineColor = System.Drawing.Color.DarkGray
'
'UltraPanel2
'
'
'UltraPanel2.ClientArea
'
Me.UltraPanel2.ClientArea.Controls.Add(Me.DateUltraLabel)
Me.UltraPanel2.ClientArea.Controls.Add(Me.UserNameUltraLabel)
Me.UltraPanel2.ClientArea.Controls.Add(Me.StaffPicture)
Me.UltraPanel2.Location = New System.Drawing.Point(10, 6)
Me.UltraPanel2.Name = "UltraPanel2"
Me.UltraPanel2.Size = New System.Drawing.Size(584, 97)
Me.UltraPanel2.TabIndex = 86
'
'DateUltraLabel
'
Appearance1.BackColor = System.Drawing.Color.Transparent
Me.DateUltraLabel.Appearance = Appearance1
Me.DateUltraLabel.Font = New System.Drawing.Font("Segoe UI", 15.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.DateUltraLabel.Location = New System.Drawing.Point(107, 35)
Me.DateUltraLabel.Name = "DateUltraLabel"
Me.DateUltraLabel.Size = New System.Drawing.Size(480, 34)
Me.DateUltraLabel.TabIndex = 88
Me.DateUltraLabel.Text = "As At 25 June 2015"
'
'UserNameUltraLabel
'
Appearance2.BackColor = System.Drawing.Color.Transparent
Me.UserNameUltraLabel.Appearance = Appearance2
Me.UserNameUltraLabel.Font = New System.Drawing.Font("Segoe UI", 15.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.UserNameUltraLabel.Location = New System.Drawing.Point(107, 3)
Me.UserNameUltraLabel.Name = "UserNameUltraLabel"
Me.UserNameUltraLabel.Size = New System.Drawing.Size(480, 42)
Me.UserNameUltraLabel.TabIndex = 87
Me.UserNameUltraLabel.Text = "CRM Dashboard For Mr John Smith"
'
'StaffPicture
'
Appearance3.BackColor = System.Drawing.Color.Transparent
Appearance3.BackColor2 = System.Drawing.Color.Transparent
Appearance3.BackColorAlpha = Infragistics.Win.Alpha.Transparent
Me.StaffPicture.Appearance = Appearance3
Me.StaffPicture.BorderShadowColor = System.Drawing.Color.Empty
Me.StaffPicture.BorderStyle = Infragistics.Win.UIElementBorderStyle.Solid
' Me.StaffPicture.DefaultImage = CType(resources.GetObject("StaffPicture.DefaultImage"), System.Drawing.Image)
' Me.StaffPicture.Image = CType(resources.GetObject("StaffPicture.Image"), Object)
Me.StaffPicture.ImageTransparentColor = System.Drawing.Color.White
Me.StaffPicture.Location = New System.Drawing.Point(3, 3)
Me.StaffPicture.Name = "StaffPicture"
Me.StaffPicture.Size = New System.Drawing.Size(98, 94)
Me.StaffPicture.TabIndex = 86
'
'DashboardPanelOpportunitiesFunnel
'
'
'DashboardPanelOpportunitiesFunnel.ControlArea
'
Me.DashboardPanelOpportunitiesFunnel.ControlArea.BorderStyle = Infragistics.Win.UIElementBorderStyle.Solid
'
'DashboardPanelOpportunitiesFunnel.ControlArea.ClientArea
'
Me.DashboardPanelOpportunitiesFunnel.ControlArea.ClientArea.Controls.Add(Me.ShowAllStagesUltraCheckEditor)
Me.DashboardPanelOpportunitiesFunnel.ControlArea.ClientArea.Controls.Add(Me.QuotesFunnelUltraChart)
Me.InboxControlStyler1.SetStyleSettings(Me.DashboardPanelOpportunitiesFunnel.ControlArea.ClientArea, New Infragistics.Win.AppStyling.Runtime.InboxControlStyleSettings(Infragistics.Win.DefaultableBoolean.[Default]))
Me.DashboardPanelOpportunitiesFunnel.ControlArea.Dock = System.Windows.Forms.DockStyle.Fill
Me.DashboardPanelOpportunitiesFunnel.ControlArea.Location = New System.Drawing.Point(0, 23)
Me.DashboardPanelOpportunitiesFunnel.ControlArea.Name = "ControlArea"
Me.DashboardPanelOpportunitiesFunnel.ControlArea.Size = New System.Drawing.Size(698, 377)
Me.DashboardPanelOpportunitiesFunnel.ControlArea.TabIndex = 2
Me.DashboardPanelOpportunitiesFunnel.ControlAreaPanel = Me.DashboardPanelOpportunitiesFunnel.ControlArea
Me.DashboardPanelOpportunitiesFunnel.Location = New System.Drawing.Point(279, 109)
Me.DashboardPanelOpportunitiesFunnel.Name = "DashboardPanelOpportunitiesFunnel"
Me.DashboardPanelOpportunitiesFunnel.Size = New System.Drawing.Size(698, 400)
Me.DashboardPanelOpportunitiesFunnel.TabIndex = 42
Me.DashboardPanelOpportunitiesFunnel.Title = "Opportunities Funnel"
'
'ShowAllStagesUltraCheckEditor
'
Me.ShowAllStagesUltraCheckEditor.Location = New System.Drawing.Point(2, 8)
Me.ShowAllStagesUltraCheckEditor.Name = "ShowAllStagesUltraCheckEditor"
Me.ShowAllStagesUltraCheckEditor.Size = New System.Drawing.Size(192, 20)
Me.ShowAllStagesUltraCheckEditor.TabIndex = 37
Me.ShowAllStagesUltraCheckEditor.Text = "Show All Sales Stages"
'
' 'UltraChart' properties's serialization: Since 'ChartType' changes the way axes look,
' 'ChartType' must be persisted ahead of any Axes change made in design time.
'
Me.QuotesFunnelUltraChart.ChartType = Infragistics.UltraChart.[Shared].Styles.ChartType.FunnelChart
'
'QuotesFunnelUltraChart
'
Me.QuotesFunnelUltraChart.Axis.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(248, Byte), Integer), CType(CType(220, Byte), Integer))
PaintElement2.ElementType = Infragistics.UltraChart.[Shared].Styles.PaintElementType.None
PaintElement2.Fill = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(248, Byte), Integer), CType(CType(220, Byte), Integer))
Me.QuotesFunnelUltraChart.Axis.PE = PaintElement2
Me.QuotesFunnelUltraChart.Axis.X.Labels.Font = New System.Drawing.Font("Verdana", 7.0!)
Me.QuotesFunnelUltraChart.Axis.X.Labels.FontColor = System.Drawing.Color.DimGray
Me.QuotesFunnelUltraChart.Axis.X.Labels.HorizontalAlign = System.Drawing.StringAlignment.Near
Me.QuotesFunnelUltraChart.Axis.X.Labels.ItemFormatString = "<ITEM_LABEL>"
Me.QuotesFunnelUltraChart.Axis.X.Labels.Layout.Behavior = Infragistics.UltraChart.[Shared].Styles.AxisLabelLayoutBehaviors.[Auto]
Me.QuotesFunnelUltraChart.Axis.X.Labels.Orientation = Infragistics.UltraChart.[Shared].Styles.TextOrientation.VerticalLeftFacing
Me.QuotesFunnelUltraChart.Axis.X.Labels.SeriesLabels.Font = New System.Drawing.Font("Verdana", 7.0!)
Me.QuotesFunnelUltraChart.Axis.X.Labels.SeriesLabels.FontColor = System.Drawing.Color.DimGray
Me.QuotesFunnelUltraChart.Axis.X.Labels.SeriesLabels.FormatString = ""
Me.QuotesFunnelUltraChart.Axis.X.Labels.SeriesLabels.HorizontalAlign = System.Drawing.StringAlignment.Near
Me.QuotesFunnelUltraChart.Axis.X.Labels.SeriesLabels.Layout.Behavior = Infragistics.UltraChart.[Shared].Styles.AxisLabelLayoutBehaviors.[Auto]
Me.QuotesFunnelUltraChart.Axis.X.Labels.SeriesLabels.Orientation = Infragistics.UltraChart.[Shared].Styles.TextOrientation.VerticalLeftFacing
Me.QuotesFunnelUltraChart.Axis.X.Labels.SeriesLabels.VerticalAlign = System.Drawing.StringAlignment.Center
Me.QuotesFunnelUltraChart.Axis.X.Labels.VerticalAlign = System.Drawing.StringAlignment.Center
Me.QuotesFunnelUltraChart.Axis.X.LineThickness = 1
Me.QuotesFunnelUltraChart.Axis.X.MajorGridLines.AlphaLevel = CType(255, Byte)
Me.QuotesFunnelUltraChart.Axis.X.MajorGridLines.Color = System.Drawing.Color.Gainsboro
Me.QuotesFunnelUltraChart.Axis.X.MajorGridLines.DrawStyle = Infragistics.UltraChart.[Shared].Styles.LineDrawStyle.Dot
Me.QuotesFunnelUltraChart.Axis.X.MajorGridLines.Visible = True
Me.QuotesFunnelUltraChart.Axis.X.MinorGridLines.AlphaLevel = CType(255, Byte)
Me.QuotesFunnelUltraChart.Axis.X.MinorGridLines.Color = System.Drawing.Color.LightGray
Me.QuotesFunnelUltraChart.Axis.X.MinorGridLines.DrawStyle = Infragistics.UltraChart.[Shared].Styles.LineDrawStyle.Dot
Me.QuotesFunnelUltraChart.Axis.X.MinorGridLines.Visible = False
Me.QuotesFunnelUltraChart.Axis.X.TickmarkStyle = Infragistics.UltraChart.[Shared].Styles.AxisTickStyle.Smart
Me.QuotesFunnelUltraChart.Axis.X.Visible = True
Me.QuotesFunnelUltraChart.Axis.X2.Labels.Font = New System.Drawing.Font("Verdana", 7.0!)
Me.QuotesFunnelUltraChart.Axis.X2.Labels.FontColor = System.Drawing.Color.Gray
Me.QuotesFunnelUltraChart.Axis.X2.Labels.HorizontalAlign = System.Drawing.StringAlignment.Far
Me.QuotesFunnelUltraChart.Axis.X2.Labels.ItemFormatString = ""
Me.QuotesFunnelUltraChart.Axis.X2.Labels.Layout.Behavior = Infragistics.UltraChart.[Shared].Styles.AxisLabelLayoutBehaviors.[Auto]
Me.QuotesFunnelUltraChart.Axis.X2.Labels.Orientation = Infragistics.UltraChart.[Shared].Styles.TextOrientation.VerticalLeftFacing
Me.QuotesFunnelUltraChart.Axis.X2.Labels.SeriesLabels.Font = New System.Drawing.Font("Verdana", 7.0!)
Me.QuotesFunnelUltraChart.Axis.X2.Labels.SeriesLabels.FontColor = System.Drawing.Color.Gray
Me.QuotesFunnelUltraChart.Axis.X2.Labels.SeriesLabels.FormatString = ""
Me.QuotesFunnelUltraChart.Axis.X2.Labels.SeriesLabels.HorizontalAlign = System.Drawing.StringAlignment.Far
Me.QuotesFunnelUltraChart.Axis.X2.Labels.SeriesLabels.Layout.Behavior = Infragistics.UltraChart.[Shared].Styles.AxisLabelLayoutBehaviors.[Auto]
Me.QuotesFunnelUltraChart.Axis.X2.Labels.SeriesLabels.Orientation = Infragistics.UltraChart.[Shared].Styles.TextOrientation.VerticalLeftFacing
Me.QuotesFunnelUltraChart.Axis.X2.Labels.SeriesLabels.VerticalAlign = System.Drawing.StringAlignment.Center
Me.QuotesFunnelUltraChart.Axis.X2.Labels.VerticalAlign = System.Drawing.StringAlignment.Center
Me.QuotesFunnelUltraChart.Axis.X2.Labels.Visible = False
Me.QuotesFunnelUltraChart.Axis.X2.LineThickness = 1
Me.QuotesFunnelUltraChart.Axis.X2.MajorGridLines.AlphaLevel = CType(255, Byte)
Me.QuotesFunnelUltraChart.Axis.X2.MajorGridLines.Color = System.Drawing.Color.Gainsboro
Me.QuotesFunnelUltraChart.Axis.X2.MajorGridLines.DrawStyle = Infragistics.UltraChart.[Shared].Styles.LineDrawStyle.Dot
Me.QuotesFunnelUltraChart.Axis.X2.MajorGridLines.Visible = True
Me.QuotesFunnelUltraChart.Axis.X2.MinorGridLines.AlphaLevel = CType(255, Byte)
Me.QuotesFunnelUltraChart.Axis.X2.MinorGridLines.Color = System.Drawing.Color.LightGray
Me.QuotesFunnelUltraChart.Axis.X2.MinorGridLines.DrawStyle = Infragistics.UltraChart.[Shared].Styles.LineDrawStyle.Dot
Me.QuotesFunnelUltraChart.Axis.X2.MinorGridLines.Visible = False
Me.QuotesFunnelUltraChart.Axis.X2.TickmarkStyle = Infragistics.UltraChart.[Shared].Styles.AxisTickStyle.Smart
Me.QuotesFunnelUltraChart.Axis.X2.Visible = False
Me.QuotesFunnelUltraChart.Axis.Y.Labels.Font = New System.Drawing.Font("Verdana", 7.0!)
Me.QuotesFunnelUltraChart.Axis.Y.Labels.FontColor = System.Drawing.Color.DimGray
Me.QuotesFunnelUltraChart.Axis.Y.Labels.HorizontalAlign = System.Drawing.StringAlignment.Far
Me.QuotesFunnelUltraChart.Axis.Y.Labels.ItemFormatString = "<DATA_VALUE:00.##>"
Me.QuotesFunnelUltraChart.Axis.Y.Labels.Layout.Behavior = Infragistics.UltraChart.[Shared].Styles.AxisLabelLayoutBehaviors.[Auto]
Me.QuotesFunnelUltraChart.Axis.Y.Labels.Orientation = Infragistics.UltraChart.[Shared].Styles.TextOrientation.Horizontal
Me.QuotesFunnelUltraChart.Axis.Y.Labels.SeriesLabels.Font = New System.Drawing.Font("Verdana", 7.0!)
Me.QuotesFunnelUltraChart.Axis.Y.Labels.SeriesLabels.FontColor = System.Drawing.Color.DimGray
Me.QuotesFunnelUltraChart.Axis.Y.Labels.SeriesLabels.FormatString = ""
Me.QuotesFunnelUltraChart.Axis.Y.Labels.SeriesLabels.HorizontalAlign = System.Drawing.StringAlignment.Far
Me.QuotesFunnelUltraChart.Axis.Y.Labels.SeriesLabels.Layout.Behavior = Infragistics.UltraChart.[Shared].Styles.AxisLabelLayoutBehaviors.[Auto]
Me.QuotesFunnelUltraChart.Axis.Y.Labels.SeriesLabels.Orientation = Infragistics.UltraChart.[Shared].Styles.TextOrientation.Horizontal
Me.QuotesFunnelUltraChart.Axis.Y.Labels.SeriesLabels.VerticalAlign = System.Drawing.StringAlignment.Center
Me.QuotesFunnelUltraChart.Axis.Y.Labels.VerticalAlign = System.Drawing.StringAlignment.Center
Me.QuotesFunnelUltraChart.Axis.Y.LineThickness = 1
Me.QuotesFunnelUltraChart.Axis.Y.MajorGridLines.AlphaLevel = CType(255, Byte)
Me.QuotesFunnelUltraChart.Axis.Y.MajorGridLines.Color = System.Drawing.Color.Gainsboro
Me.QuotesFunnelUltraChart.Axis.Y.MajorGridLines.DrawStyle = Infragistics.UltraChart.[Shared].Styles.LineDrawStyle.Dot
Me.QuotesFunnelUltraChart.Axis.Y.MajorGridLines.Visible = True
Me.QuotesFunnelUltraChart.Axis.Y.MinorGridLines.AlphaLevel = CType(255, Byte)
Me.QuotesFunnelUltraChart.Axis.Y.MinorGridLines.Color = System.Drawing.Color.LightGray
Me.QuotesFunnelUltraChart.Axis.Y.MinorGridLines.DrawStyle = Infragistics.UltraChart.[Shared].Styles.LineDrawStyle.Dot
Me.QuotesFunnelUltraChart.Axis.Y.MinorGridLines.Visible = False
Me.QuotesFunnelUltraChart.Axis.Y.TickmarkInterval = 10.0R
Me.QuotesFunnelUltraChart.Axis.Y.TickmarkStyle = Infragistics.UltraChart.[Shared].Styles.AxisTickStyle.Smart
Me.QuotesFunnelUltraChart.Axis.Y.Visible = True
Me.QuotesFunnelUltraChart.Axis.Y2.Labels.Font = New System.Drawing.Font("Verdana", 7.0!)
Me.QuotesFunnelUltraChart.Axis.Y2.Labels.FontColor = System.Drawing.Color.Gray
Me.QuotesFunnelUltraChart.Axis.Y2.Labels.HorizontalAlign = System.Drawing.StringAlignment.Near
Me.QuotesFunnelUltraChart.Axis.Y2.Labels.ItemFormatString = ""
Me.QuotesFunnelUltraChart.Axis.Y2.Labels.Layout.Behavior = Infragistics.UltraChart.[Shared].Styles.AxisLabelLayoutBehaviors.[Auto]
Me.QuotesFunnelUltraChart.Axis.Y2.Labels.Orientation = Infragistics.UltraChart.[Shared].Styles.TextOrientation.Horizontal
Me.QuotesFunnelUltraChart.Axis.Y2.Labels.SeriesLabels.Font = New System.Drawing.Font("Verdana", 7.0!)
Me.QuotesFunnelUltraChart.Axis.Y2.Labels.SeriesLabels.FontColor = System.Drawing.Color.Gray
Me.QuotesFunnelUltraChart.Axis.Y2.Labels.SeriesLabels.FormatString = ""
Me.QuotesFunnelUltraChart.Axis.Y2.Labels.SeriesLabels.HorizontalAlign = System.Drawing.StringAlignment.Near
Me.QuotesFunnelUltraChart.Axis.Y2.Labels.SeriesLabels.Layout.Behavior = Infragistics.UltraChart.[Shared].Styles.AxisLabelLayoutBehaviors.[Auto]
Me.QuotesFunnelUltraChart.Axis.Y2.Labels.SeriesLabels.Orientation = Infragistics.UltraChart.[Shared].Styles.TextOrientation.Horizontal
Me.QuotesFunnelUltraChart.Axis.Y2.Labels.SeriesLabels.VerticalAlign = System.Drawing.StringAlignment.Center
Me.QuotesFunnelUltraChart.Axis.Y2.Labels.VerticalAlign = System.Drawing.StringAlignment.Center
Me.QuotesFunnelUltraChart.Axis.Y2.Labels.Visible = False
Me.QuotesFunnelUltraChart.Axis.Y2.LineThickness = 1
Me.QuotesFunnelUltraChart.Axis.Y2.MajorGridLines.AlphaLevel = CType(255, Byte)
Me.QuotesFunnelUltraChart.Axis.Y2.MajorGridLines.Color = System.Drawing.Color.Gainsboro
Me.QuotesFunnelUltraChart.Axis.Y2.MajorGridLines.DrawStyle = Infragistics.UltraChart.[Shared].Styles.LineDrawStyle.Dot
Me.QuotesFunnelUltraChart.Axis.Y2.MajorGridLines.Visible = True
Me.QuotesFunnelUltraChart.Axis.Y2.MinorGridLines.AlphaLevel = CType(255, Byte)
Me.QuotesFunnelUltraChart.Axis.Y2.MinorGridLines.Color = System.Drawing.Color.LightGray
Me.QuotesFunnelUltraChart.Axis.Y2.MinorGridLines.DrawStyle = Infragistics.UltraChart.[Shared].Styles.LineDrawStyle.Dot
Me.QuotesFunnelUltraChart.Axis.Y2.MinorGridLines.Visible = False
Me.QuotesFunnelUltraChart.Axis.Y2.TickmarkInterval = 10.0R
Me.QuotesFunnelUltraChart.Axis.Y2.TickmarkStyle = Infragistics.UltraChart.[Shared].Styles.AxisTickStyle.Smart
Me.QuotesFunnelUltraChart.Axis.Y2.Visible = False
Me.QuotesFunnelUltraChart.Axis.Z.Labels.Font = New System.Drawing.Font("Verdana", 7.0!)
Me.QuotesFunnelUltraChart.Axis.Z.Labels.FontColor = System.Drawing.Color.DimGray
Me.QuotesFunnelUltraChart.Axis.Z.Labels.HorizontalAlign = System.Drawing.StringAlignment.Far
Me.QuotesFunnelUltraChart.Axis.Z.Labels.ItemFormatString = ""
Me.QuotesFunnelUltraChart.Axis.Z.Labels.Layout.Behavior = Infragistics.UltraChart.[Shared].Styles.AxisLabelLayoutBehaviors.[Auto]
Me.QuotesFunnelUltraChart.Axis.Z.Labels.Orientation = Infragistics.UltraChart.[Shared].Styles.TextOrientation.Horizontal
Me.QuotesFunnelUltraChart.Axis.Z.Labels.SeriesLabels.Font = New System.Drawing.Font("Verdana", 7.0!)
Me.QuotesFunnelUltraChart.Axis.Z.Labels.SeriesLabels.FontColor = System.Drawing.Color.DimGray
Me.QuotesFunnelUltraChart.Axis.Z.Labels.SeriesLabels.HorizontalAlign = System.Drawing.StringAlignment.Far
Me.QuotesFunnelUltraChart.Axis.Z.Labels.SeriesLabels.Layout.Behavior = Infragistics.UltraChart.[Shared].Styles.AxisLabelLayoutBehaviors.[Auto]
Me.QuotesFunnelUltraChart.Axis.Z.Labels.SeriesLabels.Orientation = Infragistics.UltraChart.[Shared].Styles.TextOrientation.Horizontal
Me.QuotesFunnelUltraChart.Axis.Z.Labels.SeriesLabels.VerticalAlign = System.Drawing.StringAlignment.Center
Me.QuotesFunnelUltraChart.Axis.Z.Labels.VerticalAlign = System.Drawing.StringAlignment.Center
Me.QuotesFunnelUltraChart.Axis.Z.LineThickness = 1
Me.QuotesFunnelUltraChart.Axis.Z.MajorGridLines.AlphaLevel = CType(255, Byte)
Me.QuotesFunnelUltraChart.Axis.Z.MajorGridLines.Color = System.Drawing.Color.Gainsboro
Me.QuotesFunnelUltraChart.Axis.Z.MajorGridLines.DrawStyle = Infragistics.UltraChart.[Shared].Styles.LineDrawStyle.Dot
Me.QuotesFunnelUltraChart.Axis.Z.MajorGridLines.Visible = True
Me.QuotesFunnelUltraChart.Axis.Z.MinorGridLines.AlphaLevel = CType(255, Byte)
Me.QuotesFunnelUltraChart.Axis.Z.MinorGridLines.Color = System.Drawing.Color.LightGray
Me.QuotesFunnelUltraChart.Axis.Z.MinorGridLines.DrawStyle = Infragistics.UltraChart.[Shared].Styles.LineDrawStyle.Dot
Me.QuotesFunnelUltraChart.Axis.Z.MinorGridLines.Visible = False
Me.QuotesFunnelUltraChart.Axis.Z.TickmarkStyle = Infragistics.UltraChart.[Shared].Styles.AxisTickStyle.Smart
Me.QuotesFunnelUltraChart.Axis.Z.Visible = True
Me.QuotesFunnelUltraChart.Axis.Z2.Labels.Font = New System.Drawing.Font("Verdana", 7.0!)
Me.QuotesFunnelUltraChart.Axis.Z2.Labels.FontColor = System.Drawing.Color.Gray
Me.QuotesFunnelUltraChart.Axis.Z2.Labels.HorizontalAlign = System.Drawing.StringAlignment.Near
Me.QuotesFunnelUltraChart.Axis.Z2.Labels.ItemFormatString = ""
Me.QuotesFunnelUltraChart.Axis.Z2.Labels.Layout.Behavior = Infragistics.UltraChart.[Shared].Styles.AxisLabelLayoutBehaviors.[Auto]
Me.QuotesFunnelUltraChart.Axis.Z2.Labels.Orientation = Infragistics.UltraChart.[Shared].Styles.TextOrientation.Horizontal
Me.QuotesFunnelUltraChart.Axis.Z2.Labels.SeriesLabels.Font = New System.Drawing.Font("Verdana", 7.0!)
Me.QuotesFunnelUltraChart.Axis.Z2.Labels.SeriesLabels.FontColor = System.Drawing.Color.Gray
Me.QuotesFunnelUltraChart.Axis.Z2.Labels.SeriesLabels.HorizontalAlign = System.Drawing.StringAlignment.Near
Me.QuotesFunnelUltraChart.Axis.Z2.Labels.SeriesLabels.Layout.Behavior = Infragistics.UltraChart.[Shared].Styles.AxisLabelLayoutBehaviors.[Auto]
Me.QuotesFunnelUltraChart.Axis.Z2.Labels.SeriesLabels.Orientation = Infragistics.UltraChart.[Shared].Styles.TextOrientation.Horizontal
Me.QuotesFunnelUltraChart.Axis.Z2.Labels.SeriesLabels.VerticalAlign = System.Drawing.StringAlignment.Center
Me.QuotesFunnelUltraChart.Axis.Z2.Labels.VerticalAlign = System.Drawing.StringAlignment.Center
Me.QuotesFunnelUltraChart.Axis.Z2.Labels.Visible = False
Me.QuotesFunnelUltraChart.Axis.Z2.LineThickness = 1
Me.QuotesFunnelUltraChart.Axis.Z2.MajorGridLines.AlphaLevel = CType(255, Byte)
Me.QuotesFunnelUltraChart.Axis.Z2.MajorGridLines.Color = System.Drawing.Color.Gainsboro
Me.QuotesFunnelUltraChart.Axis.Z2.MajorGridLines.DrawStyle = Infragistics.UltraChart.[Shared].Styles.LineDrawStyle.Dot
Me.QuotesFunnelUltraChart.Axis.Z2.MajorGridLines.Visible = True
Me.QuotesFunnelUltraChart.Axis.Z2.MinorGridLines.AlphaLevel = CType(255, Byte)
Me.QuotesFunnelUltraChart.Axis.Z2.MinorGridLines.Color = System.Drawing.Color.LightGray
Me.QuotesFunnelUltraChart.Axis.Z2.MinorGridLines.DrawStyle = Infragistics.UltraChart.[Shared].Styles.LineDrawStyle.Dot
Me.QuotesFunnelUltraChart.Axis.Z2.MinorGridLines.Visible = False
Me.QuotesFunnelUltraChart.Axis.Z2.TickmarkStyle = Infragistics.UltraChart.[Shared].Styles.AxisTickStyle.Smart
Me.QuotesFunnelUltraChart.Axis.Z2.Visible = False
Me.QuotesFunnelUltraChart.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center
Me.QuotesFunnelUltraChart.ColorModel.AlphaLevel = CType(150, Byte)
Me.QuotesFunnelUltraChart.ColorModel.ColorBegin = System.Drawing.Color.Pink
Me.QuotesFunnelUltraChart.ColorModel.ColorEnd = System.Drawing.Color.DarkRed
Me.QuotesFunnelUltraChart.ColorModel.ModelStyle = Infragistics.UltraChart.[Shared].Styles.ColorModels.CustomLinear
Me.QuotesFunnelUltraChart.Effects.Effects.Add(GradientEffect2)
Me.QuotesFunnelUltraChart.Location = New System.Drawing.Point(2, 34)
Me.QuotesFunnelUltraChart.Name = "QuotesFunnelUltraChart"
Me.QuotesFunnelUltraChart.Size = New System.Drawing.Size(692, 339)
Me.QuotesFunnelUltraChart.TabIndex = 0
Me.QuotesFunnelUltraChart.Tooltips.HighlightFillColor = System.Drawing.Color.DimGray
Me.QuotesFunnelUltraChart.Tooltips.HighlightOutlineColor = System.Drawing.Color.DarkGray
'
'DashboardPanelQuotes
'
'
'DashboardPanelQuotes.ControlArea
'
Me.DashboardPanelQuotes.ControlArea.BorderStyle = Infragistics.Win.UIElementBorderStyle.Solid
'
'DashboardPanelQuotes.ControlArea.ClientArea
'
Me.DashboardPanelQuotes.ControlArea.ClientArea.Controls.Add(Me.IndicatorPanelDebtorInvoicesOverdue)
Me.DashboardPanelQuotes.ControlArea.ClientArea.Controls.Add(Me.IndicatorPanelSalesOrdersReadyToShip)
Me.DashboardPanelQuotes.ControlArea.ClientArea.Controls.Add(Me.IndicatorPanelSalesOrdersWithBackorders)
Me.DashboardPanelQuotes.ControlArea.ClientArea.Controls.Add(Me.IndicatorPanelSalesOrdersEnteredNotProcessed)
Me.DashboardPanelQuotes.ControlArea.ClientArea.Controls.Add(Me.IndicatorPanelSalesQuotesOpen)
Me.DashboardPanelQuotes.ControlArea.ClientArea.Controls.Add(Me.CRM_MyQuotesExpiringIn7Days)
Me.InboxControlStyler1.SetStyleSettings(Me.DashboardPanelQuotes.ControlArea.ClientArea, New Infragistics.Win.AppStyling.Runtime.InboxControlStyleSettings(Infragistics.Win.DefaultableBoolean.[Default]))
Me.DashboardPanelQuotes.ControlArea.Dock = System.Windows.Forms.DockStyle.Fill
Me.DashboardPanelQuotes.ControlArea.Location = New System.Drawing.Point(0, 23)
Me.DashboardPanelQuotes.ControlArea.Name = "ControlArea"
Me.DashboardPanelQuotes.ControlArea.Size = New System.Drawing.Size(263, 377)
Me.DashboardPanelQuotes.ControlArea.TabIndex = 2
Me.DashboardPanelQuotes.ControlAreaPanel = Me.DashboardPanelQuotes.ControlArea
Me.DashboardPanelQuotes.Location = New System.Drawing.Point(10, 109)
Me.DashboardPanelQuotes.Name = "DashboardPanelQuotes"
Me.DashboardPanelQuotes.Size = New System.Drawing.Size(263, 400)
Me.DashboardPanelQuotes.TabIndex = 36
Me.DashboardPanelQuotes.Title = "Quotes And Sales"
'
'IndicatorPanelDebtorInvoicesOverdue
'
Me.IndicatorPanelDebtorInvoicesOverdue.Caption = "Invoices Overdue"
Me.IndicatorPanelDebtorInvoicesOverdue.Location = New System.Drawing.Point(137, 252)
Me.IndicatorPanelDebtorInvoicesOverdue.Name = "IndicatorPanelDebtorInvoicesOverdue"
Me.IndicatorPanelDebtorInvoicesOverdue.NavigationListStoredProc = Nothing
Me.IndicatorPanelDebtorInvoicesOverdue.Size = New System.Drawing.Size(112, 112)
Me.IndicatorPanelDebtorInvoicesOverdue.StackSize = 0
Me.IndicatorPanelDebtorInvoicesOverdue.StoredProcName = ""
Me.IndicatorPanelDebtorInvoicesOverdue.TabIndex = 46
Me.IndicatorPanelDebtorInvoicesOverdue.Value = 99
'
'IndicatorPanelSalesOrdersReadyToShip
'
Me.IndicatorPanelSalesOrdersReadyToShip.Caption = "Sales Orders Ready to Ship"
Me.IndicatorPanelSalesOrdersReadyToShip.Location = New System.Drawing.Point(12, 252)
Me.IndicatorPanelSalesOrdersReadyToShip.Name = "IndicatorPanelSalesOrdersReadyToShip"
Me.IndicatorPanelSalesOrdersReadyToShip.NavigationListStoredProc = Nothing
Me.IndicatorPanelSalesOrdersReadyToShip.Size = New System.Drawing.Size(112, 112)
Me.IndicatorPanelSalesOrdersReadyToShip.StackSize = 0
Me.IndicatorPanelSalesOrdersReadyToShip.StoredProcName = ""
Me.IndicatorPanelSalesOrdersReadyToShip.TabIndex = 7
Me.IndicatorPanelSalesOrdersReadyToShip.Value = 99
'
'IndicatorPanelSalesOrdersWithBackorders
'
Me.IndicatorPanelSalesOrdersWithBackorders.Caption = "Sales Orders With Backorders"
Me.IndicatorPanelSalesOrdersWithBackorders.Location = New System.Drawing.Point(137, 130)
Me.IndicatorPanelSalesOrdersWithBackorders.Name = "IndicatorPanelSalesOrdersWithBackorders"
Me.IndicatorPanelSalesOrdersWithBackorders.NavigationListStoredProc = Nothing
Me.IndicatorPanelSalesOrdersWithBackorders.Size = New System.Drawing.Size(112, 112)
Me.IndicatorPanelSalesOrdersWithBackorders.StackSize = 0
Me.IndicatorPanelSalesOrdersWithBackorders.StoredProcName = ""
Me.IndicatorPanelSalesOrdersWithBackorders.TabIndex = 6
Me.IndicatorPanelSalesOrdersWithBackorders.Value = 99
'
'IndicatorPanelSalesOrdersEnteredNotProcessed
'
Me.IndicatorPanelSalesOrdersEnteredNotProcessed.Caption = "Sales Orders Entered Not Processed"
Me.IndicatorPanelSalesOrdersEnteredNotProcessed.Location = New System.Drawing.Point(12, 130)
Me.IndicatorPanelSalesOrdersEnteredNotProcessed.Name = "IndicatorPanelSalesOrdersEnteredNotProcessed"
Me.IndicatorPanelSalesOrdersEnteredNotProcessed.NavigationListStoredProc = Nothing
Me.IndicatorPanelSalesOrdersEnteredNotProcessed.Size = New System.Drawing.Size(112, 112)
Me.IndicatorPanelSalesOrdersEnteredNotProcessed.StackSize = 0
Me.IndicatorPanelSalesOrdersEnteredNotProcessed.StoredProcName = ""
Me.IndicatorPanelSalesOrdersEnteredNotProcessed.TabIndex = 5
Me.IndicatorPanelSalesOrdersEnteredNotProcessed.Value = 99
'
'IndicatorPanelSalesQuotesOpen
'
Me.IndicatorPanelSalesQuotesOpen.Caption = "Open Quotes"
Me.IndicatorPanelSalesQuotesOpen.Location = New System.Drawing.Point(137, 8)
Me.IndicatorPanelSalesQuotesOpen.Name = "IndicatorPanelSalesQuotesOpen"
Me.IndicatorPanelSalesQuotesOpen.NavigationListStoredProc = Nothing
Me.IndicatorPanelSalesQuotesOpen.Size = New System.Drawing.Size(112, 112)
Me.IndicatorPanelSalesQuotesOpen.StackSize = 0
Me.IndicatorPanelSalesQuotesOpen.StoredProcName = ""
Me.IndicatorPanelSalesQuotesOpen.TabIndex = 4
Me.IndicatorPanelSalesQuotesOpen.Value = 99
'
'CRM_MyQuotesExpiringIn7Days
'
Me.CRM_MyQuotesExpiringIn7Days.Caption = "My Quotes Expiring in 7 Days"
Me.CRM_MyQuotesExpiringIn7Days.Location = New System.Drawing.Point(12, 8)
Me.CRM_MyQuotesExpiringIn7Days.Name = "CRM_MyQuotesExpiringIn7Days"
Me.CRM_MyQuotesExpiringIn7Days.NavigationListStoredProc = Nothing
Me.CRM_MyQuotesExpiringIn7Days.Size = New System.Drawing.Size(112, 112)
Me.CRM_MyQuotesExpiringIn7Days.StackSize = 0
Me.CRM_MyQuotesExpiringIn7Days.StoredProcName = ""
Me.CRM_MyQuotesExpiringIn7Days.TabIndex = 0
Me.CRM_MyQuotesExpiringIn7Days.Value = 99
'
'CRM
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(1513, 918)
Me.Name = "CRM"
Me.InboxControlStyler1.SetStyleSettings(Me, New Infragistics.Win.AppStyling.Runtime.InboxControlStyleSettings(Infragistics.Win.DefaultableBoolean.[Default]))
Me.Text = "CRM Dashboard"
CType(Me.UltraToolbarsManager1, System.ComponentModel.ISupportInitialize).EndInit()
Me.UserInterface_Fill_Panel.ClientArea.ResumeLayout(False)
Me.UserInterface_Fill_Panel.ResumeLayout(False)
CType(Me.UltraStatusBar1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.InboxControlStyler1, System.ComponentModel.ISupportInitialize).EndInit()
Me.UltraPanel1.ClientArea.ResumeLayout(False)
Me.UltraPanel1.ResumeLayout(False)
Me.UltraPanel12.ClientArea.ResumeLayout(False)
Me.UltraPanel12.ResumeLayout(False)
Me.MyCustomersDashboardPanel.ControlArea.ClientArea.ResumeLayout(False)
Me.MyCustomersDashboardPanel.ControlArea.ResumeLayout(False)
Me.MyCustomersDashboardPanel.ResumeLayout(False)
CType(Me.MyCustomersJiwaGrid, System.ComponentModel.ISupportInitialize).EndInit()
Me.MyToDosDashboardPanel.ControlArea.ClientArea.ResumeLayout(False)
Me.MyToDosDashboardPanel.ControlArea.ResumeLayout(False)
Me.MyToDosDashboardPanel.ResumeLayout(False)
CType(Me.ToDosAssignedToMeJiwaGrid, System.ComponentModel.ISupportInitialize).EndInit()
Me.SalesChartDashboardPanel.ControlArea.ClientArea.ResumeLayout(False)
Me.SalesChartDashboardPanel.ControlArea.ResumeLayout(False)
Me.SalesChartDashboardPanel.ResumeLayout(False)
CType(Me.IncludeLastYearSalesUltraCheckEditor, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.SalesTransactionUltraChart, System.ComponentModel.ISupportInitialize).EndInit()
Me.UltraPanel2.ClientArea.ResumeLayout(False)
Me.UltraPanel2.ResumeLayout(False)
Me.DashboardPanelOpportunitiesFunnel.ControlArea.ClientArea.ResumeLayout(False)
Me.DashboardPanelOpportunitiesFunnel.ControlArea.ResumeLayout(False)
Me.DashboardPanelOpportunitiesFunnel.ResumeLayout(False)
CType(Me.ShowAllStagesUltraCheckEditor, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.QuotesFunnelUltraChart, System.ComponentModel.ISupportInitialize).EndInit()
Me.DashboardPanelQuotes.ControlArea.ClientArea.ResumeLayout(False)
Me.DashboardPanelQuotes.ControlArea.ResumeLayout(False)
Me.DashboardPanelQuotes.ResumeLayout(False)
CType(Me.UltraFlowLayoutManager1, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
End Sub
Public WithEvents UltraPanel1 As Infragistics.Win.Misc.UltraPanel
Public WithEvents UltraFlowLayoutManager1 As Infragistics.Win.Misc.UltraFlowLayoutManager
Public WithEvents UltraPanel12 As Infragistics.Win.Misc.UltraPanel
Public WithEvents DashboardPanelQuotes As JiwaFinancials.Jiwa.JiwaDashboardUI.DashboardPanel
Public WithEvents CRM_MyQuotesExpiringIn7Days As JiwaFinancials.Jiwa.JiwaDashboardUI.IndicatorPanel
Public WithEvents DashboardPanelOpportunitiesFunnel As JiwaFinancials.Jiwa.JiwaDashboardUI.DashboardPanel
Public WithEvents IndicatorPanelSalesQuotesOpen As JiwaFinancials.Jiwa.JiwaDashboardUI.IndicatorPanel
Public WithEvents IndicatorPanelDebtorInvoicesOverdue As JiwaFinancials.Jiwa.JiwaDashboardUI.IndicatorPanel
Public WithEvents IndicatorPanelSalesOrdersReadyToShip As JiwaFinancials.Jiwa.JiwaDashboardUI.IndicatorPanel
Public WithEvents IndicatorPanelSalesOrdersWithBackorders As JiwaFinancials.Jiwa.JiwaDashboardUI.IndicatorPanel
Public WithEvents IndicatorPanelSalesOrdersEnteredNotProcessed As JiwaFinancials.Jiwa.JiwaDashboardUI.IndicatorPanel
Public WithEvents UltraPanel2 As Infragistics.Win.Misc.UltraPanel
Public WithEvents DateUltraLabel As Infragistics.Win.Misc.UltraLabel
Public WithEvents UserNameUltraLabel As Infragistics.Win.Misc.UltraLabel
Public WithEvents StaffPicture As Infragistics.Win.UltraWinEditors.UltraPictureBox
Public WithEvents SalesChartDashboardPanel As JiwaFinancials.Jiwa.JiwaDashboardUI.DashboardPanel
Public WithEvents IncludeLastYearSalesUltraCheckEditor As Infragistics.Win.UltraWinEditors.UltraCheckEditor
Public WithEvents SalesTransactionUltraChart As Infragistics.Win.UltraWinChart.UltraChart
Private WithEvents QuotesFunnelUltraChart As Infragistics.Win.UltraWinChart.UltraChart
Public WithEvents ShowAllStagesUltraCheckEditor As Infragistics.Win.UltraWinEditors.UltraCheckEditor
Public WithEvents MyToDosDashboardPanel As JiwaFinancials.Jiwa.JiwaDashboardUI.DashboardPanel
Public WithEvents ToDosAssignedToMeJiwaGrid As JiwaFinancials.Jiwa.JiwaApplication.Controls.JiwaGrid
Public WithEvents MyCustomersDashboardPanel As JiwaFinancials.Jiwa.JiwaDashboardUI.DashboardPanel
Public WithEvents MyCustomersJiwaGrid As JiwaFinancials.Jiwa.JiwaApplication.Controls.JiwaGrid
End Class
Report
VisualBasic
9a7a9c57-8003-4641-9641-85a4e29e0be1
JiwaApplication, Version=7.2.1.0, Culture=neutral, PublicKeyToken=e30ce81e37f29c8c
JiwaApplication.dll
C:\VSTS\Jiwa 7\07.02.00\Built Files\JiwaApplication.dll
c22e248b-ccb7-4fb3-99f3-5f7c9313db54
mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
mscorlib.dll
C:\Windows\Microsoft.NET\Framework\v4.0.30319\mscorlib.dll
4c215c09-90b6-43fe-a76f-0fe0dfb2c692
System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
System.dll
C:\WINDOWS\Microsoft.Net\assembly\GAC_MSIL\System\v4.0_4.0.0.0__b77a5c561934e089\System.dll
279de028-4d9e-4756-9b75-185c4d5b9a22
System.Data, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
System.Data.dll
C:\WINDOWS\Microsoft.Net\assembly\GAC_32\System.Data\v4.0_4.0.0.0__b77a5c561934e089\System.Data.dll
d7a93566-bad4-4b63-b5df-18fb4d68e6d0
JiwaODBC, Version=7.2.1.0, Culture=neutral, PublicKeyToken=e30ce81e37f29c8c
JiwaODBC.dll
C:\VSTS\Jiwa 7\07.02.00\Built Files\JiwaODBC.dll
021e70eb-a833-424b-81b6-95cc572c27ed
System.Xml, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
System.Xml.dll
C:\WINDOWS\Microsoft.Net\assembly\GAC_MSIL\System.Xml\v4.0_4.0.0.0__b77a5c561934e089\System.Xml.dll
33bdc90e-3606-4ecc-b58b-87db4cd28920
System.Runtime.Serialization, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
System.Runtime.Serialization.dll
C:\WINDOWS\Microsoft.Net\assembly\GAC_MSIL\System.Runtime.Serialization\v4.0_4.0.0.0__b77a5c561934e089\System.Runtime.Serialization.dll
8a63ef52-e616-4351-ba15-20b14cd63f08
System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a
System.Drawing.dll
C:\WINDOWS\Microsoft.Net\assembly\GAC_MSIL\System.Drawing\v4.0_4.0.0.0__b03f5f7f11d50a3a\System.Drawing.dll
0404b155-1de2-4d7f-9ec3-068ee82fb0d8
Microsoft.SqlServer.Smo, Version=14.100.0.0, Culture=neutral, PublicKeyToken=89845dcd8080cc91
Microsoft.SqlServer.Smo.dll
C:\VSTS\Jiwa 7\07.02.00\Built Files\Microsoft.SqlServer.Smo.dll
8a48203d-5a6f-421f-bb1c-962137883295
Microsoft.SqlServer.ConnectionInfo, Version=14.100.0.0, Culture=neutral, PublicKeyToken=89845dcd8080cc91
Microsoft.SqlServer.ConnectionInfo.dll
C:\VSTS\Jiwa 7\07.02.00\Built Files\Microsoft.SqlServer.ConnectionInfo.dll
ed3289c6-3125-4b93-be87-ab09d942e6f4
System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
System.Windows.Forms.dll
C:\WINDOWS\Microsoft.Net\assembly\GAC_MSIL\System.Windows.Forms\v4.0_4.0.0.0__b77a5c561934e089\System.Windows.Forms.dll
14650727-b87d-41e3-bfa7-00667a75a94b
Infragistics4.Win.v13.1, Version=13.1.20131.2060, Culture=neutral, PublicKeyToken=7dd5c3163f2cd0cb
Infragistics4.Win.v13.1.dll
C:\WINDOWS\Microsoft.Net\assembly\GAC_MSIL\Infragistics4.Win.v13.1\v4.0_13.1.20131.2060__7dd5c3163f2cd0cb\Infragistics4.Win.v13.1.dll
6c8c5b04-4895-4c96-b093-446002fa0bcd
Microsoft.VisualBasic, Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a
Microsoft.VisualBasic.dll
C:\WINDOWS\Microsoft.Net\assembly\GAC_MSIL\Microsoft.VisualBasic\v4.0_10.0.0.0__b03f5f7f11d50a3a\Microsoft.VisualBasic.dll
740a4c26-4a0c-4980-8f65-1b440f15cf90
Infragistics4.Win.Misc.v13.1, Version=13.1.20131.2060, Culture=neutral, PublicKeyToken=7dd5c3163f2cd0cb
Infragistics4.Win.Misc.v13.1.dll
C:\WINDOWS\Microsoft.Net\assembly\GAC_MSIL\Infragistics4.Win.Misc.v13.1\v4.0_13.1.20131.2060__7dd5c3163f2cd0cb\Infragistics4.Win.Misc.v13.1.dll
9bbb1249-bdf7-4ab0-bff9-8add8891039e
Infragistics4.Win.UltraWinEditors.v13.1, Version=13.1.20131.2060, Culture=neutral, PublicKeyToken=7dd5c3163f2cd0cb
Infragistics4.Win.UltraWinEditors.v13.1.dll
C:\WINDOWS\Microsoft.Net\assembly\GAC_MSIL\Infragistics4.Win.UltraWinEditors.v13.1\v4.0_13.1.20131.2060__7dd5c3163f2cd0cb\Infragistics4.Win.UltraWinEditors.v13.1.dll
45e47af7-a3dd-478a-94ec-8665de4f7d37
Infragistics4.Win.UltraWinExplorerBar.v13.1, Version=13.1.20131.2060, Culture=neutral, PublicKeyToken=7dd5c3163f2cd0cb
Infragistics4.Win.UltraWinExplorerBar.v13.1.dll
C:\WINDOWS\Microsoft.Net\assembly\GAC_MSIL\Infragistics4.Win.UltraWinExplorerBar.v13.1\v4.0_13.1.20131.2060__7dd5c3163f2cd0cb\Infragistics4.Win.UltraWinExplorerBar.v13.1.dll
dff5abb7-b196-4b66-be73-ead2531b4606
Infragistics4.Win.UltraWinTree.v13.1, Version=13.1.20131.2060, Culture=neutral, PublicKeyToken=7dd5c3163f2cd0cb
Infragistics4.Win.UltraWinTree.v13.1.dll
C:\WINDOWS\Microsoft.Net\assembly\GAC_MSIL\Infragistics4.Win.UltraWinTree.v13.1\v4.0_13.1.20131.2060__7dd5c3163f2cd0cb\Infragistics4.Win.UltraWinTree.v13.1.dll
102c840d-d299-4953-b434-5fa8f5a2a3b8
FarPoint.Win.Spread, Version=8.35.20151.0, Culture=neutral, PublicKeyToken=327c3516b1b18457
FarPoint.Win.Spread.dll
C:\WINDOWS\assembly\GAC_MSIL\FarPoint.Win.Spread\8.35.20151.0__327c3516b1b18457\FarPoint.Win.Spread.dll
460adf0d-2ffe-4a10-ac53-0babe860ba65
Infragistics4.Win.UltraWinTabControl.v13.1, Version=13.1.20131.2060, Culture=neutral, PublicKeyToken=7dd5c3163f2cd0cb
Infragistics4.Win.UltraWinTabControl.v13.1.dll
C:\WINDOWS\Microsoft.Net\assembly\GAC_MSIL\Infragistics4.Win.UltraWinTabControl.v13.1\v4.0_13.1.20131.2060__7dd5c3163f2cd0cb\Infragistics4.Win.UltraWinTabControl.v13.1.dll
753e78f4-ee14-4242-8422-e9ca2130f433
Infragistics4.Win.UltraWinToolbars.v13.1, Version=13.1.20131.2060, Culture=neutral, PublicKeyToken=7dd5c3163f2cd0cb
Infragistics4.Win.UltraWinToolbars.v13.1.dll
C:\WINDOWS\Microsoft.Net\assembly\GAC_MSIL\Infragistics4.Win.UltraWinToolbars.v13.1\v4.0_13.1.20131.2060__7dd5c3163f2cd0cb\Infragistics4.Win.UltraWinToolbars.v13.1.dll
e5e033d0-1f39-48d3-a1fa-b9f22804e6fa
Infragistics4.Win.UltraWinStatusBar.v13.1, Version=13.1.20131.2060, Culture=neutral, PublicKeyToken=7dd5c3163f2cd0cb
Infragistics4.Win.UltraWinStatusBar.v13.1.dll
C:\WINDOWS\Microsoft.Net\assembly\GAC_MSIL\Infragistics4.Win.UltraWinStatusBar.v13.1\v4.0_13.1.20131.2060__7dd5c3163f2cd0cb\Infragistics4.Win.UltraWinStatusBar.v13.1.dll
6d8bfc65-ae94-4bc1-bb0a-40cfc40c5421
Infragistics4.Win.UltraWinSchedule.v13.1, Version=13.1.20131.2060, Culture=neutral, PublicKeyToken=7dd5c3163f2cd0cb
Infragistics4.Win.UltraWinSchedule.v13.1.dll
C:\WINDOWS\Microsoft.Net\assembly\GAC_MSIL\Infragistics4.Win.UltraWinSchedule.v13.1\v4.0_13.1.20131.2060__7dd5c3163f2cd0cb\Infragistics4.Win.UltraWinSchedule.v13.1.dll
4fa60ec5-5751-43f7-9b9a-b4a4d41d0d78
Infragistics4.Win.UltraWinListView.v13.1, Version=13.1.20131.2060, Culture=neutral, PublicKeyToken=7dd5c3163f2cd0cb
Infragistics4.Win.UltraWinListView.v13.1.dll
C:\WINDOWS\Microsoft.Net\assembly\GAC_MSIL\Infragistics4.Win.UltraWinListView.v13.1\v4.0_13.1.20131.2060__7dd5c3163f2cd0cb\Infragistics4.Win.UltraWinListView.v13.1.dll
559793b1-24a5-4564-b058-87b6f79dfa05
ActiproSoftware.SyntaxEditor.WinForms, Version=16.1.330.0, Culture=neutral, PublicKeyToken=c27e062d3c1a4763
ActiproSoftware.SyntaxEditor.WinForms.dll
C:\WINDOWS\assembly\GAC_MSIL\ActiproSoftware.SyntaxEditor.WinForms\16.1.330.0__c27e062d3c1a4763\ActiproSoftware.SyntaxEditor.WinForms.dll
d598a1c8-3b1e-4dbc-9d50-a30248362ebb
ZetaHtmlEditControl, Version=1.1.0.3, Culture=neutral, PublicKeyToken=2e2e5ba5da72b6c0
ZetaHtmlEditControl.dll
C:\VSTS\Jiwa 7\07.02.00\Built Files\ZetaHtmlEditControl.dll
5d538e67-55ef-4f6d-8c7f-645ead63f7dd
ActiproSoftware.SyntaxEditor.Addons.DotNet.WinForms, Version=16.1.330.0, Culture=neutral, PublicKeyToken=c27e062d3c1a4763
ActiproSoftware.SyntaxEditor.Addons.DotNet.WinForms.dll
C:\WINDOWS\assembly\GAC_MSIL\ActiproSoftware.SyntaxEditor.Addons.DotNet.WinForms\16.1.330.0__c27e062d3c1a4763\ActiproSoftware.SyntaxEditor.Addons.DotNet.WinForms.dll
c7ac14f4-4f39-45d7-b58e-f579197e73dc
JiwaEncryption, Version=7.2.1.0, Culture=neutral, PublicKeyToken=e30ce81e37f29c8c
JiwaEncryption.dll
C:\VSTS\Jiwa 7\07.02.00\Built Files\JiwaEncryption.dll
1c9f557a-743e-4977-8e5a-3a6584adefc2
System.Security, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a
System.Security.dll
C:\WINDOWS\Microsoft.Net\assembly\GAC_MSIL\System.Security\v4.0_4.0.0.0__b03f5f7f11d50a3a\System.Security.dll
61122a13-64a1-4ad4-ab28-d6222008b4a3
Microsoft.SqlServer.Dac, Version=14.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a
Microsoft.SqlServer.Dac.dll
C:\VSTS\Jiwa 7\07.02.00\Built Files\Microsoft.SqlServer.Dac.dll
6fb0cda4-4ace-41bf-8921-3e7ca7f98b04
CrystalDecisions.CrystalReports.Engine, Version=13.0.3500.0, Culture=neutral, PublicKeyToken=692fbea5521e1304
CrystalDecisions.CrystalReports.Engine.dll
C:\WINDOWS\assembly\GAC_MSIL\CrystalDecisions.CrystalReports.Engine\13.0.3500.0__692fbea5521e1304\CrystalDecisions.CrystalReports.Engine.dll
4351d317-2963-4c9e-92ca-c0db5ad71674
CrystalDecisions.Shared, Version=13.0.3500.0, Culture=neutral, PublicKeyToken=692fbea5521e1304
CrystalDecisions.Shared.dll
C:\WINDOWS\assembly\GAC_MSIL\CrystalDecisions.Shared\13.0.3500.0__692fbea5521e1304\CrystalDecisions.Shared.dll
bdbf2765-3e84-4317-9352-f79220f982bc
CrystalDecisions.ReportAppServer.ClientDoc, Version=13.0.3500.0, Culture=neutral, PublicKeyToken=692fbea5521e1304
CrystalDecisions.ReportAppServer.ClientDoc.dll
C:\WINDOWS\assembly\GAC_MSIL\CrystalDecisions.ReportAppServer.ClientDoc\13.0.3500.0__692fbea5521e1304\CrystalDecisions.ReportAppServer.ClientDoc.dll
ea7d9a46-2242-4525-ba6e-8136901eb6c6
CrystalDecisions.ReportAppServer.Controllers, Version=13.0.3500.0, Culture=neutral, PublicKeyToken=692fbea5521e1304
CrystalDecisions.ReportAppServer.Controllers.dll
C:\WINDOWS\assembly\GAC_MSIL\CrystalDecisions.ReportAppServer.Controllers\13.0.3500.0__692fbea5521e1304\CrystalDecisions.ReportAppServer.Controllers.dll
f1521c42-707b-41c4-941e-877e84cd4e88
System.Core, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
System.Core.dll
C:\WINDOWS\Microsoft.Net\assembly\GAC_MSIL\System.Core\v4.0_4.0.0.0__b77a5c561934e089\System.Core.dll
5e466ec7-6015-44c1-8955-b2a8974055b3
Infragistics4.Win.AppStylistSupport.v13.1, Version=13.1.20131.2060, Culture=neutral, PublicKeyToken=7dd5c3163f2cd0cb
Infragistics4.Win.AppStylistSupport.v13.1.dll
C:\WINDOWS\Microsoft.Net\assembly\GAC_MSIL\Infragistics4.Win.AppStylistSupport.v13.1\v4.0_13.1.20131.2060__7dd5c3163f2cd0cb\Infragistics4.Win.AppStylistSupport.v13.1.dll
7cb414c5-a60a-4075-a7bd-610a92e9218b
JiwaLib, Version=7.2.1.0, Culture=neutral, PublicKeyToken=e30ce81e37f29c8c
JiwaLib.dll
C:\VSTS\Jiwa 7\07.02.00\Built Files\JiwaLib.dll
5df800e9-99ae-4e1d-b3d8-de6d4482ed51
CrystalDecisions.Windows.Forms, Version=13.0.3500.0, Culture=neutral, PublicKeyToken=692fbea5521e1304
CrystalDecisions.Windows.Forms.dll
C:\WINDOWS\assembly\GAC_MSIL\CrystalDecisions.Windows.Forms\13.0.3500.0__692fbea5521e1304\CrystalDecisions.Windows.Forms.dll
46535227-4c74-4e2c-ab22-b76fba4730af
Infragistics4.Win.UltraWinGrid.v13.1, Version=13.1.20131.2060, Culture=neutral, PublicKeyToken=7dd5c3163f2cd0cb
Infragistics4.Win.UltraWinGrid.v13.1.dll
C:\WINDOWS\Microsoft.Net\assembly\GAC_MSIL\Infragistics4.Win.UltraWinGrid.v13.1\v4.0_13.1.20131.2060__7dd5c3163f2cd0cb\Infragistics4.Win.UltraWinGrid.v13.1.dll
fc51a7e0-beb8-4b3c-a203-a1f8842adc5c
Infragistics4.Shared.v13.1, Version=13.1.20131.2060, Culture=neutral, PublicKeyToken=7dd5c3163f2cd0cb
Infragistics4.Shared.v13.1.dll
C:\WINDOWS\Microsoft.Net\assembly\GAC_MSIL\Infragistics4.Shared.v13.1\v4.0_13.1.20131.2060__7dd5c3163f2cd0cb\Infragistics4.Shared.v13.1.dll
128c2764-5e8d-48c1-a6af-05077f1727e2
Microsoft.Office.Interop.Outlook, Version=15.0.0.0, Culture=neutral, PublicKeyToken=71e9bce111e9429c
Microsoft.Office.Interop.Outlook.dll
C:\WINDOWS\assembly\GAC_MSIL\Microsoft.Office.Interop.Outlook\15.0.0.0__71e9bce111e9429c\Microsoft.Office.Interop.Outlook.dll
69f48170-b2a6-43c5-b21c-bfd5da554567
ActiproSoftware.Shared.WinForms, Version=16.1.330.0, Culture=neutral, PublicKeyToken=c27e062d3c1a4763
ActiproSoftware.Shared.WinForms.dll
C:\WINDOWS\assembly\GAC_MSIL\ActiproSoftware.Shared.WinForms\16.1.330.0__c27e062d3c1a4763\ActiproSoftware.Shared.WinForms.dll
2f922cac-9f54-4ff0-9d51-1b9d32e34a81
FarPoint.Win, Version=8.35.20151.0, Culture=neutral, PublicKeyToken=327c3516b1b18457
FarPoint.Win.dll
C:\WINDOWS\assembly\GAC_MSIL\FarPoint.Win\8.35.20151.0__327c3516b1b18457\FarPoint.Win.dll
b313a964-7f97-4083-abc9-f9c15840c3ba
CrystalDecisions.ReportAppServer.ReportDefModel, Version=13.0.3500.0, Culture=neutral, PublicKeyToken=692fbea5521e1304
CrystalDecisions.ReportAppServer.ReportDefModel.dll
C:\WINDOWS\assembly\GAC_MSIL\CrystalDecisions.ReportAppServer.ReportDefModel\13.0.3500.0__692fbea5521e1304\CrystalDecisions.ReportAppServer.ReportDefModel.dll
0d49225a-d67b-486c-b307-ba6ad43a7043
Infragistics4.Win.UltraWinChart.v13.1, Version=13.1.20131.2060, Culture=neutral, PublicKeyToken=7dd5c3163f2cd0cb
Infragistics4.Win.UltraWinChart.v13.1.dll
C:\WINDOWS\Microsoft.Net\assembly\GAC_MSIL\Infragistics4.Win.UltraWinChart.v13.1\v4.0_13.1.20131.2060__7dd5c3163f2cd0cb\Infragistics4.Win.UltraWinChart.v13.1.dll
a30abd36-18d1-4b63-a130-d3877b888058
JiwaDashboardUI, Version=7.2.1.0, Culture=neutral, PublicKeyToken=e30ce81e37f29c8c
JiwaDashboardUI.dll
C:\VSTS\Jiwa 7\07.02.00\Built Files\JiwaDashboardUI.dll
9d81197e-0e73-4711-b4c4-cb3bbf164d3f
System.Linq, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a
System.Linq.dll
C:\WINDOWS\Microsoft.Net\assembly\GAC_MSIL\System.Linq\v4.0_4.0.0.0__b03f5f7f11d50a3a\System.Linq.dll
b867f3f7-2b6b-4532-aec9-72bdcad2700c
System.Linq.Expressions, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a
System.Linq.Expressions.dll
C:\WINDOWS\Microsoft.Net\assembly\GAC_MSIL\System.Linq.Expressions\v4.0_4.0.0.0__b03f5f7f11d50a3a\System.Linq.Expressions.dll
be37335f-26eb-47cc-913c-e222156188bc
System.Linq.Queryable, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a
System.Linq.Queryable.dll
C:\WINDOWS\Microsoft.Net\assembly\GAC_MSIL\System.Linq.Queryable\v4.0_4.0.0.0__b03f5f7f11d50a3a\System.Linq.Queryable.dll
951af336-9c1e-492a-a190-4411becd5db9
System.Linq.Parallel, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a
System.Linq.Parallel.dll
C:\WINDOWS\Microsoft.Net\assembly\GAC_MSIL\System.Linq.Parallel\v4.0_4.0.0.0__b03f5f7f11d50a3a\System.Linq.Parallel.dll
9d7bcf0e-f496-4995-a8a4-771bf1fbcb32
JiwaServiceModel, Version=7.2.1.0, Culture=neutral, PublicKeyToken=e30ce81e37f29c8c
JiwaServiceModel.dll
C:\VSTS\Jiwa 7\07.02.00\Built Files\JiwaServiceModel.dll
ca23d214-4576-4e53-b570-2e7685a08118
2020-03-06T09:03:12.463
1