la bd lista vinuri sa se realizeze un program in care cu ajutorul unui meniu numit m1, sa se faca operatiile 1. adaugare
2. modificare
3. cautare
4. iesire.
pentru fiecare operatie se va activa cate o fereastra, definita anterior, colorate, prima fereastra avand butoanele incarcare, anulare si iesire. programul va fi numit listavin.prg

public m.nume,m.anrecolta,m.tip,
m.culoare,m.origine,m.recomandat,m.serviregr,
m.pretunit,m.cantcom,m.total
do inceput
do actualizare
do modificare
do cautare

proc inceput
clear
set talk off
use listavinuri exclusive
set safety off
use listavinuri index ianrecolta
define wind w1 from 0,0,4,79 to 23,75
title fereastra adaugare
colo rgb0,0,0,0,200,0
define wind w2 from 0,0,4,79 to 23,75 fill chr179
title fereastra modificare shadow
colo rgb0,0,0,0,210
define wind w3 from 0,0,4,79 to 23,75<...