VFP9 S01E06 - TABELE

Tabelele sunt fisiere cu extensia dbf
pentru a crea tabelele vom parcurge 2 etape:

a). definirea structurii tabelei
b). popularea tabelei cu inregistrari

Definirea structurii tabelei

Aceasta etapa presupune definirea campurilor din cadrul tabelei
CREATE nume_tabel

Modificarea structurii tabelei
MODIFY STRUCTURE

Butoanele insert si delete din partea de jos permit inserarea unui camp la o anumita pozitie repsectiv stergerea campului

LIST/DISPLAY STRUCTURE
LIST STRU

Popularea tabelei cu inregistrari

APPEND
Parasirea ferestrei APPEND se face folosind combinatia ctrl+w

Afisarea datelor:
LIST/DISPLAY [camp1, camp2,...],[domeniu],[FOR conditie],[TO PRINTER/TO FILE nume fisier.txt]

-unde camp1, camp2... reprezinta campurile a caror valori urmeaza a fi afisate
-daca nu se precizeaza niciun camp se afiseaza toate campurile
obs: putem folosi si expresii care contin numele campurilor

-domeniu =  ALL (Se vor afisa toate inregistrarile)
			RECORD N (se va afisa a N-a inregistrare)
			NEXT N (se vor afisa urmatoarele N inresgistrari inclusiv cea curenta)
			REST (se vor afisa inregistrarile incepand de la inregistrarea curenta inclusiv pana la sfarsit)
obs: domeniul implicit in cazul comenzii LIT AF este ALL iar domeniul implicit in cazul comenzii DISP este inregistrarea curenta

-FOR conditie permite afisarea inregistrarilor care verifica o anumita conditie
-TO PRINTER/TO FILE nume fisier permite afisarea la imprimanta respectiv afisarea intr un fisier text

Pozitionarea pe o anumita inregistrare
	GO 3}
		}=> se va afisa a3a inregistrare
	DISP}

Functii standard pentru baze de date
1) RECCOUNT() - nr total de inregistrari dintr o tabela
2) RECNO() - afiseaza numarul inregistrarii curente
3) FLDCOUNT() - numarul de campuri din tabela curenta
4) FIELD(N) - returneaza numele celui de al n-lea camp

Deschiderea/inchiderea tabelelor

Pentru a avea acces la inregistrarile dintr o tabela, aceasta tre sa fie deschisa
pot fi deschise simultan 26 de tabele

Deschiderea unei tabele se face automat in momentul crearii acesteia sau cu ajutorul comenzii

USE nume_tabela IN zona
unde zona este numerotata cu numere incepand de la 1 respectiv cu litere incepand de la litera a

CLOSE ALL
USE ELEVI1 IN 1
USE DIRIGINTI1 IN 2

Selectarea zonei de lucru:

SELE zona

Inchiderea tabelei

CLOSE - inchide tabela curenta
CLOSE ALL - inchide toate tabelele indiferent de zona in care au fost deschise

EXERCITIU

??"scriete un program care:"
?"afiseaza dirigintele ultimului elev din tabel"
?"afiseaza elevii corigenti"
?"afiseaza dirigintii care predau informatica"
?"afiseaza primii n elevi n citit de la tast"
?"afiseaza ultimii n diriginti"
?"afiseaza elevii primului diriginte"

CLEAR
CLOSE ALL
SET TALK OFF
USE ELEVI1 IN 1
USE DIRIGINTI1 IN 2
?"ELEVII CORIGENTI"
SELE 1
LIST NUME,PRENUME, MEDIA FOR MEDIA<5
WAIT

SELE 1
?"DIRIGINTELE ULTIMULUI ELEV"
N=RECCOUNT()
GO N
C=clasa
SELE 2
LIST NUME, PRENUME FOR CLASA=c
WAIT

?"DIRIGINTII CARE PREDAU ASTROFIZICA"
D="ASTROFIZICA"
SELE 2
LIST NUME,PRENUME FOR DISCIPLINA=D
WAIT

INPUT "NUMAR ELEVI " TO N
?"PRIMII",N,"ELEVI"
SELE 1
GO 1
LIST NUME,PRENUME NEXT N
WAIT

INPUT "NUMAR DIRIGINTI " TO N
?"ULTIMII ",N," DIRIGINT"
SELE 2
GO N
LIST NUME,PRENUME REST
WAIT

SELE 2
GO 1
C=CLASA
SELE 1
LIST NUME, PRENUME, CLASA FOR CLASA=C
WAIT