Search found 413 matches

by russimicro
Thu May 14, 2026 3:34 am
Forum: FiveWin for Harbour/xHarbour
Topic: using hb_unzipfile
Replies: 17
Views: 3582

Re: using hb_unzipfile

???

by russimicro
Wed May 13, 2026 5:13 pm
Forum: FiveWin for Harbour/xHarbour
Topic: using hb_unzipfile
Replies: 17
Views: 3582

Re: using hb_unzipfile

C:\TEMP

asi funciona con windows 10/11

by russimicro
Tue May 12, 2026 8:58 pm
Forum: FiveWin for Harbour/xHarbour
Topic: using hb_unzipfile
Replies: 17
Views: 3582

Re: using hb_unzipfile

Buena tarde .

vFilXml := hb_GetFilesInZip( cFilZip )

hb_UnzipFile( cFilZip,, .T.,, xPatLoc+"\", vFilXml )

Error en windows server 2022 se aborta, sin mensajes , sin log

windows 10/11 ok perfecto SIN ERROR Y EN PRODUCCION

JONSSON RUSSI

by russimicro
Sun May 10, 2026 9:23 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Enviar mensajes por whatsapp?
Replies: 13
Views: 4556

Re: Enviar mensajes por whatsapp?

Buena tarde...

Alguien ya hizo la validación y publicación de la APP como desarrollador meta o Facebook,
como uno de los requisitos para empezar a usar la API en producción ?

Compartamos ideas ...

Nota : 1 . Ya tengo interface con api meta usando un BSP - onurix, funcionando: ok

Estoy medio ...
by russimicro
Tue Mar 31, 2026 3:36 am
Forum: FiveWin para Harbour/xHarbour
Topic: Sobre Facturacion Electronica
Replies: 3
Views: 962

Re: Sobre Facturacion Electronica

Buena noche...

Aqui encontré la solución para Colombia...

www.chilkatsoft.com

Asi de facil : toma un ejemplo del xml mas completo que tengas .. una compra tuya... en los tools de chilkat lo copias y le dices para que lenguaje lo quieres... ya después lo parametrizas para lo que es variable ...
by russimicro
Tue Mar 24, 2026 9:35 pm
Forum: FiveWin para Harbour/xHarbour
Topic: FWH 26.03 buscamos betatesters
Replies: 136
Views: 463136

Re: FWH 26.03 buscamos betatesters

Antonio... buena tarde

requiero un make para xharbour.org .. bcc77 / vs 2019 / 2022

Mis pruebas del app completo serán con xharbour.com y .org

Gracias

by russimicro
Fri Mar 20, 2026 12:14 pm
Forum: FiveWin for Harbour/xHarbour
Topic: using hb_unzipfile
Replies: 17
Views: 3582

Re: using hb_unzipfile

Antonio

Solucionado... Gracias


vFilXml := hb_GetFilesInZip( cFilZip )

IF LEN(vFilXml) == 0
AADD(aErrZip,{cFilZip,"","Archivo .zip no contiene archivos "})
ELSE

// RUN ("7z x " +cFilZip+ " -o"+ xPatLoc +" -y *.xml -bso0 -bsp0 -bse0" )

hb_UnzipFile( cFilZip,, .T.,, xPatLoc+"\", vFilXml ...
by russimicro
Thu Mar 19, 2026 3:20 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Clase TGemini
Replies: 12
Views: 1807

Re: Clase TGemini

TABLA DE COSTOS :

Code: Select all | Expand

Concepto,Cantidad,Tarifa (por 1M),Subtotal
Tokens Nuevos (Input),475,$0.10,$0.0000475
Tokens en Caché (Input),"1,109",$0.025 (25%),$0.0000277
Salida + Pensamiento,282 (26+256),$0.40,$0.0001128
TOTAL ESTIMADO,,,$0.000188
by russimicro
Thu Mar 19, 2026 2:53 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Clase TGemini
Replies: 12
Views: 1807

Re: Clase TGemini

ejemplo funcional :


PROCEDURE TestAI()
LOCAL cCondicionUsuario := "clientes que deban más de 5000 y se llamen Sergio"
LOCAL cCodigoHarbour

USE "e:\zerus\00\bases\CLIENTES.dat" SHARED NEW ALIAS CLIENTES

? "Preguntando a la IA por el filtro..."
cCodigoHarbour := AskForFilter( "CLIENTES ...
by russimicro
Thu Mar 19, 2026 2:12 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Clase TGemini
Replies: 12
Views: 1807

Re: Clase TGemini

Para que Gemini "lea" tus tablas y te ayude con reportes, consultas o análisis, tenemos que "darle ojos" a través de metadatos y muestras de datos.

Aquí tienes la estrategia ganadora para lograrlo en Harbour:

El Concepto: "RAG" (Generación Aumentada por Recuperación)
No le envías toda la base de ...
by russimicro
Thu Mar 19, 2026 2:03 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Clase TGemini
Replies: 12
Views: 1807

Re: Clase TGemini


#include "FiveWin.ch"
#include "hbcurl.ch"

#ifdef __XHARBOUR__
#define hb_hHasKey( h, k ) HHasKey( h, k )
#define hb_jsonDecode( c, h ) ap_JSONDecode( c, @h ) // Depende de tu versión de xHarbour
#endif

//----------------------------------------------------------------------------//

function ...
by russimicro
Thu Mar 19, 2026 12:18 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Clase TGemini
Replies: 12
Views: 1807

Re: Clase TGemini

#include "FiveWin.ch"
#include "hbcurl.ch"

PROCEDURE Main()
LOCAL oGemini := GeminiAPI():New( "SU API KEY" )
LOCAL cRespuesta := ""

? "Enviando pregunta a Gemini..."
cRespuesta := oGemini:Preguntar( "Hola, ¿VALOR DOLAR HOY EN PESOS COLOMBIANOS ?" )

? " Respuesta de la IA. Ver en ...
by russimicro
Sat Mar 14, 2026 12:21 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Manual de HDBC RDD
Replies: 14
Views: 1785

Re: Manual de HDBC RDD

Buen dia...

  1. Es aplicable a xharbour.org ?
  2. Rendimiento frente a : Eagle1, mariaDb(fw), dolphin , SQLRDD ... ?
  3. Comados xbase que no aplican ?
  4. Soporte : Tiempos de respuesta, FORO ... ?

JONSSON RUSSI

by russimicro
Tue Mar 03, 2026 11:48 am
Forum: mod_harbour
Topic: Comparativa: PHP / mod_harbour vs REST API
Replies: 6
Views: 3611

Re: Comparativa: PHP / mod_harbour vs REST API

Otto.. Good morning..

Software development is designed to remain functional over time and across our generations... How can I make this viable, ensuring the client backup, technological and legal improvements, and at the same time, how to protect our heritage. The answer lies in the decision to ...
by russimicro
Tue Mar 03, 2026 1:12 am
Forum: mod_harbour
Topic: Comparativa: PHP / mod_harbour vs REST API
Replies: 6
Views: 3611

Re: Comparativa: PHP / mod_harbour vs REST API

Asi lo hacemos con jakarta ee

@GET
@Path("getDataRespuestasCandidatosEmpleados")
@Produces({ MediaType.APPLICATION_JSON})
public Response getData( @QueryParam("query") String query,
@QueryParam("page") String pageInt,
@QueryParam("size") String sizeInt,
@QueryParam("campoSort") String ...