Impuesto sobre los Depósitos en Efectivo (IDE)

El IDE no es mas que el un impuesto del 2% que se aplica al importe excedente de 25,000 pesos en los depósitos en efectivo realizados en las instituciones del sistema financiero, ya sea por uno o por la suma de varios depósitos en el mes.

Segun Ángel Galicia Núñez, catedrático de tiempo completo del departamento de Finanzas y Contaduría de la Universidad de las Américas Puebla (UDLAP) el IDE quedará a cuenta de los demás impuestos porque puede ser acreditado contra el ISR o el IETU, es decir, que dicho 2 por ciento puede disminuirse de la cantidad que debe pagarse por ISR o IETU, resultando, incluso, que si éste es a favor, la cantidad podrá ser solicitada en devolución.

Bueno una vez explicado que es y como aplica, les digo a que viene este tema financiero en un Blog de Tecnologia; resulta que una caja Financiera me pidio un sistemita que llevara el control de este impuesto asi que les explico que es el IDE en terminos que los programadores entendamos :D

Visual Basic:
  1. Public Function Exedente(ByVal monto As Single) As Single
  2.             Try
  3.                 dr = ent.LlenaDataReader(SQL)
  4.                 If dr.Read() Then
  5.                     Dim total As Single = monto + depositos
  6.                     If (dr("SiDeposito") = "Menor") Then
  7.                         If total> Limite Then
  8.                             Exedente = total - Limite
  9.                             Me.sngexedente = total - Limite
  10.                         Else
  11.                             Exedente = 0
  12.                         End If
  13.                     ElseIf (dr("SiDeposito") = "Mayor" Or dr("SiDeposito") = "Igual") Then
  14.                         Exedente = monto
  15.                         Me.sngexedente = monto
  16.                     ElseIf (dr("SiDeposito") = "NOHAY") Then
  17.                         If total> Limite Then
  18.                             Exedente = total - Limite
  19.                             Me.sngexedente = total - Limite
  20.                         Else
  21.                             Exedente = 0
  22.                         End If
  23.  
  24.                     End If
  25.                 End If
  26.                 ent.CerrarConeccion()
  27.                 dr.Close()
  28.             Catch ex As Exception
  29.                 ex.ToString()
  30.             End Try
  31.         End Function
  32.  
  33.         Public Function ImpuestoCal(ByVal deposito As Single) As Single
  34.             ImpuestoCal = Exedente(deposito) * 0.02
  35.         End Function

Si alguien anda buscandole como hacerle pues ya tiene la formula y la logica, espero mi competencia no este leyendo esto jajajaja.

Pd. Cualquier pregunta financiera sera ignorada ya que no soy ningun catedratico de finanzas ni estudiante de economia; si tienes alguna pregunta de ese tipo consulta fuentes expertas en el Tema.

Mas info en | SAT,UDLP.

If you enjoyed this post, please consider to leave a comment or subscribe to the feed and get future articles delivered to your feed reader.

Comments

Visual Basic :ownz: my eyes!!!

Dejar un comentario

(requerido)

(requerido)