-- Nuevo Módulo de ContratoEstatus

This commit is contained in:
2024-02-07 05:10:54 -07:00
parent 79b31ec16d
commit 7e98eabae8
2 changed files with 390 additions and 0 deletions

View File

@@ -0,0 +1,245 @@
<%@ Page Title="" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="CatContratosEstatus.aspx.vb" Inherits=" Contratos_CatContratosEstatus" %>
<asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server">
</asp:Content>
<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
<style>
.columnaUsuarios {
text-align: left;
font-weight: bold;
}
.Widthall {
width: 100% !important;
}
.dataTables_scrollHeadInner {
width: 100% !important;
background-color: #dddddd;
padding-left: 0px !important;
}
.dataTables_scrollFoot {
display: none;
position: static;
}
.table-scrollable {
margin: 0px !important;
}
.dataTables_scroll {
margin-bottom: 0px;
}
.table.dataTable {
margin-top: 0px !important;
}
.dataTables_scrollBody table th {
padding: 0px !important;
padding-right: 4px !important;
padding-left: 4px !important;
}
.sinlink td a {
pointer-events: none;
cursor: default;
color: black;
font-size: small;
}
.white a {
color: white !important;
}
.btn-verde {
color: #32c5d2;
background-color: #fff;
border-color: #32c5d2;
}
.btn-verde .fa-plus {
color: #32c5d2 !important;
}
.btn-verde:hover {
color: #fff;
background-color: #32c5d2;
border-color: #32c5d2;
}
.btn-verde:hover .fa-plus {
color: white !important;
}
</style>
</asp:Content>
<asp:Content ID="Content3" ContentPlaceHolderID="HB" runat="Server">
</asp:Content>
<asp:Content ID="Content4" ContentPlaceHolderID="E" runat="Server">
Catálogo de Estado de Orden de Servicio
</asp:Content>
<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
<asp:UpdatePanel ID="UPAcciones" runat="server">
<ContentTemplate>
<li>
<asp:LinkButton ID="BtnAgregarEstatus" runat="server" data-toggle="tooltip" data-placement="left" title="Agregar Estado de Orden de Servicio" Text="<i class='fa fa-plus'></i> Agregar Estatus"></asp:LinkButton>
</li>
</ContentTemplate>
</asp:UpdatePanel>
</asp:Content>
<asp:Content ID="Content6" ContentPlaceHolderID="C" runat="Server">
<div class="row" style="margin-right: 10px; " align="right">
<input type="text" id="TxtBusquedaEstatus" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvDatos.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" />
<a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvDatos.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
</div>
<asp:UpdatePanel ID="UpDatos" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<asp:HiddenField ClientIDMode="Static" runat="server" ID="HdnCveEstatus" Value="-1" />
<asp:GridView ID="GvDatos" runat="server" GridLines="None" DataKeyNames="CveContratoEstatus,ContratoEstatus,TipoEstatusTexto, Estatus, TipoEstatus, BackgroundColor" CssClass="table table-striped table-advance table-hover Widthall mysmallbtn" CellSpacing="0" Width="100%" AutoGenerateColumns="False" EmptyDataText="No se encontraron registros" ToolTip="Listado de Estatus">
<Columns>
<asp:BoundField DataField="ContratoEstatus" HeaderText="Estatus" ItemStyle-HorizontalAlign="Left" />
<asp:BoundField DataField="Estatus" HeaderText="Estado" ItemStyle-HorizontalAlign="Left" />
<asp:BoundField DataField="TipoEstatusTexto" HeaderText="Tipo" ItemStyle-HorizontalAlign="Left" />
<asp:TemplateField ItemStyle-HorizontalAlign="Right">
<ItemTemplate>
<asp:LinkButton ID="imgE" runat="server" AlternateText="Editar" CausesValidation="False" OnClick="Edit_Click" CssClass="btn btn-circle btn-sm green" Text="<i class='fa fa-pencil'></i>" />
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Left">
<ItemTemplate>
<asp:LinkButton ID="imgD" runat="server" AlternateText="Eliminar" CausesValidation="False" CommandName="Delete" CssClass="btn btn-circle btn-sm red" Text="<i class='icon-trash'></i>" data-toggle="confirmation" data-popout="true" data-original-title="Confirmar" data-btn-ok-label="si" />
</ItemTemplate>
</asp:TemplateField>
</Columns>
</asp:GridView>
</ContentTemplate>
</asp:UpdatePanel>
<%--POPUP AGREGAR--%>
<div id="divAddEstatus" class="modal ADS fade" role="dialog">
<div class="modal-dialog">
<asp:UpdatePanel ID="UpAddEstatus" class="modal-content" tabindex="-1" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<div class="modal-header">
<button type="button" class="close" data-dismiss="modal" aria-label="Close">
<span aria-hidden="true">&times;</span>
</button>
<h4 class="modal-title" id="myModalLabel">Estatus</h4>
</div>
<div class="modal-body">
<asp:UpdatePanel ID="UpBodyEstatus" UpdateMode="Conditional" runat="server">
<ContentTemplate>
<div class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtEstatusOS" runat="server" CssClass="form-control" CausesValidation="true"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVEstatusOS" runat="server" CssClass="help-block errorimput" ControlToValidate="TxtEstatusOS" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Impuesto''</b> es necesario, por favor ingréselo." ValidationGroup="GrpObligatorio"></asp:RequiredFieldValidator>
<label for="<%= TxtEstatusOS.ClientID.ToString()%>">Estatus:</label>
</div>
<div class="form-group form-md-line-input input-iconright">
<asp:DropDownList ID="DdlTipoEstatus" runat="server" CssClass="form-control select2me js-Impuesto-programmatic" Width="100%">
<asp:ListItem Value="1" Text="Inicial"></asp:ListItem>
<asp:ListItem Value="2" Text="Asignación"></asp:ListItem>
<asp:ListItem Value="3" Text="Proceso"></asp:ListItem>
<asp:ListItem Value="4" Text="Terminada"></asp:ListItem>
<asp:ListItem Value="5" Text="Cancelada"></asp:ListItem>
</asp:DropDownList>
<label for="<%= DdlTipoEstatus.ClientID.ToString()%>">Tipo Estatus:</label>
</div>
<br />
<div runat="server" id="divChkEstatus" class="form-group form-md-line-input input-iconright">
<asp:CheckBox ID="ChkEstatus" runat="server" CssClass="form-control" />
<label for="<%= ChkEstatus.ClientID.ToString()%>">Estatus:</label>
</div>
<div class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtBackgroundColor" runat="server" CssClass="form-control" CausesValidation="true" ClientIDMode="Static" MaxLength="6" Width="100px"></asp:TextBox>
<label for="<%= TxtBackgroundColor.ClientID.ToString()%>">Color:</label>
</div>
</ContentTemplate>
</asp:UpdatePanel>
<div class="modal-footer">
<asp:UpdatePanel ID="UpFooter" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<asp:Button ID="BtnAgregarEstatusCon" runat="server" class="btn btn-success" Text="Agregar" />
<%--<asp:LinkButton ID="BtnAgregarEstatusOS" runat="server" CssClass="btn btn-primary" ValidationGroup="GrpObligatorio"> <i class='material-icons'>done_all</i> Agregar</asp:LinkButton>--%>
<button type="button" class="btn btn-default" data-dismiss="modal">Cancelar</button>
</ContentTemplate>
</asp:UpdatePanel>
</div>
</div>
</ContentTemplate>
</asp:UpdatePanel>
</div>
</div>
<asp:HiddenField ID="HdnID" runat="server" Value="-1" ClientIDMode="Static" />
</asp:Content>
<asp:Content ID="Content7" ContentPlaceHolderID="JS" runat="Server">
<link type="text/css" href="../Scripts/jquery.simple-color-picker.css" rel="stylesheet" />
<script src="/Metronic/assets/global/scripts/datatable.js"></script>
<script src="/Metronic/assets/global/plugins/datatables/all.min.js"></script>
<script type="text/javascript" src="../Scripts/jquery.simple-color-picker.js"></script>
bootstrap-colorpicker.min.css
<script type="text/javascript">
function ShowDivRegistro() {
$('#divAddImpuestoLocal').modal();
}
function OrdenarGV() {
var Tam = TamañoVentana();
var Alto = Tam.height - 270;
if (Alto < 100) {
Alto = 100;
}
$('#C_GvDatos').DataTable({
scrollY: Alto + 'px',
scrollCollapse: true,
paging: false,
searching: false,
info: false
});
$('#C_GvDatos').parent().parent().children().first().css("position", "static");
}
function SetObjects(Clasificacion) {
debugger;
//document.getElementById(TxtEstatusOS).value = Clasificacion;
}
function SetValue(Hidden, Value) {
document.getElementById(Hidden).value = Value;
}
function LimpiaModal() {
$('#<%= TxtEstatusOS.ClientID %>').val('');
$('#<%= ChkEstatus.ClientID %>').prop("checked", false);
var $example = $(".js-Impuesto-programmatic").select2();
$example.val('1').trigger("change");
}
</script>
</asp:Content>

View File

@@ -0,0 +1,145 @@
Imports System.Data
Imports Extensiones
Partial Class Contratos_CatContratosEstatus
Inherits ClsPaginas
#Region " PROPIEDADES"
Private Property CveContratoEstatus As Integer
Get
Return ViewState("CveContratoEstatus").ToString.ToEntero
End Get
Set(value As Integer)
ViewState("CveContratoEstatus") = value
End Set
End Property
Private Property Modalidad As String
Get
Return ViewState("Modalidad").ToString
End Get
Set(value As String)
ViewState("Modalidad") = value
End Set
End Property
#End Region
Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
If Not Page.IsPostBack Then
CargaDatos()
CveContratoEstatus = -1
End If
RegistraScript(" $('#TxtBackgroundColor').simpleColorPicker();")
End Sub
Public Sub CargaDatos()
Using objEstatus As New ClsContratos
If objEstatus.GetContratosEstatus(UsuarioActual.CveEmpresa) Then
GvDatos.DataSource = objEstatus.DtResultados
End If
End Using
GvDatos.DataBind()
OrdenaDatos()
End Sub
Private Sub BtnAgregarEstatus_Click(sender As Object, e As EventArgs) Handles BtnAgregarEstatus.Click
TxtEstatusOS.Text = ""
TxtBackgroundColor.Text = ""
BtnAgregarEstatusCon.Text = "Agregar"
divChkEstatus.Visible = False
UpBodyEstatus.Update()
UpFooter.Update()
RegistraScript("$('#divAddEstatus').modal();LimpiaModal()")
Modalidad = "I"
End Sub
Protected Sub BtnAgregarEstatusCon_Click(sender As Object, e As EventArgs) Handles BtnAgregarEstatusCon.Click
Dim ObjEstatus As New ClsContratos
Dim TieneError As Boolean = False
If Modalidad = "I" Then
If ObjEstatus.AddContratoEstatus(TxtEstatusOS.Text.Trim, DdlTipoEstatus.SelectedValue.ToEntero, TxtBackgroundColor.Text.Replace("#", ""), UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) Then
Alert("Estatus agregado")
GlobalDTContratosEstatus(UsuarioActual.CveEmpresa) = Nothing
End If
Else
If CveContratoEstatus <> -1 Then
If Not ObjEstatus.UpdateContratoEstatus(CveContratoEstatus, TxtEstatusOS.Text.Trim, DdlTipoEstatus.SelectedValue.ToEntero, ChkEstatus.Checked, TxtBackgroundColor.Text.Replace("#", ""), UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) Then
TieneError = True
End If
End If
If Not TieneError Then
GvDatos.EditIndex = -1
Alert("Estatus actualizado")
GlobalDTContratosEstatus(UsuarioActual.CveEmpresa) = Nothing
Else
Alert("Ocurrio un error al actualizar los datos", TipoMensaje.MsgAdvertencia)
End If
End If
ObjEstatus.Dispose()
CargaDatos()
RegistraScript(String.Format("$('#{0}').modal('hide');", "divAddEstatus"))
UpDatos.Update()
'Response.Redirect(HttpContext.Current.Request.Url.ToString(), True)
End Sub
Public Sub Edit_Click(sender As Object, e As EventArgs)
Dim GvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow)
DdlTipoEstatus.SelectedValueExist(GvRow.DataKey("TipoEstatus"))
TxtEstatusOS.Text = GvRow.DataKey("ContratoEstatus")
ChkEstatus.Checked = If(GvRow.DataKey("Estatus").ToString = "True", True, False)
CveContratoEstatus = GvRow.DataKey("CveContratoEstatus").ToEntero
TxtBackgroundColor.Text = "#" & GvRow.DataKey("BackgroundColor")
BtnAgregarEstatusCon.Text = "Actualizar"
divChkEstatus.Visible = True
UpBodyEstatus.Update()
UpAddEstatus.Update()
Modalidad = "A"
RegistraScript(String.Format("$('#{0}').modal();", "divAddEstatus"))
End Sub
#Region "G V D A T O S"
Protected Sub GvDatos_RowDataBound(sender As Object, e As System.Web.UI.WebControls.GridViewRowEventArgs) Handles GvDatos.RowDataBound
'If e.Row.RowType = DataControlRowType.DataRow Then
' Dim URL As String = String.Format("javascript:LimpiaModal();SetValue('HdnModalidad', 'U');SetValue('HdnID', '{0}');ShowDivRegistro();return false;", e.Row.DBCampo("CveContratoEstatus").ToEntero, e.Row.DBCampo("ContratoEstatus"))
' 'GeneroLigas
' Dim Liga As String = String.Format("<a class=""LinkBlanco"" href=""{0}"">", URL)
' e.Row.VerticalAlign = VerticalAlign.Middle
' e.Row.FCLinkButton("ImgE").OnClientClick = URL
'End If
End Sub
Protected Sub GvDatos_RowDeleting(sender As Object, e As System.Web.UI.WebControls.GridViewDeleteEventArgs) Handles GvDatos.RowDeleting
Dim ObjEstatus As New ClsContratos
Dim CveContratoEstatus As Integer = GvDatos.Rows(e.RowIndex).DataKey("CveContratoEstatus").ToEntero
If ObjEstatus.RemoveContratoEstatus(CveContratoEstatus, UsuarioActual.CveEmpresa) Then
GvDatos.EditIndex = -1
GlobalDTContratosEstatus(UsuarioActual.CveEmpresa) = Nothing
Alert("El Estatus de contrato se eliminó correctamente.", TipoMensaje.MsgInformacion)
End If
ObjEstatus.Dispose()
CargaDatos()
UpDatos.Update()
End Sub
#End Region
#Region "O R D E N A M I E N T O"
Private Sub OrdenaDatos()
If (GvDatos.Rows.Count > 0) Then
GvDatos.UseAccessibleHeader = True
GvDatos.HeaderRow.TableSection = TableRowSection.TableHeader
RegistraScript("OrdenarGV();")
End If
End Sub
#End Region
End Class