use trial
gotopscandocasecase trial.min_sex = 'F'replace min_f with .t.
replace min_m with .f.
case trial.min_sex = 'M'replace min_f with .t.
replace min_m = .f.
endcaseendscan
Eric Kleeman - EDS Consulting Services MCP Visual FoxPro MCSD C#.NET Hua Hin Thailand Los Angeles California