Puntos GDiaz:
--En la generación de la póliza de depósito de caja, incluir en el concepto de tipo de depósito. --Notificar los facturas pendientes de timbrar, en cajas. --Permitir facturar sin bloqueo de vencimientos/saldo excedido a clientes que son parte relacionada. --No agregar en automática la partida en cotización/ventas.
This commit is contained in:
@@ -69,12 +69,18 @@ Partial Class Ventas_PVCobranza
|
||||
CveCorte = 0
|
||||
CargaFiltros()
|
||||
CargaDdlPagos()
|
||||
|
||||
If UsuarioActual.TienePermisoProceso(371) Then
|
||||
CargaCorteCaja()
|
||||
End If
|
||||
|
||||
If UsuarioActual.CveEmpresa = 189 Then
|
||||
DivDatosCheque.Visible = True
|
||||
End If
|
||||
|
||||
If UsuarioActual.Empresa.Funcionalidad(382) = "1" Then
|
||||
DivNoTimbradas.Visible = True
|
||||
End If
|
||||
End If
|
||||
End Sub
|
||||
|
||||
@@ -278,6 +284,16 @@ Partial Class Ventas_PVCobranza
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub MuestraNoTimbradasCentroCosto()
|
||||
Dim ObjSub As New ClsSubProyectos
|
||||
If ObjSub.GetNoTimbradasCentroCosto(UsuarioActual.CveEmpresa, UsuarioActual.CveUsuario) Then
|
||||
If ObjSub.DtResultados.Rows.Count > 0 Then
|
||||
GvPendientesTimbrar.DataSource = ObjSub.DtResultados.FiltraParametros($"Fecha = '{Now.ToString("dd/MM/yyyy")}'")
|
||||
End If
|
||||
End If
|
||||
ObjSub.Dispose()
|
||||
GvPendientesTimbrar.DataBind()
|
||||
End Sub
|
||||
|
||||
Protected Sub BtnConsultar_Click(sender As Object, e As EventArgs) Handles BtnConsultar.Click
|
||||
|
||||
@@ -291,6 +307,8 @@ Partial Class Ventas_PVCobranza
|
||||
CargaDatos()
|
||||
End If
|
||||
|
||||
MuestraNoTimbradasCentroCosto()
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
Reference in New Issue
Block a user