FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Ejemplo de __dbtrans() por favor-SOLUCIONADO
Posts: 555
Joined: Wed Jul 31, 2013 01:14 PM
Ejemplo de __dbtrans() por favor-SOLUCIONADO
Posted: Sat Feb 03, 2018 09:51 PM
La solución, aunque no tData..
USE ZSALDO NEW
USE NEXTSALDO NEW
SELECT ZSALDO
__dbTrans( Select( 'nextsaldo' ), , { || Substr( Alltrim( ZSALDO->ZSCTA),-4) = Str(Year(mal),4) } ,,, )
CLOSE zsaldo
close nextsaldo

Amigos, este código no me funciona...
Uso tData()
Code (fw): Select all Collapse
nesald:= tData():New(  , "NEXTSALDO"   )
nesal:Use()
nArea:= nesald:nArea  ////=1
zs := tData():New(  , "ZSALDO"  ) 
zs:Use()
 __dbTrans( nArea ) 

nesald:Close()
zs:Close()


Deseo copiar todo un archivo en otro con los mismos campos.

Gracias, saludos
Ruben Dario Fernandez
Dario Fernandez

FWH 2501, Harbour, MVS2022 Community, MySql & MariaDB, Dbf/Cdx VSCode.

Maldonado - Uruguay
Posts: 6755
Joined: Wed Feb 15, 2012 08:25 PM
Re: Ejemplo de __dbtrans() por favor
Posted: Sun Feb 04, 2018 12:00 AM
Cristobal Navarro

Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo

El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
Posts: 555
Joined: Wed Jul 31, 2013 01:14 PM
Re: Ejemplo de __dbtrans() por favor
Posted: Sun Feb 04, 2018 12:06 AM

Gracias Sr. Navarro, revisando...
Saludos
Ruben Dario Fernandez

Dario Fernandez

FWH 2501, Harbour, MVS2022 Community, MySql & MariaDB, Dbf/Cdx VSCode.

Maldonado - Uruguay

Continue the discussion