Recruitment System

Only available on StudyMode
  • Topic: Unified Modeling Language, UML diagrams, User
  • Pages : 6 (613 words )
  • Download(s) : 418
  • Published : February 11, 2011
Open Document
Text Preview
Ex. No. 3RECRUITMENT SYSTEM
Date:

PROBLEM STATEMENT
Design a Recruitment System with all necessary details such as Employee number, Employee name, his personal details and Designation, etc. where a operator can select his Employee number and see the details of him. And also calculate Basic pay, HRA, Allowance, etc, for salary details. The Employee Payroll System consist of details of Employee who already working in the company or a newly employed person. The details of newly employed person should be updated in the database. This new software for payroll does various tasks to facilitate the companies recruitment and payroll calculation. The various tasks done are: 1. To get the employee ID that is used for login purposes. This ID is verified for authentication with the database and the employee is given the rights to login. 2. After logging in, the next task is to display all the details of the employee displaying the details such as i. Name.

ii. Designation
iii. Employee ID
3. The next task is to calculate the salary of the employee taking into account the following details such as HRA, DA, TA, PF, LIC as follows Gross Salary = (per day salary * worked days) + (HRA + DA + TA) 4. The final task is to calculate the net salary by calculating the detection Deduction = PF + LIC

Net Salary = Gross Salary – Deduction
5. The salary calculation differs for each employee depending upon his designation and it should be mentioned by the employee while logging in the system.

USECASE DIAGRAM:

CLASS DIAGRAM:

ACTIVITY DIAGRAM:

SEQUENCE DIAGRAM:

COLLABORATION DIAGRAM:

STATECHART DIAGRAM:

DEPLOYMENT DIAGRAM:

CODING:
Form 1:
Private Sub Command1_Click()
If Text1.Text = "" Then
MsgBox "Please Enter Username"
Text1.SetFocus
ElseIf Text1.Text = "admin" And Text2.Text = "password" Then Form1.Hide
Form2.Show
Form2.SetFocus
ElseIf Text1.Text = "employee" And Text2.Text = "password" Then Form1.Hide
Form4.Show
Form4.SetFocus
Else
MsgBox "Invalid Username or Password... Try Again!!!"
Text1.SetFocus
SendKeys "{home}+{end}"
Text2.Text = ""
End If
End Sub

Private Sub Command2_Click()
End
End Sub

Form 2:
Private Sub Command1_Click()
Data1.Recordset.AddNew
Text1.SetFocus
End Sub

Private Sub Command10_Click()
End
End Sub

Private Sub Command2_Click()
Data1.Recordset.Edit
Text1.SetFocus
End Sub

Private Sub Command3_Click()
Data1.Recordset.Update
End Sub

Private Sub Command4_Click()
Data1.Recordset.MoveFirst
End Sub

Private Sub Command5_Click()
Data1.Recordset.MovePrevious
End Sub

Private Sub Command6_Click()
Data1.Recordset.MoveNext
End Sub

Private Sub Command7_Click()
Data1.Recordset.MoveLast
End Sub

Private Sub Command8_Click()
Form2.Hide
Form3.Show
End Sub

Private Sub Command9_Click()
Form2.Hide
Form1.Show
End Sub

Form 3:
Private Sub Command1_Click()
Data1.Recordset.Edit
Text1.SetFocus
End Sub

Private Sub Command10_Click()
End
End Sub

Private Sub Command2_Click()
Data1.Recordset.Update
End Sub

Private Sub Command3_Click()
Data1.Recordset.MoveFirst
End Sub

Private Sub Command4_Click()
Data1.Recordset.MovePrevious
End Sub

Private Sub Command5_Click()
Data1.Recordset.MoveNext
End Sub

Private Sub Command6_Click()
Data1.Recordset.MoveLast
End Sub

Private Sub Command7_Click()
Text7.Text = (Val(Text1.Text) * Val(Text2.Text)) + Val(Text3.Text) + Val(Text4.Text) Text8.Text = Val(Text5.Text) + Val(Text6.Text)
Text9.Text = Val(Text7.Text) - Val(Text8.Text)
End Sub

Private Sub Command8_Click()
Form3.Hide
Form2.Show
Form2.SetFocus
End Sub

Private Sub Command9_Click()
Form3.Hide
Form1.Show
Form1.SetFocus
End Sub

Form 4:
Private Sub Command1_Click()
Data1.Recordset.MoveFirst
End Sub

Private Sub Command2_Click()
Data1.Recordset.MovePrevious
End Sub

Private Sub...
tracking img