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

-- mejoras

Browse Source
This commit is contained in:
rrene
2022-03-24 12:24:22 -07:00
parent d16dc75c94
commit 609a905960
2 changed files with 16 additions and 23 deletions
Download Patch File Download Diff File Expand all files Collapse all files

21
Inventarios/ResguardoMaterial.aspx
View File

@@ -423,44 +423,43 @@
<div class="portlet-body" <%= IIf(chkexpand.Checked = True, "", "style='display:none;'")%>> <div class="portlet-body" <%= IIf(chkexpand.Checked = True, "", "style='display:none;'")%>>
<div class="rowpadding"> <div class="rowpadding">
<div class="row"> <div class="row">
<label class="col-md-4 truncate" id="LblTipo" runat="server" style="max-width: 155px"> <label class="col-md-3 truncate" id="LblTipo" runat="server" style="max-width: 155px">
</label> </label>
<div class="col-md-8"> <div class="col-md-9">
<asp:Label Text="" ID="LbTipoLiberacion" runat="server" /> <asp:Label Text="" ID="LbTipoLiberacion" runat="server" />
</div> </div>
</div> </div>
<hr /> <hr />
<div class="row"> <div class="row">
<label class="col-md-4 truncate" style="max-width: 155px">Almacén origen:</label> <label class="col-md-3 truncate" style="max-width: 155px">Almacén origen:</label>
<div class="col-md-8"> <div class="col-md-9">
<asp:Label Text="" ID="LbAlmacenLiberacion" runat="server" /> <asp:Label Text="" ID="LbAlmacenLiberacion" runat="server" />
</div> </div>
</div> </div>
<div class="row"> <div class="row">
<label class="col-md-4 truncate" style="max-width: 155px">Almacén destino:</label> <label class="col-md-3 truncate" style="max-width: 155px">Almacén destino:</label>
<div class="col-md-8"> <div class="col-md-9">
<asp:DropDownList ID="DdlAlmacenDestinoLiberacion" runat="server" CssClass="form-control input-sm select2me" Width="100%" DataTextField="Almacen" DataValueField="CveAlmacen" AutoPostBack="true"></asp:DropDownList> <asp:DropDownList ID="DdlAlmacenDestinoLiberacion" runat="server" CssClass="form-control input-sm select2me" Width="100%" DataTextField="Almacen" DataValueField="CveAlmacen" AutoPostBack="true"></asp:DropDownList>
<asp:RequiredFieldValidator InitialValue="-1" ID="RfvAlmacenDestinoLiberacion" Display="None" ValidationGroup="GrpGuardarLiberacion" runat="server" ControlToValidate="DdlAlmacenDestinoLiberacion" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />Es campo <b>''Almacén destino''</b> es necesario, por favor seleccione uno."></asp:RequiredFieldValidator> <asp:RequiredFieldValidator InitialValue="-1" ID="RfvAlmacenDestinoLiberacion" Display="None" ValidationGroup="GrpGuardarLiberacion" runat="server" ControlToValidate="DdlAlmacenDestinoLiberacion" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />Es campo <b>''Almacén destino''</b> es necesario, por favor seleccione uno."></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="VCEAlmacenDestinoLiberacion" runat="server" HighlightCssClass="vco" TargetControlID="RfvAlmacenDestinoLiberacion" Width="350px"></ajax:ValidatorCalloutExtender> <ajax:ValidatorCalloutExtender ID="VCEAlmacenDestinoLiberacion" runat="server" HighlightCssClass="vco" TargetControlID="RfvAlmacenDestinoLiberacion" Width="350px"></ajax:ValidatorCalloutExtender>
</div> </div>
</div> </div>
<div class="row"> <div class="row">
<label class="col-md-4 truncate" style="max-width: 155px">Fecha:</label> <label class="col-md-3 truncate" style="max-width: 155px">Fecha:</label>
<div class="col-md-8"> <div class="col-md-9">
<asp:Label Text="" ID="LbFechaLiberacion" runat="server" /> <asp:Label Text="" ID="LbFechaLiberacion" runat="server" />
</div> </div>
</div> </div>
<div class="row"> <div class="row">
<label class="col-md-4 truncate" style="max-width: 155px"> <label class="col-md-3 truncate" style="max-width: 155px">
Observaciones Observaciones
</label> </label>
<div class="col-md-8"> <div class="col-md-9">
<asp:TextBox ID="TxtObservacionesLiberacion" TextMode="MultiLine" Rows="2" CssClass="form-control input-sm" runat="server" MaxLength="200"></asp:TextBox> <asp:TextBox ID="TxtObservacionesLiberacion" TextMode="MultiLine" Rows="2" CssClass="form-control input-sm" runat="server" MaxLength="200"></asp:TextBox>
</div> </div>
</div> </div>
</div> </div>
</div> </div>
</div> </div>

18
Inventarios/ResguardoMaterial.aspx.vb
View File

@@ -264,7 +264,7 @@ Partial Class Inventarios_ResguardoMaterial
''Almacen Destino ''Almacen Destino
Else Else
'RESGUARDO 'RESGUARDO
DdlAlmacen.DataSource = GlobalDTAlmacenUsuarios(UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1) '.FiltraParametros("CveTipoAlmacen IN (1,2)") 'GlobalDTAlmacen(UsuarioActual.CveEmpresa) DdlAlmacen.DataSource = GlobalDTAlmacenUsuarios(UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1).FiltraParametros("CveTipoAlmacen NOT IN (8)") 'GlobalDTAlmacen(UsuarioActual.CveEmpresa)
DdlAlmacen.DataBind() DdlAlmacen.DataBind()
DdlAlmacen.Items.Insert(0, New ListItem("Seleccione", "-1")) DdlAlmacen.Items.Insert(0, New ListItem("Seleccione", "-1"))
'Almacen Destino 'Almacen Destino
@@ -672,18 +672,12 @@ Partial Class Inventarios_ResguardoMaterial
BtnGuardarLiberacion.Visible = False BtnGuardarLiberacion.Visible = False
GvMLiberacion.Columns(1).Visible = True GvMLiberacion.Columns(1).Visible = True
Else Else
DVInformacionMoviminetoLiberacion.Visible = True DVInformacionMoviminetoLiberacion.Visible = True
BtnGuardarLiberacion.Visible = True BtnGuardarLiberacion.Visible = True
GvMLiberacion.Columns(1).Visible = False GvMLiberacion.Columns(1).Visible = False
GvMLiberacion.Columns(1).HeaderText = "" GvMLiberacion.Columns(1).HeaderText = ""
End If End If
End If End If
UpGridLiberacion.Update() UpGridLiberacion.Update()
@@ -738,10 +732,10 @@ Partial Class Inventarios_ResguardoMaterial
Private Sub CargaGvMLiberacion() Private Sub CargaGvMLiberacion()
GvMLiberacion.Columns(5).Visible = DtMovimientosLiberacion.MAX("Serie").ToString <> "" GvMLiberacion.Columns(6).Visible = DtMovimientosLiberacion.MAX("Serie").ToString <> ""
GvMLiberacion.Columns(6).Visible = DtMovimientosLiberacion.MAX("AplicaLote").ToString = "True" GvMLiberacion.Columns(7).Visible = DtMovimientosLiberacion.MAX("AplicaLote").ToString = "True"
GvMLiberacion.Columns(7).Visible = DtMovimientosLiberacion.MAX("AplicaCaducidad").ToString = "True" ' .ToDate > MinFecha GvMLiberacion.Columns(8).Visible = DtMovimientosLiberacion.MAX("AplicaCaducidad").ToString = "True" ' .ToDate > MinFecha
GvMLiberacion.Columns(8).Visible = DtMovimientosLiberacion.MAX("CveSeccionAlmacen").ToString.ToEntero > 0 Or DtMovimientosLiberacion.MAX("AplicaSeccion") = "True" GvMLiberacion.Columns(9).Visible = DtMovimientosLiberacion.MAX("CveSeccionAlmacen").ToString.ToEntero > 0 Or DtMovimientosLiberacion.MAX("AplicaSeccion") = "True"
GvMLiberacion.DataSource = DtMovimientosLiberacion GvMLiberacion.DataSource = DtMovimientosLiberacion
@@ -914,7 +908,7 @@ Partial Class Inventarios_ResguardoMaterial
If ObjInventario.GetMovimientosDetalle(CveMovimientoSalida, UsuarioActual.CveEmpresa) Then If ObjInventario.GetMovimientosDetalle(CveMovimientoSalida, UsuarioActual.CveEmpresa) Then
Dim CveSeccionAlmacen As Integer = 0 Dim CveSeccionAlmacen As Integer = 0
Importe = ObjInventario.DtResultados.SUMD("Total").RoundAD Importe = ObjInventario.DtResultados.SUMD("Total").RoundSQL
For Each Dr As DataRow In ObjInventario.DtResultados.Rows For Each Dr As DataRow In ObjInventario.DtResultados.Rows
If CBool(Dr("AplicaSeccion")) Then If CBool(Dr("AplicaSeccion")) Then
CveSeccionAlmacen = GlobalDTInvPSSeccionesAlmacen(UsuarioActual.CveEmpresa, DdlAlmacenDestino.SelectedValue.ToEntero, Dr("CvePS").ToString.ToEntero).FiltroPrimeroValor("CveSeccionAlmacen").ToEntero CveSeccionAlmacen = GlobalDTInvPSSeccionesAlmacen(UsuarioActual.CveEmpresa, DdlAlmacenDestino.SelectedValue.ToEntero, Dr("CvePS").ToString.ToEntero).FiltroPrimeroValor("CveSeccionAlmacen").ToEntero