 |
|
 |  |
|
|
| |
 | Biologie | Chimie | Didactica | Fizica | Geografie | Informatica |
| Istorie | Literatura | Matematica | Psihologie |
"EVIDENTA ANGAJTILOR UNEI INTREPRINDERI"
Cap. I Denumirea si obiectul lucrarii
Titlul :"Evidenta angajatilor unei intreprinderi". Operatiile executate in acest program asupra bazelor de date sunt cele primare, adica functiile relative ale unui SGBD asupra bazelor de date:
Crearea bazei de date
Introducerea datelor in baza de date
Modificarea unor date deja existente in baza de date
Stergerea datelor din baza de date
Consultarea bazelor de date
Cap. II Structura Bazei de date
Baza de date contine trei tabele:
Angajati.dbf
Departamente.dbf
Functii.dbf
Prima tabela, Angajati.dbf, este alcatuita din:
Nr_crt: numeric 2
Nume: character 10
Prenume: character 10
Varsta: numeric 2
Cod_depart: numeric 3
Cod_fct: numeric 2
Vechime: numeric 1
Stare_civ: character 11
Mod_plata: character 10
Tip_contra: character 10
Lb_strai: character 8
Niv_lb_str: character 11
Nivel_preg: character 12
A doua tabela ,Departamente.dbf, este alcatuita din:
Cod_depart: numeric 3
Nume_depar: character 13
A treia tabela, Functii.dbf, este alcatuita din:
Cod_fct: numeric 1
Functie: character 20
Nivel_preg: character 12
Cap. III Justificarea solutiei adoptate pentru realizarea lucrarii
Am utilizat limbajul de programare Visul FoxPro pentru creearea lucrarii de atestat, deoarece acest limbaj are un viitor in domeniul economic (gestiune a bazelor de date), dar si pentru modul placut de lucru.
Visual FoxPro este un Sistem de Gestiune a Bazelor de Date (SGBD),
cunoscand in prezent o larga raspandire datorita aplicatiilor dezvoltate pentru domenii din cele mai diverse, cat si pentru interfata(meniuri, ferestre de dialog si alte caracteristici) care faciliteaza comunicarea usoara cu utilizatorul.
SGBD-ul reprezinta sisteme informatice specializate in stocarea si prelucrarea unui volum mare de date. UN SGBD trebuie sa asigure urmatoarele functii elementare relative la bazele de date:
Definirea structurii(crearea bazei de date)
Introducerea datelor in bazele de date
Modificarea unor date deja existente in bazele de date
Stergerea datelor din bazele de date
Consultarea bazelor de date(Extragerea informatiilor)
O serie de facilitati ale SGBD-ului Visual FoxPro sunt date prin componenetele specializate numite generatoare. Acestea ofera un mod de lucru comod si rapid, in ferestre specializate, utilizatorul acestor componente nu trebuie sa fie enaparat specializat in informatica, si nu trebuie sa cunoasca foarte multe lucruri despre bazele de date.Cele mai utilizate generatoare sunt:
Generatoare de rapoarte
Generatoare de meniuri
Generatoare de ecran
Sistemele de gestiune a bazelor de date apar din necesitatea gestionarii mai multor date si inmagazinarea lor ins tructuri care sa permita accesarea rapida si un mod de lucru eficient; o baza de date reprezinta un ansamblu de inregistrari, toate reprezentand o structura prestabilita de catre utilizator. Dimensiuena bazelor de date variaza in functie de mediul de programare de la baza de date vida (care nua re nici o inregistrare) pana la baze de date cu un numar foarte mare de inregistrari(aproximativ un miliard).
Bazele de date pot fuziona in cadrul unui domeniu si pot fi accesate de catre mai multi utilizatori intr-o retea(share);accesul la inregistrarile unei baze de date trebuie sa fie efficient. De asemenea, bazele de date pot beneficia doar de acces autorizat, adica nu pot fi accesate decat de utilizatorii care au permisiune de acces.
Orice baza de date are o structura ce se stabileste de catre utilizator in functie de tipul de informatie ce trebuie stocat pentru fiecare inregistrare in parte; structura este alcatuita din campuri; toate inregistrarile ce urmeaza a fi introduse in baza de date respecta structura acesteia si tipurile de date ale campurilor bazelor.
La definirea structurii unei baze de date se tine cont de utilitatea campurilor ce urmeaza a fi introfuse si se stabileste fiecare camp in parte specificandu-i-se tipul si dimensiunea. Toate bazele de date au extensia .dbf.
Grafica in Fox Pro
O interfata grafica reprezinta un ansamblu de elemente grafice ce faciliteaza modul de lucru cu bazele de date si creaza tot odata un ambient plcaut utilizatorului. Elementele unei interfete grafice sunt :
Forme
Ferestre
Meniuri(orizontal si verticale)
Machete de citire
Ferestre in Visual FoxPro
O fereastra reprezinta un spatiu de lucru definit de catre utilizator. El permite citirea datelor si prelucrarea de comenzi prin intermediul tuturor elementelor de intrefata pe care le contine. O fereastra contine: corpul ferestrei, bara de titlu, bara de subsol, numele ferestrei si schema de culori.
Declararea unei ferestre:
Define window <nume fereastra> From c1,c2 TO c3,c4
Title <'titlu'> Footer <'subsol'> Color scheme <n>
Activarea si dezactivarea unei ferestre se fac prin comenzile Activate Window <nume fereastra> respectiv Deactivate window <nume fereastra>.
Meniuri in Visual FoxPro
Un meniu reprezinta un ansamblu de optiuni pe care utilizatorul le poate accesa cu ajutorul mouse-ului sau cu ajutorul tastaturii. Meniurile sistematizeaza informatia grupand-o pe arii de importanta si de continut.
Meniurile sunt de doua feluri:
a) Orizontale
b) Verticale
Meniuri orizontale in Visual FoxPro
Pentru definirea unui meniu orizontal se vor defini urmatoarele:
definirea structurii propriu-zise a meniului: DEFINE MENU <nume meniu>
definirea fiecarei optiuni(pad) a meniului: DEFINE PAD <nume pad> OF <nume meniu> PROMPT <'mesaj'>
atribuirea unei comenzi (procedura) fiecarui pad al meniului in parte:
ON SELECTION PAD <nume pad> OF <nume meniu> DO <nume procedura> DO <nume program>
Activarea si dezactivarea meniurilor se fac prin comenzile ACTIVATE MENU <nume meniu> respectiv DEACTIVATE MENU <nume meniu>
Meniuri verticale in Visual FoxPro
Poarta denumirea de meniuri popup si reprezinta un ansamblu de optiuni grupat dupa o arie de interes. In general in cadrul meniurilor verticale se gasesc optiuni ce se refera la padul unui meniu vertical.
Pentru definirea unui meniu vertical se vor definii urmatoarele:
-definirea propriu-zisa a meniului: DEFINE POPUP <nume popup> FROM c1,c2 TO c3,c4
-definirea fiecarei optiuni(bar) a meniului:
DEFINE BAR <n> OF <nume popup> PROMPT <'mesaj'>
-atribuirea unei comezni (proceduri) pentru fiecare bar in parte:
ON SELECTION BAR <n> OF <nume popup> DO <nume procedura>
Cap. IV Descrierea bazei teoretice a lucrarii
In constuirea programelor din acest proiect am folosit urmatoarele proceduri, functii si instructiuni:
browse - afiseaza toate inregistrarile din abza de date; putem avea o fereastra browse pentru fiecare zona de lucru cu conditia sa fie memorie suficienta;
modify structure - permite modificarea campurilor in cadrul bazei de date;
list - afiseaza toate inregistrarile;
dispaly - afiseaza inregistrarea curenta;
go <nr> - pozitioneaza indicatorul de inregistrari pe inregistrarea nr;
goto top - pozitioneaza indicatorul de inregistrari pe prima inregistrare din BD;
goto bottom - pozitioneaza indicatorul de inregistrari pe ultima inregistrare din BD;
skip - muta indicatorul de inregistrari relative la pozitia curenta a acestuia;
record <nr> - are ca efect selectarea inregistrarii cu nr specificat;
next<nr> - permite selectarea unui nr de inregistrari incepand de la cea curenta, inclusiv ea;
rest - permite selectarea tuturor inregistrarilor, incepand de la cea curenta, inclusiv ea, si pana la sfarsitul tabelului;
append - permite adaugarea de inregistrari in baza de date;
append blank - permite adaugarea unei inregistrari vide la sfarsitul bazei de date;
append before - permite adaugarea unei inregistrari inaintea ultimei inregistrari din baza de date;
append blank before - permite adaugarea unei inregistrari vide pe penultima pozitie din baza de date;
insert - insereaza o inregistrare vida dupa inregistrarea curenta;
insert blank - insereaza o inregistrare vida dupa inregistrarea curenta
insert before - insereaza o inregistrare vida dupa inregistrarea curenta;
insert blank before insereaza o inregistrare vida inaintea inregistrarii curente;
replace - termina executia unui program, predand controlul programului apelant, de pe nivelul anterior sau de pe cel mai inalt nivel, altui program sau fereastra de comanda;
delete sterge logic o inregistrare;
delete all - sterge logic toata baza de date;
recall - permite recuperarea inregistrarilor sterse logic;
pack - sterge fizic toate inregistrarile sterse logic;
zap sterge toata baza de date;
Cap. V Descrierea structurii si a continutului lucrarii realizate
Lucrearea contine un meniu principal, care inlocuieste meniul programului Visual FoxPro si o baza de date alcatuita din 3 tabele.
Meniu principal
Baza de date
Codul Meniului Principal si Toate Procedurile Folosite
** ** ** ** ** ** ** ** *
*
* Menu Definition
*
** ** ** ** ** ** ** ** *
SET SYSMENU TO
SET SYSMENU AUTOMATIC
DEFINE PAD _2dn0l2r2o OF _MSYSMENU PROMPT 'Structura angajati' COLOR SCHEME 3 ;
KEY ALT+S, ''
DEFINE PAD _2dn0l2r2p OF _MSYSMENU PROMPT 'Sortare angajati dupa' COLOR SCHEME 3 ;
KEY ALT+S, ''
DEFINE PAD _2dn0l2r2q OF _MSYSMENU PROMPT 'Mod de plata' COLOR SCHEME 3 ;
KEY ALT+M, ''
DEFINE PAD _2dn0l2r2r OF _MSYSMENU PROMPT 'Tip contract' COLOR SCHEME 3 ;
KEY ALT+T, ''
DEFINE PAD _2dn0l2r2s OF _MSYSMENU PROMPT 'Nivel pregatire' COLOR SCHEME 3 ;
KEY ALT+N, ''
DEFINE PAD _2dn0l2r2t OF _MSYSMENU PROMPT 'Limba straina' COLOR SCHEME 3 ;
KEY ALT+L, ''
DEFINE PAD _2dn0l2r2u OF _MSYSMENU PROMPT 'Despre' COLOR SCHEME 3 ;
KEY ALT+D, ''
DEFINE PAD _2dn0l2r2v OF _MSYSMENU PROMPT 'Exit' COLOR SCHEME 3 ;
KEY ALT+E, ''
ON PAD _2dn0l2r2o OF _MSYSMENU ACTIVATE POPUP structuraa
ON PAD _2dn0l2r2p OF _MSYSMENU ACTIVATE POPUP sortareang
ON PAD _2dn0l2r2q OF _MSYSMENU ACTIVATE POPUP moddeplata
ON PAD _2dn0l2r2r OF _MSYSMENU ACTIVATE POPUP tipcontrac
ON PAD _2dn0l2r2s OF _MSYSMENU ACTIVATE POPUP nivelprega
ON PAD _2dn0l2r2t OF _MSYSMENU ACTIVATE POPUP limbastrai
ON SELECTION PAD _2dn0l2r2u OF _MSYSMENU ;
DO _2dn0l2r2w ;
IN LOCFILE('SAULEAMENIU PRINCIPAL' ,'MPX;MPR|FXP;PRG' ,'WHERE is MENIU PRINCIPAL?')
ON SELECTION PAD _2dn0l2r2v OF _MSYSMENU ;
DO _2dn0l2r2x ;
IN LOCFILE('SAULEAMENIU PRINCIPAL' ,'MPX;MPR|FXP;PRG' ,'WHERE is MENIU PRINCIPAL?')
DEFINE POPUP structuraa MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF structuraa PROMPT 'Angajat nou'
DEFINE BAR 2 OF structuraa PROMPT 'Concediere angajat'
ON SELECTION BAR 1 OF structuraa ;
DO _2dn0l2r2y ;
IN LOCFILE('SAULEAMENIU PRINCIPAL' ,'MPX;MPR|FXP;PRG' ,'WHERE is MENIU PRINCIPAL?')
ON SELECTION BAR 2 OF structuraa ;
DO _2dn0l2r2z ;
IN LOCFILE('SAULEAMENIU PRINCIPAL' ,'MPX;MPR|FXP;PRG' ,'WHERE is MENIU PRINCIPAL?')
DEFINE POPUP sortareang MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF sortareang PROMPT 'Nume'
DEFINE BAR 2 OF sortareang PROMPT 'Prenume'
DEFINE BAR 3 OF sortareang PROMPT 'Vechime'
DEFINE BAR 4 OF sortareang PROMPT 'Stare civila'
ON SELECTION BAR 1 OF sortareang ;
DO _2dn0l2r30 ;
IN LOCFILE('SAULEAMENIU PRINCIPAL' ,'MPX;MPR|FXP;PRG' ,'WHERE is MENIU PRINCIPAL?')
ON SELECTION BAR 2 OF sortareang ;
DO _2dn0l2r31 ;
IN LOCFILE('SAULEAMENIU PRINCIPAL' ,'MPX;MPR|FXP;PRG' ,'WHERE is MENIU PRINCIPAL?')
ON SELECTION BAR 3 OF sortareang ;
DO _2dn0l2r32 ;
IN LOCFILE('SAULEAMENIU PRINCIPAL' ,'MPX;MPR|FXP;PRG' ,'WHERE is MENIU PRINCIPAL?')
ON SELECTION BAR 4 OF sortareang ;
DO _2dn0l2r33 ;
IN LOCFILE('SAULEAMENIU PRINCIPAL' ,'MPX;MPR|FXP;PRG' ,'WHERE is MENIU PRINCIPAL?')
DEFINE POPUP moddeplata MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF moddeplata PROMPT 'Cont'
DEFINE BAR 2 OF moddeplata PROMPT 'Card'
DEFINE BAR 3 OF moddeplata PROMPT 'Cash'
ON SELECTION BAR 1 OF moddeplata ;
DO _2dn0l2r34 ;
IN LOCFILE('SAULEAMENIU PRINCIPAL' ,'MPX;MPR|FXP;PRG' ,'WHERE is MENIU PRINCIPAL?')
ON SELECTION BAR 2 OF moddeplata ;
DO _2dn0l2r35 ;
IN LOCFILE('SAULEAMENIU PRINCIPAL' ,'MPX;MPR|FXP;PRG' ,'WHERE is MENIU PRINCIPAL?')
ON SELECTION BAR 3 OF moddeplata ;
DO _2dn0l2r36 ;
IN LOCFILE('SAULEAMENIU PRINCIPAL' ,'MPX;MPR|FXP;PRG' ,'WHERE is MENIU PRINCIPAL?')
DEFINE POPUP tipcontrac MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF tipcontrac PROMPT 'Part time'
DEFINE BAR 2 OF tipcontrac PROMPT 'Full time'
DEFINE BAR 3 OF tipcontrac PROMPT 'Colaborare'
DEFINE BAR 4 OF tipcontrac PROMPT 'Sezonier'
ON SELECTION BAR 1 OF tipcontrac ;
DO _2dn0l2r37 ;
IN LOCFILE('SAULEAMENIU PRINCIPAL' ,'MPX;MPR|FXP;PRG' ,'WHERE is MENIU PRINCIPAL?')
ON SELECTION BAR 2 OF tipcontrac ;
DO _2dn0l2r38 ;
IN LOCFILE('SAULEAMENIU PRINCIPAL' ,'MPX;MPR|FXP;PRG' ,'WHERE is MENIU PRINCIPAL?')
ON SELECTION BAR 3 OF tipcontrac ;
DO _2dn0l2r39 ;
IN LOCFILE('SAULEAMENIU PRINCIPAL' ,'MPX;MPR|FXP;PRG' ,'WHERE is MENIU PRINCIPAL?')
ON SELECTION BAR 4 OF tipcontrac ;
DO _2dn0l2r3a ;
IN LOCFILE('SAULEAMENIU PRINCIPAL' ,'MPX;MPR|FXP;PRG' ,'WHERE is MENIU PRINCIPAL?')
DEFINE POPUP nivelprega MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF nivelprega PROMPT 'Facultate'
DEFINE BAR 2 OF nivelprega PROMPT 'Post liceala'
DEFINE BAR 3 OF nivelprega PROMPT 'Liceu'
ON SELECTION BAR 1 OF nivelprega ;
DO _2dn0l2r3b ;
IN LOCFILE('SAULEAMENIU PRINCIPAL' ,'MPX;MPR|FXP;PRG' ,'WHERE is MENIU PRINCIPAL?')
ON SELECTION BAR 2 OF nivelprega ;
DO _2dn0l2r3c ;
IN LOCFILE('SAULEAMENIU PRINCIPAL' ,'MPX;MPR|FXP;PRG' ,'WHERE is MENIU PRINCIPAL?')
ON SELECTION BAR 3 OF nivelprega ;
DO _2dn0l2r3d ;
IN LOCFILE('SAULEAMENIU PRINCIPAL' ,'MPX;MPR|FXP;PRG' ,'WHERE is MENIU PRINCIPAL?')
DEFINE POPUP limbastrai MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF limbastrai PROMPT 'Engleza'
DEFINE BAR 2 OF limbastrai PROMPT 'Franceza'
DEFINE BAR 3 OF limbastrai PROMPT 'Italiana'
ON BAR 1 OF limbastrai ACTIVATE POPUP engleza
ON BAR 2 OF limbastrai ACTIVATE POPUP franceza
ON BAR 3 OF limbastrai ACTIVATE POPUP italiana
DEFINE POPUP engleza MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF engleza PROMPT 'Mediu'
DEFINE BAR 2 OF engleza PROMPT 'Bine'
DEFINE BAR 3 OF engleza PROMPT 'Foarte Bine'
ON SELECTION BAR 1 OF engleza ;
DO _2dn0l2r3e ;
IN LOCFILE('SAULEAMENIU PRINCIPAL' ,'MPX;MPR|FXP;PRG' ,'WHERE is MENIU PRINCIPAL?')
ON SELECTION BAR 2 OF engleza ;
DO _2dn0l2r3f ;
IN LOCFILE('SAULEAMENIU PRINCIPAL' ,'MPX;MPR|FXP;PRG' ,'WHERE is MENIU PRINCIPAL?')
ON SELECTION BAR 3 OF engleza ;
DO _2dn0l2r3g ;
IN LOCFILE('SAULEAMENIU PRINCIPAL' ,'MPX;MPR|FXP;PRG' ,'WHERE is MENIU PRINCIPAL?')
DEFINE POPUP franceza MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF franceza PROMPT 'Mediu'
DEFINE BAR 2 OF franceza PROMPT 'Bine'
DEFINE BAR 3 OF franceza PROMPT 'Foarte Bine'
ON SELECTION BAR 1 OF franceza ;
DO _2dn0l2r3h ;
IN LOCFILE('SAULEAMENIU PRINCIPAL' ,'MPX;MPR|FXP;PRG' ,'WHERE is MENIU PRINCIPAL?')
ON SELECTION BAR 2 OF franceza ;
DO _2dn0l2r3i ;
IN LOCFILE('SAULEAMENIU PRINCIPAL' ,'MPX;MPR|FXP;PRG' ,'WHERE is MENIU PRINCIPAL?')
ON SELECTION BAR 3 OF franceza ;
DO _2dn0l2r3j ;
IN LOCFILE('SAULEAMENIU PRINCIPAL' ,'MPX;MPR|FXP;PRG' ,'WHERE is MENIU PRINCIPAL?')
DEFINE POPUP italiana MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF italiana PROMPT 'Mediu'
DEFINE BAR 2 OF italiana PROMPT 'Bine'
DEFINE BAR 3 OF italiana PROMPT 'Foarte bine'
ON SELECTION BAR 1 OF italiana ;
DO _2dn0l2r3k ;
IN LOCFILE('SAULEAMENIU PRINCIPAL' ,'MPX;MPR|FXP;PRG' ,'WHERE is MENIU PRINCIPAL?')
ON SELECTION BAR 2 OF italiana ;
DO _2dn0l2r3l ;
IN LOCFILE('SAULEAMENIU PRINCIPAL' ,'MPX;MPR|FXP;PRG' ,'WHERE is MENIU PRINCIPAL?')
ON SELECTION BAR 3 OF italiana ;
DO _2dn0l2r3m ;
IN LOCFILE('SAULEAMENIU PRINCIPAL' ,'MPX;MPR|FXP;PRG' ,'WHERE is MENIU PRINCIPAL?')
** ** ** ** ** ** ** ** *
*
* _2DN0L2R2W ON SELECTION PAD
*
* Procedure Origin:
*
* From Menu: MENIU PRINCIPAL.MPR, Record: 46
* Called By: ON SELECTION PAD
* Prompt: Despre
* Snippet: 1
*
** ** ** ** ** ** ** ** *
PROCEDURE _2dn0l2r2w
?MESSAGEBOX('Atestat facut de Saulea Marian-Ionut',64,'Atestat Informatica',2000)
CLEAR
?MESSAGEBOX('Clasa a XII-a F',64,'Atestat informatica',2000)
CLEAR
?MESSAGEBOX('Colegiu National Victor Babes',64,'Atestat Informatica',2000)
CLEAR
** ** ** ** ** ** ** ** *
*
* _2DN0L2R2X ON SELECTION PAD
*
* Procedure Origin:
*
* From Menu: MENIU PRINCIPAL.MPR, Record: 47
* Called By: ON SELECTION PAD
* Prompt: Exit
* Snippet: 2
*
** ** ** ** ** ** ** ** *
PROCEDURE _2dn0l2r2x
SET SYSMENU TO DEFAULT
** ** ** ** ** ** ** ** *
*
* _2DN0L2R2Y ON SELECTION BAR 1 OF POPUP structuraa
*
* Procedure Origin:
*
* From Menu: MENIU PRINCIPAL.MPR, Record: 5
* Called By: ON SELECTION BAR 1 OF POPUP structuraa
* Prompt: Angajat nou
* Snippet: 3
*
** ** ** ** ** ** ** ** *
PROCEDURE _2dn0l2r2y
DO FORM angajat_nou.scx
** ** ** ** ** ** ** ** *
*
* _2DN0L2R2Z ON SELECTION BAR 2 OF POPUP structuraa
*
* Procedure Origin:
*
* From Menu: MENIU PRINCIPAL.MPR, Record: 6
* Called By: ON SELECTION BAR 2 OF POPUP structuraa
* Prompt: Concediere angajat
* Snippet: 4
*
** ** ** ** ** ** ** ** *
PROCEDURE _2dn0l2r2z
DO FORM concediere.scx
** ** ** ** ** ** ** ** *
*
* _2DN0L2R30 ON SELECTION BAR 1 OF POPUP sortareang
*
* Procedure Origin:
*
* From Menu: MENIU PRINCIPAL.MPR, Record: 9
* Called By: ON SELECTION BAR 1 OF POPUP sortareang
* Prompt: Nume
* Snippet: 5
*
** ** ** ** ** ** ** ** *
PROCEDURE _2dn0l2r30
USE angajati
SORT TO sangajati ON nume /a
USE sangajati
BROWSE
** ** ** ** ** ** ** ** *
*
* _2DN0L2R31 ON SELECTION BAR 2 OF POPUP sortareang
*
* Procedure Origin:
*
* From Menu: MENIU PRINCIPAL.MPR, Record: 10
* Called By: ON SELECTION BAR 2 OF POPUP sortareang
* Prompt: Prenume
* Snippet: 6
*
** ** ** ** ** ** ** ** *
PROCEDURE _2dn0l2r31
USE angajati
SORT TO sangajati ON prenume /a
USE sangajati
BROWSE
** ** ** ** ** ** ** ** *
*
* _2DN0L2R32 ON SELECTION BAR 3 OF POPUP sortareang
*
* Procedure Origin:
*
* From Menu: MENIU PRINCIPAL.MPR, Record: 11
* Called By: ON SELECTION BAR 3 OF POPUP sortareang
* Prompt: Vechime
* Snippet: 7
*
** ** ** ** ** ** ** ** *
PROCEDURE _2dn0l2r32
USE angajati
SORT TO sangajati ON vechime /a
USE sangajati
BROWSE
** ** ** ** ** ** ** ** *
*
* _2DN0L2R33 ON SELECTION BAR 4 OF POPUP sortareang
*
* Procedure Origin:
*
* From Menu: MENIU PRINCIPAL.MPR, Record: 12
* Called By: ON SELECTION BAR 4 OF POPUP sortareang
* Prompt: Stare civila
* Snippet: 8
*
** ** ** ** ** ** ** ** *
PROCEDURE _2dn0l2r33
USE angajati
SORT TO sangajati ON stare_civ /a
USE sangajati
BROWSE
** ** ** ** ** ** ** ** *
*
* _2DN0L2R34 ON SELECTION BAR 1 OF POPUP moddeplata
*
* Procedure Origin:
*
* From Menu: MENIU PRINCIPAL.MPR, Record: 15
* Called By: ON SELECTION BAR 1 OF POPUP moddeplata
* Prompt: Cont
* Snippet: 9
*
** ** ** ** ** ** ** ** *
PROCEDURE _2dn0l2r34
define window mosu from 1,1 TO 25,145 close zoom minim double
activate window mosu
USE angajati
DISPLAY all for mod_plata = 'contbancar'
** ** ** ** ** ** ** ** *
*
* _2DN0L2R35 ON SELECTION BAR 2 OF POPUP moddeplata
*
* Procedure Origin:
*
* From Menu: MENIU PRINCIPAL.MPR, Record: 16
* Called By: ON SELECTION BAR 2 OF POPUP moddeplata
* Prompt: Card
* Snippet: 10
*
** ** ** ** ** ** ** ** *
PROCEDURE _2dn0l2r35
define window mosu from 1,1 TO 25,145 close zoom minim double
activate window mosu
USE angajati
DISPLAY all for mod_plata = 'card'
** ** ** ** ** ** ** ** *
*
* _2DN0L2R36 ON SELECTION BAR 3 OF POPUP moddeplata
*
* Procedure Origin:
*
* From Menu: MENIU PRINCIPAL.MPR, Record: 17
* Called By: ON SELECTION BAR 3 OF POPUP moddeplata
* Prompt: Cash
* Snippet: 11
*
** ** ** ** ** ** ** ** *
PROCEDURE _2dn0l2r36
define window mosu from 1,1 TO 25,145 close zoom minim double
activate window mosu
USE angajati
DISPLAY all for mod_plata = 'cash'
** ** ** ** ** ** ** ** *
*
* _2DN0L2R37 ON SELECTION BAR 1 OF POPUP tipcontrac
*
* Procedure Origin:
*
* From Menu: MENIU PRINCIPAL.MPR, Record: 20
* Called By: ON SELECTION BAR 1 OF POPUP tipcontrac
* Prompt: Part time
* Snippet: 12
*
** ** ** ** ** ** ** ** *
PROCEDURE _2dn0l2r37
define window mosu from 1,1 TO 25,145 close zoom minim double
activate window mosu
USE angajati
DISPLAY all for tip_contra = 'part time'
** ** ** ** ** ** ** ** *
*
* _2DN0L2R38 ON SELECTION BAR 2 OF POPUP tipcontrac
*
* Procedure Origin:
*
* From Menu: MENIU PRINCIPAL.MPR, Record: 21
* Called By: ON SELECTION BAR 2 OF POPUP tipcontrac
* Prompt: Full time
* Snippet: 13
*
** ** ** ** ** ** ** ** *
PROCEDURE _2dn0l2r38
define window mosu from 1,1 TO 25,145 close zoom minim double
activate window mosu
USE angajati
DISPLAY all for tip_contra = 'full time'
** ** ** ** ** ** ** ** *
*
* _2DN0L2R39 ON SELECTION BAR 3 OF POPUP tipcontrac
*
* Procedure Origin:
*
* From Menu: MENIU PRINCIPAL.MPR, Record: 22
* Called By: ON SELECTION BAR 3 OF POPUP tipcontrac
* Prompt: Colaborare
* Snippet: 14
*
** ** ** ** ** ** ** ** *
PROCEDURE _2dn0l2r39
define window mosu from 1,1 TO 25,145 close zoom minim double
activate window mosu
USE angajati
DISPLAY all for tip_contra = 'colaborare'
** ** ** ** ** ** ** ** *
*
* _2DN0L2R3A ON SELECTION BAR 4 OF POPUP tipcontrac
*
* Procedure Origin:
*
* From Menu: MENIU PRINCIPAL.MPR, Record: 23
* Called By: ON SELECTION BAR 4 OF POPUP tipcontrac
* Prompt: Sezonier
* Snippet: 15
*
** ** ** ** ** ** ** ** *
PROCEDURE _2dn0l2r3a
define window mosu from 1,1 TO 25,145 close zoom minim double
activate window mosu
USE angajati
DISPLAY all for tip_contra = 'sezonier'
** ** ** ** ** ** ** ** *
*
* _2DN0L2R3B ON SELECTION BAR 1 OF POPUP nivelprega
*
* Procedure Origin:
*
* From Menu: MENIU PRINCIPAL.MPR, Record: 26
* Called By: ON SELECTION BAR 1 OF POPUP nivelprega
* Prompt: Facultate
* Snippet: 16
*
** ** ** ** ** ** ** ** *
PROCEDURE _2dn0l2r3b
define window mosu from 1,1 TO 25,145 close zoom minim double
activate window mosu
USE angajati
DISPLAY all for nivel_preg = 'facultate'
** ** ** ** ** ** ** ** *
*
* _2DN0L2R3C ON SELECTION BAR 2 OF POPUP nivelprega
*
* Procedure Origin:
*
* From Menu: MENIU PRINCIPAL.MPR, Record: 27
* Called By: ON SELECTION BAR 2 OF POPUP nivelprega
* Prompt: Post liceala
* Snippet: 17
*
** ** ** ** ** ** ** ** *
PROCEDURE _2dn0l2r3c
define window mosu from 1,1 TO 25,145 close zoom minim double
activate window mosu
USE angajati
DISPLAY all for nivel_preg = 'post liceala'
** ** ** ** ** ** ** ** *
*
* _2DN0L2R3D ON SELECTION BAR 3 OF POPUP nivelprega
*
* Procedure Origin:
*
* From Menu: MENIU PRINCIPAL.MPR, Record: 28
* Called By: ON SELECTION BAR 3 OF POPUP nivelprega
* Prompt: Liceu
* Snippet: 18
*
** ** ** ** ** ** ** ** *
PROCEDURE _2dn0l2r3d
define window mosu from 1,1 TO 25,145 close zoom minim double
activate window mosu
USE angajati
DISPLAY all for nive_preg='liceu'
** ** ** ** ** ** ** ** *
*
* _2DN0L2R3E ON SELECTION BAR 1 OF POPUP engleza
*
* Procedure Origin:
*
* From Menu: MENIU PRINCIPAL.MPR, Record: 33
* Called By: ON SELECTION BAR 1 OF POPUP engleza
* Prompt: Mediu
* Snippet: 19
*
** ** ** ** ** ** ** ** *
PROCEDURE _2dn0l2r3e
define window mosu from 1,1 TO 25,145 close zoom minim double
activate window mosu
USE angajati
DISPLAY all for lb_strai = 'engleza' .and. niv_lb_str='mediu'
** ** ** ** ** ** ** ** *
*
* _2DN0L2R3F ON SELECTION BAR 2 OF POPUP engleza
*
* Procedure Origin:
*
* From Menu: MENIU PRINCIPAL.MPR, Record: 34
* Called By: ON SELECTION BAR 2 OF POPUP engleza
* Prompt: Bine
* Snippet: 20
*
** ** ** ** ** ** ** ** *
PROCEDURE _2dn0l2r3f
define window mosu from 1,1 TO 25,145 close zoom minim double
activate window mosu
USE angajati
DISPLAY all for lb_strai = 'engleza' .and. niv_lb_str='bine'
** ** ** ** ** ** ** ** *
*
* _2DN0L2R3G ON SELECTION BAR 3 OF POPUP engleza
*
* Procedure Origin:
*
* From Menu: MENIU PRINCIPAL.MPR, Record: 35
* Called By: ON SELECTION BAR 3 OF POPUP engleza
* Prompt: Foarte Bine
* Snippet: 21
*
** ** ** ** ** ** ** ** *
PROCEDURE _2dn0l2r3g
define window mosu from 1,1 TO 25,145 close zoom minim double
activate window mosu
USE angajati
DISPLAY all for lb_strai = 'engleza' .and. niv_lb_str='foarte bine'
** ** ** ** ** ** ** ** *
*
* _2DN0L2R3H ON SELECTION BAR 1 OF POPUP franceza
*
* Procedure Origin:
*
* From Menu: MENIU PRINCIPAL.MPR, Record: 38
* Called By: ON SELECTION BAR 1 OF POPUP franceza
* Prompt: Mediu
* Snippet: 22
*
** ** ** ** ** ** ** ** *
PROCEDURE _2dn0l2r3h
define window mosu from 1,1 TO 25,145 close zoom minim double
activate window mosu
USE angajati
DISPLAY all for lb_strai = 'franceza' .and. niv_lb_str='mediu'
** ** ** ** ** ** ** ** *
*
* _2DN0L2R3I ON SELECTION BAR 2 OF POPUP franceza
*
* Procedure Origin:
*
* From Menu: MENIU PRINCIPAL.MPR, Record: 39
* Called By: ON SELECTION BAR 2 OF POPUP franceza
* Prompt: Bine
* Snippet: 23
*
** ** ** ** ** ** ** ** *
PROCEDURE _2dn0l2r3i
define window mosu from 1,1 TO 25,145 close zoom minim double
activate window mosu
USE angajati
DISPLAY all for lb_strai = 'franceza' .and. niv_lb_str='bine'
** ** ** ** ** ** ** ** *
*
* _2DN0L2R3J ON SELECTION BAR 3 OF POPUP franceza
*
* Procedure Origin:
*
* From Menu: MENIU PRINCIPAL.MPR, Record: 40
* Called By: ON SELECTION BAR 3 OF POPUP franceza
* Prompt: Foarte Bine
* Snippet: 24
*
** ** ** ** ** ** ** ** *
PROCEDURE _2dn0l2r3j
define window mosu from 1,1 TO 25,145 close zoom minim double
activate window mosu
USE angajati
DISPLAY all for lb_strai = 'franceza' .and. niv_lb_str='foarte bine'
** ** ** ** ** ** ** ** *
*
* _2DN0L2R3K ON SELECTION BAR 1 OF POPUP italiana
*
* Procedure Origin:
*
* From Menu: MENIU PRINCIPAL.MPR, Record: 43
* Called By: ON SELECTION BAR 1 OF POPUP italiana
* Prompt: Mediu
* Snippet: 25
*
** ** ** ** ** ** ** ** *
PROCEDURE _2dn0l2r3k
define window mosu from 1,1 TO 25,145 close zoom minim double
activate window mosu
USE angajati
DISPLAY all for lb_strai = 'italiana' .and. niv_lb_str='mediu'
** ** ** ** ** ** ** ** *
*
* _2DN0L2R3L ON SELECTION BAR 2 OF POPUP italiana
*
* Procedure Origin:
*
* From Menu: MENIU PRINCIPAL.MPR, Record: 44
* Called By: ON SELECTION BAR 2 OF POPUP italiana
* Prompt: Bine
* Snippet: 26
*
** ** ** ** ** ** ** ** *
PROCEDURE _2dn0l2r3l
define window mosu from 1,1 TO 25,145 close zoom minim double
activate window mosu
USE angajati
DISPLAY all for lb_strai = 'italiana' .and. niv_lb_str='bine'
*
* _2DN0L2R3M ON SELECTION BAR 3 OF POPUP italiana
*
* Procedure Origin:
*
* From Menu: MENIU PRINCIPAL.MPR, Record: 45
* Called By: ON SELECTION BAR 3 OF POPUP italiana
* Prompt: Foarte bine
* Snippet: 27
*
** ** ** ** ** ** ** ** *
PROCEDURE _2dn0l2r3m
define window mosu from 1,1 TO 25,145 close zoom minim double
activate window mosu
USE angajati
DISPLAY all for lb_strai = 'italiana' .and. niv_lb_str='foarte bine'
Bibliografie
1. Manualul de informatica modulul I, autor Mariana Milosescu
2. Manualul de informatica modulul II, "sisteme de gestiune a bazelor de date"
www.google.ro
www.wikipedia.org
www.zentiva.ro
Copyright © 2024 - Toate drepturile rezervate
