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

documentacion proveedor para pago electronico General

Browse Source
This commit is contained in:
Rakcsle Supertramp
2020-02-13 09:53:11 -07:00
parent 2825e95251
commit 47bab18fd3
6 changed files with 325 additions and 641 deletions
Download Patch File Download Diff File Expand all files Collapse all files

137
App_Code/ClsCompProveedores.vb
View File

@@ -1549,6 +1549,143 @@ Public Class ClsCompProveedores
#End Region
#Region "TIPOS CONTRATOS"
Public Function GetTiposContratos(CveTipoContrato As Integer, CveEmpresa As Integer, Estatus As Integer) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Prov_SAT_CatTipoContratosGet")
With SqlAdapter.SelectCommand.Parameters
.Add("@CveTipoContrato", SqlDbType.Int).Value = CveTipoContrato
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
.Add("@Estatus", SqlDbType.Int).Value = Estatus
End With
Try
SqlAdapter.Fill(Data)
Retorno = True
Catch ex As Exception
OnError("Ocurrió un error al obtener el los tipos de contrato.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
End Try
Return Retorno
End Function
Public Function AddTiposContratos(TipoContrato As String, Estatus As Boolean, CveUsuario As Integer, CveEmpresa As Integer) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Prov_SAT_CatTipoContratosAdd")
With SqlAdapter.SelectCommand.Parameters
.Add("@TipoContrato", SqlDbType.VarChar).Value = TipoContrato
.Add("@Estatus", SqlDbType.Bit).Value = Estatus
.Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
End With
Try
SqlAdapter.Fill(Data)
Retorno = True
Catch ex As Exception
OnError("Ocurrió un error al agregar el tipo de contrato.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
End Try
Return Retorno
End Function
Public Function UpdateTiposContratos(CveTipoContrato As Integer, TipoContrato As String, Estatus As Boolean, CveUsuario As Integer, CveEmpresa As Integer) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Prov_SAT_CatTipoContratosUpdate")
With SqlAdapter.SelectCommand.Parameters
.Add("@CveTipoContrato", SqlDbType.Int).Value = CveTipoContrato
.Add("@CveTipoContrato", SqlDbType.VarChar).Value = TipoContrato
.Add("@Estatus", SqlDbType.Bit).Value = Estatus
.Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
End With
Try
SqlAdapter.Fill(Data)
Retorno = True
Catch ex As Exception
OnError("Ocurrió un error al actualizar el tipo de contrato.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
End Try
Return Retorno
End Function
Public Function RemoveTiposContratos(CveTipoContrato As Integer, CveEmpresa As Integer) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Prov_SAT_CatTipoContratosRemove")
With SqlAdapter.SelectCommand.Parameters
.Add("@CveTipoContrato", SqlDbType.Int).Value = CveTipoContrato
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
End With
Try
SqlAdapter.Fill(Data)
Retorno = True
Catch ex As Exception
OnError("Ocurrió un error al eliminar el tipo de contrato.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
End Try
Return Retorno
End Function
Public Function GetTiposContratosDcumentos(CveEmpresa As Integer) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Prov_SAT_CatTipoContratosDocumentosGet")
With SqlAdapter.SelectCommand.Parameters
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
End With
Try
SqlAdapter.Fill(Data)
Retorno = True
Catch ex As Exception
OnError("Ocurrió un error al eliminar el tipo de contrato.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
End Try
Return Retorno
End Function
Public Function UpdateTiposContratosDocumentos(CveTipoContrato As Integer, CveDocumentacion As Integer, Requerido As Boolean) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Prov_SAT_CatTipoContratosDocumentosUpdate")
With SqlAdapter.SelectCommand.Parameters
.Add("@CveTipoContrato", SqlDbType.Int).Value = CveTipoContrato
.Add("@CveDocumentacion", SqlDbType.Int).Value = CveDocumentacion
.Add("@Requerido", SqlDbType.Bit).Value = Requerido
End With
Try
SqlAdapter.Fill(Data)
Retorno = True
Catch ex As Exception
OnError("Ocurrió un error al Obtener los actualizar.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
End Try
Return Retorno
End Function
#End Region
' IDisposable
#Region " IDisposable Support "

411
Edoc/CatDocumentosContratos.aspx
View File

@@ -1,4 +1,4 @@
<%@ Page Title="RH - Catálogo de Géneros" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="CatDocumentosContratos.aspx.vb" Inherits="Edoc_CatDocumentosContratos" %>
<%@ Page Title="Documentos Contratos" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="CatDocumentosContratos.aspx.vb" Inherits="Edoc_CatDocumentosContratos" %>
<%@ Register Assembly="AjaxControlToolkit" Namespace="AjaxControlToolkit" TagPrefix="asp" %>
<asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server">
</asp:Content>
@@ -27,394 +27,39 @@
<asp:UpdatePanel ID="UpDatos" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<table width="872" class="table table-hover table-advance">
<tbody>
<tr>
<th width="116">Tipo de contrato</th>
<th width="416">Documento</th>
<th width="100">Requerido</th>
</tr>
<tr>
<td>SubContratos</td>
<td>ACTA CONSTITUTIVA (PERSONA FISICA NO APLICA)</td>
<td>
<div class="checkbox"> <label><input type="checkbox" value="" checked></label></div>
</td>
</tr>
<tr>
<td>SubContratos</td>
<td>IDENTIFICACION REPRESENTANTE LEGAL</td>
<td><div class="checkbox"> <label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>SubContratos</td>
<td>PODER REPRESENTANTE LEGAL</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>SubContratos</td>
<td>REGISTRO PATRONAL IMSS</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>SubContratos</td>
<td>REGISTRO ANTE EL SAT</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>SubContratos</td>
<td>PAGOS PROVSIONALES</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>SubContratos</td>
<td>PAGO DEL IMSS</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>SubContratos</td>
<td>PAGO DEL ESTADO</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>SubContratos</td>
<td>OPINION DE CUMPLIMIENTO SAT</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>SubContratos</td>
<td>CARTA DE NO ADEUDO IMSS</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>SubContratos</td>
<td>RELACION DE PERSONAL</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>SubContratos</td>
<td>RECIBOS XML NOMINA</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>SubContratos</td>
<td>REGISTRO DE OBRA ANTE EL SIROC (SOLAMENTE AL INICIO)</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Acarreos</td>
<td>ACTA CONSTITUTIVA (PERSONA FISICA NO APLICA)</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Acarreos</td>
<td>IDENTIFICACION REPRESENTANTE LEGAL</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Acarreos</td>
<td>PODER REPRESENTANTE LEGAL</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Acarreos</td>
<td>REGISTRO PATRONAL IMSS</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Acarreos</td>
<td>REGISTRO ANTE EL SAT</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Acarreos</td>
<td>PAGOS PROVSIONALES</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Acarreos</td>
<td>PAGO DEL IMSS</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Acarreos</td>
<td>PAGO DEL ESTADO</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Acarreos</td>
<td>OPINION DE CUMPLIMIENTO SAT</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Acarreos</td>
<td>CARTA DE NO ADEUDO IMSS</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Acarreos</td>
<td>RELACION DE PERSONAL</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Acarreos</td>
<td>RECIBOS XML NOMINA</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Acarreos</td>
<td>REGISTRO DE OBRA ANTE EL SIROC (SOLAMENTE AL INICIO)</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Limpieza</td>
<td>ACTA CONSTITUTIVA (PERSONA FISICA NO APLICA)</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Limpieza</td>
<td>IDENTIFICACION REPRESENTANTE LEGAL</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Limpieza</td>
<td>PODER REPRESENTANTE LEGAL</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Limpieza</td>
<td>REGISTRO PATRONAL IMSS</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Limpieza</td>
<td>REGISTRO ANTE EL SAT</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Limpieza</td>
<td>PAGOS PROVSIONALES</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Limpieza</td>
<td>PAGO DEL IMSS</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Limpieza</td>
<td>PAGO DEL ESTADO</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Limpieza</td>
<td>OPINION DE CUMPLIMIENTO SAT</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Limpieza</td>
<td>CARTA DE NO ADEUDO IMSS</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Limpieza</td>
<td>RELACION DE PERSONAL</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Limpieza</td>
<td>RECIBOS XML NOMINA</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Limpieza</td>
<td>REGISTRO DE OBRA ANTE EL SIROC (SOLAMENTE AL INICIO)</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Materiales</td>
<td>ACTA CONSTITUTIVA (PERSONA FISICA NO APLICA)</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Materiales</td>
<td>IDENTIFICACION REPRESENTANTE LEGAL</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Materiales</td>
<td>PODER REPRESENTANTE LEGAL</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Materiales</td>
<td>REGISTRO PATRONAL IMSS</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Materiales</td>
<td>REGISTRO ANTE EL SAT</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Materiales</td>
<td>PAGOS PROVSIONALES</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Materiales</td>
<td>PAGO DEL IMSS</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Materiales</td>
<td>PAGO DEL ESTADO</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Materiales</td>
<td>OPINION DE CUMPLIMIENTO SAT</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Materiales</td>
<td>CARTA DE NO ADEUDO IMSS</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Materiales</td>
<td>RELACION DE PERSONAL</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Materiales</td>
<td>RECIBOS XML NOMINA</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Materiales</td>
<td>REGISTRO DE OBRA ANTE EL SIROC (SOLAMENTE AL INICIO)</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Acarreos</td>
<td>ACTA CONSTITUTIVA (PERSONA FISICA NO APLICA)</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Acarreos</td>
<td>IDENTIFICACION REPRESENTANTE LEGAL</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Acarreos</td>
<td>PODER REPRESENTANTE LEGAL</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Acarreos</td>
<td>REGISTRO PATRONAL IMSS</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Acarreos</td>
<td>REGISTRO ANTE EL SAT</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Acarreos</td>
<td>PAGOS PROVSIONALES</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Acarreos</td>
<td>PAGO DEL IMSS</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Acarreos</td>
<td>PAGO DEL ESTADO</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Acarreos</td>
<td>OPINION DE CUMPLIMIENTO SAT</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Acarreos</td>
<td>CARTA DE NO ADEUDO IMSS</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Acarreos</td>
<td>RELACION DE PERSONAL</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Acarreos</td>
<td>RECIBOS XML NOMINA</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
<tr>
<td>Acarreos</td>
<td>REGISTRO DE OBRA ANTE EL SIROC (SOLAMENTE AL INICIO)</td>
<td><div class="checkbox"><label><input type="checkbox" value="" checked></label></div></td>
</tr>
</tbody>
</table>
<%-- <asp:GridView ID="GvDatos" runat="server" AutoGenerateColumns="False" DataKeyNames="CveGenero,Genero,Estatus" EmptyDataText="No se encontraron Géneros Registrados" ToolTip="Listado de Genero" CssClass="table table-striped table-advance table-hover" style="margin-top:-10px; text-align:center;width:100%;" GridLines="None" >
<div class="col-md-8">
<asp:GridView ID="GvDatos" runat="server" AutoGenerateColumns="False" DataKeyNames="CveTipoContrato,CveDocumentacion" EmptyDataText="No se encontraron datos" Width="100%"
ToolTip="Listado de Genero" CssClass="table table-striped table-advance table-hover" GridLines="None" >
<Columns>
<asp:TemplateField HeaderText="Género">
<asp:TemplateField HeaderText="Tipo Contrato">
<ItemTemplate>
<asp:Literal ID="LtlGenero" runat="server" Text='<%# Eval("Genero", "{0}") %>'></asp:Literal>
</ItemTemplate>
<EditItemTemplate>
<asp:TextBox ID="TxtGenero" runat="server" CausesValidation="true" MaxLength="50" Text='<%# Eval("Genero") %>' ValidationGroup="GrpGV" Width="234px"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVGenero" runat="server" ControlToValidate="TxtGenero" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Genero''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGV"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="VCGenero" runat="server" HighlightCssClass="vco" TargetControlID="RFVGenero" Width="300px"></ajax:ValidatorCalloutExtender>
</EditItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Estado">
<ItemTemplate>
<asp:Literal ID="LtlEstado" runat="server" Text='<%# Eval("Estatus") %>'></asp:Literal>
</ItemTemplate>
<EditItemTemplate>
<asp:CheckBox ID="ChkEstado" runat="server" Checked='<%# If (Eval("Estatus").ToString = "Activo", True, False) %>' />
</EditItemTemplate>
<asp:Literal ID="LrlTipoContrato" runat="server" Text='<%# Eval("TipoContrato") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Fecha">
<ItemTemplate>
<asp:Literal ID="LtlFecha" runat="server" Text='<%# Eval("FechaIng", "{0:d}") %>'></asp:Literal>
<asp:TemplateField HeaderText="Documento" ItemStyle-HorizontalAlign="Left">
<ItemTemplate>
<asp:Literal ID="LtlDocumento" runat="server" Text='<%# Eval("Documentacion") %>' ></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Usuario">
<ItemTemplate>
<asp:Literal ID="LtlUsuario" runat="server" Text='<%# Eval("Usuario") %>'></asp:Literal>
</asp:TemplateField>
<asp:TemplateField HeaderText="Requerido" ItemStyle-Width="100" ItemStyle-HorizontalAlign="Center">
<ItemTemplate>
<asp:CheckBox runat="server" ID="ChkRequerido" Checked= '<%# Eval("Requerido") %>' AutoPostBack="true" OnCheckedChanged="ChkRequerido_CheckedChanged" CssClass="md-checksd" />
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Editar">
<EditItemTemplate>
<center>
<asp:LinkButton ID="imgU" runat="server" AlternateText="Actualizar" CausesValidation="True" CommandName="Update" CssClass="btn btn-circle btn-sm green" Text="<i class='fa fa-check'></i>" ValidationGroup="GrpGV" />
&nbsp;<asp:LinkButton ID="imgC" runat="server" AlternateText="Cancelar" CausesValidation="False" CommandName="Cancel" CssClass="btn btn-circle btn-sm red" Text="<i class='fa fa-times'></i>" />
</center>
</EditItemTemplate>
<ItemTemplate>
<asp:LinkButton OnClick="GvDatos_RowEditing" ID="imgE" runat="server" AlternateText="Editar" CausesValidation="False" CommandName="Edit" CssClass="btn btn-circle btn-sm green" Text="<i class='fa fa-pencil'></i>" />
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Eliminar">
<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>
<RowStyle CssClass="Texto" />
<AlternatingRowStyle CssClass="TextoAlterno" />
</asp:GridView>--%>
</asp:TemplateField>
</Columns>
</asp:GridView>
</div>

106
Edoc/CatDocumentosContratos.aspx.vb
View File

@@ -11,106 +11,42 @@ Partial Class Edoc_CatDocumentosContratos
Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
If Not Page.IsPostBack Then
CargaDatos()
End If
End Sub
'Protected Sub BtnAgregarMotivo_Click(sender As Object, e As EventArgs) Handles BtnAgregarMotivoD.Click
' RegistraScript(String.Format("$('#{0}').modal();", "DivAgregarTiposContrato"))
'End Sub
Protected Sub LbAgregar_Click(sender As Object, e As System.EventArgs) Handles BtnAgregarTiposDModal.Click
Private Sub CargaDatos()
Dim ObjProv As New ClsCompProveedores
If ObjProv.GetTiposContratosDcumentos(UsuarioActual.CveEmpresa) Then
GvDatos.DataSource = ObjProv.DtResultados
Else
GvDatos.DataSource = Nothing
End If
ObjProv.Dispose()
GvDatos.DataBind()
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
' If e.Row.RowIndex = 0 Then
' e.Row.Cells(0).Width = Unit.Pixel(250)
' e.Row.Cells(1).Width = Unit.Pixel(100)
' e.Row.Cells(2).Width = Unit.Pixel(100)
' e.Row.Cells(3).Width = Unit.Pixel(100)
' e.Row.Cells(4).Width = Unit.Pixel(100)
' e.Row.Cells(5).Width = Unit.Pixel(61)
' End If
' e.Row.Cells(0).HorizontalAlign = HorizontalAlign.Left
' End If
'End Sub
Protected Sub ChkRequerido_CheckedChanged(sender As Object, e As EventArgs)
Dim GvRow As GridViewRow = DirectCast(DirectCast(sender, CheckBox).NamingContainer, GridViewRow)
'Protected Sub GvDatos_RowDeleting(sender As Object, e As System.Web.UI.WebControls.GridViewDeleteEventArgs) Handles GvDatos.RowDeleting
' Dim ObjGenero As New ClsRH
' If ObjGenero.RemoveGenero(GvDatos.DataKeys(e.RowIndex).Value.ToString.ToEntero) Then
' GvDatos.EditIndex = -1
' ViewState("DTGenero") = ObjGenero.DtResultados
' GlobalDTGenero = ObjGenero.DtResultados
' Alert("El Género se eliminó correctamente.", TipoMensaje.MsgInformacion)
' End If
Dim CveTipoContrato As Integer = GvRow.DataKey("CveTipoContrato").ToEntero
Dim CveDocumentacion As Integer = GvRow.DataKey("CveDocumentacion").ToEntero
Dim ChkRequerido As CheckBox = GvRow.FCCheckBox("ChkRequerido")
' ObjGenero.Dispose()
Dim ObjProv As New ClsCompProveedores
' If ViewState("Orden").ToString() <> String.Empty Then
' CargaGrid(ViewState("Orden").ToString())
' Else
' CargaGrid("")
' End If
'End Sub
ObjProv.UpdateTiposContratosDocumentos(CveTipoContrato, CveDocumentacion, ChkRequerido.Checked)
'Protected Sub GvDatos_RowCancelingEdit(sender As Object, e As System.Web.UI.WebControls.GridViewCancelEditEventArgs) Handles GvDatos.RowCancelingEdit
' GvDatos.EditIndex = -1
' If ViewState("Orden").ToString() <> String.Empty Then
' CargaGrid(ViewState("Orden").ToString())
' Else
' CargaGrid("")
' End If
'End Sub
'Protected Sub GvDatos_RowUpdating(sender As Object, e As EventArgs) Handles BtnEditarTiposDModal.Click
' Dim ObjGenero As New ClsRH
' Dim Genero As String = GeneroTxt.Text.Trim
' Dim Estatus As Boolean = ChkEstatus.Checked
' Dim CveGenero As Integer = CveGeneroAEditar
' If ObjGenero.UpdateGenero(Genero, Estatus, CveGenero) Then
' GvDatos.EditIndex = -1
' ViewState("DTGenero") = ObjGenero.DtResultados
' GlobalDTGenero = ObjGenero.DtResultados
' Alert("Los cambios se guardaron correctamente.", TipoMensaje.MsgInformacion)
' End If
' ObjGenero.Dispose()
' If ViewState("Orden").ToString() <> String.Empty Then
' CargaGrid(ViewState("Orden").ToString())
' Else
' CargaGrid("")
' End If
'End Sub
'Public Sub GvDatos_RowEditing(sender As Object, e As EventArgs)
' BtnAgregarTiposDModal.Visible = False
' BtnEditarTiposDModal.Visible = True
' CheckActiveSection.Visible = True
' saltoDeLinea.Visible = True
' Dim GvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow) 'obtenemos el renglon que acabamos de seleccionar
' GeneroTxt.Text = GvRow.DataKey("Genero")
' ChkEstatus.Checked = If(GvRow.DataKey("Estatus") = "Activo", True, False)
' CveGeneroAEditar = Convert.ToInt32(GvRow.DataKey("CveGenero")) 'Guardamos en una propiedad el id del registro del cual haremos cambios, se guarda y se utiliza en el metodo "GvDatos_RowUpdating"
' UpDatos.Update()
' If ViewState("Orden").ToString() <> String.Empty Then
' CargaGrid(ViewState("Orden").ToString())
' Else
' CargaGrid("")
' End If
' RegistraScript(String.Format("$('#{0}').modal();", "DivAgregarTiposD"))
'End Sub
#End Region
ObjProv.Dispose()
End Sub
End Class

103
Edoc/CatTipoContratos.aspx
View File

@@ -13,7 +13,7 @@
<asp:UpdatePanel runat="server" ID="UpAgregar">
<ContentTemplate>
<li>
<asp:LinkButton runat="server" ID="BtnAgregarMotivoD" data-toggle="tooltip" data-placement="left" title="Agregar Tipo Contrato " Text="<i class='fa fa-plus'></i> Agregar Tipo Contrato"></asp:LinkButton>
<asp:LinkButton runat="server" ID="BtnAgregarTipoContrato" data-toggle="tooltip" data-placement="left" title="Agregar Tipo Contrato " Text="<i class='fa fa-plus'></i> Agregar Tipo Contrato"></asp:LinkButton>
</li>
</ContentTemplate>
@@ -28,97 +28,54 @@
<ContentTemplate>
<table style="width:600px!important" class="table table-hover table-advance" >
<tr>
<th>Tipo de Contrato</th>
<th>Estatus</th>
<th>Usuario</th>
<th style="width:100px!important">Comandos</th>
</tr>
<tr>
<td style="text-align: left">SubContratos</td>
<td style="text-align: left">Activo</td>
<td>Sistema</td>
<td><a class="btn btn-circle btn-sm green" onclick="return MuestraModal()"><i class='fa fa-pencil' > </i></a></td>
</tr>
<tr>
<td style="text-align: left">Acarreos</td>
<td style="text-align: left">Activo</td>
<td>Sistema</td>
<td><a class="btn btn-circle btn-sm green" onclick="return MuestraModal()"><i class='fa fa-pencil' > </i></a></td>
</tr>
<tr>
<td style="text-align: left">Limpieza</td>
<td style="text-align: left">Activo</td>
<td>Sistema</td>
<td><a class="btn btn-circle btn-sm green" onclick="return MuestraModal()"><i class='fa fa-pencil' > </i></a></td>
</tr>
<tr>
<td style="text-align: left">Materiales</td>
<td style="text-align: left">Activo</td>
<td>Sistema</td>
<td><a class="btn btn-circle btn-sm green" onclick="return MuestraModal()"><i class='fa fa-pencil' > </i></a></td>
</tr>
</table>
<%-- <asp:GridView ID="GvDatos" runat="server" AutoGenerateColumns="False" DataKeyNames="CveGenero,Genero,Estatus" EmptyDataText="No se encontraron Géneros Registrados" ToolTip="Listado de Genero" CssClass="table table-striped table-advance table-hover" style="margin-top:-10px; text-align:center;width:100%;" GridLines="None" >
<div class="col-md-8">
<asp:GridView ID="GvDatos" runat="server" AutoGenerateColumns="False" DataKeyNames="CveTipoContrato,TipoContrato,Estatus" EmptyDataText="No se encontraron Tipos de contrato" Width="100%"
ToolTip="Listado de Genero" CssClass="table table-striped table-advance table-hover" GridLines="None" >
<Columns>
<asp:TemplateField HeaderText="Género">
<asp:TemplateField HeaderText="Tipo Contrato">
<ItemTemplate>
<asp:Literal ID="LtlGenero" runat="server" Text='<%# Eval("Genero", "{0}") %>'></asp:Literal>
</ItemTemplate>
<EditItemTemplate>
<asp:TextBox ID="TxtGenero" runat="server" CausesValidation="true" MaxLength="50" Text='<%# Eval("Genero") %>' ValidationGroup="GrpGV" Width="234px"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVGenero" runat="server" ControlToValidate="TxtGenero" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Genero''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGV"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="VCGenero" runat="server" HighlightCssClass="vco" TargetControlID="RFVGenero" Width="300px"></ajax:ValidatorCalloutExtender>
</EditItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Estado">
<ItemTemplate>
<asp:Literal ID="LtlEstado" runat="server" Text='<%# Eval("Estatus") %>'></asp:Literal>
</ItemTemplate>
<EditItemTemplate>
<asp:CheckBox ID="ChkEstado" runat="server" Checked='<%# If (Eval("Estatus").ToString = "Activo", True, False) %>' />
</EditItemTemplate>
<asp:Literal ID="LtlTipocontrato" runat="server" Text='<%# Eval("Tipocontrato") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Fecha">
<asp:TemplateField HeaderText="Esatus" ItemStyle-Width="100" ItemStyle-HorizontalAlign="Center">
<ItemTemplate>
<asp:Literal ID="LtlEsatusString" runat="server" Text='<%# Eval("EstatusString") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Fecha" ItemStyle-Width="100" ItemStyle-HorizontalAlign="Center">
<ItemTemplate>
<asp:Literal ID="LtlFecha" runat="server" Text='<%# Eval("FechaIng", "{0:d}") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Usuario">
<asp:TemplateField HeaderText="Usuario" >
<ItemTemplate>
<asp:Literal ID="LtlUsuario" runat="server" Text='<%# Eval("Usuario") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Editar">
<EditItemTemplate>
<center>
<asp:LinkButton ID="imgU" runat="server" AlternateText="Actualizar" CausesValidation="True" CommandName="Update" CssClass="btn btn-circle btn-sm green" Text="<i class='fa fa-check'></i>" ValidationGroup="GrpGV" />
&nbsp;<asp:LinkButton ID="imgC" runat="server" AlternateText="Cancelar" CausesValidation="False" CommandName="Cancel" CssClass="btn btn-circle btn-sm red" Text="<i class='fa fa-times'></i>" />
</center>
</EditItemTemplate>
<asp:TemplateField HeaderText="Editar" ItemStyle-Width="80" ItemStyle-HorizontalAlign="Center">
<ItemTemplate>
<asp:LinkButton OnClick="GvDatos_RowEditing" ID="imgE" runat="server" AlternateText="Editar" CausesValidation="False" CommandName="Edit" CssClass="btn btn-circle btn-sm green" Text="<i class='fa fa-pencil'></i>" />
<asp:LinkButton ID="LnkActualizar" runat="server" OnClick="LnkGvActualizar_Click" CssClass="btn btn-circle btn-sm green" Text="<i class='fa fa-check'></i>" ValidationGroup="GrpGV" />
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Eliminar">
<asp:TemplateField HeaderText="Eliminar" ItemStyle-Width="80" ItemStyle-HorizontalAlign="Center">
<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" />
<asp:LinkButton runat="server" ID="LnkEliminar" OnClick="LnkGvEliminar_Click" 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>
<RowStyle CssClass="Texto" />
<AlternatingRowStyle CssClass="TextoAlterno" />
</asp:GridView>--%>
</Columns>
</asp:GridView>
</div>
<div id="DivAgregarTiposContrato" class="modal ADS fade" role="dialog">
<div class="modal-dialog" style="width: 450px;">
<asp:UpdatePanel runat="server" class="modal-content" ID="UpModalTiposD" UpdateMode="Conditional">
<asp:UpdatePanel runat="server" class="modal-content" ID="UpModalTiposContrato" UpdateMode="Conditional">
<ContentTemplate>
<div class="modal-header ">
<button type="button" class="close" data-dismiss="modal">×</button>
@@ -128,9 +85,9 @@
<div class="modal-body">
<div class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtTipoSubcontrato" CssClass="form-control " runat="server" MaxLength="70" CausesValidation="true"></asp:TextBox>
<asp:RequiredFieldValidator ID="RfvTxtTipoSubcontrato" runat="server" ControlToValidate="TxtTipoSubcontrato" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Tipo Sub Contrato''</b> es necesario, por favor ingréselo." ValidationGroup="GrpTiposD"></asp:RequiredFieldValidator>
<label for="GeneroTxt">Tipo Contrato:</label>
<asp:TextBox ID="TxtTipoContrato" CssClass="form-control " runat="server" MaxLength="70" CausesValidation="true"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVTxtTipoContrato" runat="server" ControlToValidate="TxtTipoContrato" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Tipo Contrato''</b> es necesario, por favor ingréselo." ValidationGroup="GrpTipos"></asp:RequiredFieldValidator>
<label for="TxtTipoContrato">Tipo Contrato:</label>
<i></i>
</div>
<br ID="saltoDeLinea" runat="server" />

173
Edoc/CatTipoContratos.aspx.vb
View File

@@ -7,110 +7,117 @@ Imports Extensiones
Partial Class Edoc_CatTipoContrato
Inherits ClsPaginas
Protected Property CveTipoContrato As Integer
Get
If ViewState("CveTipoContrato") Is Nothing Then
Return -1
Else
Return ViewState("CveTipoContrato").ToString.ToEntero
End If
End Get
Set(value As Integer)
ViewState("CveTipoContrato") = value
End Set
End Property
Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
If Not Page.IsPostBack Then
CargaDatos()
End If
End Sub
Protected Sub BtnAgregarMotivo_Click(sender As Object, e As EventArgs) Handles BtnAgregarMotivoD.Click
Private Sub CargaDatos()
Dim ObjProv As New ClsCompProveedores
If ObjProv.GetTiposContratos(-1, UsuarioActual.CveEmpresa, -1) Then
GvDatos.DataSource = ObjProv.DtResultados
Else
GvDatos.DataSource = Nothing
End If
ObjProv.Dispose()
GvDatos.DataBind()
End Sub
Protected Sub BtnAgregarMotivo_Click(sender As Object, e As EventArgs) Handles BtnAgregarTipoContrato.Click
CveTipoContrato = -1
TxtTipoContrato.Text = ""
ChkEstatus.Checked = True
UpModalTiposContrato.Update()
RegistraScript(String.Format("$('#{0}').modal();", "DivAgregarTiposContrato"))
End Sub
Protected Sub LnkGvActualizar_Click(sender As Object, e As EventArgs)
Dim GvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow)
CveTipoContrato = GvRow.DataKey("CveTipoContrato").ToEntero
TxtTipoContrato.Text = GvRow.DataKey("TipoContrato")
ChkEstatus.Checked = Boolean.Parse(GvRow.DataKey("Estatus").ToString)
UpModalTiposContrato.Update()
RegistraScript(String.Format("$('#{0}').modal();", "DivAgregarTiposContrato"))
End Sub
Protected Sub LbAgregar_Click(sender As Object, e As System.EventArgs) Handles BtnAgregarTiposDModal.Click
Dim ObjProv As New ClsCompProveedores
Dim ErrorProceso As Boolean = False
If CveTipoContrato = -1 Then
If Not ObjProv.AddTiposContratos(TxtTipoContrato.Text, ChkEstatus.Checked, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) Then
ErrorProceso = True
End If
Else
If Not ObjProv.UpdateTiposContratos(CveTipoContrato, TxtTipoContrato.Text, ChkEstatus.Checked, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) Then
ErrorProceso = True
End If
End If
If Not ErrorProceso Then
RegistraScript(String.Format("$('#{0}').modal('HIDE');", "DivAgregarTiposContrato"))
CargaDatos()
End If
ObjProv.Dispose()
End Sub
#Region "G V D A T O S"
Protected Sub LnkGvEliminar_Click(sender As Object, e As EventArgs)
Dim GvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow)
Dim ErrorProceso As Boolean = False
Dim CveTipoContratoEliminar As Integer = GvRow.DataKey("CveTipoContrato").ToEntero
'Protected Sub GvDatos_RowDataBound(sender As Object, e As System.Web.UI.WebControls.GridViewRowEventArgs) Handles GvDatos.RowDataBound
' If e.Row.RowType = DataControlRowType.DataRow Then
' If e.Row.RowIndex = 0 Then
' e.Row.Cells(0).Width = Unit.Pixel(250)
' e.Row.Cells(1).Width = Unit.Pixel(100)
' e.Row.Cells(2).Width = Unit.Pixel(100)
' e.Row.Cells(3).Width = Unit.Pixel(100)
' e.Row.Cells(4).Width = Unit.Pixel(100)
' e.Row.Cells(5).Width = Unit.Pixel(61)
' End If
' e.Row.Cells(0).HorizontalAlign = HorizontalAlign.Left
' End If
'End Sub
Dim ObjProv As New ClsCompProveedores
'Protected Sub GvDatos_RowDeleting(sender As Object, e As System.Web.UI.WebControls.GridViewDeleteEventArgs) Handles GvDatos.RowDeleting
' Dim ObjGenero As New ClsRH
' If ObjGenero.RemoveGenero(GvDatos.DataKeys(e.RowIndex).Value.ToString.ToEntero) Then
' GvDatos.EditIndex = -1
' ViewState("DTGenero") = ObjGenero.DtResultados
' GlobalDTGenero = ObjGenero.DtResultados
' Alert("El Género se eliminó correctamente.", TipoMensaje.MsgInformacion)
' End If
If ObjProv.RemoveTiposContratos(CveTipoContratoEliminar, UsuarioActual.CveEmpresa) Then
Alert("Tipo Contrato eliminado correctamente")
Else
ErrorProceso = True
End If
' ObjGenero.Dispose()
' If ViewState("Orden").ToString() <> String.Empty Then
' CargaGrid(ViewState("Orden").ToString())
' Else
' CargaGrid("")
' End If
'End Sub
'Protected Sub GvDatos_RowCancelingEdit(sender As Object, e As System.Web.UI.WebControls.GridViewCancelEditEventArgs) Handles GvDatos.RowCancelingEdit
' GvDatos.EditIndex = -1
' If ViewState("Orden").ToString() <> String.Empty Then
' CargaGrid(ViewState("Orden").ToString())
' Else
' CargaGrid("")
' End If
'End Sub
'Protected Sub GvDatos_RowUpdating(sender As Object, e As EventArgs) Handles BtnEditarTiposDModal.Click
' Dim ObjGenero As New ClsRH
' Dim Genero As String = GeneroTxt.Text.Trim
' Dim Estatus As Boolean = ChkEstatus.Checked
' Dim CveGenero As Integer = CveGeneroAEditar
' If ObjGenero.UpdateGenero(Genero, Estatus, CveGenero) Then
' GvDatos.EditIndex = -1
' ViewState("DTGenero") = ObjGenero.DtResultados
' GlobalDTGenero = ObjGenero.DtResultados
' Alert("Los cambios se guardaron correctamente.", TipoMensaje.MsgInformacion)
' End If
' ObjGenero.Dispose()
' If ViewState("Orden").ToString() <> String.Empty Then
' CargaGrid(ViewState("Orden").ToString())
' Else
' CargaGrid("")
' End If
'End Sub
'Public Sub GvDatos_RowEditing(sender As Object, e As EventArgs)
' BtnAgregarTiposDModal.Visible = False
' BtnEditarTiposDModal.Visible = True
' CheckActiveSection.Visible = True
' saltoDeLinea.Visible = True
' Dim GvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow) 'obtenemos el renglon que acabamos de seleccionar
' GeneroTxt.Text = GvRow.DataKey("Genero")
' ChkEstatus.Checked = If(GvRow.DataKey("Estatus") = "Activo", True, False)
' CveGeneroAEditar = Convert.ToInt32(GvRow.DataKey("CveGenero")) 'Guardamos en una propiedad el id del registro del cual haremos cambios, se guarda y se utiliza en el metodo "GvDatos_RowUpdating"
' UpDatos.Update()
' If ViewState("Orden").ToString() <> String.Empty Then
' CargaGrid(ViewState("Orden").ToString())
' Else
' CargaGrid("")
' End If
' RegistraScript(String.Format("$('#{0}').modal();", "DivAgregarTiposD"))
'End Sub
#End Region
If Not ErrorProceso Then
CargaDatos()
End If
ObjProv.Dispose()
End Sub
End Class

36
vwd.webinfo
View File

@@ -1,18 +1,20 @@
<?xml version="1.0"?>
<!--
Visual Studio global web project settings.
-->
<VisualWebDeveloper>
<StartupServices>
<Service ID="{C0C07587-41A7-46C8-8FBD-3F9C8EBE2DDC}"/>
</StartupServices>
<?xml version="1.0"?>
<!--
Visual Studio global web project settings.
-->
<VisualWebDeveloper>
<StartupServices>
<Service ID="{C0C07587-41A7-46C8-8FBD-3F9C8EBE2DDC}"/>
</StartupServices>
</VisualWebDeveloper>