Estos wrappers (definiciones de funciones en
una DLL) son necesarios para utilizar VXml en sus programas
basados en Visual Basic 6.
Para utilizarlos copie el contenido que se muestra a continuación en su proyecto VB.
Definir un nuevo Wrapper es muy sencillo:
Use la instruccion:
PRIVATE DECLARE
A continuación, dependiendo si la función devuelve o no un valor deberá utilizar los valores:
FUNCTION ó SUB
Inmediatamente despues, debera indicar el nombre de la funcion de VXml que esta definiendo seguido de las sentencias:
LIB "VXML_x86.DLL" ALIAS
Esto le indica al compilador de Visual Basic que debe buscar la funcion en el archivo DLL indicado y a continuacion de la palabra ALIAS deberá indica el nombre de la función dentro de VXML_x86.DLL | VXML_x64.DLL, este nombre es el mismo que el de la función que desea definir y se expresa entrecomillado y comenzando con guión bajo ( _ ), el nombre de la función termina con el sufijo "_sc@XXX", donde XXX es el resultado de multiplicar el numero de Parámetros que recibe la función por 4.
A continuación deberá indicar a lista de parámetros indicando su nombre y su tipo, anteponiendo la palabra reservada:
ByVal<nombre del parametro> As <tipo del parametro>
Donde <tipo del parametro puede tener los valores de:
Long(si el parametro es numerico) ó String(si el parámetro es cadena de caracteres
Si la función devuelve algun valor, entonces el tipo de este de establece al final de la defincion con la expresion_
As <tipo de valor devuelto>
Donde <tipo de valor devuelto> puede ser:
Long ó String
Para utilizarlos copie el contenido que se muestra a continuación en su proyecto VB.
Definir un nuevo Wrapper es muy sencillo:
Use la instruccion:
PRIVATE DECLARE
A continuación, dependiendo si la función devuelve o no un valor deberá utilizar los valores:
FUNCTION ó SUB
Inmediatamente despues, debera indicar el nombre de la funcion de VXml que esta definiendo seguido de las sentencias:
LIB "VXML_x86.DLL" ALIAS
Esto le indica al compilador de Visual Basic que debe buscar la funcion en el archivo DLL indicado y a continuacion de la palabra ALIAS deberá indica el nombre de la función dentro de VXML_x86.DLL | VXML_x64.DLL, este nombre es el mismo que el de la función que desea definir y se expresa entrecomillado y comenzando con guión bajo ( _ ), el nombre de la función termina con el sufijo "_sc@XXX", donde XXX es el resultado de multiplicar el numero de Parámetros que recibe la función por 4.
A continuación deberá indicar a lista de parámetros indicando su nombre y su tipo, anteponiendo la palabra reservada:
ByVal<nombre del parametro> As <tipo del parametro>
Donde <tipo del parametro puede tener los valores de:
Long(si el parametro es numerico) ó String(si el parámetro es cadena de caracteres
Si la función devuelve algun valor, entonces el tipo de este de establece al final de la defincion con la expresion_
As <tipo de valor devuelto>
Donde <tipo de valor devuelto> puede ser:
Long ó String
Si desea ver los ejemplos funcionales del uso
de VMXL con MS VisualBasic 6 HAGA
CLICK AQUI.
Wrapper:
PRIVATE DECLARE SUB VXML_AddCfdiRelacionado_cfdi40 LIB "VXML_x86.dll" ALIAS "_VXML_AddCfdiRelacionado_cfdi40_sc@8" ( ByVal hXml As Long, ByVal UUID As String ) PRIVATE DECLARE SUB VXML_AddCfdiRelacionados_Cfdi40 LIB "VXML_x86.dll" ALIAS "_VXML_AddCfdiRelacionados_Cfdi40_sc@48" ( ByVal hXml As Long, ByVal TipoRelacion As String, ByVal UUID01 As String, ByVal UUID02 As String, ByVal UUID03 As String, ByVal UUID04 As String, ByVal UUID05 As String, ByVal UUID06 As String, ByVal UUID07 As String, ByVal UUID08 As String, ByVal UUID09 As String, ByVal UUID10 As String ) PRIVATE DECLARE SUB VXML_AddComplemento_cfdi40 LIB "VXML_x86.dll" ALIAS "_VXML_AddComplemento_cfdi40_sc@8" ( ByVal hXml As Long, ByVal complementoXml As String ) PRIVATE DECLARE SUB VXML_AddComplementoConcepto_cfdi40 LIB "VXML_x86.dll" ALIAS "_VXML_AddComplementoConcepto_cfdi40_sc@8" ( ByVal hXml As Long, ByVal ComplementoConceptoXML As String ) PRIVATE DECLARE SUB VXML_AddConcepto_Cfdi40 LIB "VXML_x86.dll" ALIAS "_VXML_AddConcepto_Cfdi40_sc@44" ( ByVal hXml As Long, ByVal ClaveProdServ As String, ByVal NoIdentificacion As String, ByVal Cantidad As String, ByVal ClaveUnidad As String, ByVal Unidad As String, ByVal Descripcion As String, ByVal ValorUnitario As String, ByVal Importe As String, ByVal Descuento As String, ByVal ObjetoImp As String ) PRIVATE DECLARE SUB VXML_AddConceptoComplementoHidroYPetro10 LIB "VXML_x86.dll" ALIAS "_VXML_AddConceptoComplementoHidroYPetro10_sc@20" ( ByVal hXml As Long, ByVal TipoPermiso As String, ByVal NumeroPermiso As String, ByVal ClaveHYP As String, ByVal SubProductoHYP As String ) PRIVATE DECLARE SUB VXML_AddConceptoComplementoIedu LIB "VXML_x86.dll" ALIAS "_VXML_AddConceptoComplementoIedu_sc@24" ( ByVal hXml As Long, ByVal CURP As String, ByVal autRVOE As String, ByVal nivelEducativo As String, ByVal nombreAlumno As String, ByVal rfcPago As String ) PRIVATE DECLARE SUB VXML_AddConceptoComplementoIedu10 LIB "VXML_x86.dll" ALIAS "_VXML_AddConceptoComplementoIedu10_sc@24" ( ByVal hXml As Long, ByVal nombreAlumno As String, ByVal CURP As String, ByVal nivelEducativo As String, ByVal autRVOE As String, ByVal rfcPago As String ) PRIVATE DECLARE SUB VXML_AddConceptoComplementoVentaVehiculos11_cfdi40 LIB "VXML_x86.dll" ALIAS "_VXML_AddConceptoComplementoVentaVehiculos11_cfdi40_sc@24" ( ByVal hXml As Long, ByVal ClaveVehicular As String, ByVal NIV As String, ByVal numero As String, ByVal fecha As String, ByVal aduana As String ) PRIVATE DECLARE SUB VXML_AddConceptoCuentaPredial_cfdi40 LIB "VXML_x86.dll" ALIAS "_VXML_AddConceptoCuentaPredial_cfdi40_sc@8" ( ByVal hXml As Long, ByVal numero As String ) PRIVATE DECLARE SUB VXML_AddConceptoInformacionAduanera_cfdi40 LIB "VXML_x86.dll" ALIAS "_VXML_AddConceptoInformacionAduanera_cfdi40_sc@8" ( ByVal hXml As Long, ByVal NumeroPedimento As String ) PRIVATE DECLARE SUB VXML_AddConceptoParte_cfdi40 LIB "VXML_x86.dll" ALIAS "_VXML_AddConceptoParte_cfdi40_sc@52" ( ByVal hXml As Long, ByVal ClaveProdServ As String, ByVal NoIdentificacion As String, ByVal Cantidad As String, ByVal Unidad As String, ByVal Descripcion As String, ByVal ValorUnitario As String, ByVal Importe As String, ByVal NumeroPedimento1 As String, ByVal NumeroPedimento2 As String, ByVal NumeroPedimento3 As String, ByVal NumeroPedimento4 As String, ByVal NumeroPedimento5 As String ) PRIVATE DECLARE SUB VXML_AddConceptoRetencion_Cfdi40 LIB "VXML_x86.dll" ALIAS "_VXML_AddConceptoRetencion_Cfdi40_sc@24" ( ByVal hXml As Long, ByVal Base As String, ByVal Impuesto As String, ByVal TipoFactor As String, ByVal TasaOCuota As String, ByVal Importe As String ) PRIVATE DECLARE SUB VXML_AddConceptoTraslado_Cfdi40 LIB "VXML_x86.dll" ALIAS "_VXML_AddConceptoTraslado_Cfdi40_sc@24" ( ByVal hXml As Long, ByVal Base As String, ByVal Impuesto As String, ByVal TipoFactor As String, ByVal TasaOCuota As String, ByVal Importe As String ) PRIVATE DECLARE SUB VXML_AddImpuestoLocalRetenido LIB "VXML_x86.dll" ALIAS "_VXML_AddImpuestoLocalRetenido_sc@16" ( ByVal hXml As Long, ByVal ImpLocRetenido As String, ByVal TasadeRetencion As String, ByVal Importe As String ) PRIVATE DECLARE SUB VXML_AddImpuestoLocalTrasladado LIB "VXML_x86.dll" ALIAS "_VXML_AddImpuestoLocalTrasladado_sc@16" ( ByVal hXml As Long, ByVal ImpLocTrasladado As String, ByVal TasadeTraslado As String, ByVal Importe As String ) PRIVATE DECLARE SUB VXML_AddNameSpace LIB "VXML_x86.dll" ALIAS "_VXML_AddNameSpace_sc@16" ( ByVal hXml As Long, ByVal NameSpáce As String, ByVal URL As String, ByVal SchemaLocation As String ) PRIVATE DECLARE SUB VXML_AddRetencion_Cfdi40 LIB "VXML_x86.dll" ALIAS "_VXML_AddRetencion_Cfdi40_sc@12" ( ByVal hXml As Long, ByVal Impuesto As String, ByVal Importe As String ) PRIVATE DECLARE SUB VXML_AddTraslado_cfdi40 LIB "VXML_x86.dll" ALIAS "_VXML_AddTraslado_cfdi40_sc@24" ( ByVal hXml As Long, ByVal Impuesto As String, ByVal TipoFactor As String, ByVal TasaOCuota As String, ByVal Importe As String, ByVal Base As String ) PRIVATE DECLARE SUB VXML_Aerolineas10AddCargo LIB "VXML_x86.dll" ALIAS "_VXML_Aerolineas10AddCargo_sc@12" ( ByVal hXml As Long, ByVal CodigoCargo As String, ByVal Importe As String ) PRIVATE DECLARE FUNCTION VXML_ApiEmisorAdd LIB "VXML_x86.dll" ALIAS "_VXML_ApiEmisorAdd_sc@48" ( ByVal apiKey As String, ByVal usuario As String, ByVal rfcemisor As String, ByVal pwdconsulta As String, ByVal razonsocial As String, ByVal email As String, ByVal contacto As String, ByVal asignacion As Long, ByVal suspendido As Long, ByVal notificacion As Long, ByVal outLog As String, ByVal reserved As String ) As Long PRIVATE DECLARE FUNCTION VXML_ApiEmisorAutoasignacion LIB "VXML_x86.dll" ALIAS "_VXML_ApiEmisorAutoasignacion_sc@36" ( ByVal apiKey As String, ByVal usuario As String, ByVal rfcemisor As String, ByVal asignacion As Long, ByVal threshold As Long, ByVal limit As Long, ByVal active As String, ByVal outLog As String, ByVal reserved As String ) As Long PRIVATE DECLARE FUNCTION VXML_ApiEmisorUpd LIB "VXML_x86.dll" ALIAS "_VXML_ApiEmisorUpd_sc@44" ( ByVal apiKey As String, ByVal usuario As String, ByVal rfcemisor As String, ByVal pwdconsulta As String, ByVal razonsocial As String, ByVal email As String, ByVal contacto As String, ByVal suspendido As Long, ByVal notificacion As Long, ByVal outLog As String, ByVal reserved As String ) As Long PRIVATE DECLARE FUNCTION VXML_ApiUsuarioAdd LIB "VXML_x86.dll" ALIAS "_VXML_ApiUsuarioAdd_sc@48" ( ByVal apiKey As String, ByVal usuario As String, ByVal distribuidor As String, ByVal pwd As String, ByVal razonsocial As String, ByVal email As String, ByVal contacto As String, ByVal rfc As String, ByVal asignacion As Long, ByVal outLog As String, ByVal xtra As String, ByVal reserved As String ) As Long PRIVATE DECLARE FUNCTION VXML_ApiUsuarioUpd LIB "VXML_x86.dll" ALIAS "_VXML_ApiUsuarioUpd_sc@44" ( ByVal apiKey As String, ByVal usuario As String, ByVal distribuidor As String, ByVal pwd As String, ByVal razonsocial As String, ByVal email As String, ByVal contacto As String, ByVal rfc As String, ByVal outLog As String, ByVal xtra As String, ByVal reserved As String ) As Long PRIVATE DECLARE FUNCTION VXML_CancelaCFDI2022 LIB "VXML_x86.dll" ALIAS "_VXML_CancelaCFDI2022_sc@44" ( ByVal szUsuario As String, ByVal szRfcEmisor As String, ByVal szMotivo As String, ByVal szUuid As String, ByVal szFolioSust As String, ByVal szCert As String, ByVal szKey As String, ByVal szPwd As String, ByVal szServer As String, ByVal szResult As String, ByVal szLog As String ) As Long PRIVATE DECLARE FUNCTION VXML_CancelaCFDI2022SSL LIB "VXML_x86.dll" ALIAS "_VXML_CancelaCFDI2022SSL_sc@44" ( ByVal szUsuario As String, ByVal szRfcEmisor As String, ByVal szMotivo As String, ByVal szUuid As String, ByVal szFolioSust As String, ByVal szCert As String, ByVal szKey As String, ByVal szPwd As String, ByVal szServer As String, ByVal szResult As String, ByVal szLog As String ) As Long PRIVATE DECLARE FUNCTION VXML_CancelaRetencion2022 LIB "VXML_x86.dll" ALIAS "_VXML_CancelaRetencion2022_sc@44" ( ByVal szUsuario As String, ByVal szRfcEmisor As String, ByVal szMotivo As String, ByVal szUuid As String, ByVal szFolioSust As String, ByVal szCert As String, ByVal szKey As String, ByVal szPwd As String, ByVal szServer As String, ByVal szResult As String, ByVal szLog As String ) As Long PRIVATE DECLARE FUNCTION VXML_CancelaRetencion2022SSL LIB "VXML_x86.dll" ALIAS "_VXML_CancelaRetencion2022SSL_sc@44" ( ByVal szUsuario As String, ByVal szRfcEmisor As String, ByVal szMotivo As String, ByVal szUuid As String, ByVal szFolioSust As String, ByVal szCert As String, ByVal szKey As String, ByVal szPwd As String, ByVal szServer As String, ByVal szResult As String, ByVal szLog As String ) As Long PRIVATE DECLARE SUB VXML_CartaPorte31AddFiguraTransporteTiposFigura LIB "VXML_x86.dll" ALIAS "_VXML_CartaPorte31AddFiguraTransporteTiposFigura_sc@72" ( ByVal hXml As Long, ByVal TipoFigura As String, ByVal RFCFigura As String, ByVal NumLicencia As String, ByVal NombreFigura As String, ByVal NumRegIdTribFigura As String, ByVal ResidenciaFiscalFigura As String, ByVal ParteTransporte As String, ByVal Calle As String, ByVal NumeroExterior As String, ByVal NumeroInterior As String, ByVal Colonia As String, ByVal Localidad As String, ByVal Referencia As String, ByVal Municipio As String, ByVal Estado As String, ByVal Pais As String, ByVal CodigoPostal As String ) PRIVATE DECLARE SUB VXML_CartaPorte31AddFiguraTransporteTiposFiguraPartesTransporte LIB "VXML_x86.dll" ALIAS "_VXML_CartaPorte31AddFiguraTransporteTiposFiguraPartesTransporte_sc@8" ( ByVal hXml As Long, ByVal ParteTransporte As String ) PRIVATE DECLARE SUB VXML_CartaPorte31AddMercancia LIB "VXML_x86.dll" ALIAS "_VXML_CartaPorte31AddMercancia_sc@156" ( ByVal hXml As Long, ByVal BienesTransp As String, ByVal ClaveSTCC As String, ByVal Descripcion As String, ByVal Cantidad As String, ByVal ClaveUnidad As String, ByVal Unidad As String, ByVal Dimensiones As String, ByVal MaterialPeligroso As String, ByVal CveMaterialPeligroso As String, ByVal Embalaje As String, ByVal DescripEmbalaje As String, ByVal SectorCOFEPRIS As String, ByVal NombreIngredienteActivo As String, ByVal NomQuimico As String, ByVal DenominacionGenericaProd As String, ByVal DenominacionDistintivaProd As String, ByVal Fabricante As String, ByVal FechaCaducidad As String, ByVal LoteMedicamento As String, ByVal FormaFarmaceutica As String, ByVal CondicionesEspTransp As String, ByVal RegistroSanitarioFolioAutorizacion As String, ByVal PermisoImportacion As String, ByVal FolioImpoVUCEM As String, ByVal NumCAS As String, ByVal RazonSocialEmpImp As String, ByVal NumRegSanPlagCOFEPRIS As String, ByVal DatosFabricante As String, ByVal DatosFormulador As String, ByVal DatosMaquilador As String, ByVal UsoAutorizado As String, ByVal PesoEnKg As String, ByVal ValorMercancia As String, ByVal Moneda As String, ByVal FraccionArancelaria As String, ByVal UUIDComercioExt As String, ByVal TipoMateria As String, ByVal DescripcionMateria As String ) PRIVATE DECLARE SUB VXML_CartaPorte31AddMercanciaCantidadTransporta LIB "VXML_x86.dll" ALIAS "_VXML_CartaPorte31AddMercanciaCantidadTransporta_sc@20" ( ByVal hXml As Long, ByVal Cantidad As String, ByVal IDOrigen As String, ByVal IDDestino As String, ByVal CvesTransporte As String ) PRIVATE DECLARE SUB VXML_CartaPorte31AddMercanciaDocumentacionAduanera LIB "VXML_x86.dll" ALIAS "_VXML_CartaPorte31AddMercanciaDocumentacionAduanera_sc@20" ( ByVal hXml As Long, ByVal TipoDocumento As String, ByVal NumPedimento As String, ByVal IdentDocAduanero As String, ByVal RFCImpo As String ) PRIVATE DECLARE SUB VXML_CartaPorte31AddMercanciaGuiasIdentificacion LIB "VXML_x86.dll" ALIAS "_VXML_CartaPorte31AddMercanciaGuiasIdentificacion_sc@16" ( ByVal hXml As Long, ByVal NumeroGuiaIdentificacion As String, ByVal DescripGuiaIdentificacion As String, ByVal PesoGuiaIdentificacion As String ) PRIVATE DECLARE SUB VXML_CartaPorte31AddMercanciaParcial1 LIB "VXML_x86.dll" ALIAS "_VXML_CartaPorte31AddMercanciaParcial1_sc@76" ( ByVal hXml As Long, ByVal BienesTransp As String, ByVal ClaveSTCC As String, ByVal Descripcion As String, ByVal Cantidad As String, ByVal ClaveUnidad As String, ByVal Unidad As String, ByVal Dimensiones As String, ByVal MaterialPeligroso As String, ByVal CveMaterialPeligroso As String, ByVal Embalaje As String, ByVal DescripEmbalaje As String, ByVal PesoEnKg As String, ByVal ValorMercancia As String, ByVal Moneda As String, ByVal FraccionArancelaria As String, ByVal UUIDComercioExt As String, ByVal TipoMateria As String, ByVal DescripcionMateria As String ) PRIVATE DECLARE SUB VXML_CartaPorte31AddMercanciaParcial2 LIB "VXML_x86.dll" ALIAS "_VXML_CartaPorte31AddMercanciaParcial2_sc@84" ( ByVal hXml As Long, ByVal SectorCOFEPRIS As String, ByVal NombreIngredienteActivo As String, ByVal NomQuimico As String, ByVal DenominacionGenericaProd As String, ByVal DenominacionDistintivaProd As String, ByVal Fabricante As String, ByVal FechaCaducidad As String, ByVal LoteMedicamento As String, ByVal FormaFarmaceutica As String, ByVal CondicionesEspTransp As String, ByVal RegistroSanitarioFolioAutorizacion As String, ByVal PermisoImportacion As String, ByVal FolioImpoVUCEM As String, ByVal NumCAS As String, ByVal RazonSocialEmpImp As String, ByVal NumRegSanPlagCOFEPRIS As String, ByVal DatosFabricante As String, ByVal DatosFormulador As String, ByVal DatosMaquilador As String, ByVal UsoAutorizado As String ) PRIVATE DECLARE SUB VXML_CartaPorte31AddMercanciasTransporteFerroviarioCarro LIB "VXML_x86.dll" ALIAS "_VXML_CartaPorte31AddMercanciasTransporteFerroviarioCarro_sc@32" ( ByVal hXml As Long, ByVal TipoCarro As String, ByVal MatriculaCarro As String, ByVal GuiaCarro As String, ByVal ToneladasNetasCarro As String, ByVal TipoContenedor As String, ByVal PesoContenedorVacio As String, ByVal PesoNetoMercancia As String ) PRIVATE DECLARE SUB VXML_CartaPorte31AddMercanciasTransporteFerroviarioCarroContenedor LIB "VXML_x86.dll" ALIAS "_VXML_CartaPorte31AddMercanciasTransporteFerroviarioCarroContenedor_sc@16" ( ByVal hXml As Long, ByVal TipoContenedor As String, ByVal PesoContenedorVacio As String, ByVal PesoNetoMercancia As String ) PRIVATE DECLARE SUB VXML_CartaPorte31AddMercanciasTransporteFerroviarioDerechosDePaso LIB "VXML_x86.dll" ALIAS "_VXML_CartaPorte31AddMercanciasTransporteFerroviarioDerechosDePaso_sc@12" ( ByVal hXml As Long, ByVal TipoDerechoDePaso As String, ByVal KilometrajePagado As String ) PRIVATE DECLARE SUB VXML_CartaPorte31AddMercanciasTransporteMaritimoContenedor LIB "VXML_x86.dll" ALIAS "_VXML_CartaPorte31AddMercanciasTransporteMaritimoContenedor_sc@44" ( ByVal hXml As Long, ByVal TipoContenedor As String, ByVal MatriculaContenedor As String, ByVal NumPrecinto As String, ByVal IdCCPRelacionado As String, ByVal PlacaVMCCP As String, ByVal FechaCertificacionCCP As String, ByVal SubTipoRemCCP1 As String, ByVal PlacaCCP1 As String, ByVal SubTipoRemCCP2 As String, ByVal PlacaCCP2 As String ) PRIVATE DECLARE SUB VXML_CartaPorte31AddRegimenAduanero LIB "VXML_x86.dll" ALIAS "_VXML_CartaPorte31AddRegimenAduanero_sc@44" ( ByVal hXml As Long, ByVal RegimenAduanero01 As String, ByVal RegimenAduanero02 As String, ByVal RegimenAduanero03 As String, ByVal RegimenAduanero04 As String, ByVal RegimenAduanero05 As String, ByVal RegimenAduanero06 As String, ByVal RegimenAduanero07 As String, ByVal RegimenAduanero08 As String, ByVal RegimenAduanero09 As String, ByVal RegimenAduanero10 As String ) PRIVATE DECLARE SUB VXML_CartaPorte31AddUbicacion LIB "VXML_x86.dll" ALIAS "_VXML_CartaPorte31AddUbicacion_sc@92" ( ByVal hXml As Long, ByVal TipoUbicacion As String, ByVal IDUbicacion As String, ByVal RFCRemitenteDestinatario As String, ByVal NombreRemitenteDestinatario As String, ByVal NumRegIdTrib As String, ByVal ResidenciaFiscal As String, ByVal NumEstacion As String, ByVal NombreEstacion As String, ByVal NavegacionTrafico As String, ByVal FechaHoraSalidaLlegada As String, ByVal TipoEstacion As String, ByVal DistanciaRecorrida As String, ByVal Calle As String, ByVal NumeroExterior As String, ByVal NumeroInterior As String, ByVal Colonia As String, ByVal Localidad As String, ByVal Referencia As String, ByVal Municipio As String, ByVal Estado As String, ByVal Pais As String, ByVal CodigoPostal As String ) PRIVATE DECLARE SUB VXML_CartaPorte31SetDetalleMercancia LIB "VXML_x86.dll" ALIAS "_VXML_CartaPorte31SetDetalleMercancia_sc@24" ( ByVal hXml As Long, ByVal UnidadPesoMerc As String, ByVal PesoBruto As String, ByVal PesoNeto As String, ByVal PesoTara As String, ByVal NumPiezas As String ) PRIVATE DECLARE SUB VXML_CartaPorte31SetMercancias LIB "VXML_x86.dll" ALIAS "_VXML_CartaPorte31SetMercancias_sc@28" ( ByVal hXml As Long, ByVal PesoBrutoTotal As String, ByVal UnidadPeso As String, ByVal PesoNetoTotal As String, ByVal NumTotalMercancias As String, ByVal CargoPorTasacion As String, ByVal LogisticaInversaRecoleccionDevolucion As String ) PRIVATE DECLARE SUB VXML_CartaPorte31SetMercanciasAutotransporte LIB "VXML_x86.dll" ALIAS "_VXML_CartaPorte31SetMercanciasAutotransporte_sc@72" ( ByVal hXml As Long, ByVal PermSCT As String, ByVal NumPermisoSCT As String, ByVal ConfigVehicular As String, ByVal PesoBrutoVehicular As String, ByVal PlacaVM As String, ByVal AnioModeloVM As String, ByVal AseguraRespCivil As String, ByVal PolizaRespCivil As String, ByVal AseguraMedAmbiente As String, ByVal PolizaMedAmbiente As String, ByVal AseguraCarga As String, ByVal PolizaCarga As String, ByVal PrimaSeguro As String, ByVal SubTipoRem1 As String, ByVal Placa1 As String, ByVal SubTipoRem2 As String, ByVal Placa2 As String ) PRIVATE DECLARE SUB VXML_CartaPorte31SetMercanciasTransporteAereo LIB "VXML_x86.dll" ALIAS "_VXML_CartaPorte31SetMercanciasTransporteAereo_sc@52" ( ByVal hXml As Long, ByVal PermSCT As String, ByVal NumPermisoSCT As String, ByVal MatriculaAeronave As String, ByVal NombreAseg As String, ByVal NumPolizaSeguro As String, ByVal NumeroGuia As String, ByVal LugarContrato As String, ByVal CodigoTransportista As String, ByVal RFCEmbarcador As String, ByVal NumRegIdTribEmbarc As String, ByVal ResidenciaFiscalEmbarc As String, ByVal NombreEmbarcador As String ) PRIVATE DECLARE SUB VXML_CartaPorte31SetMercanciasTransporteFerroviario LIB "VXML_x86.dll" ALIAS "_VXML_CartaPorte31SetMercanciasTransporteFerroviario_sc@56" ( ByVal hXml As Long, ByVal TipoDeServicio As String, ByVal TipoDeTrafico As String, ByVal NombreAseg As String, ByVal NumPolizaSeguro As String, ByVal TipoDerechoDePaso As String, ByVal KilometrajePagado As String, ByVal TipoCarro As String, ByVal MatriculaCarro As String, ByVal GuiaCarro As String, ByVal ToneladasNetasCarro As String, ByVal TipoContenedor As String, ByVal PesoContenedorVacio As String, ByVal PesoNetoMercancia As String ) PRIVATE DECLARE SUB VXML_CartaPorte31SetMercanciasTransporteMaritimo LIB "VXML_x86.dll" ALIAS "_VXML_CartaPorte31SetMercanciasTransporteMaritimo_sc@92" ( ByVal hXml As Long, ByVal PermSCT As String, ByVal NumPermisoSCT As String, ByVal NombreAseg As String, ByVal NumPolizaSeguro As String, ByVal TipoEmbarcacion As String, ByVal Matricula As String, ByVal NumeroOMI As String, ByVal AnioEmbarcacion As String, ByVal NombreEmbarc As String, ByVal NacionalidadEmbarc As String, ByVal UnidadesDeArqBruto As String, ByVal TipoCarga As String, ByVal Eslora As String, ByVal Manga As String, ByVal Calado As String, ByVal Puntal As String, ByVal LineaNaviera As String, ByVal NombreAgenteNaviero As String, ByVal NumAutorizacionNaviero As String, ByVal NumViaje As String, ByVal NumConocEmbarc As String, ByVal PermisoTempNavegacion As String ) PRIVATE DECLARE SUB VXML_CCE11AddDestinatario LIB "VXML_x86.dll" ALIAS "_VXML_CCE11AddDestinatario_sc@52" ( ByVal hXml As Long, ByVal NumRegIdTrib As String, ByVal Nombre As String, ByVal Calle As String, ByVal NumeroExterior As String, ByVal NumeroInterior As String, ByVal Colonia As String, ByVal Localidad As String, ByVal Referencia As String, ByVal Municipio As String, ByVal Estado As String, ByVal Pais As String, ByVal CodigoPostal As String ) PRIVATE DECLARE SUB VXML_CCE20AddDestinatarioDomicilio LIB "VXML_x86.dll" ALIAS "_VXML_CCE20AddDestinatarioDomicilio_sc@44" ( ByVal hXml As Long, ByVal Calle As String, ByVal NumeroExterior As String, ByVal NumeroInterior As String, ByVal Colonia As String, ByVal Localidad As String, ByVal Referencia As String, ByVal Municipio As String, ByVal Estado As String, ByVal Pais As String, ByVal CodigoPostal As String ) PRIVATE DECLARE SUB VXML_CCE20AddMercancia LIB "VXML_x86.dll" ALIAS "_VXML_CCE20AddMercancia_sc@44" ( ByVal hXml As Long, ByVal NoIdentificacion As String, ByVal FraccionArancelaria As String, ByVal CantidadAduana As String, ByVal UnidadAduana As String, ByVal ValorUnitarioAduana As String, ByVal ValorDolares As String, ByVal Marca As String, ByVal Modelo As String, ByVal SubModelo As String, ByVal NumeroSerie As String ) PRIVATE DECLARE SUB VXML_CCE20AddMercanciaDescripcionesEspecificas LIB "VXML_x86.dll" ALIAS "_VXML_CCE20AddMercanciaDescripcionesEspecificas_sc@20" ( ByVal hXml As Long, ByVal Marca As String, ByVal Modelo As String, ByVal SubModelo As String, ByVal NumeroSerie As String ) PRIVATE DECLARE SUB VXML_CCE20AddPropietario LIB "VXML_x86.dll" ALIAS "_VXML_CCE20AddPropietario_sc@12" ( ByVal hxml As Long, ByVal NumRegIdTrib As String, ByVal ResidenciaFiscal As String ) PRIVATE DECLARE SUB VXML_CCE20SetEmisor LIB "VXML_x86.dll" ALIAS "_VXML_CCE20SetEmisor_sc@48" ( ByVal hXml As Long, ByVal Curp As String, ByVal Calle As String, ByVal NumeroExterior As String, ByVal NumeroInterior As String, ByVal Colonia As String, ByVal Localidad As String, ByVal Referencia As String, ByVal Municipio As String, ByVal Estado As String, ByVal Pais As String, ByVal CodigoPostal As String ) PRIVATE DECLARE SUB VXML_CCE20SetReceptor LIB "VXML_x86.dll" ALIAS "_VXML_CCE20SetReceptor_sc@48" ( ByVal hXml As Long, ByVal NumRegIdTrib As String, ByVal Calle As String, ByVal NumeroExterior As String, ByVal NumeroInterior As String, ByVal Colonia As String, ByVal Localidad As String, ByVal Referencia As String, ByVal Municipio As String, ByVal Estado As String, ByVal Pais As String, ByVal CodigoPostal As String ) PRIVATE DECLARE FUNCTION VXML_CerKeyMatch LIB "VXML_x86.dll" ALIAS "_VXML_CerKeyMatch_sc@20" ( ByVal hXml As Long, ByVal Emisor As String, ByVal Cer As String, ByVal Key As String, ByVal eyPwd As String ) As Long PRIVATE DECLARE FUNCTION VXML_CerTo64 LIB "VXML_x86.dll" ALIAS "_VXML_CerTo64_sc@4" ( ByVal ArchivoCer As String ) As Long PRIVATE DECLARE FUNCTION VXML_CheckFile LIB "VXML_x86.dll" ALIAS "_VXML_CheckFile_sc@4" ( ByVal ArchVXML As String ) As Long PRIVATE DECLARE FUNCTION VXML_CheckLicence LIB "VXML_x86.dll" ALIAS "_VXML_CheckLicence_sc@12" ( ByVal user As String, ByVal llave As String, ByVal emisor As String ) As Long PRIVATE DECLARE SUB VXML_ConsultaEstadoCFDI LIB "VXML_x86.dll" ALIAS "_VXML_ConsultaEstadoCFDI_sc@20" ( ByVal RFCEmisor As String, ByVal RFCReceptor As String, ByVal Total As String, ByVal UUID As String, ByVal OutLog As String ) PRIVATE DECLARE SUB VXML_ConsultaEstadoCFDISSL LIB "VXML_x86.dll" ALIAS "_VXML_ConsultaEstadoCFDISSL_sc@20" ( ByVal RFCEmisor As String, ByVal RFCReceptor As String, ByVal Total As String, ByVal UUID As String, ByVal OutLog As String ) PRIVATE DECLARE FUNCTION VXML_ConsultaSaldos LIB "VXML_x86.dll" ALIAS "_VXML_ConsultaSaldos_sc@20" ( ByVal string As ByVal usuario As ByVal rfcEmisor As String, ByVal DatoSolicitado As Long, ByVal ArchivoLog As String ) As Long PRIVATE DECLARE FUNCTION VXML_ConsultaSaldosSSL LIB "VXML_x86.dll" ALIAS "_VXML_ConsultaSaldosSSL_sc@20" ( ByVal string As ByVal usuario As ByVal rfcEmisor As String, ByVal DatoSolicitado As Long, ByVal ArchivoLog As String ) As Long PRIVATE DECLARE FUNCTION VXML_FileTo64 LIB "VXML_x86.dll" ALIAS "_VXML_FileTo64_sc@4" ( ByVal ArchivoCer As String ) As Long PRIVATE DECLARE SUB VXML_Free LIB "VXML_x86.dll" ALIAS "_VXML_Free_sc@4" ( ByVal hXml As Long ) PRIVATE DECLARE FUNCTION VXML_GeneraCBB LIB "VXML_x86.dll" ALIAS "_VXML_GeneraCBB_sc@28" ( ByVal Datos As String, ByVal Archivo As String, ByVal Depedencias As Long, ByVal RutaLog As String, ByVal AddLog As Long, ByVal Escala As Long, ByVal Margen As Long ) As Long PRIVATE DECLARE FUNCTION VXML_GetStatusCFDI LIB "VXML_x86.dll" ALIAS "_VXML_GetStatusCFDI_sc@28" ( ByVal szUsuario As String, ByVal szRfcEmisor As String, ByVal szRfcReceptor As String, ByVal szTotal As String, ByVal szUuid As String, ByVal szResult As String, ByVal szLog As String ) As Long PRIVATE DECLARE FUNCTION VXML_GetStatusCFDISSL LIB "VXML_x86.dll" ALIAS "_VXML_GetStatusCFDISSL_sc@28" ( ByVal szUsuario As String, ByVal szRfcEmisor As String, ByVal szRfcReceptor As String, ByVal szTotal As String, ByVal szUuid As String, ByVal szResult As String, ByVal szLog As String ) As Long PRIVATE DECLARE FUNCTION VXML_GetTimeWithDelay LIB "VXML_x86.dll" ALIAS "_VXML_GetTimeWithDelay_sc@8" ( ByVal hXml As Long, ByVal nSegs As Long ) As String PRIVATE DECLARE FUNCTION VXML_GetValue LIB "VXML_x86.dll" ALIAS "_VXML_GetValue_sc@8" ( ByVal hXml As Long, ByVal ValoraRecuperar As Long ) As Long PRIVATE DECLARE SUB VXML_GetValueInFile LIB "VXML_x86.dll" ALIAS "_VXML_GetValueInFile_sc@12" ( ByVal hXml As Long, ByVal value As Long, ByVal file As String ) PRIVATE DECLARE SUB VXML_GetValues LIB "VXML_x86.dll" ALIAS "_VXML_GetValues_sc@12" ( ByVal hXml As Long, ByVal Archivo As String, ByVal Formato As Long ) PRIVATE DECLARE SUB VXML_INE11AddEntidad LIB "VXML_x86.dll" ALIAS "_VXML_INE11AddEntidad_sc@16" ( ByVal hXml As Long, ByVal ClaveEntidad As String, ByVal Ambito As String, ByVal IdContabilidad As String ) PRIVATE DECLARE SUB VXML_INE11AddEntidadContabilidad LIB "VXML_x86.dll" ALIAS "_VXML_INE11AddEntidadContabilidad_sc@8" ( ByVal hXml As Long, ByVal IdContabilidad As String ) PRIVATE DECLARE FUNCTION VXML_Load LIB "VXML_x86.dll" ALIAS "_VXML_Load_sc@4" ( ByVal file As String ) As Long PRIVATE DECLARE FUNCTION VXML_MasivaDescarga LIB "VXML_x86.dll" ALIAS "_VXML_MasivaDescarga_sc@32" ( ByVal Usuario As String, ByVal ArchivoCerFiel As String, ByVal ArchivoKeyFiel As String, ByVal PwdKey As String, ByVal IdPaquete As String, ByVal ArchivoDescargado As String, ByVal ArchLog As String, ByVal Reservado As String ) As Long PRIVATE DECLARE FUNCTION VXML_MasivaDescargaSSL LIB "VXML_x86.dll" ALIAS "_VXML_MasivaDescargaSSL_sc@32" ( ByVal Usuario As String, ByVal ArchivoCerFiel As String, ByVal ArchivoKeyFiel As String, ByVal PwdKey As String, ByVal IdPaquete As String, ByVal ArchivoDescargado As String, ByVal ArchLog As String, ByVal Reservado As String ) As Long PRIVATE DECLARE SUB VXML_MasivaSolicitaEmitidoMetadata2022 LIB "VXML_x86.dll" ALIAS "_VXML_MasivaSolicitaEmitidoMetadata2022_sc@56" ( ByVal Usuario As String, ByVal ArchivoCerFiel As String, ByVal ArchivoKeyFiel As String, ByVal PwdKey As String, ByVal RfcReceptor As String, ByVal FechaDesde As String, ByVal FechaHasta As String, ByVal Estado As String, ByVal Complemento As String, ByVal Tipo As String, ByVal UUID As String, ByVal ArchResultado As String, ByVal ArchLog As String, ByVal Reservado As String ) PRIVATE DECLARE SUB VXML_MasivaSolicitaEmitidoMetadata2022SSL LIB "VXML_x86.dll" ALIAS "_VXML_MasivaSolicitaEmitidoMetadata2022SSL_sc@56" ( ByVal Usuario As String, ByVal ArchivoCerFiel As String, ByVal ArchivoKeyFiel As String, ByVal PwdKey As String, ByVal RfcReceptor As String, ByVal FechaDesde As String, ByVal FechaHasta As String, ByVal Estado As String, ByVal Complemento As String, ByVal Tipo As String, ByVal UUID As String, ByVal ArchResultado As String, ByVal ArchLog As String, ByVal Reservado As String ) PRIVATE DECLARE SUB VXML_MasivaSolicitaEmitidoXML2022 LIB "VXML_x86.dll" ALIAS "_VXML_MasivaSolicitaEmitidoXML2022_sc@56" ( ByVal Usuario As String, ByVal ArchivoCerFiel As String, ByVal ArchivoKeyFiel As String, ByVal PwdKey As String, ByVal RfcReceptor As String, ByVal FechaDesde As String, ByVal FechaHasta As String, ByVal Estado As String, ByVal Complemento As String, ByVal Tipo As String, ByVal UUID As String, ByVal ArchResultado As String, ByVal ArchLog As String, ByVal Reservado As String ) PRIVATE DECLARE SUB VXML_MasivaSolicitaEmitidoXML2022SSL LIB "VXML_x86.dll" ALIAS "_VXML_MasivaSolicitaEmitidoXML2022SSL_sc@56" ( ByVal Usuario As String, ByVal ArchivoCerFiel As String, ByVal ArchivoKeyFiel As String, ByVal PwdKey As String, ByVal RfcReceptor As String, ByVal FechaDesde As String, ByVal FechaHasta As String, ByVal Estado As String, ByVal Complemento As String, ByVal Tipo As String, ByVal UUID As String, ByVal ArchResultado As String, ByVal ArchLog As String, ByVal Reservado As String ) PRIVATE DECLARE SUB VXML_MasivaSolicitaRecibidoMetadata2022 LIB "VXML_x86.dll" ALIAS "_VXML_MasivaSolicitaRecibidoMetadata2022_sc@56" ( ByVal Usuario As String, ByVal ArchivoCerFiel As String, ByVal ArchivoKeyFiel As String, ByVal PwdKey As String, ByVal RfcEmisor As String, ByVal FechaDesde As String, ByVal FechaHasta As String, ByVal Estado As String, ByVal Complemento As String, ByVal Tipo As String, ByVal UUID As String, ByVal ArchResultado As String, ByVal ArchLog As String, ByVal Reservado As String ) PRIVATE DECLARE SUB VXML_MasivaSolicitaRecibidoMetadata2022SSL LIB "VXML_x86.dll" ALIAS "_VXML_MasivaSolicitaRecibidoMetadata2022SSL_sc@56" ( ByVal Usuario As String, ByVal ArchivoCerFiel As String, ByVal ArchivoKeyFiel As String, ByVal PwdKey As String, ByVal RfcEmisor As String, ByVal FechaDesde As String, ByVal FechaHasta As String, ByVal Estado As String, ByVal Complemento As String, ByVal Tipo As String, ByVal UUID As String, ByVal ArchResultado As String, ByVal ArchLog As String, ByVal Reservado As String ) PRIVATE DECLARE SUB VXML_MasivaSolicitaRecibidoXML2022 LIB "VXML_x86.dll" ALIAS "_VXML_MasivaSolicitaRecibidoXML2022_sc@56" ( ByVal Usuario As String, ByVal ArchivoCerFiel As String, ByVal ArchivoKeyFiel As String, ByVal PwdKey As String, ByVal RfcEmisor As String, ByVal FechaDesde As String, ByVal FechaHasta As String, ByVal Estado As String, ByVal Complemento As String, ByVal Tipo As String, ByVal UUID As String, ByVal ArchResultado As String, ByVal ArchLog As String, ByVal Reservado As String ) PRIVATE DECLARE SUB VXML_MasivaSolicitaRecibidoXML2022SSL LIB "VXML_x86.dll" ALIAS "_VXML_MasivaSolicitaRecibidoXML2022SSL_sc@56" ( ByVal Usuario As String, ByVal ArchivoCerFiel As String, ByVal ArchivoKeyFiel As String, ByVal PwdKey As String, ByVal RfcEmisor As String, ByVal FechaDesde As String, ByVal FechaHasta As String, ByVal Estado As String, ByVal Complemento As String, ByVal Tipo As String, ByVal UUID As String, ByVal ArchResultado As String, ByVal ArchLog As String, ByVal Reservado As String ) PRIVATE DECLARE FUNCTION VXML_MasivaVerifica LIB "VXML_x86.dll" ALIAS "_VXML_MasivaVerifica_sc@32" ( ByVal Usuario As String, ByVal ArchivoCerFiel As String, ByVal ArchivoKeyFiel As String, ByVal PwdKey As String, ByVal IdSolicitud As String, ByVal ArchResultado As String, ByVal ArchLog As String, ByVal Reservado As String ) As Long PRIVATE DECLARE FUNCTION VXML_MasivaVerificaSSL LIB "VXML_x86.dll" ALIAS "_VXML_MasivaVerificaSSL_sc@32" ( ByVal Usuario As String, ByVal ArchivoCerFiel As String, ByVal ArchivoKeyFiel As String, ByVal PwdKey As String, ByVal IdSolicitud As String, ByVal ArchResultado As String, ByVal ArchLog As String, ByVal Reservado As String ) As Long PRIVATE DECLARE SUB VXML_MicroConsultaDatosFiscales LIB "VXML_x86.dll" ALIAS "_VXML_MicroConsultaDatosFiscales_sc@36" ( ByVal ApiKey As String, ByVal Usuario As String, ByVal RfcEmisor As String, ByVal RfcReceptor As String, ByVal Cer As String, ByVal Key As String, ByVal PwdKeystring ResultFile As String, ByVal OutLog As String, ByVal Reservado As String ) PRIVATE DECLARE SUB VXML_MicroConsultaDatosFiscalesSSL LIB "VXML_x86.dll" ALIAS "_VXML_MicroConsultaDatosFiscalesSSL_sc@36" ( ByVal ApiKey As String, ByVal Usuario As String, ByVal RfcEmisor As String, ByVal RfcReceptor As String, ByVal Cer As String, ByVal Key As String, ByVal PwdKeystring ResultFile As String, ByVal OutLog As String, ByVal Reservado As String ) PRIVATE DECLARE SUB VXML_MicroValidaDatosFiscales LIB "VXML_x86.dll" ALIAS "_VXML_MicroValidaDatosFiscales_sc@48" ( ByVal ApiKey As String, ByVal Usuario As String, ByVal RfcEmisor As String, ByVal RfcReceptor As String, ByVal nombre As String, ByVal RegimenFiscal As String, ByVal CodigoPostal As String, ByVal Cer As String, ByVal Key As String, ByVal PwdKeystring ResultFile As String, ByVal OutLog As String, ByVal Reservado As String ) PRIVATE DECLARE SUB VXML_MicroValidaDatosFiscalesSSL LIB "VXML_x86.dll" ALIAS "_VXML_MicroValidaDatosFiscalesSSL_sc@48" ( ByVal ApiKey As String, ByVal Usuario As String, ByVal RfcEmisor As String, ByVal RfcReceptor As String, ByVal nombre As String, ByVal RegimenFiscal As String, ByVal CodigoPostal As String, ByVal Cer As String, ByVal Key As String, ByVal PwdKeystring ResultFile As String, ByVal OutLog As String, ByVal Reservado As String ) PRIVATE DECLARE FUNCTION VXml_New LIB "VXML_x86.dll" ALIAS "_VXml_New_sc@4" ( ByVal szVersion As String ) As Long PRIVATE DECLARE FUNCTION VXML_NewWithLog LIB "VXML_x86.dll" ALIAS "_VXML_NewWithLog_sc@8" ( ByVal szVersion As String, ByVal cNombreLog As String ) As Long PRIVATE DECLARE SUB VXML_Nomina12AddDeduccion LIB "VXML_x86.dll" ALIAS "_VXML_Nomina12AddDeduccion_sc@20" ( ByVal hXml As Long, ByVal TipoDeduccion As String, ByVal Clave As String, ByVal Concepto As String, ByVal Importe As String ) PRIVATE DECLARE SUB VXML_Nomina12AddIncapacidad LIB "VXML_x86.dll" ALIAS "_VXML_Nomina12AddIncapacidad_sc@16" ( ByVal hXml As Long, ByVal DiasIncapacidad As String, ByVal TipoIncapacidad As String, ByVal Importe As String ) PRIVATE DECLARE SUB VXML_Nomina12AddOtroPago LIB "VXML_x86.dll" ALIAS "_VXML_Nomina12AddOtroPago_sc@36" ( ByVal hXml As Long, ByVal TipoOtroPago As String, ByVal Clave As String, ByVal Concepto As String, ByVal Importe As String, ByVal SubsidioCausado As String, ByVal SaldoAFavor As String, ByVal Year As String, ByVal RemanenteSalFav As String ) PRIVATE DECLARE SUB VXML_Nomina12AddPercepcion LIB "VXML_x86.dll" ALIAS "_VXML_Nomina12AddPercepcion_sc@48" ( ByVal hXml As Long, ByVal TipoPercepcion As String, ByVal Clave As String, ByVal Concepto As String, ByVal ImporteGravado As String, ByVal ImporteExento As String, ByVal Dias As String, ByVal TipoHoras As String, ByVal HorasExtra As String, ByVal ImportePagado As String, ByVal ValorMercado As String, ByVal PrecioAlOtorgarse As String ) PRIVATE DECLARE SUB VXML_Nomina12AddSubContratacion LIB "VXML_x86.dll" ALIAS "_VXML_Nomina12AddSubContratacion_sc@12" ( ByVal hXml As Long, ByVal RfcLabora As String, ByVal PorcentajeTiempo As String ) PRIVATE DECLARE SUB VXML_Nomina12SetDeducciones LIB "VXML_x86.dll" ALIAS "_VXML_Nomina12SetDeducciones_sc@12" ( ByVal hXml As Long, ByVal TotalOtrasDeducciones As String, ByVal TotalImpuestosRetenidos As String ) PRIVATE DECLARE SUB VXML_Nomina12SetEmisor LIB "VXML_x86.dll" ALIAS "_VXML_Nomina12SetEmisor_sc@24" ( ByVal hXml As Long, ByVal Curp As String, ByVal RegistroPatronal As String, ByVal RfcPatronOrigen As String, ByVal OrigenRecurso As String, ByVal MontoRecursoPropio As String ) PRIVATE DECLARE SUB VXML_Nomina12SetJubilacionPensionRetiro LIB "VXML_x86.dll" ALIAS "_VXML_Nomina12SetJubilacionPensionRetiro_sc@24" ( ByVal hXml As Long, ByVal TotalUnaExhibicion As String, ByVal TotalParcialidad As String, ByVal MontoDiario As String, ByVal IngresoAcumulable As String, ByVal IngresoNoAcumulable As String ) PRIVATE DECLARE SUB VXML_Nomina12SetPercepciones LIB "VXML_x86.dll" ALIAS "_VXML_Nomina12SetPercepciones_sc@24" ( ByVal hXml As Long, ByVal TotalSueldos As String, ByVal TotalSeparacionIndeminizacion As String, ByVal TotalJubilacionPensionRetiro As String, ByVal TotalGravado As String, ByVal TotalExento As String ) PRIVATE DECLARE SUB VXML_Nomina12SetReceptor LIB "VXML_x86.dll" ALIAS "_VXML_Nomina12SetReceptor_sc@76" ( ByVal hXml As Long, ByVal Curp As String, ByVal NumSeguridadSocial As String, ByVal FechaInicioRelLaboral As String, ByVal Antiguedad As String, ByVal TipoContrato As String, ByVal Sindicalizado As String, ByVal TipoJornada As String, ByVal TipoRegimen As String, ByVal NumEmpleado As String, ByVal Departamento As String, ByVal Puesto As String, ByVal RiesgoPuesto As String, ByVal PeriodicidadPago As String, ByVal Banco As String, ByVal CuentaBancaria As String, ByVal SalarioBaseCotApor As String, ByVal SalarioDiarioIntegrado As String, ByVal ClaveEntFec As String ) PRIVATE DECLARE SUB VXML_Nomina12SetSeparacionIndemnizacion LIB "VXML_x86.dll" ALIAS "_VXML_Nomina12SetSeparacionIndemnizacion_sc@24" ( ByVal hXml As Long, ByVal TotalPagado As String, ByVal NumAnosServicio As String, ByVal UltimoSueldoMensOrd As String, ByVal IngresoAcumulable As String, ByVal IngresoNoAcumulable As String ) PRIVATE DECLARE SUB VXML_Pagos20AddPago LIB "VXML_x86.dll" ALIAS "_VXML_Pagos20AddPago_sc@64" ( ByVal hXml As Long, ByVal FechaPago As String, ByVal FormaDePagoP As String, ByVal MonedaP As String, ByVal TipoCambioP As String, ByVal Monto As String, ByVal NumOperacion As String, ByVal RfcEmisorCtaOrd As String, ByVal NomBancoOrdExt As String, ByVal CtaOrdenante As String, ByVal RfcEmisorCtaBen As String, ByVal CtaBeneficiario As String, ByVal TipoCadPago As String, ByVal CertPago As String, ByVal CadPago As String, ByVal SelloPago As String ) PRIVATE DECLARE SUB VXML_Pagos20AddPagoDoctoRelacionado LIB "VXML_x86.dll" ALIAS "_VXML_Pagos20AddPagoDoctoRelacionado_sc@44" ( ByVal hXml As Long, ByVal idDocumento As String, ByVal Serie As String, ByVal Folio As String, ByVal MonedadDR As String, ByVal EquivalenciaDR As String, ByVal NumParcialidad As String, ByVal ImpSaldoAnt As String, ByVal ImpPagado As String, ByVal ImpSaldoInsoluto As String, ByVal ObjetoImpDR As String ) PRIVATE DECLARE SUB VXML_Pagos20AddPagoDoctoRelacionadoRetencionDR LIB "VXML_x86.dll" ALIAS "_VXML_Pagos20AddPagoDoctoRelacionadoRetencionDR_sc@24" ( ByVal hXml As Long, ByVal BaseDR As String, ByVal ImpuestoDR As String, ByVal TipoFactorDR As String, ByVal TasaOCuotaDR As String, ByVal ImporteDR As String ) PRIVATE DECLARE SUB VXML_Pagos20AddPagoDoctoRelacionadoTrasladoDR LIB "VXML_x86.dll" ALIAS "_VXML_Pagos20AddPagoDoctoRelacionadoTrasladoDR_sc@24" ( ByVal hXml As Long, ByVal BaseDR As String, ByVal ImpuestoDR As String, ByVal TipoFactorDR As String, ByVal TasaOCuotaDR As String, ByVal ImporteDR As String ) PRIVATE DECLARE SUB VXML_Pagos20AddPagoImpuestosPRetencionP LIB "VXML_x86.dll" ALIAS "_VXML_Pagos20AddPagoImpuestosPRetencionP_sc@12" ( ByVal hXml As Long, ByVal ImpuestoP As String, ByVal ImporteP As String ) PRIVATE DECLARE SUB VXML_Pagos20AddPagoImpuestosPTrasladoP LIB "VXML_x86.dll" ALIAS "_VXML_Pagos20AddPagoImpuestosPTrasladoP_sc@24" ( ByVal hXml As Long, ByVal BaseP As String, ByVal ImpuestoP As String, ByVal TipoFactorP As String, ByVal TasaOCuotaP As String, ByVal ImporteP As String ) PRIVATE DECLARE FUNCTION VXML_ProcesaDocumento LIB "VXML_x86.dll" ALIAS "_VXML_ProcesaDocumento_sc@20" ( ByVal hXml As Long, ByVal ArchivoCER As String, ByVal ArchivoKEY As String, ByVal PasswordKEY As String, ByVal ArchivoXML As String ) As Long PRIVATE DECLARE FUNCTION VXML_ProcesaDocumentoSSL LIB "VXML_x86.dll" ALIAS "_VXML_ProcesaDocumentoSSL_sc@20" ( ByVal hXml As Long, ByVal ArchivoCER As String, ByVal ArchivoKEY As String, ByVal PasswordKEY As String, ByVal ArchivoXML As String ) As Long PRIVATE DECLARE SUB VXML_ProcessFile LIB "VXML_x86.dll" ALIAS "_VXML_ProcessFile_sc@4" ( ByVal ArchivoVXML As String ) PRIVATE DECLARE FUNCTION VXML_RecuperaAcuseCancelacion LIB "VXML_x86.dll" ALIAS "_VXML_RecuperaAcuseCancelacion_sc@32" ( ByVal string As ByVal usuario As ByVal rfcemisor As String, ByVal uuid As String, ByVal archivoResultados As ByVal archivoXMLAcuse As String, ByVal archivoLOG As String, ByVal reservado As String ) As Long PRIVATE DECLARE FUNCTION VXML_RecuperaAcuseCancelacionSSL LIB "VXML_x86.dll" ALIAS "_VXML_RecuperaAcuseCancelacionSSL_sc@32" ( ByVal string As ByVal usuario As ByVal rfcemisor As String, ByVal uuid As String, ByVal archivoResultados As ByVal archivoXMLAcuse As String, ByVal archivoLOG As String, ByVal reservado As String ) As Long PRIVATE DECLARE FUNCTION VXML_RecuperaCFDI LIB "VXML_x86.dll" ALIAS "_VXML_RecuperaCFDI_sc@28" ( ByVal szUsuario As String, ByVal szRfcEmisor As String, ByVal szUuid As String, ByVal Ejercicio As Long, ByVal szResultado As String, ByVal szLog As String, ByVal szReservado As String ) As Long PRIVATE DECLARE FUNCTION VXML_RecuperaCFDISSL LIB "VXML_x86.dll" ALIAS "_VXML_RecuperaCFDISSL_sc@28" ( ByVal szUsuario As String, ByVal szRfcEmisor As String, ByVal szUuid As String, ByVal Ejercicio As Long, ByVal szResultado As String, ByVal szLog As String, ByVal szReservado As String ) As Long PRIVATE DECLARE SUB VXML_Save LIB "VXML_x86.dll" ALIAS "_VXML_Save_sc@8" ( ByVal hXml As Long, ByVal file As String ) PRIVATE DECLARE FUNCTION VXML_SendEmail LIB "VXML_x86.dll" ALIAS "_VXML_SendEmail_sc@52" ( ByVal SmtpServer As String, ByVal SmtpPort As Long, ByVal SmtpUserName As String, ByVal SmtpPassword As String, ByVal MessageTo As String, ByVal MessageFrom As String, ByVal MessageSubject As String, ByVal MessageBody As String, ByVal MessageAttach1 As String, ByVal MessageAttach2 As String, ByVal MessageAttach3 As String, ByVal OutLog As String, ByVal SSL As String ) As Long PRIVATE DECLARE SUB VXML_SetAddenda_cfdi40 LIB "VXML_x86.dll" ALIAS "_VXML_SetAddenda_cfdi40_sc@8" ( ByVal hXml As Long, ByVal text As String ) PRIVATE DECLARE SUB VXML_SetAddendaText_cfdi40 LIB "VXML_x86.dll" ALIAS "_VXML_SetAddendaText_cfdi40_sc@8" ( ByVal hXml As Long, ByVal text As String ) PRIVATE DECLARE SUB VXML_SetAerolineas10 LIB "VXML_x86.dll" ALIAS "_VXML_SetAerolineas10_sc@20" ( ByVal hXml As Long, ByVal TUA As String, ByVal TotalCargos As String, ByVal CodigoCargo As String, ByVal Importe As String ) PRIVATE DECLARE SUB VXML_SetCartaPorte31 LIB "VXML_x86.dll" ALIAS "_VXML_SetCartaPorte31_sc@40" ( ByVal hXml As Long, ByVal IdCCP As String, ByVal TranspInternac As String, ByVal EntradaSalidaMerc As String, ByVal PaisOrigenDestino As String, ByVal ViaEntradaSalida As String, ByVal TotalDistRec As String, ByVal RegistroITSMO As String, ByVal UbicacionPoloOrigen As String, ByVal UbicacionPoloDestino As String ) PRIVATE DECLARE SUB VXML_SetComercioExterior20 LIB "VXML_x86.dll" ALIAS "_VXML_SetComercioExterior20_sc@40" ( ByVal hXml As Long, ByVal MotivoTraslado As String, ByVal ClaveDePedimento As String, ByVal CertificadoOrigen As String, ByVal NumCertificadoOrigen As String, ByVal NumeroExportadorConfiable As String, ByVal Incoterm As String, ByVal Observaciones As String, ByVal TipoCambioUSD As String, ByVal TotalUSD As String ) PRIVATE DECLARE SUB VXML_SetCompleteXML_cfdi40 LIB "VXML_x86.dll" ALIAS "_VXML_SetCompleteXML_cfdi40_sc@12" ( ByVal hXml As Long, ByVal TextoXMLoArchivoXML As String, ByVal A ) PRIVATE DECLARE SUB VXML_SetComprobanteInfo_Cfdi40 LIB "VXML_x86.dll" ALIAS "_VXML_SetComprobanteInfo_Cfdi40_sc@64" ( ByVal hXml As Long, ByVal Serie As String, ByVal Folio As String, ByVal Fecha As String, ByVal FormaPago As String, ByVal CondicionesDePago As String, ByVal SubTotal As String, ByVal Descuento As String, ByVal Moneda As String, ByVal TipoCambio As String, ByVal Total As String, ByVal TipoDeComprobante As String, ByVal MetodoPago As String, ByVal LugarExpedicion As String, ByVal Confirmacion As String, ByVal Exportacion As String ) PRIVATE DECLARE SUB VXML_SetConceptoACuentaTerceros_cfdi40 LIB "VXML_x86.dll" ALIAS "_VXML_SetConceptoACuentaTerceros_cfdi40_sc@20" ( ByVal hXml As Long, ByVal RfcACuentaTerceros As String, ByVal NombreACuentaTerceros As String, ByVal RegimenFiscalACuentaTerceros As String, ByVal DomicilioFiscalACuentaTerceros As String ) PRIVATE DECLARE SUB VXML_SetDivisas10 LIB "VXML_x86.dll" ALIAS "_VXML_SetDivisas10_sc@8" ( ByVal hXml As Long, ByVal tipoOperacion As String ) PRIVATE DECLARE SUB VXML_SetDllPath LIB "VXML_x86.dll" ALIAS "_VXML_SetDllPath_sc@8" ( ByVal hXml As Long, ByVal RutaDLL As String ) PRIVATE DECLARE SUB VXML_SetDonatarias11 LIB "VXML_x86.dll" ALIAS "_VXML_SetDonatarias11_sc@16" ( ByVal hXml As Long, ByVal noAutorizacion As String, ByVal fechaAutorizacion As String, ByVal leyenda As String ) PRIVATE DECLARE SUB VXML_SetEmisorInfo_Cfdi40 LIB "VXML_x86.dll" ALIAS "_VXML_SetEmisorInfo_Cfdi40_sc@20" ( ByVal hXml As Long, ByVal Rfc As String, ByVal Nombre As String, ByVal RegimenFiscal As String, ByVal FacAtrAdquirente As String ) PRIVATE DECLARE SUB VXML_SetImpuestosInfo_Cfdi40 LIB "VXML_x86.dll" ALIAS "_VXML_SetImpuestosInfo_Cfdi40_sc@12" ( ByVal hXml As Long, ByVal TotalImpuestosTrasladados As String, ByVal TotalImpuestosRetenidos As String ) PRIVATE DECLARE SUB VXML_SetImpuestosLocales10 LIB "VXML_x86.dll" ALIAS "_VXML_SetImpuestosLocales10_sc@12" ( ByVal hXml As Long, ByVal TotaldeTraslados As String, ByVal TotaldeRetenciones As String ) PRIVATE DECLARE SUB VXML_SetINE11 LIB "VXML_x86.dll" ALIAS "_VXML_SetINE11_sc@28" ( ByVal hXml As Long, ByVal TipoProceso As String, ByVal TipoComite As String, ByVal IdContabilidad As String, ByVal ClaveEntidad As String, ByVal Ambito As String, ByVal EntidadContabilidadIdContabilidad As String ) PRIVATE DECLARE SUB VXML_SetInformacionGlobal_Cfdi40 LIB "VXML_x86.dll" ALIAS "_VXML_SetInformacionGlobal_Cfdi40_sc@16" ( ByVal hXml As Long, ByVal Periodicidad As String, ByVal Meses As String, ByVal Year As String ) PRIVATE DECLARE SUB VXML_SetLeyendasFiscales10 LIB "VXML_x86.dll" ALIAS "_VXML_SetLeyendasFiscales10_sc@16" ( ByVal hXml As Long, ByVal DisposicionFiscal As String, ByVal Norma As String, ByVal TextoLeyenda As String ) PRIVATE DECLARE SUB VXML_SetLeyendasFiscales10full LIB "VXML_x86.dll" ALIAS "_VXML_SetLeyendasFiscales10full_sc@124" ( ByVal hXml As Long, ByVal DisposicionFiscal01 As String, ByVal Norma01 As String, ByVal TextoLeyenda01 As String, ByVal DisposicionFiscal02 As String, ByVal Norma02 As String, ByVal TextoLeyenda02 As String, ByVal DisposicionFiscal03 As String, ByVal Norma03 As String, ByVal TextoLeyenda03 As String, ByVal DisposicionFiscal04 As String, ByVal Norma04 As String, ByVal TextoLeyenda04 As String, ByVal DisposicionFiscal05 As String, ByVal Norma05 As String, ByVal TextoLeyenda05 As String, ByVal DisposicionFiscal06 As String, ByVal Norma06 As String, ByVal TextoLeyenda06 As String, ByVal DisposicionFiscal07 As String, ByVal Norma07 As String, ByVal TextoLeyenda07 As String, ByVal DisposicionFiscal08 As String, ByVal Norma08 As String, ByVal TextoLeyenda08 As String, ByVal DisposicionFiscal09 As String, ByVal Norma09 As String, ByVal TextoLeyenda09 As String, ByVal DisposicionFiscal10 As String, ByVal Norma10 As String, ByVal TextoLeyenda10 As String ) PRIVATE DECLARE SUB VXML_SetLogFile LIB "VXML_x86.dll" ALIAS "_VXML_SetLogFile_sc@8" ( ByVal hXml As Long, ByVal cNombreLog As String ) PRIVATE DECLARE SUB VXML_SetNomina12 LIB "VXML_x86.dll" ALIAS "_VXML_SetNomina12_sc@36" ( ByVal hXml As Long, ByVal TipoNomina As String, ByVal FechaPago As String, ByVal FechaInicialPago As String, ByVal FechaFinalPago As String, ByVal NumDiasPagados As String, ByVal TotalPercepciones As String, ByVal TotalDeduciones As String, ByVal TotalOtrosPagos As String ) PRIVATE DECLARE SUB VXML_SetPagos20 LIB "VXML_x86.dll" ALIAS "_VXML_SetPagos20_sc@48" ( ByVal hXml As Long, ByVal TotalRetencionesIVA As String, ByVal TotalRetencionesISR As String, ByVal TotalRetencionesIEPS As String, ByVal TotalTrasladosBaseIVA16 As String, ByVal TotalTrasladosImpuestoIVA16 As String, ByVal TotalTrasladosBaseIVA8 As String, ByVal TotalTrasladosImpuestoIVA8 As String, ByVal TotalTrasladosBaseIVA0 As String, ByVal TotalTrasladosImpuestoIVA0 As String, ByVal TotalTrasladosBaseIVAExento As String, ByVal MontoTotalPagos As String ) PRIVATE DECLARE SUB VXML_SetReceptorInfo_Cfdi40 LIB "VXML_x86.dll" ALIAS "_VXML_SetReceptorInfo_Cfdi40_sc@32" ( ByVal hXml As Long, ByVal Rfc As String, ByVal Nombre As String, ByVal ResidenciaFiscal As String, ByVal NumRegIdTrib As String, ByVal UsoCFDI As String, ByVal DomicilioFiscalReceptor As String, ByVal RegimenFiscalReceptor As String ) PRIVATE DECLARE SUB VXML_SetServicioParcial10 LIB "VXML_x86.dll" ALIAS "_VXML_SetServicioParcial10_sc@44" ( ByVal hXml As Long, ByVal NumPerLicoAut As String, ByVal Calle As String, ByVal NoExterior As String, ByVal NoInterior As String, ByVal Colonia As String, ByVal Localidad As String, ByVal Referencia As String, ByVal Municipio As String, ByVal Estado As String, ByVal CodigoPostal As String ) PRIVATE DECLARE SUB VXML_SetTuristaPasajeroExtranjero10 LIB "VXML_x86.dll" ALIAS "_VXML_SetTuristaPasajeroExtranjero10_sc@36" ( ByVal hXml As Long, ByVal fechadeTransito As String, ByVal tipoTransito As String, ByVal Via As String, ByVal TipoId As String, ByVal NumeroId As String, ByVal Nacionalidad As String, ByVal EmpresaTransporte As String, ByVal IdTransporte As String ) PRIVATE DECLARE SUB VXML_SetUserInfo LIB "VXML_x86.dll" ALIAS "_VXML_SetUserInfo_sc@12" ( ByVal hXml As Long, ByVal cUsuario As String, ByVal cServidor As String ) PRIVATE DECLARE SUB VXML_SetVehiculoUsado10 LIB "VXML_x86.dll" ALIAS "_VXML_SetVehiculoUsado10_sc@56" ( ByVal hXml As Long, ByVal montoAdquisicion As String, ByVal montoEnajenacion As String, ByVal claveVehicular As String, ByVal marca As String, ByVal tipo As String, ByVal modelo As String, ByVal numeroMotor As String, ByVal numeroSerie As String, ByVal NIV As String, ByVal valor As String, ByVal numero As String, ByVal fecha As String, ByVal aduana As String ) PRIVATE DECLARE SUB VXML_ShowValue LIB "VXML_x86.dll" ALIAS "_VXML_ShowValue_sc@12" ( ByVal hXml As Long, ByVal lValor As Long, ByVal titulo As String ) PRIVATE DECLARE SUB VXML_ValidaCFDITimbrado LIB "VXML_x86.dll" ALIAS "_VXML_ValidaCFDITimbrado_sc@16" ( ByVal Xml As String, ByVal OutLog As String, ByVal csdPAC As String, ByVal CheckSAT As Long ) PRIVATE DECLARE SUB VXML_ValidaCFDITimbradoSSL LIB "VXML_x86.dll" ALIAS "_VXML_ValidaCFDITimbradoSSL_sc@16" ( ByVal Xml As String, ByVal OutLog As String, ByVal csdPAC As String, ByVal CheckSAT As Long ) PRIVATE DECLARE SUB VXML_VehiculoUsado10AddInformacionAduanera LIB "VXML_x86.dll" ALIAS "_VXML_VehiculoUsado10AddInformacionAduanera_sc@16" ( ByVal hXml As Long, ByVal numero As String, ByVal fecha As String, ByVal aduana As String ) PRIVATE DECLARE SUB VXMLRET_AddComplementoPlataformasTecnologicas10DetallesDelServicio LIB "VXML_x86.dll" ALIAS "_VXMLRET_AddComplementoPlataformasTecnologicas10DetallesDelServicio_sc@68" ( ByVal hXml As Long, ByVal FormaPagoServ As String, ByVal TipodeServ As String, ByVal SubTipServ As String, ByVal RFCTerceroAutorizado As String, ByVal FechaServ As String, ByVal PrecioServSinIVA As String, ByVal BaseTraslados As String, ByVal ImpuestoTrasladados As String, ByVal TipoFactorTrasladados As String, ByVal TasaCuotaTraslados As String, ByVal ImporteTrasladados As String, ByVal ImpContrib As String, ByVal EntidadDondePagaLaContibucion As String, ByVal BaseComision As String, ByVal PorcentajeComision As String, ByVal ImporteComision As String ) PRIVATE DECLARE SUB VXMLRET_AddRetencionesTotalesImpRetenidos LIB "VXML_x86.dll" ALIAS "_VXMLRET_AddRetencionesTotalesImpRetenidos_sc@20" ( ByVal hXml As Long, ByVal BaseRet As String, ByVal ImpuestosRet As String, ByVal MontoRet As String, ByVal TipoPagoRet As String ) PRIVATE DECLARE SUB VXMLRET_Free LIB "VXML_x86.dll" ALIAS "_VXMLRET_Free_sc@4" ( ByVal hXml As Long ) PRIVATE DECLARE FUNCTION VXMLRET_GetValue LIB "VXML_x86.dll" ALIAS "_VXMLRET_GetValue_sc@8" ( ByVal hXml As Long, ByVal value As Long ) As String PRIVATE DECLARE SUB VXMLRET_GetValueInFile LIB "VXML_x86.dll" ALIAS "_VXMLRET_GetValueInFile_sc@12" ( ByVal hXml As Long, ByVal value As Long, ByVal file As String ) PRIVATE DECLARE SUB VXMLRET_GetValues LIB "VXML_x86.dll" ALIAS "_VXMLRET_GetValues_sc@12" ( ByVal hXml As Long, ByVal file As String, ByVal nFormat As Long ) PRIVATE DECLARE FUNCTION VXMLRET_NewWithLog LIB "VXML_x86.dll" ALIAS "_VXMLRET_NewWithLog_sc@8" ( ByVal szVersion As String, ByVal logfile As String ) As Long PRIVATE DECLARE FUNCTION VXMLRET_ProcesaDocumento LIB "VXML_x86.dll" ALIAS "_VXMLRET_ProcesaDocumento_sc@20" ( ByVal hXml As Long, ByVal csd As String, ByVal key As String, ByVal keypwd As String, ByVal outfile As String ) As Long PRIVATE DECLARE FUNCTION VXMLRET_ProcesaDocumentoSSL LIB "VXML_x86.dll" ALIAS "_VXMLRET_ProcesaDocumentoSSL_sc@20" ( ByVal hXml As Long, ByVal csd As String, ByVal key As String, ByVal keypwd As String, ByVal outfile As String ) As Long PRIVATE DECLARE SUB VXMLRET_SetAddendatext LIB "VXML_x86.dll" ALIAS "_VXMLRET_SetAddendatext_sc@8" ( ByVal hXml As Long, ByVal text As String ) PRIVATE DECLARE SUB VXMLRET_SetAddendaXml LIB "VXML_x86.dll" ALIAS "_VXMLRET_SetAddendaXml_sc@8" ( ByVal hXml As Long, ByVal text As String ) PRIVATE DECLARE SUB VXMLRET_SetComplementoArrendamientoenfideicomiso10 LIB "VXML_x86.dll" ALIAS "_VXMLRET_SetComplementoArrendamientoenfideicomiso10_sc@32" ( ByVal hXml As Long, ByVal PagProvEfecPorFiduc As String, ByVal RendimFideicom As String, ByVal DeduccCorresp As String, ByVal MontTotRet As String, ByVal MontResFiscDistFibras As String, ByVal MontOtrosConceptDistr As String, ByVal DescrMontOtrosConceptDistr As String ) PRIVATE DECLARE SUB VXMLRET_SetComplementoDividendos10 LIB "VXML_x86.dll" ALIAS "_VXMLRET_SetComplementoDividendos10_sc@40" ( ByVal hXml As Long, ByVal CveTipDivOUtil As String, ByVal MontISRAcredRetMexico As String, ByVal MontISRAcredRetExtranjero As String, ByVal MontRetExtDivExt As String, ByVal TipoSocDistrDiv As String, ByVal MontISRAcredNal As String, ByVal MontDivAcumNal As String, ByVal MontDivAcumExt As String, ByVal ProporcionRem As String ) PRIVATE DECLARE SUB VXMLRET_SetComplementoEnajenaciondeAcciones10 LIB "VXML_x86.dll" ALIAS "_VXMLRET_SetComplementoEnajenaciondeAcciones10_sc@16" ( ByVal hXml As Long, ByVal ContratoIntermediacion As String, ByVal Ganancia As String, ByVal Perdida As String ) PRIVATE DECLARE SUB VXMLRET_SetComplementoFideicomisonoempresarial10 LIB "VXML_x86.dll" ALIAS "_VXMLRET_SetComplementoFideicomisonoempresarial10_sc@44" ( ByVal hXml As Long, ByVal MontTotEntradasPeriodo As String, ByVal PartPropAcumDelFideicom As String, ByVal PropDelMontTotEntradas As String, ByVal Concepto As String, ByVal MontTotEgresPeriodo As String, ByVal PartPropDelFideicom As String, ByVal PropDelMontTotSalidas As String, ByVal ConceptoS As String, ByVal MontRetRelPagFideic As String, ByVal DescRetRelPagFideic As String ) PRIVATE DECLARE SUB VXMLRET_SetComplementoIntereses10 LIB "VXML_x86.dll" ALIAS "_VXMLRET_SetComplementoIntereses10_sc@28" ( ByVal hXml As Long, ByVal SistFinanciero As String, ByVal RetiroAORESRetInt As String, ByVal OperFinancDerivad As String, ByVal MontIntNominal As String, ByVal MontIntReal As String, ByVal Perdida As String ) PRIVATE DECLARE SUB VXMLRET_SetComplementoIntereseshipotecarios10 LIB "VXML_x86.dll" ALIAS "_VXMLRET_SetComplementoIntereseshipotecarios10_sc@32" ( ByVal hXml As Long, ByVal CreditoDeInstFinanc As String, ByVal SaldoInsoluto As String, ByVal PropDeducDelCredit As String, ByVal MontTotIntNominalesDev As String, ByVal MontTotIntNominalesDevYPag As String, ByVal MontTotIntRealPagDeduc As String, ByVal NumContrato As String ) PRIVATE DECLARE SUB VXMLRET_SetComplementoOperacionesconderivados10 LIB "VXML_x86.dll" ALIAS "_VXMLRET_SetComplementoOperacionesconderivados10_sc@12" ( ByVal hXml As Long, ByVal MontGanAcum As String, ByVal MontPerdDed As String ) PRIVATE DECLARE SUB VXMLRET_SetComplementoPagosaextranjeros10 LIB "VXML_x86.dll" ALIAS "_VXMLRET_SetComplementoPagosaextranjeros10_sc@44" ( ByVal hXml As Long, ByVal EsBenefEfectDelCobro As String, ByVal PaisDeResidParaEfecFisc As String, ByVal ConceptoPagoNoBeneficiario As String, ByVal DescripcionConceptoNoBeneficiario As String, ByVal RFC As String, ByVal CURP As String, ByVal NomDenRazSocB As String, ByVal ConceptoS As String, ByVal ConceptoPagoBeneficiario As String, ByVal DescripcionConceptoBeneficiario As String ) PRIVATE DECLARE SUB VXMLRET_SetComplementoPlanesderetiro11 LIB "VXML_x86.dll" ALIAS "_VXMLRET_SetComplementoPlanesderetiro11_sc@76" ( ByVal hXml As Long, ByVal SistemaFinanc As String, ByVal MontTotAportAnioInmAnterior As String, ByVal MontIntRealesDevengAniooInmAnt As String, ByVal HuboRetirosAnioInmAntPer As String, ByVal MontTotRetiradoAnioInmAntPer As String, ByVal MontTotExedenteAnioInmAnt As String, ByVal HuboRetirosAnioInmAnt As String, ByVal MontTotRetiradoAnioInmAnt As String, ByVal NumReferencia As String, ByVal TipoAportacionODeposito1 As String, ByVal MontAportODep1 As String, ByVal RFCFiduciaria1 As String, ByVal TipoAportacionODeposito2 As String, ByVal MontAportODep2 As String, ByVal RFCFiduciaria2 As String, ByVal TipoAportacionODeposito3 As String, ByVal MontAportODep3 As String, ByVal RFCFiduciaria3 As String ) PRIVATE DECLARE SUB VXMLRET_SetComplementoPlataformasTecnologicas10 LIB "VXML_x86.dll" ALIAS "_VXMLRET_SetComplementoPlataformasTecnologicas10_sc@40" ( ByVal hXml As Long, ByVal Periodicidad As String, ByVal NumServ As String, ByVal MontTotServSIVA As String, ByVal TotalIVATraslado As String, ByVal TotalIVARetenido As String, ByVal TotalISRRetenido As String, ByVal DifIVAEntregadoPrestServ As String, ByVal MonTotalporUsoPlataforma As String, ByVal MonTotalContribuionesGuber As String ) PRIVATE DECLARE SUB VXMLRET_SetComplementoPremios10 LIB "VXML_x86.dll" ALIAS "_VXMLRET_SetComplementoPremios10_sc@20" ( ByVal hXml As Long, ByVal EntidadFederativa As String, ByVal MontTotPago As String, ByVal MontTotPagoGrav As String, ByVal MontTotPagoExent As String ) PRIVATE DECLARE SUB VXMLRET_SetComplementoSectorFinanciero10 LIB "VXML_x86.dll" ALIAS "_VXMLRET_SetComplementoSectorFinanciero10_sc@16" ( ByVal hXml As Long, ByVal IdFideicom As String, ByVal NomFideicom As String, ByVal DescripFideicom As String ) PRIVATE DECLARE SUB VXMLRET_SetRetencionesCfdiRetenRelacionados LIB "VXML_x86.dll" ALIAS "_VXMLRET_SetRetencionesCfdiRetenRelacionados_sc@12" ( ByVal hXml As Long, ByVal TipoRelacion As String, ByVal UUID As String ) PRIVATE DECLARE SUB VXMLRET_SetRetencionesEmisor LIB "VXML_x86.dll" ALIAS "_VXMLRET_SetRetencionesEmisor_sc@16" ( ByVal hXml As Long, ByVal RfcE As String, ByVal NomDenRazSocE As String, ByVal RegimenFiscalE As String ) PRIVATE DECLARE SUB VXMLRET_SetRetencionesInfo LIB "VXML_x86.dll" ALIAS "_VXMLRET_SetRetencionesInfo_sc@24" ( ByVal hXml As Long, ByVal FolioInt As String, ByVal FechaExp As String, ByVal LugarExpReten As String, ByVal CveRetenc As String, ByVal DescRetenc As String ) PRIVATE DECLARE SUB VXMLRET_SetRetencionesPeriodo LIB "VXML_x86.dll" ALIAS "_VXMLRET_SetRetencionesPeriodo_sc@16" ( ByVal hXml As Long, ByVal MesIni As String, ByVal MesFin As String, ByVal Ejercicio As String ) PRIVATE DECLARE SUB VXMLRET_SetRetencionesReceptor LIB "VXML_x86.dll" ALIAS "_VXMLRET_SetRetencionesReceptor_sc@32" ( ByVal hXml As Long, ByVal NacionalidadR As String, ByVal RfcR As String, ByVal NomDenRazSocRNacional As String, ByVal CurpR As String, ByVal CDomicilioFiscalR As String, ByVal NumRegIdTribR As String, ByVal NomDenRazSocRExtranjero As String ) PRIVATE DECLARE SUB VXMLRET_SetRetencionesTotales LIB "VXML_x86.dll" ALIAS "_VXMLRET_SetRetencionesTotales_sc@28" ( ByVal hXml As Long, ByVal MontoTotOperacion As String, ByVal MontoTotGrav As String, ByVal MontoTotExent As String, ByVal MontoTotRet As String, ByVal UtilidadBimestral As String, ByVal ISRCorrespondiente As String ) PRIVATE DECLARE SUB VXMLRET_SetUserInfo LIB "VXML_x86.dll" ALIAS "_VXMLRET_SetUserInfo_sc@12" ( ByVal hXml As Long, ByVal szUser As String, ByVal servidor As String )