Unicode C

Insert Signed XML as Base64 Data into Invoice XML

See more TicketBAI Examples

Demonstrates how to insert previously signed XML into another XML as base64 data. Unicode C

#include <C_CkStringBuilderW.h>
#include <C_CkXmlW.h>

void ChilkatSample(void)
    {
    BOOL success;
    HCkStringBuilderW sb1;
    HCkStringBuilderW sb2;
    HCkXmlW xml;

    success = FALSE;

    // We wish to create the following XML:

    // <?xml version="1.0" encoding="UTF-8" standalone="no"?><lrpficfcsgap:LROEPF140IngresosConFacturaConSGAltaPeticion xmlns:lrpficfcsgap="https://www.batuz.eus/fitxategiak/batuz/LROE/esquemas/LROE_PF_140_1_1_Ingresos_ConfacturaConSG_AltaPeticion_V1_0_2.xsd">
    // 	<Cabecera>
    // 		<Modelo>140</Modelo>
    // 		<Capitulo>1</Capitulo>
    // 		<Subcapitulo>1.1</Subcapitulo>
    // 		<Operacion>A00</Operacion>
    // 		<Version>1.0</Version>
    // 		<Ejercicio>2022</Ejercicio>
    // 		<ObligadoTributario>
    // 			<NIF>79732487C</NIF>
    // 			<ApellidosNombreRazonSocial>ARRIOLA LEJARDI ANE</ApellidosNombreRazonSocial>
    // 		</ObligadoTributario>
    // 	</Cabecera>
    // 	<Ingresos>		
    // 		<Ingreso>
    // 			<TicketBai>PD94bWw...ldEJhaT4=</TicketBai>
    // 		<Renta>
    // 			<DetalleRenta>
    // 				<Epigrafe>197330</Epigrafe>
    // 			</DetalleRenta>
    // 		</Renta>
    // 	</Ingreso>
    // 		<Ingreso>
    // 			<TicketBai>PD94bWw...rZXRCYWk+</TicketBai>
    // 		<Renta>
    // 			<DetalleRenta>
    // 				<Epigrafe>197330</Epigrafe>
    // 				<IngresoAComputarIRPFDiferenteBaseImpoIVA>S</IngresoAComputarIRPFDiferenteBaseImpoIVA>
    // 				<ImporteIngresoIRPF>400.00</ImporteIngresoIRPF>
    // 			</DetalleRenta>
    // 		</Renta>
    // 	</Ingreso>	
    // 	</Ingresos>
    // </lrpficfcsgap:LROEPF140IngresosConFacturaConSGAltaPeticion>

    // Use this online tool to generate code from sample XML: 
    // Generate Code to Create XML

    // First get the signed XML created in these other examples
    // TicketBAI Sign XML Example 1
    sb1 = CkStringBuilderW_Create();
    success = CkStringBuilderW_LoadFile(sb1,L"qa_output/signedXml_1.xml",L"utf-8");

    // TicketBAI Sign XML Example 2
    sb2 = CkStringBuilderW_Create();
    success = CkStringBuilderW_LoadFile(sb2,L"qa_output/signedXml_2.xml",L"utf-8");

    xml = CkXmlW_Create();
    CkXmlW_putTag(xml,L"lrpficfcsgap:LROEPF140IngresosConFacturaConSGAltaPeticion");
    CkXmlW_AddAttribute(xml,L"xmlns:lrpficfcsgap",L"https://www.batuz.eus/fitxategiak/batuz/LROE/esquemas/LROE_PF_140_1_1_Ingresos_ConfacturaConSG_AltaPeticion_V1_0_2.xsd");
    CkXmlW_UpdateChildContent(xml,L"Cabecera|Modelo",L"140");
    CkXmlW_UpdateChildContent(xml,L"Cabecera|Capitulo",L"1");
    CkXmlW_UpdateChildContent(xml,L"Cabecera|Subcapitulo",L"1.1");
    CkXmlW_UpdateChildContent(xml,L"Cabecera|Operacion",L"A00");
    CkXmlW_UpdateChildContent(xml,L"Cabecera|Version",L"1.0");
    CkXmlW_UpdateChildContent(xml,L"Cabecera|Ejercicio",L"2022");
    CkXmlW_UpdateChildContent(xml,L"Cabecera|ObligadoTributario|NIF",L"79732487C");
    CkXmlW_UpdateChildContent(xml,L"Cabecera|ObligadoTributario|ApellidosNombreRazonSocial",L"ARRIOLA LEJARDI ANE");
    CkXmlW_UpdateChildContent(xml,L"Ingresos|Ingreso|TicketBai",CkStringBuilderW_getEncoded(sb1,L"base64",L"utf-8"));
    CkXmlW_UpdateChildContent(xml,L"Ingresos|Ingreso|Renta|DetalleRenta|Epigrafe",L"197330");
    CkXmlW_UpdateChildContent(xml,L"Ingresos|Ingreso[1]|TicketBai",CkStringBuilderW_getEncoded(sb2,L"base64",L"utf-8"));
    CkXmlW_UpdateChildContent(xml,L"Ingresos|Ingreso[1]|Renta|DetalleRenta|Epigrafe",L"197330");
    CkXmlW_UpdateChildContent(xml,L"Ingresos|Ingreso[1]|Renta|DetalleRenta|IngresoAComputarIRPFDiferenteBaseImpoIVA",L"S");
    CkXmlW_UpdateChildContent(xml,L"Ingresos|Ingreso[1]|Renta|DetalleRenta|ImporteIngresoIRPF",L"400.00");

    wprintf(L"%s\n",CkXmlW_getXml(xml));

    success = CkXmlW_SaveXml(xml,L"qa_output/ticketBAI_invoice.xml");


    CkStringBuilderW_Dispose(sb1);
    CkStringBuilderW_Dispose(sb2);
    CkXmlW_Dispose(xml);

    }