Page 1 of 1

ADS con DBF - registros borrados

PostPosted: Sat Aug 18, 2012 2:50 am
by rolando
Buenas noches,

Necesito saber si se puede incluir en un query ADS el estado de los registros marcados para borrar.

Por ej., si lo hago sin query hago algo así:

Code: Select all  Expand view
do while !oDbf:eof()

   Aadd(aPedidos , {oDbf:ENVIADO , alltrim(oDbf:NOMBRE) , ;
           oDbf:FECHA , oDbf:FECHAOUT , oDbf:NOTA , ;
           alltrim(oDbf:NOMBREPEDI) , if(oDbf:deleted() , .t. , .f.)   } )
   oDbf:skip()

enddo


Con " if(oDbf:deleted() , .t. , .f.)" logro colocar un valor ".t." cuando está marcado para borrar y un ".f." cuando no lo está.

Lo que necesito saber es si se puede y como se hace con un query ADS. ¿Que debo incluir en el siguiente query para lograr que cargue un valor de acuerdo a si el registro está marcado para borrar?

Code: Select all  Expand view
do while sqlarea->(!eof())    

    Aadd(aPedidos , {sqlarea->ENVIADO , alltrim(sqlarea->NOMBRE) , ;
     sqlarea->FECHA , sqlarea->FECHAOUT , sqlarea->NOTA , ;
     alltrim(sqlarea->NOMBREPEDI)  } )        //  esto no funciona >>> ", if(sqlarea->deleted() , .t. , .f.)"
    sqlarea->( DbSkip())

enddo


Gracias.

Rolando :D

Re: ADS con DBF - registros borrados

PostPosted: Sat Aug 18, 2012 2:12 pm
by Patricio Avalos Aguirre
Hola

no lo he probado, pero se me ocurre cambiar
Code: Select all  Expand view

AdsSetDeleted( .f. )
Sql...
bla-bla
AdsSetDeleted( .T. )    //SET DELETED OFF

Re: ADS con DBF - registros borrados

PostPosted: Sat Aug 18, 2012 4:24 pm
by rolando
Patricio,

Gracias por responder, pero no tengo problema para que me liste los registros borrados.

Lo que quiero es IDENTIFICARLOS dentro del array que es creado.

O sea, cuando el registro esté marcado para borrar, en una columna del array quede ".t." y cuando no lo esté quede ".f."

Sería algo así como
Code: Select all  Expand view
if(sqlarea->deleted() , .t. , .f. )


Pero obviamente esto no se puede, sólo lo pongo como ejemplo de lo que quisiera lograr.

Rolando :D