topic-24667

Board index FiveWin para Harbour/xHarbour ADS con DBF - registros borrados

Posts: 593

Joined: Sat May 12, 2007 11:47 AM

ADS con DBF - registros borrados
Posted: Sat Aug 18, 2012 02:50 AM

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 (fw): Select all Collapse

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 (fw): Select all Collapse

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

Patricio Avalos Aguirre

Posts: 1074

Joined: Fri Oct 07, 2005 01:56 PM

Re: ADS con DBF - registros borrados
Posted: Sat Aug 18, 2012 02:12 PM

Hola

no lo he probado, pero se me ocurre cambiar

Code (fw): Select all Collapse

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

Saludos
Patricio

__________________________________________________________________
Version: Harbour 3.2.0dev (r1307082134),Compiler: Borland C++ 5.8.2 (32-bit)
PCode version: 0.3, FWH 13.2
http://www.sialm.cl

rolando

Posts: 593

Joined: Sat May 12, 2007 11:47 AM

Re: ADS con DBF - registros borrados
Posted: Sat Aug 18, 2012 04:24 PM

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 (fw): Select all Collapse

if(sqlarea->deleted() , .t. , .f. )

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

Rolando

FiveTech Support Forums

Continue the discussion