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:
2024-09-02 09:37:16 -07:00
parent a6176df862
commit a9f51b2483
6 changed files with 153 additions and 40 deletions

View File

@@ -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