Software para calcular la rentabilidad financiero fiscal
Después de varios intentos fallidos míos y de algunos lectores de buscar en la red algún programa que pudiera calcular la rentabilidad, he decidido desempolvar mi curso de programación en BASIC jurásico y hacer este rudimentario programa.
Esta aplicación es capaz de sacar la rentabilidad en cualquier circunstancia, pero para que no fuera demasiado engorroso me he limitado a calcular la vida restante de la emisión en meses. Debido a este detalle y a la sencillez del programa, la rentabilidad puede tener un error anual de un 0.05% más o menos. Pienso que a pesar de no ser muy exacto puede servir para que los lectores tengan una idea muy aproximada de la rentabilidad de cualquier emisión.
Pongo el código del programa abierto por dos motivos:
1 - Estando a la vista nadie me podrá acusar de haberle introducido un virus o un programa espía en su ordenador.
2 - Quizá alguno de los programadores voluntarios del laboratorio de inversión use estas fórmulas y haga un programita decente para Windows.
Copiar y pegar el texto siguiente y guardarlo en una carpeta con el nombre de TIR.BAS
20 CLS:INPUT "PRECIO DE COMPRA EN PORCENTAJE ",PC
30 INPUT "PRECIO DE VENTA O AMORTIZACION ",PV
40 INPUT "CANTIDAD DE MESES DE VIDA HASTA LA VENTA O EL VENCIMIENTO ",MV
50 INPUT "INTERES NOMINAL ANUAL ",IN
60 INM=IN/12
70 FOR I=.1 TO 2 STEP .001
80 C#=PC
90 FOR X=1 TO MV
100 IM=C#*I/100
110 C#=C#+IM
120 C#=C#-INM
130 NEXT X
140 IF C#=>PV THEN 160
150 NEXT I
160 PRINT:PRINT
170 RA=I*12:PRINT "RENTABILIDAD ANUAL ";RA
180 :
190 PRINT:PRINT
200 RFF=(IN*((100-18+(24-1.2))/100))/((100-18)/100):RFA=(RFF-IN)/PC*PV
210 PRINT "RENTABILIDAD FINANCIERO FISCAL SI SON AUTOPISTAS BONIFICADAS ";RFA+RA
Para poder ejecutar este software se debe de descargar en la red un programa llamado GWBASIC.EXE que se pondrá en la misma carpeta que el TIR.BAS.
EJECUCION DEL PROGRAMA
Se arranca el GWBASIC.EXE
Se escribe LOAD"TIR y se pulsa intro.
Se escribe RUN e intro.
Llegado a este punto se deben contestar las preguntas siguientes:
PRECIO DE COMPRA EN PORCENTAJE
A esta pregunta se contestará con el precio de compra en porcentaje sobre su nominal, no en euros. Después de cada pregunta se pulsa intro.
Como ejemplo voy a poner la última recomendación sobre las OBLIGACIONES DE AUTOPISTAS AUCALSA AL 4%
En este caso escribiremos el precio de compra recomendado, o sea, 91
PRECIO DE VENTA O AMORTIZACION
Se supone que si mantenemos hasta el vencimiento nos lo reembolsarán a 100. Por lo tanto escribo 100
CANTIDAD DE MESES DE VIDA HASTA LA VENTA O EL VENCIMIENTO
Como su VENCIMIENTO es el 8/06/2014, le faltan aproximadamente 73 meses, pues pongo 73
INTERES NOMINAL ANUAL
Aquí escribo el interés, o sea, 4
El programa ofrecerá dos respuestas:
1 - RENTABILIDAD ANUAL
Que en el ejemplo que nos ocupa será del 5.76%
2 - RENTABILIDAD FINANCIERO FISCAL SI SON AUTOPISTAS BONIFICADAS
Como el ejemplo precisamente es una autopista, en esta respuesta está incluida la rentabilidad repercutida debida a la deducción fiscal del 95% de la retención. Nos dará una rentabilidad del 6.98%.
----------------------------------------------------------------------------
Con posterioridad a este artículo, Paco ha tenido la amabilidad de pasar este código a Visual Basic, de esta manera se puede ejecutar en windows directamente. Gracias Paco.
Aquí se puede descargar el programa comprimido.
RFF.zip
Articulos relacionados
F2LL Para la cartera de renta fija
Cuenta para operar en renta fija
Estrategia especial para renta fija
Enfoque profesional sobre Renta fija y futuros
Etiquetas: Renta fija
Publicado por Francisco Llinares
a las 20:13
Podrias poner un analisis de Natraceutical, me la han recomendado esta tarde.
Gracias.
Je, un programa escrito en BASIC sin el famoso GOTO.
Hola Francisco,
Respecto al spread MINIRUSELL2000-MINIDOW que propusiste hace 2 meses, parece que estamos prácticamente en la linea de tendencia bajista.
Que circumstancias te haria replantear la posicion bajista en este spread?
Supongo que en la próxima semana veremos la respuesta.
Saludos.
Hola Francisco
He pasado tu programa a Visual Basic (RFF.EXE). Lo puedes obtener de:
http://esyurl.com/8gj
Dime si quieres que cambie algo.
Un saludo
Gracias a los dos,Francisco y Paco
Una versión en Javascript para solo usar el navegador. Se le va un poco la olla con la coma flotante pero da resultados válidos.
http://elinversoreclectico.blogspot.com/2008/05/function-calcular.html
Hola
Parece que de momento el soporte en la linea de tendencia bajista ha funcionado hoy en el spread MINIRUSSELL2000-MINDOW.
Saludos.
No había visto la respuesta tuya FRancisco al mensaje mio sobre lo de crear un foro específico para este tema en tu penúltimo artículo sobre RF asi que disculpas por repetirme y seguiremos leyéndonos por aquí por el blog. Un saludo de nuevo a todos.
Manuel.
Un programa sencillito, pero muy util, troncos.
Gracias por compartirlo con nosotros.
¿Existe alguna hoja de calculo donde podamos introducir las emisiones que compramos y que nos de los precios actualizados y la rentabilidad de nuestras inversiones?
Debemos de usar siempre la coma para los decimales. Si se usa el punto procesa igual la información, pero ofrece rendimientos erroneos.
Gracias Francisco y Paco.
basic Jurasico del cuaternario jeje me acuerdo de esa sintaxis jeje que bueno!!
EN LAS OBLIGACIONES BONIFICADAS DE AUDASA TE RETIENEN EL 1.20% AL PAGAR EL CUPON.
EN LA LIQUIDACION DEL I.R.P.F. PAGAS EL 18% SOBRE EL CUPON COMO CUOTA ESPECIAL RENDIMIENTOS CAPITAL MOBILIARIO Y TE BONIFICAN EL 24% SOBRE EL CUPON.
ENTIENDO QUE EL BENEFICIO QUE OBTIENES ES DEL 4.80 %.
ME GUSTARIA QUE ALGUIEN ME CONFIRMARA SI EL PLANTEAMIENTO ES CORRECTO O NO.
GRACIAS POR ANTICIPADO A TODOS, YA QUE ESTOY APRENDIENDO UN MONTON SOBRE RENTA FIJA.
SALUDOS CORDIALES.
GERVASIO
Paco,
Creo que he encontrado algunos fallos en tu programa:
- La casilla del interés nominal anual no tiene en cuenta los decimales, es decir, redondea por exceso.
- Las rentabilidades nunca pueden ser superiores al 24,012%.
Saludos.
Gervasio, ese sería el rendimiento libre de impuestos, pero de esa forma no calcula nadie los intereses.
Si el código se ejecuta con el Gwbasic funciona bien