A continuación se muestra un ejemplo de factura retenciones dividendos2 en VB SDK

Ejemplo de factura retenciones dividendos2 en VB SDK

Dim sdk As MFSDK;
sdk = new MFSDK();
sdk.Iniciales.Add("MODOINI", "DIVISOR");
sdk.Iniciales.Add("RESPUESTA_UTF8", "SI");

sdk.Iniciales.Add("cfdi", "c:/sdk2/timbrados/ejemplo_retenciones_dividendos2.xml");
sdk.Iniciales.Add("remueve_acentos", "SI");
sdk.Iniciales.Add("retencion", "SI");
sdk.Iniciales.Add("version_retencion", "2");
sdk.Iniciales.Add("validacion_local", "NO");
sdk.Iniciales.Add("php_openssl", "SI");
sdk.Iniciales.Add("xml_debug", "c:/sdk2/timbrados/ejemplo_retenciones_dividendos2_debug.xml");

//#NODO [dividendos]
Dim dividendos As MFObject = New MFObject("dividendos");

//#NODO [dividendos/Remanente]
Dim dividendos_Remanente As MFObject = New MFObject("Remanente");
dividendos_Remanente["ProporcionRem"] = "1000.00";

//#NODO [dividendos/DividOUtil]
Dim dividendos_DividOUtil As MFObject = New MFObject("DividOUtil");
dividendos_DividOUtil["CveTipDivOUtil"] = "04";
dividendos_DividOUtil["MontISRAcredRetMexico"] = "100.00";
dividendos_DividOUtil["MontISRAcredRetExtranjero"] = "200.00";
dividendos_DividOUtil["MontRetExtDivExt"] = "300.00";
dividendos_DividOUtil["MontISRAcredNal"] = "400.00";
dividendos_DividOUtil["MontDivAcumNal"] = "500.00";
dividendos_DividOUtil["MontDivAcumExt"] = "600.00";
dividendos_DividOUtil["TipoSocDistrDiv"] = "Sociedad Nacional";

//#NODO [periodo]
Dim periodo As MFObject = New MFObject("periodo");
periodo["MesIni"] = "10";
periodo["MesFin"] = "10";
periodo["Ejercicio"] = "2021";

//#NODO [emisor]
Dim emisor As MFObject = New MFObject("emisor");
emisor["RegimenFiscalE"] = "601";
emisor["RfcE"] = "EKU9003173C9";
emisor["NomDenRazSocE"] = "ESCUELA KEMPER URGATE";

//#NODO [conf]
Dim conf As MFObject = New MFObject("conf");
conf["pass"] = "12345678a";
conf["cer"] = "c:/sdk2/certificados/EKU9003173C9.cer.pem";
conf["key"] = "c:/sdk2/certificados/EKU9003173C9.key.pem";

//#NODO [PAC]
Dim PAC As MFObject = New MFObject("PAC");
PAC["usuario"] = "DEMO700101XXX";
PAC["pass"] = "DEMO700101XXX";
PAC["produccion"] = "NO";

//#NODO [totales]
Dim totales As MFObject = New MFObject("totales");
totales["MontoTotExent"] = "0.00";
totales["MontoTotRet"] = "1000.00";
totales["MontoTotOperacion"] = "9000.00";
totales["MontoTotGrav"] = "9000.00";

//#NODO [totales/ImpRetenidos]
Dim totales_ImpRetenidos As MFObject = New MFObject("ImpRetenidos");

//#NODO [totales/ImpRetenidos/0]
Dim totales_ImpRetenidos_0 As MFObject = New MFObject("0");
totales_ImpRetenidos_0["TipoPagoRet"] = "01";
totales_ImpRetenidos_0["ImpuestoRet"] = "002";
totales_ImpRetenidos_0["MontoRet"] = "1000.00";
totales_ImpRetenidos_0["BaseRet"] = "9000";
totales_ImpRetenidos.AgregaSubnodo(totales_ImpRetenidos_0);

//#NODO [receptor]
Dim receptor As MFObject = New MFObject("receptor");
receptor["DomicilioFiscalReceptor"] = "27054";
receptor["UsoCFDI"] = "G01";
receptor["nombre"] = "MIGUEL ANGEL SOSA HERNANDEZ";
receptor["NacionalidadR"] = "Nacional";
receptor["rfc"] = "SOHM7509289MA";

//#NODO [receptor/Nacional]
Dim receptor_Nacional As MFObject = New MFObject("Nacional");
receptor_Nacional["DomicilioFiscalR"] = "65000";
receptor_Nacional["NomDenRazSocR"] = "UNIVERSIDAD ROBOTICA ESPA�OLA";
receptor_Nacional["RfcR"] = "URE180429TM6";

//#NODO [factura]
Dim factura As MFObject = New MFObject("factura");
factura["DescRetenc"] = "004";
factura["CveRetenc"] = "08";
factura["FechaExp"] = "2023-09-27T10:50:02";
factura["FolioInt"] = "21RET";
factura["LugarExpRetenc"] = "45079";
factura["fecha_expedicion"] = "AUTO";

//#Agrega Nodos
sdk.AgregaObjeto(PAC);
sdk.AgregaObjeto(conf);
sdk.AgregaObjeto(factura);
sdk.AgregaObjeto(emisor);
receptor.AgregaSubnodo(receptor_Nacional);
sdk.AgregaObjeto(receptor);
sdk.AgregaObjeto(periodo);
totales.AgregaSubnodo(totales_ImpRetenidos);
sdk.AgregaObjeto(totales);
dividendos.AgregaSubnodo(dividendos_DividOUtil);
dividendos.AgregaSubnodo(dividendos_Remanente);
sdk.AgregaObjeto(dividendos);

//#Ejecuta KIT
SDKRespuesta respuesta = sdk.Timbrar(@"C:\sdk2\timbrar32.bat", @"C:\sdk2\timbrados\", "factura", false);
//Muestra el archivo ini
//textBox1.Text = sdk.Ini;
//Muestra la respuesta de timbrado
//textBox2.Text = respuesta.RespuestaOriginalSDK;
// Se notifica que el SDK se ejecutó
string mensaje = string.Format("Código: {0}\r\nMensaje: {1}", respuesta.Codigo_MF_Numero, respuesta.Codigo_MF_Texto);
MessageBox.Show(this, mensaje, Application.ProductName, MessageBoxButtons.OK, respuesta.Codigo_MF_Numero == "0" ? MessageBoxIcon.Information : MessageBoxIcon.Warning);