fbpx

Solicita tu kit de integración

Ejemplo Auxiliar de cuentas – Visual Basic 6, VB6, VBA

Updated on enero 19, 2021
Auxiliar de cuentas – Contabilidad Electrónica

Dim aux As New USLibCOM.FachadaAuxiliarCtas13
    Call aux.P01Generales(rfc:="USO110603I26", mes:=4, anio:=2017, tipoSolicitud:="AF", numOrden:="XCD6633840/41", numTramite:="")
    Call aux.P02CuentasAgregar(numCta:="1100", desCta:="Bancos", saldoIni:=0, saldoFin:=100)
    Call aux.P03CuentasDetalleAuxAgregar(numCta:="1100", fecha:="2017-02-01", numUnIdenPol:="9998", concepto:="DEPOSITO BANCOS", debe:=0, haber:=100)
    Call aux.Guardar(rutaCer:="D:DropboxCSD PruebasCSD_Pruebas_CFDI_MAG041126GT8CSD_Pruebas_CFDI_MAG041126GT8.cer", rutaKey:="D:DropboxCSD PruebasCSD_Pruebas_CFDI_MAG041126GT8CSD_Pruebas_CFDI_MAG041126GT8.key", passwordKey:="12345678a", rutaDestino:="C:Wsdl")
Ejemplo de XML de salida

(La librería genera el archivo empaquetado en un .zip con la nomenclatura que especifica el SAT Ej. USO110603I26201704XC.zip)

<AuxiliarCtas:AuxiliarCtas
        xmlns:xsi = "http://www.w3.org/2001/XMLSchema-instance"
        xsi:schemaLocation = "http://www.sat.gob.mx/esquemas/ContabilidadE/1_1/AuxiliarCtas http://www.sat.gob.mx/esquemas/ContabilidadE/1_1/AuxiliarCtas/AuxiliarCtas_1_1.xsd"
        Version = "1.1"
        RFC = "USO110603I26"
        Mes = "04"
        Anio = "2017"
        TipoSolicitud = "AF"
        NumOrden = "XCD6633840/41"
        Sello = "bYbSlyY85gtVTo5eD5RolteMT8jKalyYobqbxLkwDGduFNQyp06g2W8mMk4QvEgpB6+GzboAnGlnCF8UtGGuRdv81GUt/85//9T//25l1E7suZczF2876oueSNrPT8+JXc/homaFip+HCtCb2XE2pIZ9oqYPSlnYK3ORaoJVpqrUV+/7wTBeyQ9HUsN6yigi7/eLlHwaI6PA86oVzc2OLAv4E6xAW49YAZdGreNII3w0l4EdoJHeezL55zUnCx3Fs9/9QnN6tpkGFyx4/RXD4bRHqdaXna9U0ehEq6zhZuoV3z7EPmqr8mIEKO8+qIiGwchTfcxyeFFdnAwSFgzVUQ=="
        noCertificado = "20001000000300022755"
        Certificado = "MIIF7TCCA9WgAwIBAgIUMjAwMDEwMDAwMDAzMDAwMjI3NTUwDQYJKoZIhvcNAQELBQAwggFmMSAwHgYDVQQDDBdBLkMuIDIgZGUgcHJ1ZWJhcyg0MDk2KTEvMC0GA1UECgwmU2VydmljaW8gZGUgQWRtaW5pc3RyYWNpw7NuIFRyaWJ1dGFyaWExODA2BgNVBAsML0FkbWluaXN0cmFjacOzbiBkZSBTZWd1cmlkYWQgZGUgbGEgSW5mb3JtYWNpw7NuMSkwJwYJKoZIhvcNAQkBFhphc2lzbmV0QHBydWViYXMuc2F0LmdvYi5teDEmMCQGA1UECQwdQXYuIEhpZGFsZ28gNzcsIENvbC4gR3VlcnJlcm8xDjAMBgNVBBEMBTA2MzAwMQswCQYDVQQGEwJNWDEZMBcGA1UECAwQRGlzdHJpdG8gRmVkZXJhbDESMBAGA1UEBwwJQ295b2Fjw6FuMRUwEwYDVQQtEwxTQVQ5NzA3MDFOTjMxITAfBgkqhkiG9w0BCQIMElJlc3BvbnNhYmxlOiBBQ0RNQTAeFw0xNjEwMjExODQ5MjRaFw0yMDEwMjExODQ5MjRaMIHZMScwJQYDVQQDEx5QUkVQQVJBVE9SSUEgTUlHVUVMIEhJREFMR08gU0ExJzAlBgNVBCkTHlBSRVBBUkFUT1JJQSBNSUdVRUwgSElEQUxHTyBTQTEnMCUGA1UEChMeUFJFUEFSQVRPUklBIE1JR1VFTCBISURBTEdPIFNBMSUwIwYDVQQtExxNQUcwNDExMjZHVDggLyBIRUdUNzYxMDAzNFMyMR4wHAYDVQQFExUgLyBIRUdUNzYxMDAzTURGUk5OMDkxFTATBgNVBAsUDFBydWViYXNfQ0ZESTCCASIwDQYJKoZIhvcNAQEBBQADggEPADCCAQoCggEBAIBJSA4FVCG3sWZg/99xfPOBdqjnytIZDhTpoYGNHY3VId9TC92uPwAFgJp6yrcS7yMOgxeqtTEHQXVXwxxoHKzH6ZzY+xuDhwLrJny1JxNTaiNzwPdll0iqjsK+ulXagkG3q6H4NAEI/tQ4Ss14IKS7ZKUjVqPUNdxNccXcKwf1vtgvpRebUMcNC733MpIMI0HuKHtsjsJvWMSFK0zat3RmWxM5GZE6MQpIRFk4IZYouArtOn0VXcy2nv+PYojqxiuZqOKF3nPXws9P8K6Y0VDY3M0fppr/b9eMb2UPbyK4BSSeQBs4Gafeo0xy72+NBIHqEP0LHhRDW4G/pse6LoUCAwEAAaMdMBswDAYDVR0TAQH/BAIwADALBgNVHQ8EBAMCBsAwDQYJKoZIhvcNAQELBQADggIBAKEA75ySvDFN75ccAzpjmgHRT5ZmXoZJYYIkRL2o+6TbKeCeM07a9vHfejlr7llBGm9x9M7sbTG88TqdklTTiFZqZF7R/0TzUep6y904W88WvKepU5Ig9/c4BzC4Kt1X/UV1OFPp+nf5UzdFd8OfWqKf09rGHp5bs8xfgcDlmm+EHkLggzH8RVhZGBALnXChJZZhyFZgkIkd423NYYf//mgknnOYyZQPL9MFodwbHBbYUhQY6OQIYTURanS7KcVgPedbT31QJ1NmDVUMayogzXKKV0T4MwWi5EhRdXxgOhj5PgMkaacioLFCh/cf0MuOeRdzrir9gvrLBJwWvul8Lo+a8HsBCy1ODYLX0IJd9VUdeVQtpezols1H9HLKoG2fn4526rhXYPAWRuua6uRJTFMtCIpkfCG+deq+c1sW13N+jrRfVQOGnOFz8xGobBDoB2TAqpJkMUlt3B+NJ/qbEOtV28BmbDLs65TiDT89x1qYhIPdAw8+TaPAIi2W6Q5LhNE/a+ZhFUMy/PwoDFc1RJ59jdS2b3/ke/s4Xyxcu46MCUJZdnYVjnoAWD0cxklLlBCZi8rb71ZHxl9y+AFpeahAP9l6UP4iJz90jGG8I2Ho6TR1nduAsJ8s89MZ9P2D9OvbuKkkSwbsXzL02F0udKdkN1/XkKWsWOBS/9WxC+cn"
        xmlns:AuxiliarCtas = "http://www.sat.gob.mx/esquemas/ContabilidadE/1_1/AuxiliarCtas">
        <AuxiliarCtas:Cuenta NumCta = "1100" DesCta = "Bancos" SaldoIni = "0.00" SaldoFin = "100.00">
                <AuxiliarCtas:DetalleAux Fecha = "2018-02-09" NumUnIdenPol = "9998" Concepto = "DEPOSITO BANCOS" Debe = "0.00" Haber = "100.00"/>
        </AuxiliarCtas:Cuenta>
</AuxiliarCtas:AuxiliarCtas>
 

Estamos cerca de ti, ¡síguenos!
Y entérate de nuestras promociones

© emcor software todos los derechos reservados 2020.

Solicita tu

Kit de integración

Ingresa tus datos


Recibe nuestro kit de integración!, solo tienes que solicitarlo por medio de este formulario.