pack

[surGom]

Tengo el siguiente código

texto("Borrando pedidos antiguos")
delete for dfecha <= (date() - 90) while (estado = "R" )
PACK

delete tag nroped
delete tag nrorem
delete tag fentrega


index on pedido tag nroped
oMtr:set(++nactual)
index on remito tag nrorem
oMtr:set(++nactual)
index on dentrega tag fentrega

En esta base de datos tengo un campo memo, fpt me dí cuenta que el pack en la ftp no funciona, pero si despues de utilizar el código precedente, salgo del programa y lo hago con dbwide (prometheus), los borra perfectamente. Uso fwh2.6 con xh 99.61 sumplex

Gracias desde ya

Luis