Gracias Estela, me voy a poner investigar, desde ya muchas gracias!!!
Norberto Alvarez De: GUFA@mug.org.ar [mailto:g...@mug.org.ar] En nombre de Estela Lázaro Enviado el: miércoles, 28 de abril de 2010 11:41 a.m. Para: GUFA List Member Asunto: [GUFA] Re: [GUFA] Factura Electrónica Exportación Hola Norberto Hay 2 métodos: on line con web services y Facturador Plus por medio de lotes de hasta 50 facturas, como si fueran los txt que se arman para otros aplicativos. A Mis clientes les alcanza con que le prepare el archivo para el Faturador plus <http://www.afip.gov.ar/fe/documentos/FormatoEnvioFacturadorPlus/fp_formato_ archivo.html> http://www.afip.gov.ar/fe/documentos/FormatoEnvioFacturadorPlus/fp_formato_a rchivo.html A mi se me ocurrió hacerlo así: armo un cursor Create Curs psvcntot (tipo c(2),ptovta c(4),cuitemisor c(11),; fechaemision c(10),idioma c(2),concepto c(2),ape c(1),moneda c(3),tipocambio c(11),; destinocmp c(3),tipodocrecepto c(2),nrodocreceptor c(11),idimpositivoreceptor c(20),receptor m,domicilioreceptor m,; importetotal c(15), formaspago m,; incoterms c(3),detalleincoterms c(20),otrosdatoscomerciales m,; permisosdestinos m, cmpasociados m,; detalles m, otrosdatosgenerales m) y lo voy llenando, y en los campos que serán grupos (que los definí como memo) coloco la clave de búsqueda de cada comprobante que yo la llamo 'numero'. Luego creo el xml con: Cursortoxml("psvcntot", "cXML") Ahora bien, Cómo hago para que no aparezca standalone="yes" Cómo hago para que en lugar de <VFPData> diga <comprobantes> Cómo hago un cursortoxml con grupos? Por ejemplo: <formaspago> <formapago> <codigo>num(2)</codigo> <descripcion>texto(50)</descripcion> </formapago> </formaspago> Así: cXml = Strtran( cXml, "<VFPData>", "<comprobantes>" ) cXml = Strtran( cXml, "</VFPData>", "</comprobantes>" ) cXml = Strtran( cXml, ' standalone="yes"',"") cXml = Strtran( cXml, "Windows-1252","UTF-8") cXml = Strtran( cXml, "psvcntot","comprobante") cXml = Strtran( cXml, "</formaspago>", "" ) cXml = Strtran( cXml, "</permisosdestinos>", "" ) cXml = Strtran( cXml, "</cmpasociados>", "" ) cXml = Strtran( cXml, "</detalles>", "" ) y para los grupos, recorro el cursor y armo cursorcitos para cada grupo y a su vez los mando a xml y hago el strtran en el grande. Algo así: sele psvcntot Go Top Do While !Eof() Create Cursor formapago (codigo c(2),descripcion c(50)) Create Cursor permisodestino (permisoemb c(16),destino c(3)) &&99999AAAA999999A Create Cursor cmpasociado (tipoasoc c(2),ptovtaasoc c(4),nroasoc c(8)) Create Cursor detalle (cod c(50),Desc m,unimed c(2),cant N(10,2),preciounit N(13,2),importe N(13,2)) gNumero=psvcntot.formaspago ***lleno el cursor de formapago y luego cXml1 = Strtran( cXml1, "VFPData", "formaspago" ) cXml = Strtran( cXml, '<formaspago>'+gNumero,cXml1) *** igual con los otros cursorcitos de permisodestino, cmpasociado y detalle Select psvcntot Skip Enddo cXml = Strtran( cXml, '<?xml version = "1.0" encoding="Windows-1252" standalone="yes"?>',"") Strtofile( cXml, strSave ) También podría ser con text y endtext a pulmón Espero te ayude Saludos Estela Lázaro D&SIP Desarrollo y Servicios Informáticos Profesionales <http://www.dsip.com.ar/> www.dsip.com.ar _____ De: Norberto Mario Alvarez <n...@nmasystems.com.ar> Para: GUFA List Member <GUFA@mug.org.ar> Enviado: martes, 27 de abril, 2010 19:55:51 Asunto: [GUFA] Factura Electrónica Exportación Estimados colisteros, en un cliente tengo desarrollado un generador de un archivo TXT, para enviar las facturas A y B, autorizar y por la misma vía recibo el TXT con los números de CAE y la fecha de aprobación. Comunicandome con la AFIP, me dicen que las facturas de Exportación tiene que ser un archivo XML. La verdad no sé por donde empezar, me gustaría si alguien me tira una mano, para generar el mismo y como. También a donde lo envio, porque no me han informado nada. Desde ya muchas gracias, por vuestra atención. Norberto Alvarez Socio # 1892
