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

View File

@@ -3816,7 +3816,7 @@ Partial Class Ventas
Dim ObjPVenta As New ClsPuntoVenta 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 CveCorte = ObjPVenta.CveCorte
LblEstatusCaja.Text = NowADS().ToShortDateString LblEstatusCaja.Text = NowADS().ToShortDateString
TrEstatusCaja.Visible = True TrEstatusCaja.Visible = True
@@ -8312,8 +8312,8 @@ Partial Class Ventas
DdlSucursalCorte.DataSource = dtt.FiltraParametros("EsSucursal = True ") DdlSucursalCorte.DataSource = dtt.FiltraParametros("EsSucursal = True ")
DdlSucursalCorte.DataBind() DdlSucursalCorte.DataBind()
DdlSucursalCorte.SelectedValueExist(UsuarioActual.CveSubProyecto)
DdlSucursalCorte.Items.Insert(0, New ListItem("Seleccione", "-1")) DdlSucursalCorte.Items.Insert(0, New ListItem("Seleccione", "-1"))
DdlSucursalCorte.SelectedValueExist(UsuarioActual.CveSubProyecto)
dtt.Dispose() dtt.Dispose()
End Sub End Sub