Para sacar tipo de cambio de sunat (Peru)

6,471 views
Skip to first unread message

ZeRoberto

unread,
Mar 24, 2011, 3:15:31 PM3/24/11
to publicesvfoxpro
Hola a todos
 
Alguien sabe como hacer para que mi programa jale los tipos de cambio de dolar, desde la pagina de la sunat?
 
Gracias
 
Roberto

Miguel Canchas

unread,
Mar 24, 2011, 4:21:26 PM3/24/11
to publice...@googlegroups.com
Sale ERROR DE ANIDAMIENTO en

do while loIE.readystate<>4


A que se debe ? interesante función que me puede servir para que ya no llenen a mano los datos del tipo de cambio...

MK


-----Mensaje original-----
De: publice...@googlegroups.com [mailto:publice...@googlegroups.com] En nombre de cesarz
Enviado el: jueves, 24 de marzo de 2011 03:03 p.m.
Para: Comunidad de Visual Foxpro en Español
Asunto: [vfp] Re: Para sacar tipo de cambio de sunat (Peru)

Ahi va de nuevo

loIE=createobject("InternetExplorer.Application")
loIE.visible=.T.
loIE.navigate("http://www.sunat.gob.pe/cl-at-ittipcam/tcS01Alias")
do while loIE.readystate<>4
wait window "Waiting for web page..." timeout 1
enddo
do while type("loIE.document.body.innerhtml")<>"C"
*loop till it's a character... sometimes it's just not quite ready
enddo
*lcHTML=loIE.document.body.innerhtml
lcHTML=loIE.document.body.innerText
strtofile(lcHTML,"temp.txt")
modify command temp.txt

Miguel Canchas

unread,
Mar 24, 2011, 4:25:04 PM3/24/11
to publice...@googlegroups.com
Ok ya salió, estaba mal copiado..

Marzo - 2011
Tipo de cambio publicado al :

DíaCompraVentaDíaCompraVentaDíaCompraVentaDíaCompraVenta
1 2.774 2.775 2 2.777 2.778 3 2.774 2.775 4 2.770 2.771
5 2.769 2.770 8 2.768 2.770 9 2.770 2.771 10 2.769 2.770
11 2.770 2.770 12 2.769 2.769 15 2.769 2.770 16 2.769 2.770
17 2.769 2.770 18 2.768 2.769 19 2.767 2.767 22 2.780 2.781
23 2.782 2.782 24 2.778 2.778

Para efectos del Impuesto a la Renta, se deberá tomar el tipo de cambio de cierre, al 31 de Diciembre del ejercicio correspondiente.


Mes Enero Febrero Marzo Abril Mayo Junio Julio Agosto Setiembre Octubre Noviembre Diciembre Año 1995 1996 1997 1998 1999 2000 2001 2002 2003 2004 2005 2006 2007 2008 2009 2010 2011

Descargar Email: Enviar Correo


Para cualquier sugerencia sobre el sitio web, por favor comuníquese con:
Webm...@sunat.gob.pe
Copyright © SUNAT 1997 - 2011

Esto es todo lo que me arroja, alguna idea para poderlo pasar a datos legibles...??

MK

-----Mensaje original-----
De: publice...@googlegroups.com [mailto:publice...@googlegroups.com] En nombre de Miguel Canchas
Enviado el: jueves, 24 de marzo de 2011 03:21 p.m.
Para: publice...@googlegroups.com
Asunto: RE: [vfp] Re: Para sacar tipo de cambio de sunat (Peru)

Yvan GMAIL

unread,
Mar 24, 2011, 4:29:22 PM3/24/11
to publice...@googlegroups.com
X cada espacio en blanco un dato.
1 espacio en blanco viene el Tc. Compra?
2 espacio en blanco viene el tc Venta
3 el siguiente

Renuevo contador.
En borrador..

-----Mensaje original-----
De: publice...@googlegroups.com
[mailto:publice...@googlegroups.com] En nombre de Miguel Canchas

Enviado el: Jueves, 24 de Marzo de 2011 03:25 p.m.

cesarz

unread,
Mar 24, 2011, 4:31:07 PM3/24/11
to Comunidad de Visual Foxpro en Español
Ya ps compañero, el resto te lo dejo a la imaginación...,
solo debes leer linea a linea el txt y llevarlo al cursor o tabla que
quieras llenar.

salu2

On 24 mar, 15:25, "Miguel Canchas" <mcanc...@ximesa.com> wrote:
> Ok ya salió, estaba mal copiado..
>
> Marzo - 2011
> Tipo de cambio publicado al :
>
> DíaCompraVentaDíaCompraVentaDíaCompraVentaDíaCompraVenta
> 1 2.774 2.775 2 2.777 2.778 3 2.774 2.775 4 2.770 2.771
> 5 2.769 2.770 8 2.768 2.770 9 2.770 2.771 10 2.769 2.770
> 11 2.770 2.770 12 2.769 2.769 15 2.769 2.770 16 2.769 2.770
> 17 2.769 2.770 18 2.768 2.769 19 2.767 2.767 22 2.780 2.781
> 23 2.782 2.782 24 2.778 2.778
>
> Para efectos del Impuesto a la Renta, se deberá tomar el tipo de cambio de cierre, al 31 de Diciembre del ejercicio correspondiente.
>
>  Mes Enero Febrero Marzo Abril Mayo Junio Julio Agosto Setiembre Octubre Noviembre Diciembre  Año 1995 1996 1997 1998 1999 2000 2001 2002 2003 2004 2005 2006 2007 2008 2009 2010 2011
>
>  Descargar Email:   Enviar Correo
>
> Para cualquier sugerencia sobre el sitio web, por favor comuníquese con:
>  Webmas...@sunat.gob.pe

Miguel Canchas

unread,
Mar 24, 2011, 4:34:07 PM3/24/11
to publice...@googlegroups.com
Ok... solo era una observación ... :)

Esta muy interesante la función....

Mk


-----Mensaje original-----
De: publice...@googlegroups.com [mailto:publice...@googlegroups.com] En nombre de cesarz

Enviado el: jueves, 24 de marzo de 2011 03:31 p.m.

cesarz

unread,
Mar 24, 2011, 3:57:02 PM3/24/11
to Comunidad de Visual Foxpro en Español
Hola

Hace mucho estaba buscando algo como eso y logre hacerlo con un codigo
que encontre en la red.

Implementa este codigo en el click de un boton.


loIE=createobject("InternetExplorer.Application")
loIE.visible=.T.
loIE.navigate("http://www.sunat.gob.pe/cl-at-ittipcam/tcS01Alias")
do while loIE.readystate<>4
wait window "Waiting for web page..." timeout 1
enddo
do while type("loIE.document.body.innerhtml")<>"C"
*loop till it's a character... sometimes it's just not quite ready
enddo
*lcHTML=loIE.document.body.innerhtml
lcHTML=loIE.document.body.innerText
strtofile(lcHTML,"temp.txt")
modify command temp.txt

Con el TXT puedes ya guardarlo donde desees...

salu2

VFP es lo maximo...




On 24 mar, 14:15, ZeRoberto <zeroha...@gmail.com> wrote:

ZeRoberto

unread,
Mar 24, 2011, 4:42:29 PM3/24/11
to publice...@googlegroups.com
Gracias por responder voy a revisarlo
 
Saludos

walter cordova

unread,
Mar 24, 2011, 5:08:54 PM3/24/11
to publice...@googlegroups.com
Amigo Cesar

y seria posible jalar el t.cambio de un mes especifico???

Slds


El 24/03/2011 03:03 PM, cesarz escribió:
Ahi va de nuevo

loIE=createobject("InternetExplorer.Application")
loIE.visible=.T.
loIE.navigate("http://www.sunat.gob.pe/cl-at-ittipcam/tcS01Alias")
do while loIE.readystate<>4
	wait window "Waiting for web page..." timeout 1
enddo
do while type("loIE.document.body.innerhtml")<>"C"
	*loop till it's a character... sometimes it's just not quite ready
enddo
*lcHTML=loIE.document.body.innerhtml
lcHTML=loIE.document.body.innerText
strtofile(lcHTML,"temp.txt")
modify command temp.txt



On 24 mar, 14:15, ZeRoberto <zeroha...@gmail.com> wrote:

--

Walter Cordova N.
Sistemas TQC
348-1103 Anx 147

jose ricardo jimenez choque

unread,
Oct 30, 2012, 11:44:50 AM10/30/12
to publice...@googlegroups.com
El codigo que muestran esta en vb.net, pero es en ASP.net o Winform, en mi caso yo estoy utilizando Winform en c# por favor es de vida o muerte este tema. ayudenme....y creo q falta unas lineas de codigo ..pueden colocarlo completo xfavor...gracias

Daniel Sánchez

unread,
Nov 2, 2012, 9:08:03 PM11/2/12
to publice...@googlegroups.com
Obtener el tipo de cambio de la pagina de la sunat, lo obtuve de alguna lado o alguien anteriormente lo compartió.

Saludos


--
Daniel Sánchez Escobar
Investigación y Desarrollo
Reset Software & Sistemas
Móvil +051-949398047
Trujillo - Perú
tipocambiowebsunat.prg

jose ricardo jimenez choque

unread,
Nov 13, 2012, 4:38:42 PM11/13/12
to publice...@googlegroups.com
Estimado, Quiero el codigo en c# por favor,

Gracias

Kumanger

unread,
Mar 3, 2014, 7:51:10 AM3/3/14
to publice...@googlegroups.com
Si es posible, con todo que explicaron los amigos del grupo cambiar la URL por esta http://www.sunat.gob.pe/cl-at-ittipcam/tcS01Alias?mes=02&anho=2013

Donde mes=02   es el mes a solicitar
anho=2013   es el año

Saludos

Daniel Suarez

unread,
May 2, 2014, 12:34:54 PM5/2/14
to publice...@googlegroups.com
Muy buenos dias quisiera ver porfavor si me pueden ayudar con un codigo u orientar a como obtener el tipo de cambio de esta pagina web http://www.sunat.gob.pe/cl-at-ittipcam/tcS01Alias?mes=02&anho=2013
a un formulario de visual basic o vb.net
estare eternamente agradecido

Afu Nang Tse Mundaca

unread,
May 7, 2015, 12:53:08 PM5/7/15
to publice...@googlegroups.com, jota...@gmail.com
Si es posible si usas la tecnica de web scraping que es leer el HTML de una web como si fuera un xml y obtener la información que necesitas

Te paso un link de mi blog para que te pueda ayudar a entenderlo

ZeRoberto

unread,
May 7, 2015, 12:58:39 PM5/7/15
to publicesvfoxpro, jota...@gmail.com
Interesante amigo, pero como paso eso a VFP

Jean Pierre Adonis De La Cruz Garcia

unread,
May 7, 2015, 1:10:58 PM5/7/15
to publice...@googlegroups.com, zero...@gmail.com, jota...@gmail.com
Bueno, te envio el modulo que yo trabajo en VF, es una de mis primeras versiones, ya la ultima version claro que tiene mas mejoras, pero creo que con eso te ayudara mucho.
tcambio.r a r

cesarz

unread,
Mar 24, 2011, 4:03:21 PM3/24/11
to Comunidad de Visual Foxpro en Español
Ahi va de nuevo

loIE=createobject("InternetExplorer.Application")
loIE.visible=.T.
loIE.navigate("http://www.sunat.gob.pe/cl-at-ittipcam/tcS01Alias")
do while loIE.readystate<>4
wait window "Waiting for web page..." timeout 1
enddo
do while type("loIE.document.body.innerhtml")<>"C"
*loop till it's a character... sometimes it's just not quite ready
enddo
*lcHTML=loIE.document.body.innerhtml
lcHTML=loIE.document.body.innerText
strtofile(lcHTML,"temp.txt")
modify command temp.txt



On 24 mar, 14:15, ZeRoberto <zeroha...@gmail.com> wrote:

Jhonathan Moran

unread,
Mar 12, 2016, 4:31:46 PM3/12/16
to Comunidad de Visual Foxpro en Español
Encontré esta web en internet para consumir web service en JSON: http://code.staffsystems.us/webservices/tipo-de-cambio/

Saludos.

systemd...@hotmail.com

unread,
Apr 30, 2020, 6:37:50 PM4/30/20
to Comunidad de Visual Foxpro en Español
Hola Daniel,

Muy buen aporte, gracias por compartirlo.

Saludos
Reply all
Reply to author
Forward
0 new messages