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

Merge branch 'master' of http://jperez@192.168.10.111:8383/SIG.git

Browse Source
This commit is contained in:
Jonathan Alexis Perez Morales
2020-10-09 13:00:11 -07:00
parent c871c61a2d 81d669748d
commit 19d4048c16
33 changed files with 854 additions and 248 deletions
Download Patch File Download Diff File Expand all files Collapse all files

35
Inventarios/EntradasSalidas.aspx.vb
View File

@@ -275,6 +275,7 @@ Partial Class Inventarios_EntradasSalidas
#End Region
Protected Sub Page_Load(sender As Object, e As EventArgs) Handles Me.Load
If Not IsPostBack Then
CveMovimiento = -1
@@ -289,6 +290,7 @@ Partial Class Inventarios_EntradasSalidas
CreaDT()
CargaCombos()
TxtFecha.Text = Now.ToShortDateString
TxtFechaInvFisico.Text = Now.ToShortDateString
RVFecha.MaximumValue = Now.ToShortDateString
If Not UsuarioActual.CveEmpresa = 48 Then
@@ -350,7 +352,25 @@ Partial Class Inventarios_EntradasSalidas
PermisoVerImportes()
End If
If UsuarioActual.Empresa.Funcionalidad(281).ToEntero = 1 Then
TxtFecha.Enabled = False
ImgFecha.Visible = False
TxtFechaInvFisico.Enabled = False
ImgFechaInvFisico.Visible = False
UpGenerales.Update()
UpModalInventarioFisico.Update()
End If
End If
End Sub
#Region " PERMISOS PAGINAS "
@@ -927,6 +947,21 @@ Partial Class Inventarios_EntradasSalidas
'BtnGuardar.Visible = False
End If
If UsuarioActual.Empresa.Funcionalidad(281).ToEntero = 1 Then
TxtFecha.Enabled = False
ImgFecha.Visible = False
TxtFechaInvFisico.Enabled = False
ImgFechaInvFisico.Visible = False
End If
UpModalInventarioFisico.Update()
BloqueaEdicionEncabezado()
Mov.Dispose()
UpGenerales.Update()

8
Inventarios/EntregaAlmacen.aspx.vb
View File

@@ -263,6 +263,14 @@ Partial Class Inventarios_EntregaAlmacen
InicializaValores()
CargaParametrosAD()
If UsuarioActual.CveEmpresa.Contiene(72, 80) Then DdlAlmacen.AutoPostBack = True
If UsuarioActual.Empresa.Funcionalidad(281).ToEntero = 1 Then
TxtFecha.Enabled = False
ImgFecha.Visible = False
End If
End If
End Sub

27
Inventarios/PopUpExistenciasAlmacen.aspx
View File

@@ -35,18 +35,37 @@
</ContentTemplate>
</asp:UpdatePanel>
</td>
<td>
</td>
</tr>
<tr runat="server" id="DivMed" visible="false">
<td class="text-right">Medida: </td>
<td >
<asp:DropDownList runat="server" ID="DdlMedidas" CssClass="form-control input-sm select2me" Width="150px" DataTextField="Medida" DataValueField="CveMedida"></asp:DropDownList>
</td>
<td rowspan="2">
<div id="DivEquivalentes" style="overflow-y: auto; overflow-x:hidden; width: 150px; height:100px" runat="server" visible="False">
<asp:GridView ID="GvEquival" runat="server" AutoGenerateColumns="False" DataKeyNames="CveMedidaEquivalencia,CveMedida,CveRin,CveMedidaEquivalente,CveRinEquivalente,Medida,RinTamaño,MedidaEquivalente,RinTamañoEquivalente" EmptyDataText="No se encontraron Equivalencias de Medidas" ToolTip="Listado de Equivalencias de Medidas" CssClass="table table-striped table-advance table-hover" Style="margin-top: 10px; width: 100%" GridLines="None">
<Columns>
<asp:TemplateField ItemStyle-Width="300px" HeaderText="Equivalentes">
<ItemTemplate>
<asp:Literal ID="lblUsuario" runat="server" Text='<%#String.Concat(Eval("MedidaEquivalente"), " ", Eval("RinTamañoEquivalente")) %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
</Columns>
</asp:GridView>
</div>
</td>
</tr>
<tr runat="server" id="DivRin" visible="false">
<td class="text-right">Rin: </td>
<td >
<asp:DropDownList runat="server" ID="DdlRin" CssClass="form-control input-sm select2me" Width="150px" DataTextField="RinTamaño" DataValueField="CveRinTamaño"></asp:DropDownList>
</td>
<td>
</td>
</tr>
<tr runat="server" id="DivCodigoSeriePS" visible="false">
<td class="text-right"><b>C. Barras:</b></td>
@@ -60,6 +79,9 @@
</ContentTemplate>
</asp:UpdatePanel>
</td>
<td>
</td>
</tr>
<tr align="left" runat="server" id="DivSucursal" visible="false">
@@ -67,12 +89,15 @@
<td>
<asp:DropDownList ID="DdlSubProyecto" AutoPostBack="True" runat="server" CssClass="form-control input-sm select2me" DataTextField="SubProyecto" DataValueField="CveSubProyecto" Width="400px"></asp:DropDownList>
</td>
<td></td>
</tr>
<tr>
<td colspan="4" style="text-align: center;">
<asp:Button ID="BtnBuscar" runat="server" Text="Buscar" class="btn btn-primary" />
</td>
<td></td>
<td></td>
</tr>
</table>
</ContentTemplate>
@@ -113,7 +138,7 @@
</Columns>
</asp:GridView>
</div>
<div id="DivMedRin" style="overflow-y: auto; width: 765px; height: 365px;" runat="server" visible="True">
<div id="DivMedRin" style="overflow-y: auto; width: 765px; height: 230px;" runat="server" visible="True">
<asp:GridView ID="GvMedRin" Width="100%" runat="server" AutoGenerateColumns="false" EmptyDataText="No se encontraron registros" ToolTip="Listado de Contratos encontrados." CssClass="table table-striped table-hover" GridLines="None">
<Columns>
<asp:BoundField DataField="Almacen" HeaderText="Almacén" />

11
Inventarios/PopUpExistenciasAlmacen.aspx.vb
View File

@@ -70,6 +70,7 @@ Partial Class Inventarios_Default
DivRin.Visible = True
CargarMedRin()
DivMedRin.Visible = True
DivEquivalentes.Visible = True
DivPS.Visible = False
End If
Dim Txt As String = IfNull(Request("Txt"), "").ToString
@@ -89,6 +90,7 @@ Partial Class Inventarios_Default
Protected Sub BtnBuscar_Click(sender As Object, e As System.EventArgs) Handles BtnBuscar.Click
If UsuarioActual.Empresa.Funcionalidad(558) = "1" Then
CargarDatosMedRin()
CargaEquivalencia()
Else
CargaDatos(DDlPS.SelectedValue.ToEntero, 1)
End If
@@ -243,6 +245,15 @@ Partial Class Inventarios_Default
UPDatos.Update()
End Sub
Private Sub CargaEquivalencia()
Dim ObjGeneral As New ClsGenerales
If ObjGeneral.GetMedidasEquivalentes(UsuarioActual.CveEmpresa, DdlMedidas.SelectedValue.ToEntero(), DdlRin.SelectedValue.ToEntero()) Then
GvEquival.DataSource = ObjGeneral.DtResultados
End If
ObjGeneral.Dispose()
GvEquival.DataBind()
End Sub
Private Function ValidarFiltrosSeleccionados() As Boolean
If DDlPS.SelectedValue.ToEntero > 0 Then Return True
Return False

8
Inventarios/RecepcionAlmacen.aspx.vb
View File

@@ -399,6 +399,14 @@ Partial Class Inventarios_RecepcionAlmacen
CargaPermisos()
If UsuarioActual.CveEmpresa.Contiene(72, 80) Then DdlAlmacen.AutoPostBack = True
If UsuarioActual.Empresa.Funcionalidad(281).ToEntero = 1 Then
TxtFecha.Enabled = False
ImgFecha.Visible = False
End If
End If
End Sub

50
Inventarios/TrasladoSolicitud.aspx
View File

@@ -234,35 +234,39 @@
</div>
</div>
<div class="portlet-body rowpadding">
<div class="row" runat="server" id="DVAutorizaInformacion" visible = "False" >
<asp:UpdatePanel ID="UpAutorizaciones" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<div class="col-md-12" runat="server" >
<table>
<div class="row" runat="server" id="DVAutorizaInformacion" visible = "False" >
<div class="col-md-12" runat="server" >
<table>
<tr><td><b>Estado : </b></td><td><asp:Label runat="server" id="LblEstatusAutorizo" ></asp:Label></td></tr>
<tr><td><b>Usuario : </b></td><td><asp:Label runat="server" id="LblUsaurioAutorizo" ></asp:Label></td></tr>
<tr><td><b>Fecha : </b></td><td><asp:Label runat="server" id="LblFechaAutoriza" ></asp:Label></td></tr>
<tr><td><b>Estado : </b></td><td><asp:Label runat="server" id="LblEstatusAutorizo" ></asp:Label></td></tr>
<tr><td><b>Usuario : </b></td><td><asp:Label runat="server" id="LblUsaurioAutorizo" ></asp:Label></td></tr>
<tr><td><b>Fecha : </b></td><td><asp:Label runat="server" id="LblFechaAutoriza" ></asp:Label></td></tr>
</table>
</table>
</div>
</div>
</div>
</div>
<div class="row" runat="server" id="DVAutorizarBotones" visible = "False" >
<div class="row" runat="server" id="DVAutorizarBotones" visible = "False" >
<div class="col-md-6" style="text-align:center!important">
<asp:LinkButton runat="server" Text ="Aceptar" id="LnkAceptarTraslado" CssClass="btn btn-success"
data-toggle="confirmation" data-popout="true" data-original-title="¿Confirmar autorización?" data-btn-ok-label="Si" OnClick="LnkAceptarTraslado_Click"></asp:LinkButton>
</div>
<div class="col-md-6" style="text-align:center!important">
<asp:LinkButton runat="server" Text ="Rechazar" ID="LnkRechazarTraslado" CssClass="btn btn-danger" OnClick="LnkRechazarTraslado_Click" ></asp:LinkButton>
</div>
<div class="col-md-6" style="text-align:center!important">
<asp:LinkButton runat="server" Text ="Aceptar" id="LnkAceptarTraslado" CssClass="btn btn-success"
data-toggle="confirmation" data-popout="true" data-original-title="¿Confirmar autorización?" data-btn-ok-label="Si" OnClick="LnkAceptarTraslado_Click"></asp:LinkButton>
</div>
<div class="col-md-6" style="text-align:center!important">
<asp:LinkButton runat="server" Text ="Rechazar" ID="LnkRechazarTraslado" CssClass="btn btn-danger" OnClick="LnkRechazarTraslado_Click" ></asp:LinkButton>
</div>
</div>
</div>
</ContentTemplate>
</asp:UpdatePanel>

6
Inventarios/TrasladoSolicitud.aspx.vb
View File

@@ -285,6 +285,9 @@ Partial Class Inventarios_TrasladoSolicitud
Else
Alert("Ocurrió un error al obtener los datos del traspaso.", TipoMensaje.MsgError)
End If
UpAutorizaciones.Update()
End If
ObjInventarios.Dispose()
ObjClientes.Dispose()
@@ -1034,6 +1037,9 @@ Partial Class Inventarios_TrasladoSolicitud
MandaCorreoRechazo(LbFolio.Text.ToEntero, CveTraspasoSolicitud, CveUsuarioSolicita, TxtMotivoRechazo.Text)
CargaDatos()
RegistraScript("$('#ModalRechazarTraslado').modal('hide');")
End If
End Sub

12
Inventarios/TraspasoAlmacen.aspx.vb
View File

@@ -228,6 +228,18 @@ Partial Class Inventarios_TraspasoAlmacen
TipoSeccionAlmacen = 0
If UsuarioActual.Empresa.Funcionalidad(281).ToEntero = 1 Then
TxtFecha.Enabled = False
ImgFecha.Visible = False
TxtFechaRecepcion.Enabled = False
ImgFechaRecepcion.Visible = False
End If
Else
If ChkTransitorio.Checked Then
RegistraScript("$('#DivTransitorio').show(0);$('#DivGastoIndirecto').show(0);$('#DivDocChofer').show(0);")