diff --git a/App_Code/ClsContabilidad.vb b/App_Code/ClsContabilidad.vb
index 522115cf8..f210359db 100644
--- a/App_Code/ClsContabilidad.vb
+++ b/App_Code/ClsContabilidad.vb
@@ -1032,6 +1032,9 @@ Public Class ClsContabilidad
                         If dr("AplicaProveedor").ToString = "True" Then
                             StrMsg = StrMsg + " - Proveedor: " + ClsPaginas.GlobalDTCompProveedores(tCveEmp, CveProveedor:=CveProveedor).FiltroPrimeroValor("NombreComercial", "")
                         End If
+                        If dr("AplicaPersonal").ToString = "True" Then
+                            StrMsg = StrMsg + " - Personal: " + ClsPaginas.GlobalDTRHPersonal(tCveEmp, CvePersonal:=CvePersonal).FiltroPrimeroValor("NombreCompleto", "")
+                        End If
                     End If
                 End If
                 OnError(String.Format("El concepto '{0}' no tiene especificada la cuenta. Favor de especificarla en la asignación de cuentas.", StrMsg), ex1, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)