Merge branch 'master' of http://oirigoyen@192.168.10.111:8383/SIG.git
This commit is contained in:
rakcsle
@@ -13,7 +13,7 @@ Partial Class Inventarios_AjustesSeccionAlmacen
|
||||
End Sub
|
||||
|
||||
Private Sub CargaCombos()
|
||||
Dim DtAlmacenes As DataTable = GlobalDTAlmacenUsuarios(UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CveTipoAlmacen:=-1).FiltraParametros("CveTipoAlmacen in (1,2,12,14,16,19, 26)")
|
||||
Dim DtAlmacenes As DataTable = GlobalDTAlmacenUsuarios(UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CveTipoAlmacen:=-1).FiltraParametros("CveTipoAlmacen in (1,2, 4,12,14,16,19, 26)")
|
||||
|
||||
DdlAlmacen.DataSource = DtAlmacenes
|
||||
DdlAlmacen.DataBind()
|
||||
|
||||
@@ -2325,7 +2325,7 @@ Partial Class Inventarios_EntregaAlmacen
|
||||
Dim PU As Decimal = RowGarantia("Importe").ToString().ToDecimal() ' / RowGarantia("Cantidad").ToString().ToDouble()
|
||||
Dim Serie As String = RowGarantia("Comprobante").ToString
|
||||
|
||||
If Not ObjInventario.AddMovimientoDetalle(CveMovimientoGarantia, RowGarantia("Cantidad").ToString().ToDouble(), CveUM, CvePS, PU, Serie:=Serie) Then
|
||||
If Not ObjInventario.AddMovimientoDetalle(CveMovimientoGarantia, RowGarantia("Cantidad").ToString().ToDouble(), CveUM, CvePS, PU, Serie:=Serie, CveVentaDetalle:=RowGarantia("CveVentaDetalle").ToString.ToEntero) Then
|
||||
ErrorMovInv = True
|
||||
TextoError.AppendFormat("Ocurrió un error al procesar los conceptos de traspaso de apartado. Por favor vuelva a intentar.")
|
||||
Exit For
|
||||
|
||||
@@ -367,6 +367,11 @@
|
||||
<asp:CheckBox ID="Chk" runat="server" Checked="false" />
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="Fecha" ItemStyle-Width="80px" HeaderStyle-Width="80px">
|
||||
<ItemTemplate>
|
||||
<asp:Literal ID="LblFecha" runat="server" Text='<%# Eval("FechaEntrega", "{0:dd/MM/yyyy}") %>'></asp:Literal>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<%--<asp:BoundField HeaderText="SerieFolio" DataField="Serie Folio" HeaderStyle-Width="150px" ItemStyle-Width="150px" ItemStyle-HorizontalAlign="Left" />--%>
|
||||
<asp:TemplateField HeaderText="Fecha Límite" ItemStyle-Width="80px" HeaderStyle-Width="80px">
|
||||
<ItemTemplate>
|
||||
|
||||
@@ -69,6 +69,15 @@ Partial Class Inventarios_RepAlmacen
|
||||
End If
|
||||
objInv.Dispose()
|
||||
GVAlmacen.DataBind()
|
||||
CargaPermisos()
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub CargaPermisos()
|
||||
Dim TienePermisoImportes As Boolean = UsuarioActual.TienePermisoProceso(201)
|
||||
|
||||
GVAlmacen.Columns(3).Visible = TienePermisoImportes
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub BtnConsultar_Click(sender As Object, e As EventArgs) Handles BtnConsultar.Click
|
||||
|
||||
@@ -423,44 +423,43 @@
|
||||
<div class="portlet-body" <%= IIf(chkexpand.Checked = True, "", "style='display:none;'")%>>
|
||||
<div class="rowpadding">
|
||||
<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>
|
||||
<div class="col-md-8">
|
||||
<div class="col-md-9">
|
||||
<asp:Label Text="" ID="LbTipoLiberacion" runat="server" />
|
||||
</div>
|
||||
</div>
|
||||
<hr />
|
||||
<div class="row">
|
||||
<label class="col-md-4 truncate" style="max-width: 155px">Almacén origen:</label>
|
||||
<div class="col-md-8">
|
||||
<label class="col-md-3 truncate" style="max-width: 155px">Almacén origen:</label>
|
||||
<div class="col-md-9">
|
||||
<asp:Label Text="" ID="LbAlmacenLiberacion" runat="server" />
|
||||
</div>
|
||||
</div>
|
||||
<div class="row">
|
||||
<label class="col-md-4 truncate" style="max-width: 155px">Almacén destino:</label>
|
||||
<div class="col-md-8">
|
||||
<label class="col-md-3 truncate" style="max-width: 155px">Almacén destino:</label>
|
||||
<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: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>
|
||||
</div>
|
||||
</div>
|
||||
<div class="row">
|
||||
<label class="col-md-4 truncate" style="max-width: 155px">Fecha:</label>
|
||||
<div class="col-md-8">
|
||||
<label class="col-md-3 truncate" style="max-width: 155px">Fecha:</label>
|
||||
<div class="col-md-9">
|
||||
<asp:Label Text="" ID="LbFechaLiberacion" runat="server" />
|
||||
</div>
|
||||
</div>
|
||||
|
||||
<div class="row">
|
||||
<label class="col-md-4 truncate" style="max-width: 155px">
|
||||
<label class="col-md-3 truncate" style="max-width: 155px">
|
||||
Observaciones
|
||||
|
||||
</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>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
@@ -264,7 +264,7 @@ Partial Class Inventarios_ResguardoMaterial
|
||||
''Almacen Destino
|
||||
Else
|
||||
'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 IN (1,2)") ''almacen:material,herramientas,'.FiltraParametros("CveTipoAlmacen NOT IN (8)") 'GlobalDTAlmacen(UsuarioActual.CveEmpresa)
|
||||
DdlAlmacen.DataBind()
|
||||
DdlAlmacen.Items.Insert(0, New ListItem("Seleccione", "-1"))
|
||||
'Almacen Destino
|
||||
@@ -281,13 +281,10 @@ Partial Class Inventarios_ResguardoMaterial
|
||||
|
||||
|
||||
''Almacen Destino
|
||||
DdlAlmacenDestinoLiberacion.DataSource = GlobalDTAlmacenUsuarios(UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1) '.FiltraParametros("CveTipoAlmacen IN (1,2)")
|
||||
DdlAlmacenDestinoLiberacion.DataSource = GlobalDTAlmacenUsuarios(UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1).FiltraParametros("CveTipoAlmacen IN (1,2)") ''almacen:material,herramientas,
|
||||
DdlAlmacenDestinoLiberacion.DataBind()
|
||||
DdlAlmacenDestinoLiberacion.Items.Insert(0, New ListItem("Seleccione", "-1"))
|
||||
|
||||
'DdlSeccionAlmacen.DataSource = GlobalDTSeccionAlmacen(UsuarioActual.CveEmpresa, -1)
|
||||
'DdlSeccionAlmacen.DataBind()
|
||||
|
||||
CargaPS()
|
||||
End Sub
|
||||
Private Sub CargaPS()
|
||||
@@ -674,18 +671,12 @@ Partial Class Inventarios_ResguardoMaterial
|
||||
BtnGuardarLiberacion.Visible = False
|
||||
|
||||
GvMLiberacion.Columns(1).Visible = True
|
||||
|
||||
|
||||
|
||||
Else
|
||||
DVInformacionMoviminetoLiberacion.Visible = True
|
||||
BtnGuardarLiberacion.Visible = True
|
||||
GvMLiberacion.Columns(1).Visible = False
|
||||
GvMLiberacion.Columns(1).HeaderText = ""
|
||||
End If
|
||||
|
||||
|
||||
|
||||
End If
|
||||
|
||||
CargaResguardos()
|
||||
@@ -743,10 +734,10 @@ Partial Class Inventarios_ResguardoMaterial
|
||||
|
||||
Private Sub CargaGvMLiberacion()
|
||||
|
||||
GvMLiberacion.Columns(5).Visible = DtMovimientosLiberacion.MAX("Serie").ToString <> ""
|
||||
GvMLiberacion.Columns(6).Visible = DtMovimientosLiberacion.MAX("AplicaLote").ToString = "True"
|
||||
GvMLiberacion.Columns(7).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(6).Visible = DtMovimientosLiberacion.MAX("Serie").ToString <> ""
|
||||
GvMLiberacion.Columns(7).Visible = DtMovimientosLiberacion.MAX("AplicaLote").ToString = "True"
|
||||
GvMLiberacion.Columns(8).Visible = DtMovimientosLiberacion.MAX("AplicaCaducidad").ToString = "True" ' .ToDate > MinFecha
|
||||
GvMLiberacion.Columns(9).Visible = DtMovimientosLiberacion.MAX("CveSeccionAlmacen").ToString.ToEntero > 0 Or DtMovimientosLiberacion.MAX("AplicaSeccion") = "True"
|
||||
|
||||
|
||||
GvMLiberacion.DataSource = DtMovimientosLiberacion
|
||||
@@ -919,7 +910,7 @@ Partial Class Inventarios_ResguardoMaterial
|
||||
|
||||
If ObjInventario.GetMovimientosDetalle(CveMovimientoSalida, UsuarioActual.CveEmpresa) Then
|
||||
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
|
||||
If CBool(Dr("AplicaSeccion")) Then
|
||||
CveSeccionAlmacen = GlobalDTInvPSSeccionesAlmacen(UsuarioActual.CveEmpresa, DdlAlmacenDestino.SelectedValue.ToEntero, Dr("CvePS").ToString.ToEntero).FiltroPrimeroValor("CveSeccionAlmacen").ToEntero
|
||||
|
||||
Reference in New Issue
Block a user