FiveTech Software tech support forums

... OMOPLATO ANTIESTRES;29999.00;0001;01;2;0.00 Alguien me puede indicar como pasarlo a bases de datos RDD, en otros archivos el comando es APPEND FROM miarchivo SDF Como lo puedo hacer FHW27 + BCC55

... from it hogs the CPU each time it checks the DBF for new records, I have a timer set at 10000 to do the check DBF written by the main program and append any data if necessary and delete each record created by the main program to avoid processing the record more than once, I also do a sysrefresh ...

... haciendo pruebas con la clase database de fwh y tengo una duda para crear un nuevo registro hago lo siguiente: oDb:Blank() Redefine Get ... oDb:append() oDb:Save() Pero algo pasa que los get no me los muestra en blanco, me muestra los datos del registro donde apunta el puntero en el browse, ...

Sabeis si está funcionando 100% en harbour, o da problemas??
Gracias.

El tema es que el mismo proceso en Clipper me va bien pero en Harbour me lanza un GPF y por ahí anda un Append From.

Gracias.

Johnny: The code i summited was just a direct extract, you need to modify it for your own usage. Append following C code to your xFWH\..\Tget.prg, for calling lBig5_1st( cString, nPos ) and lBig5_2nd( cString, nPos ) from PRG. p.s. GB2312-1980 with simpler range : 1st byte ...

Johnny: The code i summited was just a direct extract, you need to modify it for your own usage. Append following C code to your xFWH\..\Tget.prg, for calling lBig5_1st( cString, nPos ) and lBig5_2nd( cString, nPos ) from PRG. p.s. GB2312-1980 with simpler range : 1st byte ...

... I find, error LockFile is show in this situation: - dbf is open eg. use table new without index file - index file exists when table is open - when append from invoked, fw show error when index dosn't exists append from work ok use test1 new // without index file, index test1.cdx exists copy ...

Antonio,

Yes, this method was previous properly. In this way I recreate table after change structure. First I create new table and append records from original table (with set deleted off statements). This method was very fast.
In this moment I change append from to dbappend() function.

Pawel

Pawel,

But is the APPEND ... properly performed ? Does the DBF change ? Thanks.

Antonio, I use in my program Append From commands (17.12.2005 version). When it function is invoked with cdx driver FwPpc show error: LockFile() not supported in PocketPc. Append with ntx driver work ok. Sample: Request DbfCdx Request DbfFpt ...

... i := 1 to fCount() aadd(a,{fieldname(i),valtype(fieldget(i))}) next i use ( CURDIR()+"\STRUCT.DBF") alias STRU new exclusive for i := 1 to len(a) append blank STRU->NAME := a[i,1] STRU->TYPE := a[i,2] next i go top DEFINE WINDOW oWnd TITLE "test" @ 1, 1 LISTBOX oBrw FIELDS SIZE 220, 167 ...

... 50 // aqui esta la situacion Do While .T. // necesito que este archivo If NET_USE("Venta1",.T.,5) // lo pueda llevar a mdi zap For i=1 to 30 Append Blank Replace Venta1->Cod_Art with " " Next i exit Else ESTADO_DBF() RETURN Endif Enddo cFol_Fac:=0 cFem_Fac:=date() cFve_Fac:=date() cCod_Pro ...

... == dDate ) .AND. ( event->time == cTime ) lUpd := .F. ENDIF SELECT event SKIP ENDDO ENDIF // Update... IF lUpd // Event... SELECT event APPEND BLANK event->file := import->file event->event := cEvent event->date := dDate event->time := cTime event->by := "CDMEDI" event->notes ...