FiveTech Software tech support forums

... "S", "N" ), ; oRS1:Fields( "codigo" ):Value, ; oRS1:Fields( "codbarra" ):Value, ; //oRS1:Fields( "descri" ):Value, ; alltrim( oRS1:Fields( "descri" ):Value ) + iif ( ! empty( oRS1:Fields( "descri1" ):Value ), ( " " ...

... tengo definido este listbox REDEFINE LISTBOX oLbx FIELDS ; str( oRSRub:Fields( "rubro" ):Value, 3 ), ; oemtoansi( oRSRub:Fields( "descri" ):Value ) ; HEADERS oemtoansi( "N£mero" ), oemtoansi( "Descripci¢n" ) ; // ON dblCLICK (editrubro(olbx,.F.), olbx:Refresh()); ...

Lo que está creando el conflicto es el INNER JOIN: cSQL := "SELECT s.id, s.Codigo, s.Codbarra, s.Descri, s.Precio_vta, s.Cantid, s.Cantid1, s.Cantid2, s.Cantid3, s.Cantid4, s.Rubro, s.Descri1, s.Marca, s.Costo, s.Minimo, s.Lote, s.Porc_iva, s.Gravado, s.Fec_alta, " ...

Hola gente, tengo un xbrowse de esta consulta: cSQL := "SELECT s.Codigo, s.Codbarra, s.Descri, s.Precio_vta, s.Cantid, s.Cantid1, s.Cantid2, s.Cantid3, s.Cantid4, s.Rubro, s.Descri1, s.Marca, s.Costo, s.Minimo, s.Lote, s.Porc_iva, s.Gravado, s.Fec_alta, " + ...

... I'm trying to convert an old inventory management source where I used a listbox. The substantial problem is that the first two columns (CVEPRO,DESCRI) must be inverted online according to the number corresponding to the combobox. The combobox is connected to Xbrowse because I use it to search ...

... table TmpProd "+ chr( 13 ) + chr( 10 ) + ; "insert into TmpProd SELECT dbo.Fichacod.Producto, dbo.Fichacod.Codigo, dbo.Fichacod.Descri, dbo.Fichacod.Cantid, dbo.Stock.Precio_vta, dbo.Fichacod.Cantid * dbo.Stock.Precio_vta AS total " + chr(13) + chr(10) + ; "FROM dbo.Fichacod ...

... cuenta <> 0 wque = "mov_bco" SQLMVen = SQLMVen + "INSERT INTO " + wque + " ([Fecha],[Puesto],[Cuit_che],[Numero],[Descri],[Factura],pagos,[Num_che],[Fec_che],[Banco],[Titular],[Forpago],[Vendedor], [orden], cuenta, esinter) VALUES ('" + dtoc( xfecha ) + "'," ...

... '18/03/2020', 3390, 156600.00, '18/03/2020', '18/03/2020', 1, 'N', -16700.00,' ',0,0, -16700.00 ) INSERT INTO Mov_ven ([Fecha],[Puesto],[Numero],[Descri],[Factura],pagos,[Forpago],[Vendedor]) VALUES ('18/03/2020',2, 3390,'Iturrioz Fermin ', 349400.00,0,1,'') UPDATE Numdoc SET recibo = 3390, nroorden ...

... DBFCDX ============================== RecNo RecCount BOF EOF 1 33309 .F. .F. Indexes in use TagName _FIELD->troquel TROQUEL _FIELD->descrip DESCRI _FIELD->familia FAMILIA _FIELD->monodro + str(_FIELD->preliMONO _FIELD->laborat + _FIELD->descrip LABO STR(_FIELD->codbarra,13) ...

... "OSS - BULK REPAIR" and another that contains "OSS ÔÇô BULK REPAIR" field->codice = "OSS - BULK REPAIR" field->descri = "OSS ÔÇô BULK REPAIR" ? field->codice <> field->descri I hoped was a problem related to unicode or something like that ...

ya te anexo el codigo donde hago la exportacion (para que puedas verlo), lo hago usando la funcion TOleAuto(), el problema esta en que no me deja convertir el formato de la columna oExcel := TOleAuto():New( "Excel.Application" ) oExcel:WorkBooks:Add() oHoja := oExcel:ActiveSheet() oHoja:Ce...

Hello

I have a xBrowse with a ADO table , if I press the key ' ( example I seek TEST' )

The problem is in ::oRs:Find( cExpr, 0, 1, 1 )
where cExpr --> DESCRI LIKE 'TEST'*'


Regards Maurizio

... SELECT MA MA->(DbSetOrder(1)) MA->(DbGoTop()) DO WHILE ! MA->(EoF()) AAdd( aMatBmp,( TRIM(MA->Image))) AAdd( aMatItems,( TRIM(MA->Descri))) MA->(DbSkip()) ENDDO ON the main xbrowse open and on this on a column (4) I use this command : :AddBitmap( aMatBmp ) :bBmpData := { || ...

... the arrays from another archive dbf I use at init DO WHILE ! MA->(EoF()) AAdd( aMatBmp,( TRIM(MA->Image))) AAdd( aMatItems,( TRIM(MA->Descri))) MA->(DbSkip()) ENDDO Looking the picture....I use this to show on xbrowse big the bitmaps If I open the dialog to change a record / on ...

... not successfully initialized, aborting...") oOdbc:End() return nil Endif oDbf := oOdbc:Query( "SELECT T0.field1 'CODICE', T0.field2 'DESCRI' FROM CLIENTI T0") if oOdbc:IsError() oOdbc:ShowErrorList() oOdbc:aErrors := {} l1 := .f. endif oDbf:Open() <--------- Line 93 in UTILE1V1 ...