VFPServer Open Source

16 septiembre, 2009

Para los interesados, aquí están los archivos fuentes del VFPServer. La clave para expandir los archivos es: 1234.

Excepto por la licencia de la librería de comunicaciones, todo el código fuente del VFPServer se encuenta aquí. en una próxima entrada mostraré las soluciones a dos pequeños problemitas que encontré, especialmente el de la trístemente famosa variable que no regresa ningún valor.

Hasta pronto, y que lo disfruten.

VFPServer Open Source

Israel antisemita…¡Patético caso!

30 diciembre, 2008

Esta vaina sólo se ve en Venezuela. Con razón les dicen “chaburros”.

¡Patético caso!

¡Patético caso!

Open Source

13 diciembre, 2008

Ya fue liberado el código del VFPServer. Un pequeño vistazo por encima, y se ven algunas cosas interesantes.

En enero, cuando esté mas desocupado, a meterle mano.

Viendo los anuncios económicos de Chávez

13 junio, 2008

¡Los Sujoi! ¡Manden a los Sujoi!

5 junio, 2008

¡NO mas farc!

4 febrero, 2008

No mas farc

“Somos un par de idiotas…”

6 enero, 2008

¡Ya lo sabíamos!

El par de idiotas

Murcie….GALÓ!

26 diciembre, 2007

Nooooooooo, interneeeeet…!

25 diciembre, 2007

A quien no le a pasado, que va a revisar un link interesante que le han enviado por mail el día anterior, y entonces…

Respuesta a Horacio

13 diciembre, 2007

Preguntaba Horacio, desde Argentina, sobre cómo hacer una consulta de la información de ciertos clientes que se seleccionan desde un grid.

Aunque no es un caso exactamente igual al descrito por Horacio, creo que es una buena aproximación a la respuesta que buscaba Horacio.

Tengo esta consulta en un archivo de texto (sql_DocsCobrar003.sql), la cual me trae, para un cierto cliente seleccionado, algunos tipos de documentos (curBase.doc_presup, curBase.doc_ordenc y curBase.doc_pendie):

SELECT ccVentac.doc_codigo      ,;
       empDocumentos.doc_nombre ,;
       ccVentac.doc_numero      ,;
       ccVentac.doc_emisio      ,;
       ccVentac.doc_totgen       ;
  FROM ccVentac,empDocumentos    ;
 WHERE ccVentac.cli_rif=#1       ;
   AND ccVentac.doc_codigo$#2    ;
   AND EMPTY(ccVentac.doc_cancel);
   AND EMPTY(ccVentac.doc_anula) ;
   AND empDocumentos.doc_codigo=ccVentac.doc_codigo;
   AND empDocumentos.doc_modulo='CXC';
 ORDER BY 1,3

Entonces, el código del evento BUSCAR de mi formulario, queda de esta manera:

lSelect=FILETOSTR(gRutaSQL+'sql_DocsCobrar003.sql')
lSelect=oFun.ParaToStr(lSelect,curBase.cli_rif,lDocPresup+lDocOrden+lDocPend)
lCursor="curPresupuesto"
oVFPSclient.SelectToCursor(lSelect,lCursor)
IF !EMPTY(doc_codigo)
    DO FORM buscaPresupuestos TO lOk
    IF lOk
        ***
        ***
        ***
    ENDIF
ENDIF

En el caso de la consulta de Horacio, debería encadenar todas las combinaciones CLIENTES+DOCUMENTOS seleccionadas y, entonces, realizar la sustitución con el evento oFun.ParaToStr.