USE persoanedinroma
LIST numele,varsta,crestin
LIST nume FOR(varsta<25).and.(sexul=f)
DELETE
LIST nume FOR(sexul=m).and.(varsta>3).and.(varsta<10).and.at("A",nume)
DELETE
INDEX on varsta TAG varsta /D
USE persoanedinroma tag varsta
DISPLAY
DELETE
LIST nume FOR(varsta>25).and.(varsta<40).and.(ofranda=a).and.(sexul=f)
DELETE
DISPLAY
RECALL nume FOR(varsta<25).and.(sexul=f)
DISPLAY