Wrappers VXml para Microsoft VisualFox Pro

Wrappers de VXml para Microsoft VisualFox Pro

VXml

Estos wrappers (definiciones de funciones en una DLL) son necesarios para utilizar VXml en sus programas basados en Microsoft Visual FoxPro

Para utilizarlos copie el contenido que se muestra a continuación en cualquier archivo .PRG de su proyecto, de preferencia en el modulo de carga o en el PRG donde realiza el proceso de emision de CFDI.

Para definir un nuevo wrapper es muy sencillo:

Usar el comando

    Declare

Si la funcion devuelve un valor, poner el tipo de valor que regresa:

    Integer o String

Indicar el nombre de la función.

Indicar en que DLL se encuentra la funcion

    IN "VXML_x86.DLL"

A continuacion definir los Parámetros de la funcion indicando unicamente el tipo (String o Integer) separados por comas.

Fecha de actualización : 08 de Julio 2024, se añadieron las funciones para Carta Porte 3.1

Wrapper:

Copiar en el Portapapeles Imprimi

Declare Integer VXML_New IN "VXML_x86.dll"                 String
Declare VXML_Free IN "VXML_x86.dll"                        Integer
Declare Integer VXML_NewWithLog IN "VXML_x86.dll"          String, String
Declare VXML_SetLogFile IN "VXML_x86.dll"                  Integer, String
Declare VXML_SetUserInfo IN "VXML_x86.dll"                 Integer, String, String
Declare Integer VXML_ProcesaDocumento IN "VXML_x86.dll"    Integer, String, String, String, String
Declare Integer VXML_ProcesaDocumentoSSL IN "VXML_x86.dll" Integer, String, String, String, String
Declare VXML_AddCfdiRelacionados_cfdi40 IN "VXML_x86.dll"  Integer, String, String, String, String, String, String, String, String, String, String, String
Declare VXML_AddCfdiRelacionado_cfdi40 IN "VXML_x86.dll"   Integer, String
Declare VXML_SetComprobanteInfo_cfdi40 IN "VXML_x86.dll"   Integer, String, String, String, String, String, String, String, String, String, String, String, String, String, String, String
Declare VXML_SetEmisorInfo_cfdi40 IN "VXML_x86.dll"        Integer, String, String, String, String
Declare VXML_SetReceptorInfo_cfdi40 IN "VXML_x86.dll"      Integer, String, String, String, String, String, String, String
Declare VXML_AddConcepto_cfdi40 IN "VXML_x86.dll"          Integer, String, String, String, String, String, String, String, String, String, String
Declare VXML_AddConceptoTraslado_cfdi40 IN "VXML_x86.dll"  Integer, String, String, String, String, String
Declare VXML_SetImpuestosInfo_cfdi40 IN "VXML_x86.dll"     Integer, String, String
Declare VXML_AddTraslado_cfdi40 IN "VXML_x86.dll"          Integer, String, String, String, String, String
Declare String VXML_GetValue IN "VXML_x86.dll"             Integer, Integer

private void GeneraDocto(String version)
{
    // Creamos un comprobante 
    int hXml = VXML_New(version);

    // Llenado del documento 

    // Datos del emisor 

    // Datos del receptor 

    // Conceptos 
    // Aqui va un bucle de conceptos, aqui vamos a poner un for para agregar 5 conceptos 
    for ( int i = 0; i < 5; i++)
    {
        VXML_AddConcepto( hXml, i.ToString(), "PZAS", "Descripcion", "1000", ( i * 1000 ).ToString(), "" );

        // Agregamos informacion aduanera al item 3 
        if ( i == 3 )
            VXML_AddInformacionAduanera( hXml, "2012-08-10", "12345", "Mexico" );

    }

    // Procesamiento del documento 
    // .... 

    // Lectura de resultados 
    // .... 

    // Liberacion de memoria
    VXML_Free(hXml);
}