FiveTech Software tech support forums

... en ambas cajas deben quedar 2 registros. 6. El archivo se abre en modo compartido Adjunto trozo de código como se graba. msgbox('Paso grabar') Sele poszvta; sumreg() // Atualiza registro Z Repla zvtnumz With nzx, zvtfech With fechax,; zvtfape With Dtos(Date())+Left(Strtran(timex,':',''),4),; ...

... oWnd2 MDICHILD FROM 0, 0 TO oWnd1:nHeight, oWnd1:nRight-230 PIXEL TITLE "Inventario de Armas" NOSYSMENU NOICONIZE NOCAPTION OF oWnd1 SELE INV_EQ @ 0,0 BROWSE oBrw ALIAS "INV_EQ" OF oWnd2 COLOR nCOLOR2,nCOLOR1 ADD COLUMN TO oBrw DATA FieldWBlock('MODELO',SELECT()) HEADER ...

Yo lo hago de la siguiente forma:

Local oDbf1, oDbf2

SELE clientes
oDbf1:tDatabase():New()

Sele Datos
oDbf2:tDatabase():New()

... la estructura? Y sin dar error, porque pense que podía llegar a ser un bloqueo, pero no... copio la parte de la funcion. Gracias...!!! funcion.... sele 1 USE PEDIDOSA SHARED copy to pedver for pedidosa->lotori = 1 .or. pedidosa->lotori = 10 go top ... y sigue...

Gracias daniel por responder pero sele esto Turbo Incremental Link 5.69 Copyright (c) 1997-2005 BorlandError: Unresolved external '__reta' referenced from D:\APL\PRGS\LIB32\SBROWSEH.LIB|TSBFuncs c:\borland\bcc582\bin\bcc32 -D__HARBOUR__;HB_API_MACROS;HB_FM_STATISTICS_OFF ...

... y en el prg dice: use parametros filtro=alltrim(parametros->filtro) //quedaria el "clientes->codigo=24" sele 1 use clientes count to xcantidad for &filtro y cuenta solo los clientes con codigo 24. mi duda: ¿existe alguna forma de que esas macros ejecuten ...

... oSheet:Cells( 1, 1 ):Value = "CODIGO" oSheet:Cells( 1, 2 ):Value = "DESCRIPCION" N:=3 sele 99 use &empre\lispre.sx shared INDEX ON LISPRE->CLI_LISPR TO C:\TEMPO\TMPPAAA5F go top do while !eof() if lispre->cli_lispr>=RIGHT(xlistad,5) ...

... WF:=Alltrim(WF) WF1:=Alltrim(WF1) If File(WF) Delete File &WF End If File(WF1) Delete File &WF1 End CopyFile(oPrn:aMeta[X],WF) Sele 14 cEj:="NCONVERT.EXE -quiet -out pdf -c 5 &WF " WaitRun( cEj ) If File(WF) * Delete File &WF End Next If cPdf oPrn:End() End ...

... y las lineas de totales... Espero haberme hecho entender. Gracias por sus sugerencias FUNC REPCTA(dF1,dF2) LOCAL R:=TRANSAC->(RECNO()),nSAL:=0 SELE TRANSAC DBGOTOP() DO WHILE !EOF() IF FIELD->FECHA<dF1 nSAL+=FIELD->DEBITO-FIELD->CREDITO ENDIF SKIP ENDDO DBGOTOP() REPORT oReport ...

Alguien sabe como solucionar este error: Error: 'C:\FWH\LIB\FIVEHMX.LIB' contains invalid OMF record, type 0x21 (possibly COFF) Estoy en modo consola y quiero abrir un dialogo tipo windown, coloque esta libreria para los dialogos, ya que no la reconocia y me daban estos errores. Error: Unresolved ex...

... oCol:bStrData := { || ARQEMP->UF } oCol:cHeader := "UF" But they display just the same records in all browser area. If i put Sele ARQEMP and Set Order to 1 and Go Top before this definitions runs ok, but i use Dabase object how i set txbrowse alias with a Database object and ...

I found
I have to do sele arqprev and go top to show records.
How i can know in multiselect xbrowse if a record marked or not?

thanks in advance.

... // ...ok //aRet:={} //osql:exec(cSql,,.t.,@aret) // ..OK // alert( len(aRet) ) // use (csql) shared new alias temp via "SQLRDD" // ...ok sele temp browse(5,5,20,75) apCode := SR_SQLParse( "UPDATE personas SET cnombrecli = ? WHERE ccodigocli = ?") oSql := SR_GetConnection( oSqlWeb ...

... orientar como puedo vaciar el buffer desde ya muchas gracias Fabian **Adjunto rutina de impresion***************************** nRow+=0.4 nRow+=0.3 sele 12 use &FACTMP xtotal=0 oPrn:CmSay(nRow, 0.3, "---------------------------------------",oFnt) nRow+=0.4 oPrn:CmSay(nRow, 0.3, "Cant.",oFnt) ...

... no me funciona ninguna aplicacion de fw 16bit pero si la aplicacion DOS le coloco un alert( .. ) funciona bien y luego cuando ejecuta Swpruncmd sele el error "This program must be run under Win32" cPathdbf =  "c:\wineqa32\datos"cPathRun = "c:\respaldo\sistema\viernes"Alert( ...