Calcul salarii și evidență personal

Programul prezentat este o aplicaţie practică la studiul bazelor de date,acestea reprezentând domeniul în care este specializat FoxPro-ul,şi anume calculul salariilor pentru salariaţii unei societăţi,precum şi evidenţa personalului angajat.

Programul lucrează cu 4 baze de date în care se păstrează date referitoare la personalul societăţii.Acestea sunt: PERS , IMPOZIT, PONTAJ şi SALARII. Deasemenea

se foloseşte şi un meniu cu 6 submeniuri la realizarea programului,care conduce la o mai eficientă utilizare a acestuia.

În continuare vom prezenta algoritmii folosiţi în prelucrarea datelor introduse în vederea calculului salariilor angajaţilor de la firma respectivă.

Pentru calculul salariilor se folosesc următoarele formule:

IMP = INT(VF+9TOTALDR-LI)*PROCENT/100)

RETP = TOTALDR*3/100

RETS = SALAR*1/100

AVANS = SALAR*40/100

RESTPL = TOTALDR-RETP-RETS-AVANS-IMP

SUMAOREL = SAAR/REGN*OREL

SUMAVECH = SALAR/REGN*OREL*SPORVECH/100

SUMAOREN = SALAR/REGN*OREN*SPORN/100

SUMAORET = SALAR/REGN*ORETOX*SPORTOX/100

Unde avem următoarele notaţii:

SALAR = salar nagociat

IMP = impozitul pe salar ce se ia din MONITORUL OFICIAL

RESTPL = restul de plată (salarul net) în urma reţinerilor

RETP = reţineri pensii

RETS = reţineri şomaj

AVANS = avansul acordat (chenzina 1) angajatului

SUMAOREL = suma cuvenită pentru orele lucrate

SUMAOREN = suma cuvenită pentru orele de noapte lucrate

SUMAORET = suma cuvenită pentru orele toxice

SUMAVECH = suma cuvenităpentru spor vechime

Structura bazelor de date folosite este urmatoarea:

Structure for database: C:PROPERS.DBF

Number of data records: 16

Date of last update : 04/27/04

Code Page : 0

Field Field Name Type Width Dec Index Collate

1 MARCA Numeric 5

2 NUME Character 30

3 FUNCTIE Character 20

4 DATAN Date 8

5 DATAANG Date 8

6 SALAR Numeric 7

7 SPORVECH Numeric 2

8 SPORN Numeric 2

9 SPORTOX Numeric 2

** Total ** 85

Structure for database: C:PROIMPOZIT.DBF

Number of data records: 4

Date of last update : 07/01/98

Code Page : 0

Field Field Name Type Width Dec Index Collate

1 LI Numeric 7 Asc Machine

2 LS Numeric 7

3 FV Numeric 7

4 PROCENT Numeric 2

** Total ** 24

Structure for database: C:PROPONTAJ.DBF

Number of data records: 18

Date of last update : 01/21/01

Code Page : 0

Field Field Name Type Width Dec Index Collate

1 MARCA Numeric 5 Asc Machine

2 REGN Numeric 3

3 OREL Numeric 3

4 OREN Numeric 3

5 ORETOX Numeric 3

** Total ** 18

Structure for database: C:PROSALARII.DBF

Number of data records: 16

Date of last update : 07/02/98

Code Page : 0

Field Field Name Type Width Dec Index Collate

1 MARCA Numeric 5 Asc Machine

2 AVANS Numeric 9 2

3 IMPOZIT Numeric 9 2

4 RETP Numeric 9 2

5 RETS Numeric 9 2

6 RESTPL Numeric 9 2

7 TOTALDR Numeric 9 2

8 SUMAOREL Numeric 10 2

9 SUMAOREN Numeric 9 2

10 SUMAORET Numeric 9 2

11 SUMAVECH Numeric 9 2

** Total ** 97