[GUFA] Re: [GUFA] Re: [GUFA] RE: [GUFA] RE: [GUFA] RE: [GUFA] RE: [GUFA] Re: [GUFA] RE: [GUFA] Re: [GUFA] RE: [GUFA] RE: [GUFA] Consulta validación CUIT y Condición Fiscal Clientes

2016-07-28 Por tema Victor Santos 
Fijate si te mejora algo así

**
mCuit = “999” & de cuit 

DECLARE Long ShellExecute IN "Shell32.dll" ;
Long hwnd, String lpVerb, String lpFile, ;
String lpParameters, String lpDirectory, Long nShowCmd

ShellExecute(0, "Open", ”https://soa.afip.gob.ar/sr-padron/v1/constancia/” + 
mCUIT, "", "", 1)
**

From: Cristian Conte 
Sent: Thursday, July 28, 2016 2:49 PM
To: GUFA List Member 
Subject: [GUFA] Re: [GUFA] RE: [GUFA] RE: [GUFA] RE: [GUFA] RE: [GUFA] Re: 
[GUFA] RE: [GUFA] Re: [GUFA] RE: [GUFA] RE: [GUFA] Consulta validación CUIT y 
Condición Fiscal Clientes

Buenas, yo hace rato que vengo utilizando este procedimiento, para consultar si 
el cliente esta ok o no, si esta ok, le hago imprimir la constancia del afip.
Caso contrario no acepto este cuit.
Particularmente no encontré como pasarle parámetro el nro. de cuit asi que lo 
que hago es que una vez cargado el cuit, al abrirse la pantalla del navegador , 
le hago ctrl+c y le copio el cuit y el usuario completa el código.
Si alguien tiene  idea para depurarlo, será agradecido.
Gracias


oweb = CREATEOBJECT("SHELL.APPLICATION")
oweb.open("https://seti.afip.gob.ar/padron-puc-constancia-internet/ConsultaConstanciaAction.do;)

_cliptext=thisform.pageframe1.page1.txtcuit.value

RETURN


El 27 de julio de 2016, 20:10, Walter Comito <walter.com...@gmail.com> escribió:

  MUCHAS GRACIAS









  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 Ramon Giubi
  Enviado el: miércoles, 27 de julio de 2016 20:04
  Para: GUFA List Member
  Asunto: [GUFA] RE: [GUFA] RE: [GUFA] RE: [GUFA] Re: [GUFA] RE: [GUFA] Re: 
[GUFA] RE: [GUFA] RE: [GUFA] Consulta validación CUIT y Condición Fiscal 
Clientes





  Podes acceder por  a cada ítem..

  Por ejemplo….



  El nombre de la empresa:  oRespuesta._data._nombre

  El domicilio : oRespuesta._data._domiciliofiscal._direccion



  Cada uno de los impuestos en el que esta inscripto:



  oRespuesta._data._impuestos.array[1]

  oRespuesta._data._impuestos.array[2]

  oRespuesta._data._impuestos.array[3]

  oRespuesta._data._impuestos.array[4]





  Si tuviera mas de una actividad:

  oRespuesta._data._actividades.array[1]

  oRespuesta._data._actividades.array[2]

  etc.



  Solo hay que recorrer y parsear para ponerlo en registros…











  De: GUFA@mug.org.ar [mailto:GUFA@mug.org.ar] En nombre de Walter Comito
  Enviado el: miércoles, 27 de julio de 2016 04:18 p.m.
  Para: GUFA List Member
  Asunto: [GUFA] RE: [GUFA] RE: [GUFA] Re: [GUFA] RE: [GUFA] Re: [GUFA] RE: 
[GUFA] RE: [GUFA] Consulta validación CUIT y Condición Fiscal Clientes



  Las otras propiedades que son objetos o array como las mostras

  Siempre me muestra el primer impuesto o el primer tipo de actividad









  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 Ramon Giubi
  Enviado el: miércoles, 27 de julio de 2016 15:04
  Para: GUFA List Member
  Asunto: [GUFA] RE: [GUFA] Re: [GUFA] RE: [GUFA] Re: [GUFA] RE: [GUFA] RE: 
[GUFA] Consulta validación CUIT y Condición Fiscal Clientes



  Si, lo tengo armado de esta forma en VFP:



 

  oXMLHTTP = CREATEOBJECT( "Microsoft.XMLHTTP" )

  oXMLHTTP.open( 
"get","https://soa.afip.gob.ar/sr-padron/v2/persona/

[GUFA] Re: [GUFA] RE: [GUFA] RE: [GUFA] RE: [GUFA] RE: [GUFA] Re: [GUFA] RE: [GUFA] Re: [GUFA] RE: [GUFA] RE: [GUFA] Consulta validación CUIT y Condición Fiscal Clientes

2016-07-28 Por tema Cristian Conte 
Buenas, yo hace rato que vengo utilizando este procedimiento, para
consultar si el cliente esta ok o no, si esta ok, le hago imprimir la
constancia del afip.
Caso contrario no acepto este cuit.
Particularmente no encontré como pasarle parámetro el nro. de cuit asi que
lo que hago es que una vez cargado el cuit, al abrirse la pantalla del
navegador , le hago ctrl+c y le copio el cuit y el usuario completa el
código.
Si alguien tiene  idea para depurarlo, será agradecido.
Gracias

oweb = CREATEOBJECT("SHELL.APPLICATION")

oweb.open("*https://seti.afip.gob.ar/padron-puc-constancia-internet/ConsultaConstanciaAction.do
")*

_cliptext=thisform.pageframe1.page1.txtcuit.value

RETURN

El 27 de julio de 2016, 20:10, Walter Comito 
escribió:

> MUCHAS GRACIAS
>
>
>
>
>
>
>
>
>
> 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.comito
> **@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 *Ramon Giubi
> *Enviado el:* miércoles, 27 de julio de 2016 20:04
> *Para:* GUFA List Member
> *Asunto:* [GUFA] RE: [GUFA] RE: [GUFA] RE: [GUFA] Re: [GUFA] RE: [GUFA]
> Re: [GUFA] RE: [GUFA] RE: [GUFA] Consulta validación CUIT y Condición
> Fiscal Clientes
>
>
>
>
>
> Podes acceder por  a cada ítem..
>
> Por ejemplo….
>
>
>
> El nombre de la empresa:  oRespuesta._data._nombre
>
> El domicilio : oRespuesta._data._domiciliofiscal._direccion
>
>
>
> Cada uno de los impuestos en el que esta inscripto:
>
>
>
> oRespuesta._data._impuestos.array[1]
>
> oRespuesta._data._impuestos.array[2]
>
> oRespuesta._data._impuestos.array[3]
>
> oRespuesta._data._impuestos.array[4]
>
>
>
>
>
> Si tuviera mas de una actividad:
>
> oRespuesta._data._actividades.array[1]
>
> oRespuesta._data._actividades.array[2]
>
> etc.
>
>
>
> Solo hay que recorrer y parsear para ponerlo en registros…
>
>
>
>
>
>
>
>
>
> *De:* GUFA@mug.org.ar [mailto:GUFA@mug.org.ar ] *En
> nombre de *Walter Comito
> *Enviado el:* miércoles, 27 de julio de 2016 04:18 p.m.
> *Para:* GUFA List Member
> *Asunto:* [GUFA] RE: [GUFA] RE: [GUFA] Re: [GUFA] RE: [GUFA] Re: [GUFA]
> RE: [GUFA] RE: [GUFA] Consulta validación CUIT y Condición Fiscal Clientes
>
>
>
> Las otras propiedades que son objetos o array como las mostras
>
> Siempre me muestra el primer impuesto o el primer tipo de actividad
>
>
>
>
>
>
>
>
>
> 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.comito
> **@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 *Ramon Giubi
> *Enviado el:* miércoles, 27 de julio de 2016 15:04
> *Para:* GUFA List Member
> *Asunto:* [GUFA] RE: [GUFA] Re: [GUFA] RE: [GUFA] Re: [GUFA] RE: [GUFA]
> RE: [GUFA] Consulta validación CUIT y Condición Fiscal Clientes
>
>
>
> Si, lo tengo armado de esta forma en VFP:
>
>
>
>
>
> oXMLHTTP = CREATEOBJECT( "Microsoft.XMLHTTP" )
>
> oXMLHTTP.open( 
> "get","*https://soa.afip.gob.ar/sr-padron/v2/persona/30688293649
> ",.F. )*
>
> oXMLHTTP.send()
>
> cJSON = oXMLHTTP.responseText
>
> set proc to json additive
>
> oRespuesta=  json_decode(  cJSON )
>
> TRY
>
> IF ASCAN(oRespuesta._data._impuestos.array,30)>0
>
>

[GUFA] RE: [GUFA] RE: [GUFA] RE: [GUFA] RE: [GUFA] Re: [GUFA] RE: [GUFA] Re: [GUFA] RE: [GUFA] RE: [GUFA] Consulta validación CUIT y Condición Fiscal Clientes

2016-07-27 Por tema Walter Comito 
MUCHAS GRACIAS









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.comito@  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 Ramon Giubi
Enviado el: miércoles, 27 de julio de 2016 20:04
Para: GUFA List Member
Asunto: [GUFA] RE: [GUFA] RE: [GUFA] RE: [GUFA] Re: [GUFA] RE: [GUFA] Re: 
[GUFA] RE: [GUFA] RE: [GUFA] Consulta validación CUIT y Condición Fiscal 
Clientes





Podes acceder por  a cada ítem..

Por ejemplo….



El nombre de la empresa:  oRespuesta._data._nombre

El domicilio : oRespuesta._data._domiciliofiscal._direccion



Cada uno de los impuestos en el que esta inscripto:



oRespuesta._data._impuestos.array[1]

oRespuesta._data._impuestos.array[2]

oRespuesta._data._impuestos.array[3]

oRespuesta._data._impuestos.array[4]





Si tuviera mas de una actividad:

oRespuesta._data._actividades.array[1]

oRespuesta._data._actividades.array[2]

etc.



Solo hay que recorrer y parsear para ponerlo en registros…











De: GUFA@mug.org.ar [mailto:GUFA@mug.org.ar] En nombre de Walter Comito
Enviado el: miércoles, 27 de julio de 2016 04:18 p.m.
Para: GUFA List Member
Asunto: [GUFA] RE: [GUFA] RE: [GUFA] Re: [GUFA] RE: [GUFA] Re: [GUFA] RE: 
[GUFA] RE: [GUFA] Consulta validación CUIT y Condición Fiscal Clientes



Las otras propiedades que son objetos o array como las mostras

Siempre me muestra el primer impuesto o el primer tipo de actividad









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.comito@  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 Ramon Giubi
Enviado el: miércoles, 27 de julio de 2016 15:04
Para: GUFA List Member
Asunto: [GUFA] RE: [GUFA] Re: [GUFA] RE: [GUFA] Re: [GUFA] RE: [GUFA] RE: 
[GUFA] Consulta validación CUIT y Condición Fiscal Clientes



Si, lo tengo armado de esta forma en VFP:





oXMLHTTP = CREATEOBJECT( "Microsoft.XMLHTTP" )

oXMLHTTP.open( 
"get","https://soa.afip.gob.ar/sr-padron/v2/persona/30688293649",.F. )

oXMLHTTP.send()

cJSON = oXMLHTTP.responseText

set proc to json additive

oRespuesta=  json_decode(  cJSON )

TRY

IF ASCAN(oRespuesta._data._impuestos.array,30)>0

? 'IVA Inscripto'

  ELSE

? 'NO INSCRIPTO '

  ENDIF

  CATCH

? 'CUIT NO ENCONTRADO'

  ENDTRY





La libreria vfpjson  :  https://github.com/sait/vfpjson









De: GUFA@mug.org.ar [mailto:GUFA@mug.org.ar] En nombre de Sergio .
Enviado el: miércoles, 27 de julio de 2016 02:37 p.m.
Para: GUFA List Member
Asunto: [GUFA] Re: [GUFA] RE: [GUFA] Re: [GUFA] RE: [GUFA] RE: [GUFA] Consulta 
validación CUIT y Condición Fiscal Clientes



Muy buen aporte, una consulta, cuando devuelve el lcRespuesta hay forma de 
traducir esto a un registro? No devuelve la condición ante el IVA ?



Saludos

Sergio





El 27 de julio de 2016, 8:42, Jorge Sanes - Speedy  
escribió:

Muchas gracias Ramon y Pancho por todo!!



Abrazo desde La Pampa







De: GUFA@mug.org.ar [mailto:GUFA@mug.org.ar] En nombre de francisco prieto
Enviado el: miércoles, 27 de julio de 2016 7:52
Para: GUFA List Member
Asunto: [GUFA] Re: [GUFA] RE: [GUFA] RE: [GUFA] Consulta validación CUIT y 
Condición Fiscal Clientes



A proposito para implementar esa api con VFP podria hacerse asi

oXMLHTTP = CREATEOBJECT( "Microsoft.XMLHTTP" )
oXMLHTTP.Open("GET","https://soa.afip.gob.ar/sr-padron/v2/persona/33710058739",.F.)
oXMLHTTP.Send()