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

E172: Agregar Portlet Cítricos en Productos y Servicios (F267)

Browse Source 
- Para nueva funcionalidad 267 Empresa Citrícola
- BD: Nuevas tablas Gral_Empacados Gral_TipoOrganicos
- BD: Nuevas columnas FK CveTipoEmpacado CveTipoOrganico en ProductosServicios
- BD: Implementación CRUD PA_Gral_Empacados PA_Gral_TipoOrganicos
- BD: Update CRUD PA_ProductosServicios
This commit is contained in:
MLopez
2022-11-18 16:41:25 -07:00
parent 8d29821630
commit 01e87f8890
4 changed files with 265 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

41
Ventas/ProductosServicios.aspx
View File

@@ -385,6 +385,7 @@
</ContentTemplate>
</asp:UpdatePanel>
</div>
<div class="row">
<div class="col-md-12" id="DivLlantas" runat="server" visible="false">
<div class="portlet xspadding light bordered">
@@ -434,6 +435,7 @@
</div>
</div>
</div>
<div class="row">
<asp:UpdatePanel ID="UpPSAdicionales" runat="server" UpdateMode="Conditional">
<ContentTemplate>
@@ -495,6 +497,45 @@
</ContentTemplate>
</asp:UpdatePanel>
</div>
<div class="row">
<div class="col-md-12" id="DivCitricos" runat="server" visible="false">
<div class="portlet xspadding light bordered">
<div class="portlet-title">
<div class="caption font-green">
<i class="icon-briefcase font-green"></i>
<span class="caption-subject bold uppercase">Cítricos</span>
</div>
<div class="actions">
<div class="btn-group">
</div>
</div>
</div>
<div class="portlet-body form">
<div class="row">
<div class="col-md-12">
<div class="form-group form-md-line-input input-iconright">
<asp:DropDownList ID="DdlEmpacado" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="Modelo" DataValueField="CveModelo" Height="22px">
<asp:ListItem Text="Seleccione" Value="-1"></asp:ListItem>
</asp:DropDownList>
<label for="<%= DdlEmpacado.ClientID.ToString()%>">Empacado:</label>
<i></i>
</div>
<div class="form-group form-md-line-input input-iconright">
<asp:DropDownList ID="DdlTipoOrganico" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="Medida" DataValueField="CveMedida" Height="22px">
<asp:ListItem Text="Seleccione" Value="-1"></asp:ListItem>
</asp:DropDownList>
<label for="<%= DdlTipoOrganico.ClientID.ToString()%>">Tipo Orgánico:</label>
<i></i>
</div>
</div>
</div>
</div>
</div>
</div>
</div>
</div>
</div>
</ContentTemplate>

24
Ventas/ProductosServicios.aspx.vb
View File

@@ -397,6 +397,12 @@ Partial Class ProductosyServicios
CvePSAdicional = -1
'Nueva funcionalidad MLopez: 18/11/2022 -- Empresa Citrícola
If UsuarioActual.Empresa.Funcionalidad(267) = "1" Then
DivCitricos.Visible = True
CargaPanelCitricos()
End If
End Sub
'Private Sub CargaPSAdicional(Objeto As ADServerControl.Dropdownlost)
@@ -431,6 +437,22 @@ Partial Class ProductosyServicios
End Sub
Private Sub CargaPanelCitricos()
Dim ObjGral As New ClsGenerales()
If ObjGral.GetEmpacados(UsuarioActual.CveEmpresa) Then
DdlEmpacado.DataSource = ObjGral.DtResultados.Copy()
End If
If ObjGral.GetTipoOrganicos(UsuarioActual.CveEmpresa) Then
DdlTipoOrganico.DataSource = ObjGral.DtResultados.Copy()
End If
ObjGral.Dispose()
DdlEmpacado.DataBind()
DdlTipoOrganico.DataBind()
End Sub
Private Sub MuestraPanel(Optional AfterPageLoad As Boolean = False)
If AfterPageLoad Then
RegistraScript("window.onload = function MuestraPanel() { document.getElementById(""C_BtnMostrarPanel"").click(); }")
@@ -1588,7 +1610,7 @@ Partial Class ProductosyServicios
Dim ObjAliasAdd As New ClsProductosServicios
Dim TieneError = False
If ObjAliasAdd.AddPSAlias(TxtAlias.Text.ToString, CvePS, False, UsuarioActual.CveUsuario) Then
If ObjAliasAdd.AddPSAlias(TxtAlias.Text.ToString, CvePS, False, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) Then
CargarAlias()
UPGVAlias.Update()
Alert("Alias " + TxtAlias.Text + " agregado.", TipoMensaje.MsgInformacion)