Untitled

set talk off
set exact on
clear
use biblio
?'Continutul bazei de date'
display all
wait
?'Titlurile si autorii cartilor de editura teora'
go top
display Titlu,Autorul for Editura='teora'
if not found() ?'Nu sunt carti teora'
endif
wait
?'Titlurile cartilor din 2000'
go top
display Titlu,Autorul for Anul_inv=2000
if not found() ?'Nu sunt carti din 2000'
endif
return