genpayr.vb

humar resourse management

' Human Resources Management System (HRMS)
'
' Programmed by: Nura Tijjani Abubakar ([e-mail])
' Submitted to: Mr. Ravindran Kanapathy
'
' Oxford Brookes University (OBU)
' Final Year Project (November, 2007)

Public Class genPayr
    Inherits System.Windows.Forms.Form
    Dim VB6 As String
    Dim gen As New emPyroll

#Region " Windows Form Designer generated code "

    Public Sub New()
        MyBase.New()

        'This call is required by the Windows Form Designer.
        InitializeComponent()

        'Add any initialization after the InitializeComponent() call

    End Sub

    'Form overrides dispose to clean up the component list.
    Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
        If disposing Then
            If Not (components Is Nothing) Then
                components.Dispose()
            End If
        End If
        MyBase.Dispose(disposing)
    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.
    Friend WithEvents OleDbSelectCommand1 As System.Data.OleDb.OleDbCommand
    Friend WithEvents OleDbInsertCommand1 As System.Data.OleDb.OleDbCommand
    Friend WithEvents OleDbConnection1 As System.Data.OleDb.OleDbConnection
    Friend WithEvents OleDbDataAdapter1 As System.Data.OleDb.OleDbDataAdapter
    Friend WithEvents objnewGenPayDS As HRMS.newGenPayDS
    Friend WithEvents btnLoad As System.Windows.Forms.Button
    Friend WithEvents btnUpdate As System.Windows.Forms.Button
    Friend WithEvents btnCancelAll As System.Windows.Forms.Button
    Friend WithEvents lbl_Amount As System.Windows.Forms.Label
    Friend WithEvents lblemp_fname As System.Windows.Forms.Label
    Friend WithEvents lblemp_idno As System.Windows.Forms.Label
    Friend WithEvents lblemp_pos As System.Windows.Forms.Label
    Friend WithEvents edit_Amount As System.Windows.Forms.TextBox
    ' Friend WithEvents editemp_fname As System.Windows.Forms.TextBox
    Friend WithEvents editemp_idno As System.Windows.Forms.TextBox
    Friend WithEvents editemp_pos As System.Windows.Forms.TextBox
    Friend WithEvents lblemp_stat As System.Windows.Forms.Label
    Friend WithEvents lblnetPay As System.Windows.Forms.Label
    Friend WithEvents lblpayDate As System.Windows.Forms.Label
    Friend WithEvents lblpayID As System.Windows.Forms.Label
    Friend WithEvents lblwHours As System.Windows.Forms.Label
    Friend WithEvents editemp_stat As System.Windows.Forms.TextBox
    Friend WithEvents editnetPay As System.Windows.Forms.TextBox
    Friend WithEvents editpayDate As System.Windows.Forms.TextBox
    Friend WithEvents editpayID As System.Windows.Forms.TextBox
    Friend WithEvents editwHours As System.Windows.Forms.TextBox
    Friend WithEvents btnNavFirst As System.Windows.Forms.Button
    Friend WithEvents btnNavPrev As System.Windows.Forms.Button
    Friend WithEvents lblNavLocation As System.Windows.Forms.Label
    Friend WithEvents btnNavNext As System.Windows.Forms.Button
    Friend WithEvents btnLast As System.Windows.Forms.Button
    Friend WithEvents btnDelete As System.Windows.Forms.Button
    Friend WithEvents btnCancel As System.Windows.Forms.Button
    Public WithEvents Button1 As System.Windows.Forms.Button
    Public WithEvents ToolTip1 As System.Windows.Forms.ToolTip
    Public WithEvents frm_budget As System.Windows.Forms.GroupBox
    Public WithEvents cmd_computebudget As System.Windows.Forms.Button
    Public WithEvents cmd_return As System.Windows.Forms.Button
    Public WithEvents cmd_clearBudget As System.Windows.Forms.Button
    Public WithEvents txt_entertain As System.Windows.Forms.TextBox
    Public WithEvents txt_clothing As System.Windows.Forms.TextBox
    Public WithEvents txt_utils As System.Windows.Forms.TextBox
    Public WithEvents txt_food As System.Windows.Forms.TextBox
    Public WithEvents txt_transport As System.Windows.Forms.TextBox
    Public WithEvents txt_housing As System.Windows.Forms.TextBox
    Public WithEvents lbl_surplusamount As System.Windows.Forms.Label
    Public WithEvents Label22 As System.Windows.Forms.Label
    Public WithEvents lbl_surplus As System.Windows.Forms.Label
    Public WithEvents lbl_entertain As System.Windows.Forms.Label
    Public WithEvents lbl_clothing As System.Windows.Forms.Label
    Public WithEvents lbl_utils As System.Windows.Forms.Label
    Public WithEvents lbl_food As System.Windows.Forms.Label
    Public WithEvents lbl_transport As System.Windows.Forms.Label
    Public WithEvents lbl_housing As System.Windows.Forms.Label
    Public WithEvents Label21 As System.Windows.Forms.Label
    Public WithEvents Label20 As System.Windows.Forms.Label
    Public WithEvents Label19 As System.Windows.Forms.Label
    Public WithEvents Label18 As System.Windows.Forms.Label
    Public WithEvents Label17 As System.Windows.Forms.Label
    Public WithEvents Label16 As System.Windows.Forms.Label
    Public WithEvents Label15 As System.Windows.Forms.Label
    Public WithEvents Label14 As System.Windows.Forms.Label
    Public WithEvents Label13 As System.Windows.Forms.Label
    Public WithEvents Line8 As System.Windows.Forms.Label
    Public WithEvents Label12 As System.Windows.Forms.Label
    Public WithEvents Label11 As System.Windows.Forms.Label
    Public WithEvents Label10 As System.Windows.Forms.Label
    Public WithEvents Label9 As System.Windows.Forms.Label
    Public WithEvents Label4 As System.Windows.Forms.Label
    Public WithEvents Label3 As System.Windows.Forms.Label
    Public WithEvents Label2 As System.Windows.Forms.Label
    Public WithEvents Label1 As System.Windows.Forms.Label
    Public WithEvents frm_Salary As System.Windows.Forms.Panel
    Public WithEvents lbl_ANetPay As System.Windows.Forms.Label
    Public WithEvents lbl_ATotalDeduction As System.Windows.Forms.Label
    Public WithEvents lbl_AGrossPay As System.Windows.Forms.Label
    Public WithEvents line_div_4 As System.Windows.Forms.Label
    Public WithEvents lbl_ANetPayAmount As System.Windows.Forms.Label
    Public WithEvents lbl_ATotalDeductionAmount As System.Windows.Forms.Label
    Public WithEvents lbl_AGrossPayAmount As System.Windows.Forms.Label
    Public WithEvents lbl_MNetPayAmount As System.Windows.Forms.Label
    Public WithEvents lbl_MTotalDeductionAmount As System.Windows.Forms.Label
    Public WithEvents lbl_MGrossPayAmount As System.Windows.Forms.Label
    Public WithEvents lbl_WNetPayAmount As System.Windows.Forms.Label
    Public WithEvents lbl_WTotalDeductionAmount As System.Windows.Forms.Label
    Public WithEvents lbl_WGrossPayAmount As System.Windows.Forms.Label
    Public WithEvents lbl_MGrossPay As System.Windows.Forms.Label
    Public WithEvents lbl_MNetPay As System.Windows.Forms.Label
    Public WithEvents line_div_3 As System.Windows.Forms.Label
    Public WithEvents lbl_MTotalDeduction As System.Windows.Forms.Label
    Public WithEvents lbl_WTotalDeduction As System.Windows.Forms.Label
    Public WithEvents lbl_WNetPay As System.Windows.Forms.Label
    Public WithEvents lbl_WGrossPay As System.Windows.Forms.Label
    Public WithEvents lbl_AnnualSalaries As System.Windows.Forms.Label
    Public WithEvents lbl_MonthlySalaries As System.Windows.Forms.Label
    Public WithEvents lbl_WeeklySalary As System.Windows.Forms.Label
    Public WithEvents Label23 As System.Windows.Forms.Label
    Public WithEvents frm_Paycheck As System.Windows.Forms.Panel
    Public WithEvents lbl_overtimePay1 As System.Windows.Forms.Label
    Public WithEvents cmd_showmonthlybudget As System.Windows.Forms.Button
    Public WithEvents cmd_CheckClear As System.Windows.Forms.Button
    Public WithEvents cmd_CheckCompute As System.Windows.Forms.Button
    Public WithEvents cmd_ClearAll As System.Windows.Forms.Button
    Public WithEvents cmd_Compute As System.Windows.Forms.Button
    Public WithEvents lbl_PaytoName As System.Windows.Forms.Label
    Public WithEvents Line7 As System.Windows.Forms.Label
    Public WithEvents Line6 As System.Windows.Forms.Label
    Public WithEvents Line5 As System.Windows.Forms.Label
    Public WithEvents Line4 As System.Windows.Forms.Label
    Public WithEvents Label8 As System.Windows.Forms.Label
    Public WithEvents Label7 As System.Windows.Forms.Label
    Public WithEvents Label6 As System.Windows.Forms.Label
    Public WithEvents Label5 As System.Windows.Forms.Label
    Public WithEvents lbl_CheckTotalDeduction As System.Windows.Forms.Label
    Public WithEvents lbl_CheckTDuction As System.Windows.Forms.Label
    Public WithEvents lbl_CheckOvertimePay As System.Windows.Forms.Label
    Public WithEvents lbl_2 As System.Windows.Forms.Label
    Public WithEvents lbl_checkGrossPay As System.Windows.Forms.Label
    Public WithEvents lbl_Check1 As System.Windows.Forms.Label
    Public WithEvents lbl_checkamount As System.Windows.Forms.Label
    Public WithEvents lbl_cashsymbol As System.Windows.Forms.Label
    Public WithEvents lbl_date1 As System.Windows.Forms.Label
    Public WithEvents Line3 As System.Windows.Forms.Label
    Public WithEvents lbl_date As System.Windows.Forms.Label
    Public WithEvents Line1 As System.Windows.Forms.Label
    Public WithEvents lbl_payto As System.Windows.Forms.Label
    Public WithEvents lbl_taxes As System.Windows.Forms.Label
    Public WithEvents lbl_TotalTaxDeductionAmountBox As System.Windows.Forms.Label
    Public WithEvents lbl_TotalTaxDedecutionAmount As System.Windows.Forms.Label
    Public WithEvents lbl_TotalDeductionAmount As System.Windows.Forms.Label
    Public WithEvents lbl_GrossPayAmount As System.Windows.Forms.Label
    Public WithEvents lbl_NetPay As System.Windows.Forms.Label
    Public WithEvents lbl_TotalDeduction As System.Windows.Forms.Label
    Public WithEvents lbl_GrossPay As System.Windows.Forms.Label
    Public WithEvents lbl_DeductionAmount As System.Windows.Forms.Label
    Public WithEvents lbl_name As System.Windows.Forms.Label
    Public WithEvents _lbl_HourlyWage_0 As System.Windows.Forms.Label
    Public WithEvents lbl_HoursWorked As System.Windows.Forms.Label
    Public WithEvents frm_annual As System.Windows.Forms.GroupBox
    Public WithEvents cmd_clearCalc As System.Windows.Forms.Button
    Public WithEvents cmd_compute_Calc As System.Windows.Forms.Button
    Public WithEvents txt_annualSalary As System.Windows.Forms.TextBox
    Public WithEvents lbl_HourlyWageAmount As System.Windows.Forms.Label
    Public WithEvents lbl_HourlyWageNeeded As System.Windows.Forms.Label
    Public WithEvents lbl_AnnualSalary As System.Windows.Forms.Label
    Public WithEvents lbl_HourlyWageCalc As System.Windows.Forms.Label
    Public WithEvents Button2 As System.Windows.Forms.Button
    Public WithEvents Label24 As System.Windows.Forms.Label
    Public WithEvents Button3 As System.Windows.Forms.Button
    Public WithEvents chkbox_GST As System.Windows.Forms.CheckBox
    Public WithEvents lbl_Others As System.Windows.Forms.Label
    Public WithEvents lbl_Damage As System.Windows.Forms.Label
    Public WithEvents lbl_Penalty As System.Windows.Forms.Label
    Public WithEvents lbl_GST As System.Windows.Forms.Label
    Public WithEvents chkbox_Others As System.Windows.Forms.CheckBox
    Public WithEvents chkbox_Damage As System.Windows.Forms.CheckBox
    Public WithEvents chkbox_Penalty As System.Windows.Forms.CheckBox
    Friend WithEvents editemp_fname As System.Windows.Forms.TextBox
    Public WithEvents lbl_GSTTaxDeduction As System.Windows.Forms.Label
    Public WithEvents lbl_PenTaxDeduction As System.Windows.Forms.Label
    Public WithEvents lbl_DamTaxDeduction As System.Windows.Forms.Label
    Public WithEvents lbl_OthTaxDeduction As System.Windows.Forms.Label
    Public WithEvents lbl_cGST As System.Windows.Forms.Label
    Public WithEvents lbl_cPen As System.Windows.Forms.Label
    Public WithEvents lbl_cDam As System.Windows.Forms.Label
    Public WithEvents lbl_cOth As System.Windows.Forms.Label
    Friend WithEvents Panel1 As System.Windows.Forms.Panel
    Friend WithEvents TextBox1 As System.Windows.Forms.TextBox
    Public WithEvents Label25 As System.Windows.Forms.Label
    <System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
        Me.components = New System.ComponentModel.Container
        Dim resources As System.Resources.ResourceManager = New System.Resources.ResourceManager(GetType(genPayr))
        Me.OleDbSelectCommand1 = New System.Data.OleDb.OleDbCommand
        Me.OleDbConnection1 = New System.Data.OleDb.OleDbConnection
        Me.OleDbInsertCommand1 = New System.Data.OleDb.OleDbCommand
        Me.OleDbDataAdapter1 = New System.Data.OleDb.OleDbDataAdapter
        Me.objnewGenPayDS = New HRMS.newGenPayDS
        Me.btnLoad = New System.Windows.Forms.Button
        Me.btnUpdate = New System.Windows.Forms.Button
        Me.btnCancelAll = New System.Windows.Forms.Button
        Me.lbl_Amount = New System.Windows.Forms.Label
        Me.lblemp_fname = New System.Windows.Forms.Label
        Me.lblemp_idno = New System.Windows.Forms.Label
        Me.lblemp_pos = New System.Windows.Forms.Label
        Me.edit_Amount = New System.Windows.Forms.TextBox
        Me.editemp_fname = New System.Windows.Forms.TextBox
        Me.editemp_idno = New System.Windows.Forms.TextBox
        Me.editemp_pos = New System.Windows.Forms.TextBox