--FIX. SubProyecto en cortes

This commit is contained in:
2024-06-17 11:13:34 -07:00
parent 0804fd9f49
commit 9683fa6f1a
2 changed files with 4 additions and 4 deletions

View File

@@ -4932,7 +4932,7 @@
<td colspan="1">&nbsp;</td>
<td colspan="1">&nbsp;</td>
</tr>
<tr align="left">
<tr align="left" >
<td>
<asp:Label runat="server" Font-Bold="true" ID="Label3">Sucursal:</asp:Label>
</td>
@@ -4951,7 +4951,7 @@
<ajax:ValidatorCalloutExtender ID="ValidatorCalloutExtender1" runat="server" HighlightCssClass="vco" TargetControlID="REVCaja" Width="300px"></ajax:ValidatorCalloutExtender>
</td>
</tr>
<tr>
<tr visible="false">
<td colspan="1">
<asp:Label runat="server" Text="Descripción:" Font-Bold="true" Width="120px" />
</td>

View File

@@ -3816,7 +3816,7 @@ Partial Class Ventas
Dim ObjPVenta As New ClsPuntoVenta
ObjPVenta.AddVtaCortes(NowADS(), TxtDineroCaja.Text.ToDecimal, UsuarioActual.CveUsuario, TxtDescripcionCaja.Text, UsuarioActual.CveEmpresa, DdlSucursalCorte.SelectedValue.ToEntero())
ObjPVenta.AddVtaCortes(NowADS(), TxtDineroCaja.Text.ToDecimal, UsuarioActual.CveUsuario, TxtDescripcionCaja.Text, DdlSucursalCorte.SelectedValue.ToEntero(), UsuarioActual.CveEmpresa)
CveCorte = ObjPVenta.CveCorte
LblEstatusCaja.Text = NowADS().ToShortDateString
TrEstatusCaja.Visible = True
@@ -8312,8 +8312,8 @@ Partial Class Ventas
DdlSucursalCorte.DataSource = dtt.FiltraParametros("EsSucursal = True ")
DdlSucursalCorte.DataBind()
DdlSucursalCorte.SelectedValueExist(UsuarioActual.CveSubProyecto)
DdlSucursalCorte.Items.Insert(0, New ListItem("Seleccione", "-1"))
DdlSucursalCorte.SelectedValueExist(UsuarioActual.CveSubProyecto)
dtt.Dispose()
End Sub