CURIOSIDADE
uso MUITO set filter
+++ nao entendi porque o prg fecha sem acusar erro ...
tive que juntar 12 condições e usar um at(
porque se uso 12 S + 12 N = 24 + o nivel ele NAo permite
simplesmente o prg sai rs
tem realmente limite de condicoes ?
xx_podem = pogrup->natu01n+"*"+pogrup->natu01n+"*"+pogrup->natu02n+"*"+pogrup->natu03n+"*"+pogrup->natu04n+"*"+pogrup->natu05n+"*"+pogrup->natu06n+"*"+pogrup->natu07n+"*"+pogrup->natu08n+"*"+pogrup->natu09n+"*"+pogrup->natu10n+"*"+pogrup->natu11n+"*"+pogrup->natu12n+"*"
set filter to crnatu->fazenda <= pnivel .and. ;
(crnatu->codigo = pogrup->natu01s .or. ;
crnatu->codigo = pogrup->natu02s .or. ;
crnatu->codigo = pogrup->natu03s .or. ;
crnatu->codigo = pogrup->natu04s .or. ;
crnatu->codigo = pogrup->natu05s .or. ;
crnatu->codigo = pogrup->natu06s .or. ;
crnatu->codigo = pogrup->natu07s .or. ;
crnatu->codigo = pogrup->natu08s .or. ;
crnatu->codigo = pogrup->natu09s .or. ;
crnatu->codigo = pogrup->natu10s .or. ;
crnatu->codigo = pogrup->natu11s .or. ;
crnatu->codigo = pogrup->natu12s .or. ;
at(crnatu->codigo, xx_podem) > 0)
Paiva