Padron afip

[Fabian Varela]

Hola alguna persona a realizado consulta de  contribuyentes afip. la idea es poner el cuit y que traiga la razon social  y condicion de iva.

si alguien sabe como por favor me contacta gracias

[Romina L. Castrogiovani]

Hola,

Por webservice? o preguntas por algún servicio web?

Para webservice está el servicio WS_Padrón_A5 (Consulta Constancia de inscripción)

Ver: https://www.sistemasagiles.com.ar/trac/wiki/PadronContribuyentesAFIP

Si buscabas para consulta por web tenemos esta herramienta, pero esta no es libre:

https://www.sistemasagiles.com.ar/padron/consulta/index

Saludos

Castrogiovani L. Romina

Sistemas Ágiles

www.sistemasagiles.com.ar

 011 4450-0716 / 153048-9211

L a V de 10 a 17hs

El lun, 27 dic 2021 a las 15:04, Fabian Varela (<varela...@gmail.com>) escribió:

Hola alguna persona a realizado consulta de  contribuyentes afip. la idea es poner el cuit y que traiga la razon social  y condicion de iva.

si alguien sabe como por favor me contacta gracias

--
Proyecto PyAfipWs Factura Electrónica Libre y temas relacionados AFIP ARBA ANMAT:
http://www.pyafipws.com.ar/ - http://www.github.com/reingart/pyafipws - http://www.sistemasagiles.com.ar/
---
Has recibido este mensaje porque estás suscrito al grupo "PyAfipWs Factura Electrónica Libre y temas relacionados AFIP ARBA ANMAT" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a pyafipws+u...@googlegroups.com.
Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/pyafipws/b646a0ad-f1e3-4629-9936-4d7f4c29f3adn%40googlegroups.com.

[Alejandro Cabo]

Buenas, cuando quiero conectarme al padron me da un error cuando llega a la parte de padron.conectar()

Uso Delphi 7

Adjunto Error.

Saludos

[Jose Hochnadel GMail]

Hola

 

Tenes que consultar Padrón A5

 

 

    sUrl = "https://aws.afip.gov.ar/sr-padron/webservices/personaServiceA5"

    sEnv = "<soapenv:Envelope xmlns:soapenv=""http://schemas.xmlsoap.org/soap/envelope/"" xmlns:ns1=""http://a5.soap.ws.server.puc.sr/"">"

    sEnv = sEnv & "<soapenv:Header/>"

    sEnv = sEnv & "<soapenv:Body>"

    sEnv = sEnv & "<ns1:getPersona>"

    sEnv = sEnv & "<token>" & w_TokenP & "</token>"

    sEnv = sEnv & "<sign>" & w_SignP & "</sign>"

    sEnv = sEnv & "<cuitRepresentada>" & w_CUIT & "</cuitRepresentada>"

    sEnv = sEnv & "<idPersona>" & CUITConsultada & "</idPersona>"

    sEnv = sEnv & "</ns1:getPersona>"

    sEnv = sEnv & "</soapenv:Body>"

    sEnv = sEnv & "</soapenv:Envelope>"

      

    Set xmlHttp = New MSXML2.XMLHTTP60

    With xmlHttp

        .Open "POST", sUrl, False

        .setRequestHeader "Content-Type", "text/xml;charset=UTF-8"

       .setRequestHeader "SOAPAction", "http://a5.soap.ws.server.puc.sr/getPersona"

'        .setRequestHeader "SOAPAction", "http://a4.soap.ws.server.puc.sr/getPersona"

        .setRequestHeader "Content-Length", "Length"

        .send sEnv

       

        Set xmlDoc = New MSXML2.DOMDocument60

        xmlDoc.loadXML .responseText

 

AS José A. Hochnadel

Web: www.loopconsultora.com.ar

Contacto:cont...@loopconsultora.com.ar

Soporte:sop...@loopconsultora.com.ar 

Celular: 0341-156187367

--

Proyecto PyAfipWs Factura Electrónica Libre y temas relacionados AFIP ARBA ANMAT:
http://www.pyafipws.com.ar/ - http://www.github.com/reingart/pyafipws - http://www.sistemasagiles.com.ar/
---
Has recibido este mensaje porque estás suscrito al grupo "PyAfipWs Factura Electrónica Libre y temas relacionados AFIP ARBA ANMAT" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a pyafipws+u...@googlegroups.com.
Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/pyafipws/b646a0ad-f1e3-4629-9936-4d7f4c29f3adn%40googlegroups.com.

Libre de virus. www.avg.com

[Alejandro Cabo]

Muchas gracias por tu respuesta, pero estoy usando OCX de sistemas agiles

  //Obtener Ticket de Acceso

   ticket;

   WSAA.Autenticar('ws_sr_padron_a5', path + Certificado, path + ClavePrivada);
   padron := CreateOleObject('WSSrPadronA5');
   padron.SetTicketAcceso(ta);
   padron.Cuit := CuitEmpresa;
   padron.Conectar();
   try
      padron.Consultar(cuit);    ---->>>> AQUI DA ERROR
   Except
      WSAA   := unassigned;
      padron := unassigned;
      ShowMessage('Error en Consulta Padrón');
      ConsultaPadron := null;
      exit;
   end;