FiveTech Software tech support forums

Dear team, I kindly want to ask another question about "How does mod harbour work". On some occasions I get very useful error messages - like for example Error: LOCAL declaration follows executable statement operation: line:593 called from: HB_COMPILEFROMBUF, line: 0 called from: ..\sourc...

Dear team, I kindly want to ask another question about "How does mod harbour work". On some occasions I get very useful error messages - like for example Error: LOCAL declaration follows executable statement operation: line:593 called from: HB_COMPILEFROMBUF, line: 0 called from: ..\source...

Enrico, what's not working is: ? FILEDATE( cDbf ), FILETIME( cDbf ) I made a PS script which I call from the test program and get the right time and values. FOR I := 1 to 5000 APPEND BLANK REPLACE FIELD ->test WITH "TEST"+ str(i) ...

... + "MULTIFUN"+"-") ) cPath = "C:\REDEDB" aArq ="MULTIFUN" // - contém o nome do arquivo DBF cDbf =".DBF" // - extensao cCaminho = "//192.168.1.165:2812/multifun.dbf" cAlias = "MULTIFUN" SELECT 1 dbUseArea( .F.,DBSETDRIVER(), ...

... maybe xbrowsers. The layout will be always the same then. @ nTop,nLeft XBROWSE oBrw size nBreed,nHoogte PIXEL OF oTarget font oFont ; DATASOURCE cDbf ; .... StyleBrowse(oBrw, aBrwGet, aBrwEdit ,cData ) .... Static Function StyleBrowse( oBrwSel, aBarget, aEditget, cNaam )   LOCAL ...

Ruth, https://mybergland.com/fwforum/dbf2hash2.jpg You have included a function here that fills 2 HASHs. The database is opened with USE(). Then you browse the database with do while .not. eof() skip enddo You then fill the local HASH local hDBF_Recs := {=>} and the hSLIDER (static) H...

... the dbf and chceks for the keys - If the keys exist, updates the value in the dbf - Otherwise appends a new entry with the values. EditIniDBF( cDbf ) - If the dbf does not exist and user wants to create, then the dbf is created - User can edit values and/or append new values. */ I am not yet ...

Correct function Builddbf(aHeader,Alengte,cDbf,cdeli) local aStru := {} local aFields := HB_ATokens(aHeader[1], cdeli ) for i = 1 to len(aFields) cField = (aFields[i]) aAdd( aStru, { cField , "C", 255 , 0 } ) // I insert 255 is the ...

... the source code complete ? This function i have found on the forum. What would you like more ? the problem is on function Builddbf(adata,Alengte,cDbf) if the header is Articolo;variante;Simili;Codice;Descrizione;Desc_breve;Desc_sint;tecnica;Reparto;Categoria;Marca;Codice_pro;misura;Esistenza;Disponib;Ubicazione;EAN13;Code128;Code39;Immagine;Tipocosto;Costo;Prezzo_ven;Ultprezzo;Aliquota;Note;Note_testo;Allegati;Conto_ven;Conto_acqu ...

... local aHdrs := { "Cognome","Nome","Indirizzo","Città", "Provincia"} local cDbf := "Cust" USE CUSTOMERI ALIAS CUST ..... Tabella(aColumns,aHdrs,cDbf,"Selezione Clienti","Cli") RETURN NIL Function ...

... la tabla. Ahora, cTable también puede ser una Vista y devuelve la sentencia SQL para crear la vista. - Enhanced method SaveToDBF( cTable/cSql, cDbf/cNewAlias, lForUpdate ) Si el segundo parámetro es un nombre de alias no utilizado, se crea una base de datos temporal con ese alias con los datos. ...

... ) --> SQL to create the table. Now, cTable can be a View also and returns SQL to create the view. - Enhanced method SaveToDBF( cTable/cSql, cDbf/cNewAlias, lForUpdate ) If the 2nd parameter is an unused alias name, a temporary dbf with that alias is created with the data. This can be used ...

... es .T., el mombre del fichero ejecutable sin el camino, es almacenado como "Application" en METADATA. * Function FW_AdoExportToDBF( oRs, cDbf, [lEditStruct] ) Cuando el conjunto de registros tiene un campo de AutoIncrement, ese campo también se crea como un campo de autoincrement en DBF. ...

... or a logical .T.. If .t., the name of the exe without path is stored as "Application" in METADATA. * function FW_AdoExportToDBF( oRs, cDbf, [lEditStruct] ) When the recordset has AutoIncrement field, that field is being created as an autoincrement field in DBF also. This resuls in ...

Hola a todos,

Cuando utilizo:

oConDB:ImportFromDBF( cDBF, cTable, ...)

si la tabla ya existe el sistema me pregunta "Replace existing table...?", es posible omitir esta pregunta y que por defecto realice la importación?

Muchas gracias,