Click here to Skip to main content
15,506,385 members

Comments by Simeon Abiodun (Top 18 by date)

Simeon Abiodun 22-Sep-14 6:05am View    
I wish to connect with you on social network (facebook)
Simeon Abiodun 22-Sep-14 5:40am View    
Yeah! Thanks, it`s working perfectly now.
Simeon Abiodun 20-Sep-14 3:15am View    
Public Sub updateEmpNo(ByVal xxxx As String, ByVal yyyy As String, ByVal cmbCompDesc As String)

Dim strcmd As String = "Insert into EmployeeMaster(Emp_EmployeeNumber,Emp_Surname,Emp_FirstName,Emp_OtherNames,Emp_Title,Emp_Gender,Emp_OfficePhoneExtension,Emp_YearsInService,Emp_DefaultHours,Emp_Status,Emp_DepartmentCode,Emp_DivisionCode,Emp_SectionCode,Emp_BranchCode,Emp_RegionCode,Emp_LocationCode,Emp_ReportTo,Emp_JobCode,Emp_ClassCode,Emp_PositionCode,Emp_Group1Code,Emp_Group2Code,Emp_Group3Code,Emp_EmploymentDate,Emp_EffectiveDate,Emp_EmploymentType,Emp_ReasonForChange,Emp_LastChangedBy,Emp_DateofChange,Emp_AlternateNumber1,Emp_PayPending) " & _
"Select @py,Emp_EmployeeNumber,Emp_Surname,Emp_FirstName,Emp_OtherNames,Emp_TitleEmp_Gender,Emp_OfficePhoneExtension,Emp_YearsInService,Emp_DefaultHours,Emp_Status,Emp_DepartmentCode,Emp_DivisionCode,Emp_SectionCode,Emp_BranchCode,Emp_RegionCode,Emp_LocationCode,Emp_ReportTo,Emp_JobCode,Emp_ClassCode,Emp_PositionCode,Emp_Group1Code,Emp_Group2Code,Emp_Group3Code,Emp_EmploymentDate,Emp_EffectiveDate,Emp_EmploymentType,Emp_ReasonForChange,Emp_LastChangedBy,Emp_DateofChange,Emp_AlternateNumber1,Emp_PayPending where Emp_EmployeeNumber= @px " & _
"update employeeBenefits set EmployeeNo=@py where EmployeeNo=@px; " & _
"update EmployeeCareerHist set ECareer_EmployeeNumber=@py where ECareer_EmployeeNumber=@px; " & _
"update EmployeeCareerHist set ECareer_EmployeeNumber=@py where ECareer_EmployeeNumber=@px; " & _
"update EmployeeConfirmation set Econfirmation_EmployeeNumber=@py where Econfirmation_EmployeeNumber=@px; " & _
"update EmployeeContact set EContact_EmployeeNumber=@py where EContact_EmployeeNumber=@px; " & _
"update EmployeeAbsence set EAbsence_EmployeeNumber=@py where EAbsence_EmployeeNumber=@px; " & _
"update EmployeeAccidentHist set EAccidHist_EmployeeNumber=@py where EAccidHist_EmployeeNumber=@px; " & _
"update EmployeeAppraisal set EAppraisal_EmployeeNumber=@py where EAppraisal_EmployeeNumber=@px; " & _
"update EmployeeAttachment set EmpAttach_EmployeeNumber=@py where EmpAttach_EmployeeNumber=@px; " & _
"update EmployeeAttendance set EAttendance_EmployeeNumber=@py where EAttendance_EmployeeNumber=@px; " & _
"update EmployeeBackgroundCheck set ECheck_EmployeeNumber=@py where ECheck_EmployeeNumber=@px; " & _
"update employeeBenefits set EmployeeNo=@py where EmployeeNo=@px; " & _
"update EmployeeBank set EBank_EmployeeNumber=@py where EBank_EmployeeNumber=@px; " & _
"update EmployeeDeduction set EDed_EmployeeNumber=@py where EDed_EmployeeNumber=@px; " & _
"update EmployeeDependantRelatives set ERelative_EmployeeNumber=@py where ERelative_EmployeeNumber=@px; " & _
"update EmployeeEducation set EEduc_EmployeeNumber=@py where EEduc_EmployeeNumber=@px; " & _
"update EmployeeEmergencyAddress set EEmergAddr_EmployeeNumber=@py where EEmergAddr_EmployeeNumber=@px; " & _
"update EmployeeLoan set ELoan_EmployeeNumber=@py where ELoan_EmployeeNumber=@px; " & _
"update EmployeeLoan_Termination set Eloan_EmployeeNumber=@py where Eloan_EmployeeNumber=@px; " & _
"update EmployeeLoanDetails set ELoan_EmployeeNumber=@py where ELoan_EmployeeNumber=@px; " & _
"update EmployeeMedicalHistory set EMedHist_EmployeeNumber=@py where EMedHist_EmployeeNumber=@px; " & _
"update EmployeeMedInfo set EMedInfo_EmployeeNumber=@py where EMedInfo_EmployeeNumber=@px; " & _
"update EmployeeNextofKin set ENextKin_EmployeeNumber=@py where ENextKin_EmployeeNumber=@px; " & _
"update EmployeeNHF set EmpNHF_EmployeeNumber=@py where EmpNHF_EmployeeNumber=@px; " &
Simeon Abiodun 20-Sep-14 3:13am View    
It further throw the sqlexception error:
An expression of non-boolean type specified in a context where a condition is expected, near ';'.

I`m sorry for disturbing u all d while.
Thanks
Simeon Abiodun 19-Sep-14 16:55pm View    
I will do likewise...