Gestiune Magazin Alimentar -pentru atestarea competentelor profesionale

Colegiul National " Al. I. Cuza " Corabia

Lucrare pentru atestarea competentelor profesionale

Gestiune Magazin Alimentar

1.Motivatia alegerii temei

Deoarece metoda veche de gestionare a bunurilor era greoaie si necesita mult timp am decis sa dezvolt acest program pentru facilitarea desfasurarii activitatii intr-un magazin alimentar.

Acest program faciliteaza atat munca conducerii care cunoaste     intotdeauna detaliile despre produsele aflate in magazin,cat si a vanzatorului care este ajutat in defasurarea activitatii.

Programul ajuta vanzatorul in procesul de vanzare a produselor aflate in magazin calculand totalul de plata pentru un anumit client si in acelasi timp tine evidenta produselor aflate pe stoc.

2.Structura aplicatiei

-2.1 Structuri de date utilizate-

Programul are la baza urmatoarea baza de date:

Proiect2.dbc care contine tabelele:

Categorie. dbf - tine evidenta produselor oferite spre vanzare si are urmatoarea structura:

Cod_produs - N2

Denumire - C20

Pret_unita - N10.1

Stoc- N6

Cantitate -N6

Total_de_plata - N10 .2

Total.dbf-inregistreaza toate valorile pretului total si are urmatoarea structura:

Total_de_p -N10.2

-2.2 Organizarea continutului informational-

Programul tine evidenta produselor dintr-un magazin alimentar .Are in componenta sa urmatoarele formulare ce cuprind:

Form1.scx -formular principal-cuprinde urmatoarele butoane:

-Butonul 'Cauta' care la introducerea in campul text1 a numelui unui produs cautat va afisa in campurile txtpret_unita ,txtstoc,txtcod_produs pretul produsului,cantitatea care mai este in stoc respectiv codul produsului

-Butonul 'Calculeaza' -calculeaza pentru o valoare introdusa in campul txtcantitate valoarea pe care trebuie sa o plateasca clientul pentru un anumit produs,valoare afisata in campul text2.

In campul text3 este facuta suma valorilor afisate in campul text2,suma ce ramane pana la apasarea butonului 'Resetare'

-Butonul 'Resetare'-prin apasarea acestui buton valorile afisate in campurile text1,text2,text3,txtcantitate sunt resetate la valoarea nula.

-Butonul 'Editare produse'-prin apasarea acestui buton este deschis formularul parola.scx care contine butonul 'ok' ,butonul 'iesire' si campul text1 care in functie de parola introdusa va deschide sau nu formularul editare.scx

-Butonul 'Afisare produse'-la apasarea acestui buton este deschis raportul 'Afisare.frx' care contine o lista cu produsele si detalii depre acestea .

-Butonul 'Iesire'-la apasarea acestui buton formularul 'form1.scx'este inchis.

Parola.scx-acest formular cuprinde urmatoarele butoane:

-Butonul 'Ok'-la apasarea acestui buton, in functie de parola introdusa va apare mesajul 'Foarte bine' si se va deschide formularul editare.scx in cazul in care parola este validata,iar daca parola nu este validata va apare mesajul 'Parola gresita'

-Butonul 'Iesire'-la apasarea acestui buton se inchide formularul Parola.scx

Formularul 'Editare.scx'-acest formular este deschis numai daca este validata parola introdusa la formularul 'parola.scx'

Cuprinde urmatoarele butoane:

-Butonul 'Adaugare'-prin apasarea acestui buton sunt introduse in tabela categorie.dbf noi inregistrari in functie de valorile introduse de la tastatura in campurile txtcod_produs,txtdenumire,txtpret_unita,txtstoc.

-Butonul 'Modificare'-prin apasarea acestui buton este modificata o anumita inregistrare din tabela categorie.dbf in functie de valoarea introdusa de la tastatura in campul text1.

-Butonul 'Stergere'- prin apasarea acestui buton este stearsa o anumita inregistrare din tabela categorie.dbf in functie de valoarea introdusa de la tastatura in campul txtcod_produs.

-Butonul 'Iesire'-inchide formularul 'editare.scx'

Programul contine si raportul 'Afisare.frx' care afiseaza informatii precum stoc ,pret,denumire,cod produs despre produse .

3.Detalii tehnice de implementare

In formularul 'Form1.scx' butoanele au urmatoarele algoritme:

-Butonul 'Cauta':

USE c:proiect2categorie.dbf AGAIN

GO top

i=0

DO WHILE i<RECCOUNT()

IF denumire=thisform.text1.Value

GOTO cod_produs

thisform.txtpret_unita.Value=pret_unita

thisform.txtstoc.Value=stoc

thisform.txtCantitate.Value=0

thisform.txtCod_produs.Value=cod_produs

i=RECCOUNT()+1

ELSE

IF EOF()

WAIT WINDOW TIMEOUT 3 [Nu exista un produs cu numele respectiv]

i=i+RECCOUNT()

ELSE

i=i+1

skip

ENDIF

endif

ENDDO

PUBLIC b

b=cod_produs

-Butonul 'Calculeaza':

USE c:proiect2categorie.dbf again

GOTO b

c=stoc

IF thisform.txtcantitate.value<thisform.txtstoc.Value

thisform.text2.Value=thisform.txtcantitate.value*thisform.txtpret_unita.value

thisform.txtstoc.Value=thisform.txtstoc.Value-thisform.txtcantitate.value

replace stoc WITH c-thisform.txtCantitate.value

a=a+thisform.text2.value

thisform.text3.Value=a

USE C:PROIECT2categorie.DBF AGAIN

replace total_de_plata WITH a

ELSE

WAIT WINDOW TIMEOUT 3 [produsul nu exista in cantitatea ceruta]

endif

-Butonul 'Resetare':

a=0

thisform.txtCantitate.Value=[ ]

thisform.text2.Value=[ ]

thisform.text3.Value=[ ]

thisform.text1.Value=[ ]

-Butonul 'Editare produse':

DO FORM c:proiect2parola.scx

-Butonul 'Afisare produse':

REPORT FORM c:proiect2afisare.frx preview

-Butonul 'Iesire':

thisform.release

In formularul 'editare.scx' butoanele au urmatoarele algoritme:

-Butonul 'Adaugare':

USE c:proiect2categorie.dbf

GO bottom

APPEND BLANK

replace cod_produs WITH thisform.txtCod_produs.Value

replace denumire WITH thisform.txtDenumire.Value

replace pret_unita WITH thisform.txtPret_unita.Value

replace stoc WITH thisform.txtstoc.Value

-Butonul 'Modificare':

USE c:proiect2categorie.dbf AGAIN

GO top

i=0

DO WHILE i<=RECCOUNT()

IF cod_produs=VAL(thisform.text1.Value)

GOTO cod_produs

thisform.txtpret_unita.Value=pret_unita

thisform.txtstoc.Value=stoc

thisform.txtcod_produs.Value=cod_produs

thisform.txtDenumire.Value=denumire

i=RECCOUNT()+1

ELSE

IF EOF()

WAIT WINDOW TIMEOUT 3 [Nu exista un produs cu numele respectiv]

i=i+RECCOUNT()

ELSE

i=i+1

skip

ENDIF

endif

ENDDO

-Butonul 'Stergere':

USE c:proiect2categorie.dbf EXCLUSIVE

DELETE FOR cod_produs=thisform.txtCod_produs.Value

Pack

-Butonul 'Iesire':

thisform.release

In formularul 'parola.scx' butoanele au urmatoarele algoritme:

-Butonul 'Ok':

set exact on

IF thisform.text1.Value='magazin'

WAIT WINDOW TIMEOUT 1 [Foarte bine]

WAIT TIMEOUT 0.001

thisform.Release

DO FORM c:proiect2editare.scx

ELSE

WAIT WINDOW TIMEOUT 3 [Parola gresita]

k=k+1

IF k=4

WAIT WINDOW TIMEOUT 3 [Accesul interzis]

thisform.Release

ENDIF

Endif

-Butonul 'Iesire':

thisform.release

4.Resurse hard si soft necesare

Programul este realizat in Visual Fox Pro 8.0 pe un sistem de operare Windows XP.

Cerintele minime pentru ca acest program sa functioneze in conditii optime sunt:

-Pentium II cu 64 M de RAM

-Limbaj de programare Visual Fox Pro

5.Modalitati de utilizare

Pentru utilizarea acestui program utilizatorul trebuie sa copieze folderul Proiect2 in discul local C:

Se deschide programul in Visual Fox Pro si se utilizeaza fisierul Proiect2 de tip .pjx din care se selecteaza formularul form1.

Se apasa butonul Run pentru inceperea executiei programului.

6.Modalitati de dezvoltare

Cuprins

1.Motivatia alegerii temei..............2

2.STRUCTURA APLICATIEI............3

2.1 Structuri de date utilizate...........3

2.2 Organizarea continutului informational....4

3.Detalii tehnice de implementare..........9

4.Resurse hard si soft necesare..........13

5.Modalitati de utilizare............14

6.Modalitati de dezvoltare...........15