Excel Avanzado

Macros, Vba en Excel y muchos ejemplos de nuestro Curso de Excel Avanzado

Excel Avanzado

Categoría Deudor SBS

| 3 Comments

La Categoría del deudor según normativa SBS

Según los días de atraso que tenga un deudor al no pagar su crédito (riesgo de incumplimiento), éste recibe una categoría, con la cual identificamos su comportamiento en los pagos que tiene con sus acreedores. La superintendencia de Banca y Seguros y AFP – SBS, identifica cinco categorías: 0-NORMAL, 1-CPP, 2-DEFICIENTE, 3-DUDOSO y 4-PERDIDA, que está condicionado a la cantidad de días de atraso que presente el cliente en el pago de sus cuentas.

Además la SBS identifica a los deudores según el tipo de crédito que éste adquirió, por lo cual se tiene:

Tipo Credito

Días de Atraso

Categoria SBS

02-Creditos_a_Microempresas, 13-Creditos_a_Pequeñas_Empresas, 03-Creditos_de_Consumo

[1-8 días] 0-NORMAL
[9-30 días] 1-CPP
[31-60 días] 2-DEFICIENTE
[61-120 días] 3-DUDOSO
[121 días a más] 4-PERDIDA

12-Creditos_a_Medianas_Empresas, 07-Creditos_a_Entidades_del_sector_público, 11-Creditos_a_Grandes_Empresas, 09-Creditos_a_Empresas_del_sistema_financiero

[1-15 días] 0-NORMAL
[16-60 días] 1-CPP
[61-120 días] 2-DEFICIENTE
[121-365 días] 3-DUDOSO
[366 días a más] 4-PERDIDA

04-Creditos_Hipotecarios_para_vivienda

[1-30 días] 0-NORMAL
[31-60 días] 1-CPP
[61-120 días] 2-DEFICIENTE
[121-365 días] 3-DUDOSO
[366 días a más] 4-PERDIDA

*Cabe recalcar que no se están considerando la alineación de cliente para la asignación de dichas categorías.

 

Se creó la UDF “Categoria_sbs ( Tipo_credito, Dias_atraso):

‘Calificación Deudor – Según parametros SBS (sin considerar alineación)

Function Categoria_SBS(tipo_credito, dias_atraso)
t = CInt(Mid(tipo_credito, 1, 2))

If t = 2 Or t = 13 Or t = 3 Then
tipo = 1
End If

If t = 12 Or t = 7 Or t = 11 Or t = 9 Then
tipo = 2
End If

If t = 4 Then
tipo = 3
End If

Select Case tipo
Case 1
If dias_atraso < 9 Then
Categoria_SBS = “0-NORMAL”
End If
If dias_atraso < 31 Then
Categoria_SBS = “1-CPP”
End If
If dias_atraso < 61 Then
Categoria_SBS = “2-DEFICIENTE”
End If
If dias_atraso < 121 Then
Categoria_SBS = “3-DUDOSO”
End If
If dias_atraso > 120 Then
Categoria_SBS = “4-PERDIDA”
End If
Case 2
If dias_atraso < 16 Then
Categoria_SBS = “0-NORMAL”
End If
If dias_atraso < 61 Then
Categoria_SBS = “1-CPP”
End If
If dias_atraso < 121 Then
Categoria_SBS = “2-DEFICIENTE”
End If
If dias_atraso < 366 Then
Categoria_SBS = “3-DUDOSO”
End If
If dias_atraso > 365 Then
Categoria_SBS = “4-PERDIDA”
End If
Case 3
If dias_atraso < 31 Then
Categoria_SBS = “0-NORMAL”
End If
If dias_atraso < 61 Then
Categoria_SBS = “1-CPP”
End If
If dias_atraso < 121 Then
Categoria_SBS = “2-DEFICIENTE”
End If
If dias_atraso < 366 Then
Categoria_SBS = “3-DUDOSO”
End If
If dias_atraso > 365 Then
Categoria_SBS = “4-PERDIDA”
End If
End Select

End Function

 

Por: Liliam Leonorhy

3 Comments

  1. Para que el código pueda ejecutarse correctamente, hace falta colocar dos puntos (‘:’) luego de cada Case (p.e. ‘Case 1:’). Asimismo, es importante redefinir los límites superior e inferior de los dias_atraso en cada caso o, en su defecto, empleando el comando ‘Else’; por ejemplo, para el Case 1 sería:

    Case 1:
    If dias_atraso <= 8 Then
    Categoria_SBS = "0 – NORMAL"
    Else
    If dias_atraso <= 30 Then
    Categoria_SBS = "1 – CPP"
    Else
    If dias_atraso <= 60 Then
    Categoria_SBS = "2 – DEFICIENTE"
    Else
    If dias_atraso <= 120 Then
    Categoria_SBS = "3 – DUDOSO"
    Else
    Categoria_SBS = "4 – PERDIDA"
    End If
    End If
    End If
    End If

    Y así, de manera similar para el resto de casos.

  2. Esta función sería de mucha utilidad en las distintas áreas de riesgo de crédito de las instituciones financieras, dado que en muchas oportunidades, al gestionar grandes cantidades de clientes y la necesidad de asignarles una calificación antes del alineamiento. Esto es realizado todos los cierres mensuales (Antes de los 15 dias de cada mes) en cumplimiento a la Resolución SBS N°11356-2008.

  3. En el ejemplo mencionado categoría deudor, probé el UDF, no me presento ningún error, donde si podría mejorar es en la parte de los nombres de as categorías, mas no en el código.

Deja un comentario

Required fields are marked *.


Excel Avanzado located at , Lima, Perú . Reviewed by usuarios rated: 4.7 / 5