AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

General

Browse Source
This commit is contained in:
rakcsle
2021-02-23 20:03:07 -07:00
parent e933964847 6d7f64f1ec
commit cdc012a7a0
37 changed files with 23437 additions and 11530 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
Ventas/PV.aspx.vb
View File

@@ -6536,7 +6536,7 @@ Partial Class PV
If ObjAcumuladores.FoliosGarantiaGet(DdlFolioGarantia.SelectedValue.ToEntero, UsuarioActual.CveEmpresa) Then
Dim Limite As Integer = If(ObjAcumuladores.DtResultados.FiltroPrimeroValor("Limite") IsNot Nothing, ObjAcumuladores.DtResultados.FiltroPrimeroValor("Limite").ToEntero, 0) 'ObjAcumuladores.DtResultados.FiltroPrimeroValor("Limite").ToEntero
If resultado < Limite Or Limite = 0 Then
TxtConsecutivoAjuste.Text = resultado.ToString
TxtConsecutivoAjuste.Text = (resultado + 1).ToString
Else
Alert("limite de folios alcanzado")
End If

2
Ventas/RepPedidos2.aspx.cs
View File

@@ -33,7 +33,7 @@ public partial class Ventas_RepPedidos2 : ClsPaginas
DdlClientes.SelectedValue = "-1";
DdlSubProyectos.DataSource = get_GlobalDTSubProyectosUsuarios(UsuarioActual.CveUsuario, -1, UsuarioActual.CveEmpresa, -1, 1);
DdlSubProyectos.DataBind();
DdlSubProyectos.DataBind();
DdlVendedor.DataSource = get_GlobalDTVendedores(UsuarioActual.CveEmpresa);
DdlVendedor.DataBind();