Yo habia enviado una version alternativa por si a alguno le servia
------------------------------------------------------------------ ifox = CreateObject("iFox.HTTP") resp = ifox.Get("https://soa.afip.gob.ar/sr-padron/v2/persona/30500010912") ? resp SET CLASSLIB TO (LOCFILE("JSON.VCX", "VCX", "Buscar")) additive json = CREATEOBJECT("JSON") obj = json.Parse(resp) ? obj.data.nombre Requiere iFox (https://github.com/ColiseoSoftware/ifox) y un parser json http://www.sweetpotatosoftware.com/SPSBlog/PermaLink,guid,5f96efd7-f350-4bc8-86c5-caffd9e833eb.aspx (este use para el ejemplo) o https://vfpx.codeplex.com/wikipage?title=nfJson&referringTitle=Home From: walter.com...@gmail.com To: GUFA@mug.org.ar Subject: [GUFA] Responder: Consultar CUIT Date: Mon, 13 Jun 2016 09:49:36 -0300 Si yo pedi que nos diera una mano porque lo necesito, esta muy bueno el aporte, solo faltarían algunas cositas para poder usarlo.Esperamos que nos puedas enviar lo que nos falta. Gracias. Walter Cómito Analista de Sistemas MP 0397 C.P.C.I.P.C. › walter.com...@gmail.com wcom...@hotmail.com ' +54 9 351 494.4667 +54 9 3513.292.707 þ www.softram.com.ar Q Si no es necesario, no imprima este correo.Todos somos responsables por el cuidado del medio ambiente. NOTA DE CONFIDENCIALIDAD Este mensaje (y sus anexos) es confidencial y puede contener información de propiedad exclusiva de Walter Cómito (SRS Sistemas). Si usted ha recibido este mensaje por error, por favor comuníquelo inmediatamente a walter.com...@gmail.com y tenga la amabilidad de eliminarlo; no deberá copiar el mensaje ni divulgar su contenido a ninguna persona.Muchas Gracias. De: GUFA@mug.org.ar [mailto:GUFA@mug.org.ar] En nombre de Oscar Stasiulevicius Enviado el: sábado, 11 de junio de 2016 14:21 Para: GUFA List Member Asunto: [GUFA] Responder: Consultar CUIT Sergioaun no lo probe, pero vi en el mismo hilo de mails que no les funciono, y esperaban las librerias que se referenciaban en el codigoGracias! El 11 de junio de 2016, 11:02, Sergio D.Castellari <sergio197...@yahoo.com.ar> escribió:Hola Oscar, No requiere de ninguna libreria especial. Fijate en la lista, que postee todo el codigo que utilizo. Saludos,Sergio From: Oscar Stasiulevicius Sent: Saturday, June 11, 2016 10:46 AMTo: GUFA List Member Subject: [GUFA] Responder: Consultar CUIT Sergio, estas consultas serian para los "mismos" cuits, clientes/proveedores habituales?Atte.Oscar El 26 de abril de 2016, 23:27, Ing César Luque <clu...@arnet.com.ar> escribió:Sergio Aguardamos tu colaboraciòn. Saludos.- Cèsar Luque From: Sergio Castellari -mvl- Sent: Tuesday, April 26, 2016 6:38 PMTo: GUFA List Member Subject: [GUFA] Responder: Consultar CUIT Siiii se puede. AFIP tiene un ws para consultar el estado. Incluso podes obtener el pdf de constancia de inscripción. Ahora no estoy con la compu, pero si me acuerdo cuando llegue, te paso como lo hago. Además, también podes enviar un dni y obtener el cuit desde la afip Saludos, Sergio Castellari Enviado desde mi teléfono inteligente Sony Xperia™ ---- Sergio . escribió ----Amigos, hay forma de consultar ONLINE si un CUIT de un cliente está en regla con AFIP ? Saludos Libre de virus. www.avast.com