???
Search found 413 matches
- Thu May 14, 2026 3:34 am
- Forum: FiveWin for Harbour/xHarbour
- Topic: using hb_unzipfile
- Replies: 17
- Views: 3582
- 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
- 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
- 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 ...
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 ...
- 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 ...
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 ...
- 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
- 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 ...
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 ...
- 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
- 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 ...
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 ...
- 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 ...
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 ...
- 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 ...
- 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 ...
#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 ...
- 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...
- Es aplicable a xharbour.org ?
- Rendimiento frente a : Eagle1, mariaDb(fw), dolphin , SQLRDD ... ?
- Comados xbase que no aplican ?
- Soporte : Tiempos de respuesta, FORO ... ?
JONSSON RUSSI
- 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 ...
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 ...
- 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 ...
@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 ...