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

Documnetación

Browse Source
This commit is contained in:
Rakcsle Supertramp
2020-02-10 18:11:15 -07:00
parent 28a886ded5
commit 22b0e02311
14 changed files with 3373 additions and 355 deletions
Download Patch File Download Diff File Expand all files Collapse all files

78
App_Code/ClsEdocumentacion.vb
View File

@@ -153,7 +153,7 @@ Public Class ClsEdocumentacion
Public Function DocumentacionAdd(Documentacion As String, DocumentacionFormato As String, CveDocumentacionTipo As Integer, Estatus As Integer, Orden As Integer, Requerido As Integer,
DiasLimite As Integer, AplicaDiasLimite As Boolean, AplicaFechaVencimiento As Boolean, CveEmpresa As Integer) As Boolean
DiasLimite As Integer, AplicaDiasLimite As Boolean, AplicaFechaVencimiento As Boolean, CveEmpresa As Integer, Optional Periodicidad As Integer = 0) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Edoc_DocumentacionAdd")
@@ -169,6 +169,7 @@ Public Class ClsEdocumentacion
.Add("@DiasLimite", SqlDbType.Int).Value = DiasLimite
.Add("@AplicaDiasLimite", SqlDbType.Bit).Value = AplicaDiasLimite
.Add("@AplicaFechaVencimiento", SqlDbType.Bit).Value = AplicaFechaVencimiento
.Add("@Periodicidad", SqlDbType.Int).Value = Periodicidad
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
@@ -187,7 +188,7 @@ Public Class ClsEdocumentacion
End Function
Public Function DocumentacionUpdate(CveDocumentacion As Integer, Documentacion As String, DocumentacionFormato As String, CveDocumentacionTipo As Integer, Estatus As Integer, Orden As Integer, Requerido As Integer, DiasLimite As Integer, AplicaDiasLimite As Boolean, AplicaFechaVencimiento As Boolean, CveEmpresa As Integer) As Boolean
Public Function DocumentacionUpdate(CveDocumentacion As Integer, Documentacion As String, DocumentacionFormato As String, CveDocumentacionTipo As Integer, Estatus As Integer, Orden As Integer, Requerido As Integer, DiasLimite As Integer, AplicaDiasLimite As Boolean, AplicaFechaVencimiento As Boolean, CveEmpresa As Integer, Optional Periodicidad As Integer = 0) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Edoc_DocumentacionUpdate")
@@ -204,6 +205,7 @@ Public Class ClsEdocumentacion
.Add("@DiasLimite", SqlDbType.Int).Value = DiasLimite
.Add("@AplicaDiasLimite", SqlDbType.Bit).Value = AplicaDiasLimite
.Add("@AplicaFechaVencimiento", SqlDbType.Bit).Value = AplicaFechaVencimiento
.Add("@Periodicidad", SqlDbType.Int).Value = Periodicidad
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
End With
@@ -452,35 +454,61 @@ Public Class ClsEdocumentacion
End Try
Return Retorno
End Function
End Function
Public Function DocumentacionElectronicaAuditoriaGet(CveProveedor As Integer, FechaInicio As Date, FechaFin As Date, CveEmpresa As Integer, Optional Modulo As Integer = 3, Optional Estatus As Integer = -1) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Edoc_DocumentacionElectronicaAuditoriaGet")
'Public Function DocumentacionGet(CveDocumentacionTipo As Integer, CveEmpresa As Integer) As Boolean
With SqlAdapter.SelectCommand.Parameters
.Add("@CveProveedor", SqlDbType.Int).Value = CveProveedor
.Add("@FechaInicio", SqlDbType.Date).Value = FechaInicio
.Add("@FechaFin", SqlDbType.Date).Value = FechaFin
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
.Add("@Modulo", SqlDbType.Int).Value = Modulo
.Add("@Estatus", SqlDbType.Int).Value = Estatus
End With
' Dim Retorno As Boolean = False
Try
SqlAdapter.Fill(Data)
Retorno = True
Catch ex As Exception
OnError("Ocurrió un error al consultar los registros de documentación.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
End Try
' DataAdapter("PA_Edoc_DocumentacionGet")
' With SqlAdapter.SelectCommand.Parameters
' .Add("@CveDocumentacionTipo", SqlDbType.Int).Value = CveDocumentacionTipo
' .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
' End With
' Try
' SqlAdapter.Fill(Data)
' Retorno = True
' Catch ex As Exception
' OnError("Ocurrió un error al consultar la documentación.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
' End Try
' Return Retorno
' End Function
Return Retorno
End Function
'Public Function DocumentacionGet(CveDocumentacionTipo As Integer, CveEmpresa As Integer) As Boolean
' Dim Retorno As Boolean = False
' DataAdapter("PA_Edoc_DocumentacionGet")
' With SqlAdapter.SelectCommand.Parameters
' .Add("@CveDocumentacionTipo", SqlDbType.Int).Value = CveDocumentacionTipo
' .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
' End With
' Try
' SqlAdapter.Fill(Data)
' Retorno = True
' Catch ex As Exception
' OnError("Ocurrió un error al consultar la documentación.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
' End Try
' Return Retorno
' End Function
#End Region
#Region " IDisposable Support "
' IDisposable
' IDisposable
Protected Overridable Sub Dispose(ByVal disposing As Boolean)
If Not disposedValue Then
If disposing Then

14
App_Code/ClsPaginas.vb
View File

@@ -3956,6 +3956,9 @@ Public Class ClsPaginas
PaginaDict.Add("/Compras/RepPUESinPago.aspx".ToUpper(), 675)
PaginaDict.Add("/Compras/RepReqOCCompraInv.aspx".ToUpper(), 689)
PaginaDict.Add("/Compras/RepComprasPrecios.aspx".ToUpper(), 690)
PaginaDict.Add("/Compras/RepDocumentacionProveedor.aspx".ToUpper(), 1206)
#End Region
'CONTABILIDAD
@@ -4661,9 +4664,13 @@ Public Class ClsPaginas
'Portal Cliente/Proveedor
PaginaDict.Add("/PortalCliente/PortalCliente.aspx".ToUpper(), 1101)
PaginaDict.Add("/PortalProveedor/PortalProveedor.aspx".ToUpper(), 1201)
'Portal
PaginaDict.Add("/PortalProveedor/PortalProveedor.aspx".ToUpper(), 1201)
PaginaDict.Add("/Edoc/CatDocumentos.aspx".ToUpper(), 1205)
PaginaDict.Add("/Edoc/CatTipoContratos.aspx".ToUpper(), -1)
PaginaDict.Add("/Edoc/CatDocumentosContratos.aspx".ToUpper(), -1)
'Portal
PaginaDict.Add("/AIMMGM/ConsultaCliente.aspx".ToUpper(), -1)
PaginaDict.Add("/Portal/ConsultaCliente.aspx".ToUpper(), -1)
PaginaDict.Add("/Proveedores/PortalProveedor.aspx".ToUpper(), -1)
@@ -4680,6 +4687,7 @@ Public Class ClsPaginas
'Orden Produccion'
'RMA

9
Compras/Compras.aspx.vb
View File

@@ -10090,19 +10090,22 @@ Partial Class Compras_Compras
EmisorRFC = ValorXML(node, "RFC")
'EmisorNombre = ValorXML(node, "nombre")
End If
node = XMLDoc.SelectSingleNode(String.Format("//{0}:Receptor", Prefijo), namespaces)
node = XMLDoc.SelectSingleNode(String.Format("//{0}:CfdiRelacionados", Prefijo), namespaces)
node = XMLDoc.SelectSingleNode(String.Format("//{0}:Receptor", Prefijo), namespaces)
If node IsNot Nothing AndAlso node.ChildNodes.Count > 0 Then
ReceptorRFC = ValorXML(node, "RFC")
End If
If UsuarioActual.CveEmpresa.Contiene(119) Then
If UsuarioActual.CveEmpresa.Contiene(119, 7) Then
node = XMLDoc.SelectSingleNode(String.Format("//{0}:CfdiRelacionados", Prefijo), namespaces)
If node IsNot Nothing AndAlso node.ChildNodes.Count > 0 Then
If ValorXML(node, "TipoRelacion").ToString.Contiene("04", "07") Then
Dim nodeDocumentosRelacionados As XmlNodeList = XMLDoc.SelectNodes(String.Format("//{0}:CfdiRelacionado", Prefijo), namespaces)
For Each documento As XmlNode In nodeDocumentosRelacionados
If documento.Attributes("UUID").Value <> "" Then
'ListaDocumentos.Add(documento.Attributes("UUID").Value)
ListaDocumentos.Add(documento.Attributes("UUID").Value)
End If
Next
End If

322
Compras/RepDocumentacionProveedor.aspx Normal file
View File

@@ -0,0 +1,322 @@
<%@ Page Title="" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="RepDocumentacionProveedor.aspx.vb" Inherits="Proveedores_RepDocumentacionProveedor" %>
<asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server">
</asp:Content>
<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
</asp:Content>
<asp:Content ID="Content3" ContentPlaceHolderID="E" runat="Server">
Reporte documentación
</asp:Content>
<asp:Content ID="Content4" ContentPlaceHolderID="HB" runat="Server">
</asp:Content>
<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
<asp:UpdatePanel ID="UpAcciones" runat="server" UpdateMode="Conditional" >
<ContentTemplate>
<li style="text-align: left!important">
<asp:LinkButton runat="server" ID="LnkDescargarExcel" data-toggle="tooltip" data-placement="left" title="Agregar Familiares" Text="<i class='fa fa-file-excel-o'></i> Exportar a Excel"></asp:LinkButton>
</li>
</ContentTemplate>
<Triggers>
<asp:PostBackTrigger ControlID="LnkDescargarExcel" />
</Triggers>
</asp:UpdatePanel>
</asp:Content>
<asp:Content ID="Content6" ContentPlaceHolderID="HA" runat="Server">
</asp:Content>
<asp:Content ID="Content7" ContentPlaceHolderID="C" runat="Server">
<asp:UpdatePanel ID="UpFiltros" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<div class="portlet solid grey-cascade portlet-filter" style="">
<div class="portlet-title portlet-filterT smalltitle" style="min-height: 49px; position: relative;">
<div class="tools">
<asp:Button ID="btConsultar" CssClass="btn btn-primary" runat="server" ValidationGroup="GrpConsultar" Text="Consultar" /></td>
<a href="javascript:;" data-idchekbox="<%= chkexpand.ClientID%>" class=" <%= IIf(chkexpand.Checked = True, "collapse", "expand")%>"></a>
<asp:CheckBox ID="chkexpand" CssClass="hidden" runat="server" />
</div>
<div class="titlefiltros caption magindate">
<div class="row">
<div class="col-md-1 ">Proveedor:</div>
<div class="col-md-2 ">
<ADS:Dropdownlost ID="DdlProveedores" runat="server" CssStyle="width: 100%;" Width="100%" DataTextField="RazonSocial" DataValueField="CveProveedor" ></ADS:Dropdownlost>
</div>
<div class="col-md-1 truncate">Fecha Inicio</div>
<div class="col-md-1">
<div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="width: 95px !important; padding: 0px;">
<asp:TextBox Style="width: 80px !important;" ID="TxtFechaI" runat="server" CssClass="form-control" CausesValidation="true" MaxLength="10"></asp:TextBox>
<span class="input-group-btn ">
<asp:LinkButton ID="ImgFechaI" class="btn default " Text="<i class='fa fa-calendar'></i>" runat="server"></asp:LinkButton>
</span>
</div>
<ajax:CalendarExtender runat="server" ID="CEFechaI" TargetControlID="TxtFechaI" PopupButtonID="ImgFechaI" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
<asp:CompareValidator ID="cvTxtFechaI" runat="server" ControlToValidate="TxtFechaI" Display="None" ErrorMessage="El campo no tienes el formato correcto, por favor intente de nuevo con el siguiente formato: (dd/mm/yyyy)." Operator="DataTypeCheck" Type="Date" ValidationGroup="GrpRL"></asp:CompareValidator>
<asp:RequiredFieldValidator ID="rfvTxtFechaI" runat="server" ControlToValidate="TxtFechaI" Display="None" ErrorMessage="El campo es requerido por la aplicación, por favor ingrese una fecha."></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="cvcTxtFechaI" runat="server" HighlightCssClass="vco" TargetControlID="cvTxtFechaI" Width="350px"></ajax:ValidatorCalloutExtender>
<ajax:ValidatorCalloutExtender ID="rfvcTxtFechaI" runat="server" HighlightCssClass="vco" TargetControlID="rfvTxtFechaI" Width="350px"></ajax:ValidatorCalloutExtender>
</div>
<div class="col-md-1 truncate">Fecha Fin</div>
<div class="col-md-1">
<div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="width: 95px !important; padding: 0px;">
<asp:TextBox Style="width: 80px !important;" ID="TxtFechaF" runat="server" CssClass="form-control" CausesValidation="true" MaxLength="10"></asp:TextBox>
<span class="input-group-btn ">
<asp:LinkButton ID="ImgFechaF" class="btn default " Text="<i class='fa fa-calendar'></i>" runat="server"></asp:LinkButton>
</span>
</div>
<%-- <ajax:MaskedEditExtender ID="MEEFechaF" runat="server" TargetControlID="TxtFechaF" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>--%>
<ajax:CalendarExtender runat="server" ID="CalendarExtender1" TargetControlID="TxtFechaF" PopupButtonID="ImgFechaF" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
<asp:CompareValidator ID="cvImgFechaF" runat="server" ControlToValidate="TxtFechaF" Display="None" ErrorMessage="El campo no tienes el formato correcto, por favor intente de nuevo con el siguiente formato: (dd/mm/yyyy)." Operator="DataTypeCheck" Type="Date" ValidationGroup="GrpRL"></asp:CompareValidator>
<asp:RequiredFieldValidator ID="rfvImgFechaF" runat="server" ControlToValidate="TxtFechaF" Display="None" ErrorMessage="El campo es requerido por la aplicación, por favor ingrese una fecha."></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="cvcImgFechaF" runat="server" HighlightCssClass="vco" TargetControlID="cvImgFechaF" Width="350px"></ajax:ValidatorCalloutExtender>
<ajax:ValidatorCalloutExtender ID="rfvcImgFechaF" runat="server" HighlightCssClass="vco" TargetControlID="rfvImgFechaF" Width="350px"></ajax:ValidatorCalloutExtender>
</div>
<div class="col-md-1 truncate">Estatus</div>
<div class="col-md-1">
<asp:DropDownList runat="server" ID="DdlEstatus" Width="150px" CssClass="select2me" >
<asp:ListItem Value="-1">Todos</asp:ListItem>
<asp:ListItem Value="1">Pendiente</asp:ListItem>
<asp:ListItem Value="2">Entregado</asp:ListItem>
<asp:ListItem Value="3">Completado</asp:ListItem>
</asp:DropDownList>
</div>
</div>
</div>
</div>
<div class="portlet-body magindate" <%= IIf(chkexpand.Checked = True, "", "style=""display:none;""")%>>
</div>
</div>
</ContentTemplate>
</asp:UpdatePanel>
<asp:UpdatePanel ID="UpGvDatos" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<div class="row col-md-12" style="text-align: right!important; margin-top: 20px!important; margin-bottom: 2px!important">
<input type="text" id="TxtBusquedaFam" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusquedaFam','{0}')", GvDocumentos.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" />
<a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusquedaFam','{0}')", GvDocumentos.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
</div>
<div class="row">
<asp:UpdatePanel ID="UPGvDocumentos" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<div class="col-md-12">
<asp:GridView ID="GvDocumentos" runat="server" AutoGenerateColumns="False"
DataKeyNames="CveProveedor,CveDocumentacion,Documentacion,Orden,CveDocumentacionElectronica,Adjunto,Estatus,Observacion,Fecha,FechaIng,Usuario,FechaLimite,FechaVigencia,DiasLimite,AplicaDiasLimite,AplicaFechaVencimiento,ContactoMail"
EmptyDataText="No se encontraron registros de documentos" CssClass="table table-hover table-advance Widthall" GridLines="None">
<Columns>
<asp:TemplateField ItemStyle-HorizontalAlign="center" ItemStyle-Width="60px">
<ItemTemplate>
<asp:Literal ID="ImgRequired" runat="server"></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ControlStyle-CssClass="template" ItemStyle-HorizontalAlign="Left" ItemStyle-Width="275" HeaderText="SubProyecto">
<ItemTemplate>
<asp:Literal ID="LtlSubProyecto" runat="server" Text='<%# Eval("SubProyecto") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ControlStyle-CssClass="template" ItemStyle-HorizontalAlign="Left" ItemStyle-Width="275" HeaderText="Contrato">
<ItemTemplate>
<asp:Literal ID="LtlContrato" runat="server" Text='<%# Eval("Contrato") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ControlStyle-CssClass="template" ItemStyle-HorizontalAlign="Left" ItemStyle-Width="100" HeaderText="Vencimiento" HeaderStyle-HorizontalAlign="Center">
<ItemTemplate>
<asp:Literal ID="LtlVencimiento" runat="server" Text='<%# Eval("Vencimiento") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ControlStyle-CssClass="template" ItemStyle-HorizontalAlign="Left" ItemStyle-Width="275" HeaderText="Nombre">
<ItemTemplate>
<asp:Literal ID="LtlNombreComercial" runat="server" Text='<%# Eval("NombreComercial") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ControlStyle-CssClass="template" ItemStyle-HorizontalAlign="Left" ItemStyle-Width="275" HeaderText="Documento">
<ItemTemplate>
<asp:Literal ID="LtlDocumentacion" runat="server" Text='<%# Eval("Documentacion") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Center" HeaderText="Estado" ItemStyle-Width="40px">
<ItemTemplate>
<%-- <asp:CheckBox ID="chkEstatus" runat="server" CssClass="make-switchsd" Enabled="false" ></asp:CheckBox>--%>
<asp:Literal ID="LtlEstatus" runat="server" Text='<%# Eval("SCompleto") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Left" HeaderText="Observaciones" ItemStyle-Width="100">
<ItemTemplate>
<asp:TextBox ID="TxtObservaciones" Width="300" MaxLength="100" runat="server" Text='<%# Eval("Observacion") %>'></asp:TextBox>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Left" HeaderText="Fecha limite" ItemStyle-Width="100" Visible="false">
<ItemTemplate>
<asp:TextBox ID="TxtFechaLimite" Width="100" onKeyPress="return false;" MaxLength="10" runat="server" Text='<%# Eval("FechaLimite") %>'></asp:TextBox>
<ajax:CalendarExtender runat="server" ID="Calendario6" TargetControlID="TxtFechaLimite" Enabled="True"></ajax:CalendarExtender>
<asp:RequiredFieldValidator ID="rfvFechaI6" runat="server" ControlToValidate="TxtFechaLimite" Display="None" ErrorMessage="El campo <b>''Fecha limite''</b> es requerido por la aplicación, por favor ingrese una fecha." ValidationGroup="GrpRL"></asp:RequiredFieldValidator>
<asp:CompareValidator ID="cvFechaI6" runat="server" ControlToValidate="TxtFechaLimite" Display="None" ErrorMessage="El campo <b>''Fecha Limite''</b> no tienes el formato correcto, por favor intente de nuevo con el siguiente formato: (dd/mm/yyyy)." Operator="DataTypeCheck" Type="Date" ValidationGroup="GrpRL"></asp:CompareValidator>
<ajax:ValidatorCalloutExtender ID="vcoFfvFI4" runat="server" HighlightCssClass="vco" TargetControlID="rfvFechaI6" Width="350px"></ajax:ValidatorCalloutExtender>
<ajax:ValidatorCalloutExtender ID="vcoCvFI4" runat="server" HighlightCssClass="vco" TargetControlID="cvFechaI6" Width="350px"></ajax:ValidatorCalloutExtender>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Left" HeaderText="Vigencia" ItemStyle-Width="100" Visible="false">
<ItemTemplate>
<asp:TextBox ID="TxtFechaVigencia" Width="100" MaxLength="10" runat="server" Text='<%# Eval("FechaVigencia") %>'></asp:TextBox>
<ajax:CalendarExtender runat="server" ID="Calendario7" TargetControlID="TxtFechaVigencia" Enabled="True"></ajax:CalendarExtender>
<asp:CompareValidator ID="cvTxtFechaVigencia" runat="server" ControlToValidate="TxtFechaVigencia" Display="None" ErrorMessage="El campo <b>''Fecha Limite''</b> no tienes el formato correcto, por favor intente de nuevo con el siguiente formato: (dd/mm/yyyy)." Operator="DataTypeCheck" Type="Date" ValidationGroup="GrpRL"></asp:CompareValidator>
<ajax:ValidatorCalloutExtender ID="vcoCvFI5" runat="server" HighlightCssClass="vco" TargetControlID="cvTxtFechaVigencia" Width="350px"></ajax:ValidatorCalloutExtender>
</ItemTemplate>
</asp:TemplateField>
<%-- <asp:TemplateField ItemStyle-HorizontalAlign="Right" ItemStyle-Width="50px">
<ItemTemplate>
<asp:LinkButton ID="ImgUpload" runat="server" AlternateText="Editar" CausesValidation="False"
CssClass="btn btn-circle btn-sm green" Text="<i class='fa fa-upload' title='Subir documento' ></i>" />
</ItemTemplate>
</asp:TemplateField>--%>
<asp:TemplateField ItemStyle-HorizontalAlign="Right" ItemStyle-Width="50px" HeaderText="Cargar">
<ItemTemplate>
<asp:LinkButton ID="ImgUpload" runat="server" AlternateText="Editar" CausesValidation="False"
CssClass="btn btn-circle btn-sm green" Text="<i class='fa fa-upload' title='Subir documento' ></i>" />
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Left" ItemStyle-Width="50px" HeaderText="Ver">
<ItemTemplate>
<asp:Literal ID="ImgDownLoad" runat="server"></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Left" ItemStyle-Width="50px" HeaderText="Rechazar">
<ItemTemplate>
<asp:LinkButton ID="ImgRechazar" runat="server" CssClass="btn btn-circle btn-sm red" Text="<i class='fa fa-exclamation-triangle'></i>" Visible="false"
data-toggle="confirmation" data-popout="true" data-original-title="Confirmar" data-btn-ok-label="si"
OnClick="ImgRechazar_Click" >
</asp:LinkButton>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Left" ItemStyle-Width="50px" HeaderText="Aceptar">
<ItemTemplate>
<asp:LinkButton ID="ImgAceptar" runat="server" CssClass="btn btn-circle btn-sm green" Text="<i class='fa fa-check'></i>" Visible="false"
data-toggle="confirmation" data-popout="true" data-original-title="Confirmar" data-btn-ok-label="si"
OnClick="ImgAceptar_Click" >
</asp:LinkButton>
</ItemTemplate>
</asp:TemplateField>
<%-- <asp:TemplateField ItemStyle-HorizontalAlign="Left" ItemStyle-Width="50px" HeaderText="Aprobar">
<ItemTemplate>
<asp:Literal ID="ImgAprobar" runat="server"></asp:Literal>
</ItemTemplate>
</asp:TemplateField>--%>
</Columns>
</asp:GridView>
</div>
</ContentTemplate>
</asp:UpdatePanel>
</div>
</ContentTemplate>
</asp:UpdatePanel>
</asp:Content>
<asp:Content ID="Content8" ContentPlaceHolderID="JS" runat="Server">
<script src="/Scripts/DataTables.js"></script>
<script>
<%-- $(document).ready(function () {
$('#<%= TxtFechaI.ClientID %>').mask('00/00/0000');
$('#<%= TxtFechaF.ClientID %>').mask('00/00/0000');
})
function OrdenarGvDocumentos() {
var Tam = TamañoVentana();
var Alto = Tam.height - 330;
if (Alto < 100) {
Alto = 100;
}
$('#<%=GvDocumentos.ClientID%>').DataTable({
retrieve: true,
scrollY: Alto + 'px',
scrollCollapse: true,
paging: false,
searching: false,
info: false,
ordering: true,
colReorder: {
"fixedColumnsLeft": 1
}
});
$('#GVDocumentos').parent().parent().children().first().css("position", "static");
}--%>
</script>
</asp:Content>

380
Compras/RepDocumentacionProveedor.aspx.vb Normal file
View File

@@ -0,0 +1,380 @@
Option Strict On
Imports System.Data
Imports System.IO
Imports Extensiones
Imports GemBox.Spreadsheet
Partial Class Proveedores_RepDocumentacionProveedor
Inherits ClsPaginas
Private Property DTDatos As DataTable
Get
If ViewState("DTDatos") Is Nothing Then
Return New DataTable
Else
Return DirectCast(ViewState("DTDatos"), DataTable)
End If
End Get
Set(value As DataTable)
ViewState("DTDatos") = value
End Set
End Property
Private Property DTHeaders As DataTable
Get
If ViewState("DTHeaders") Is Nothing Then
Return New DataTable
Else
Return DirectCast(ViewState("DTHeaders"), DataTable)
End If
End Get
Set(value As DataTable)
ViewState("DTHeaders") = value
End Set
End Property
Private Sub Proveedores_RepDocumentacionProveedor_Load(sender As Object, e As EventArgs) Handles Me.Load
If Not Page.IsPostBack Then
CargaCombos()
'TxtFechaI.Text = Now.AddMonths(-3).ToString("dd/MM/yyyy")
'TxtFechaF.Text = Now.ToString("dd/MM/yyyy")
TxtFechaI.Text = ""
TxtFechaF.Text = ""
LnkDescargarExcel.Visible = False
End If
'ExportaExcel()
End Sub
Private Sub CargaCombos()
DdlProveedores.setEsWebService(True)
DdlProveedores.Attributes.Add("data-metodo", "getproveedores")
DdlProveedores.SelectedText = "Todos"
DdlProveedores.SelectedValue = "-1"
End Sub
Protected Sub btConsultar_Click(sender As Object, e As EventArgs) Handles btConsultar.Click
CargaDocumentacion()
End Sub
Private Sub CargaDocumentacion()
Dim CveProveedor As Integer = -1
Dim FechaInicio As Date
Dim FechaFin As Date
If TxtFechaI.Text = "" Then
FechaInicio = MinFecha
Else
FechaInicio = TxtFechaI.Text.ToDate
End If
If TxtFechaF.Text = "" Then
FechaFin = MaxFecha
Else
FechaFin = TxtFechaF.Text.ToDate
End If
If DdlProveedores.txtValue.Value.ToEntero > 0 Then
CveProveedor = DdlProveedores.txtValue.Value.ToEntero
End If
Dim obEDoc As New ClsEdocumentacion
If obEDoc.DocumentacionElectronicaAuditoriaGet(CveProveedor, TxtFechaI.Text.ToDate, TxtFechaF.Text.ToDate, UsuarioActual.CveEmpresa, 3, DdlEstatus.SelectedValue.ToEntero) Then
GvDocumentos.DataSource = obEDoc.DtResultados
Else
GvDocumentos.DataSource = Nothing
End If
obEDoc.Dispose()
GvDocumentos.DataBind()
UPGvDocumentos.Update()
End Sub
Protected Sub GvDocumentos_RowDataBound(sender As Object, e As GridViewRowEventArgs) Handles GvDocumentos.RowDataBound
If e.Row.RowType = DataControlRowType.DataRow Then
Dim Adjunto As String = e.Row.DBCampo("Adjunto").ToString
Dim ImgDownLoad As Literal = e.Row.FCLiteral("ImgDownLoad")
Dim ImgRequired As Literal = e.Row.FCLiteral("ImgRequired")
Dim txtFechaLimite As TextBox = e.Row.FCTextBox("TxtFechaLimite")
Dim txtFechaVigencia As TextBox = e.Row.FCTextBox("TxtFechaVigencia")
Dim Documentacion As String = e.Row.DataKey("Documentacion")
Dim ImgRechazar As LinkButton = e.Row.FCLinkButton("ImgRechazar")
Dim ImgAceptar As LinkButton = e.Row.FCLinkButton("ImgAceptar")
Dim requerido As Boolean = Boolean.Parse(e.Row.DBCampo("Requerido"))
'Dim chkEstatus As CheckBox = e.Row.FCCheckBox("chkEstatus")
'Dim RDBAcptar As RadioButton = e.Row.FCRadioButton("RDBAcptar")
'Dim RDBRechazar As RadioButton = e.Row.FCRadioButton("RDBRechazar")
Dim separado As Char() = ".".ToCharArray
Dim array() As String = Adjunto.Split(separado)
Dim extencion As String = ""
Dim DiasLimite As Integer = e.Row.DataKey("DiasLimite").ToString.ToEntero
Dim AplicaDiasLimite As Boolean = If(e.Row.DataKey("AplicaDiasLimite").ToString = "1", True, False)
Dim AplicaFechaVencimiento As Boolean = If(e.Row.DataKey("AplicaFechaVencimiento").ToString = "1", True, False)
txtFechaLimite.Visible = If(AplicaDiasLimite, True, False)
txtFechaVigencia.Visible = If(AplicaFechaVencimiento, True, False)
If e.Row.DBCampo("FechaVigencia").ToString.Length > 0 Then
txtFechaVigencia.Text = e.Row.DBCampo("FechaVigencia").ToString.ToDate.ToString("dd/MM/yyyy")
If DateTime.Today > e.Row.DBCampo("FechaVigencia").ToString.ToDateTime Then
txtFechaVigencia.ForeColor = Drawing.Color.Red
End If
End If
If array.Length > 0 Then
extencion = array(array.Length - 1)
End If
'If e.Row.DBCampo("Estatus").ToString.ToEntero = 3 Then
' RDBAcptar.Checked = True
'Else
' chkEstatus.Checked = False
'End If
txtFechaLimite.Text = e.Row.DBCampo("FechaLimite").ToString.ToDate.ToString("dd/MM/yyyy")
If e.Row.DBCampo("FechaVigencia").ToString.Length > 0 Then
txtFechaVigencia.Text = e.Row.DBCampo("FechaVigencia").ToString.ToDate.ToString("dd/MM/yyyy")
End If
Dim scripMascara = "$('#" & txtFechaLimite.ClientID & "').mask('00/00/0000');$('#" & txtFechaVigencia.ClientID & "').mask('00/00/0000');"
RegistraScript(scripMascara, "scriptMascara")
If Adjunto.Trim.Length > 0 Then
Dim linkDescarga = "/Empresas/" & UsuarioActual.Empresa.CveEmpresa & "/Edoc/Proveedor/" & e.Row.DataKey("CveProveedor") & "/" & Adjunto
Dim linkDescargaArchivo = UsuarioActual.Empresa.Ruta & "Edoc/Proveedor/" & e.Row.DataKey("CveProveedor") & "/" & Adjunto
If File.Exists(linkDescargaArchivo) Then
ImgDownLoad.Visible = True
If extencion.Length > 0 Then
ImgDownLoad.Text = String.Format(" <a class='btn btn-circle btn-sm blue' href='{0}' target='_black' download='{1}'><i class='fa fa-download' title='Descargar documento'></i></a>", linkDescarga, Documentacion & "." & extencion)
Else
ImgDownLoad.Text = String.Format(" <a class='btn btn-circle btn-sm blue' href='{0}' target='_black' download='{1}'><i class='fa fa-download' title='Descargar documento'></i></a>", linkDescarga, Documentacion)
End If
If e.Row.DBCampo("Estatus").ToString.ToEntero.Contiene(2, 3) Then
ImgRechazar.Visible = True
End If
If e.Row.DBCampo("Estatus").ToString.ToEntero.Contiene(2) Then
ImgAceptar.Visible = True
End If
'If e.Row.DBCampo("Estatus").ToString.ToEntero.Contiene(3) Then
' chkEstatus.Checked = True
'End If
Else
ImgDownLoad.Visible = False
End If
Else
ImgDownLoad.Visible = False
End If
If requerido Then
ImgRequired.Text = " <a class='btn btn-circle btn-sm yelow' href='#' data-toggle='tooltip' title=' Requerido!' ><i class='fa fa-asterisk '></i></a>"
End If
'chkEstatus.Checked = ImgDownLoad.Visible
End If
End Sub
Protected Sub ImgRechazar_Click(sender As Object, e As EventArgs)
Dim GvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow)
Dim Obsebaciones As String = GvRow.FCTextBox("TxtObservaciones").Text
If Obsebaciones.Trim.Length = 0 Then
Alert("Debe de proporcionar una obserbación o motivo de rechazo.", TipoMensaje.MsgAdvertencia)
Exit Sub
End If
Dim Correo As String = GvRow.DataKey("ContactoMail")
Dim Documentacion As String = GvRow.DataKey("Documentacion")
Dim Obserbaciones As String = GvRow.FCTextBox("TxtObservaciones").Text
Dim Adjunto As String = GvRow.DataKey("Adjunto")
Dim CveProveedor As Integer = GvRow.DataKey("CveProveedor").ToEntero
Dim Archivo As String = UsuarioActual.Empresa.Ruta & $"Edoc\Proveedor\{CveProveedor}\{Adjunto}"
Dim objEdoc As New ClsEdocumentacion
Dim ErrorProceso As Boolean = False
objEdoc.IniciaTransacSQL()
If objEdoc.DocumentacionElectronicaUpdate(GvRow.DataKey("CveDocumentacionElectronica").ToEntero, GvRow.DataKey("CveDocumentacion").ToEntero, -1, -1, GvRow.DataKey("CveProveedor").ToEntero, 1,
If(Obsebaciones.Trim.Length > 0, Obsebaciones, GvRow.DataKey("Observacion")), "-1",
UsuarioActual.CveUsuario, GvRow.DataKey("FechaLimite").ToDate, GvRow.DataKey("FechaVigencia").ToDate) Then
Try
File.Delete(Archivo)
Catch ex As Exception
ErrorProceso = True
End Try
If Not ErrorProceso Then
Dim Cuerpo As String = $"<p>Por medio del presente correo se le notifica que el documento <b>{Documentacion}</b> &nbsp; ha sido rechazado por la siguiente causa: <b>{Obserbaciones}</b> &nbsp;por favor ingrese nuevamente al portal &nbsp;y agr&eacute;guelo nuevamente.&nbsp;</p>
<p>Atentamente:</p>
<p>Saludos.</p>"
If Not MandaCorreo(Correo, $"{ UsuarioActual.Empresa.Empresa } documento Rechazado", Cuerpo) Then
ErrorProceso = True
End If
Alert($"El documento {GvRow.DataKey("Documentacion") } fue rechazado.")
End If
Else
ErrorProceso = True
End If
If ErrorProceso Then
objEdoc.RollBack()
Else
objEdoc.Commit()
End If
objEdoc.Dispose()
CargaDocumentacion()
End Sub
Protected Sub ImgAceptar_Click(sender As Object, e As EventArgs)
Dim GvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow)
Dim objEdoc As New ClsEdocumentacion
If objEdoc.DocumentacionElectronicaUpdate(GvRow.DataKey("CveDocumentacionElectronica").ToEntero, GvRow.DataKey("CveDocumentacion").ToEntero, -1, -1, GvRow.DataKey("CveProveedor").ToEntero, 3,
"", "-1", UsuarioActual.CveUsuario, GvRow.DataKey("FechaLimite").ToDate, GvRow.DataKey("FechaVigencia").ToDate) Then
Alert("Dcumento Aceptado.")
End If
objEdoc.Dispose()
CargaDocumentacion()
End Sub
Private Function MandaCorreo(Para As String, Asunto As String, Body As String) As Boolean
Dim Respuesta As Boolean = False
Dim Mail As New ClsSisMail()
Para = If(Para IsNot Nothing, Para, "")
Asunto = If(Asunto IsNot Nothing, Asunto, "")
Body = If(Body IsNot Nothing, Body, "")
Dim ListaArchivos As New List(Of ClsSisMail.ArchivoMail)
If Mail.SendMail(ClsPaginas.EmpresaNotificaciones, Para, Asunto, Body, Archivos:=ListaArchivos) Then
Respuesta = True
End If
Return Respuesta
End Function
'Protected Sub BrnProcesar_Click(sender As Object, e As EventArgs)
' Dim objEdoc As New ClsEdocumentacion
' objEdoc.IniciaTransacSQL()
' Dim ErrorProceso As Boolean = False
' For Each GvRow As GridViewRow In GvDocumentos.Rows
' Dim RDBAcptar As RadioButton = GvRow.FCRadioButton("RDBAcptar")
' Dim RDBRechazar As RadioButton = GvRow.FCRadioButton("RDBRechazar")
' Dim ContactoMail As String = GvRow.DataKey("ContactoMail")
' If RDBAcptar.Checked Or RDBRechazar.Checked Then
' Dim Estatus As Integer = If(RDBAcptar.Checked, 3, 1)
' Dim Obsebaciones As String = If(RDBAcptar.Checked, "", GvRow.FCTextBox("TxtObservaciones").Text)
' If Not objEdoc.DocumentacionElectronicaUpdate(GvRow.DataKey("CveDocumentacionElectronica").ToEntero, GvRow.DataKey("CveDocumentacion").ToEntero, -1, -1, GvRow.DataKey("CveProveedor").ToEntero, Estatus,
' If(Obsebaciones.Trim.Length > 0, Obsebaciones, GvRow.DataKey("Observacion")), "-1", UsuarioActual.CveUsuario, GvRow.DataKey("FechaLimite").ToDate,
' GvRow.DataKey("FechaVigencia").ToDate) Then
' ErrorProceso = True
' Exit For
' Else
' If Estatus = 1 Then
' 'Enviar correo rechazo con obserbación
' End If
' End If
' Else
' 'Enviar correo archivo pediente
' End If
' Next
' If ErrorProceso Then
' objEdoc.RollBack()
' Else
' objEdoc.Commit()
' Alert("Proceso Terminado correctamente.")
' End If
' objEdoc.Dispose()
'End Sub
End Class

353
Edoc/CatDocumentos.aspx Normal file
View File

@@ -0,0 +1,353 @@
<%@ Page Title="RH - Catálogo de Documentos" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="CatDocumentos.aspx.vb" Inherits="RH_CatDocumentos" %>
<%@ Register Assembly="AjaxControlToolkit" Namespace="AjaxControlToolkit" TagPrefix="asp" %>
<asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server">
</asp:Content>
<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
<style>
#C_GvDocumentos > tbody > tr:nth-child(2) > td:nth-child(1){
min-width:275px!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 Documentos
</asp:Content>
<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
<asp:UpdatePanel runat="server" ID="UpAgregar">
<ContentTemplate>
<li>
<asp:LinkButton runat="server" ID="BtnAgregarDocumento" CssClass="" data-toggle="tooltip"
data-placement="left" title="Agregar Documento" Text="<i class='fa fa-plus'></i> Agregar Documento"></asp:LinkButton>
</li>
<%--<li>
<a data-toggle="modal" data-target="#DvTags" ><i class="fa fa-tags" ></i> Etiquetas</a>
</li>--%>
</ContentTemplate>
</asp:UpdatePanel>
</asp:Content>
<asp:Content ID="Content6" ContentPlaceHolderID="C" runat="Server">
<asp:UpdatePanel ID="UpDatosGral" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<asp:UpdatePanel ID="UPBtnDocumentacionNext4" runat="server">
<ContentTemplate>
<div class="portlet smmallpadding light bordered" id="DIVDocumentacion" runat="server">
<div class="portlet-title">
<div class="caption font-green">
<i class="icon-pin font-green"></i>
<span class="caption-subject bold uppercase">Documentación</span>
</div>
</div>
<div class="portlet-body form">
<asp:UpdatePanel ID="UPGvDocumentos" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<asp:GridView ID="GvDocumentos" runat="server" AutoGenerateColumns="False"
DataKeyNames="CveDocumentacion,Documentacion,DocumentacionFormato,Orden,Estatus,CveDocumentacionTipo,DocumentacionTipo,Requerido,DiasLimite,AplicaDiasLimite,AplicaFechaVencimiento,Periodicidad"
EmptyDataText="No se encontraron registros de documentos" CssClass="table table-hover table-advance Widthall" GridLines="None">
<Columns>
<asp:TemplateField ItemStyle-HorizontalAlign="Left" ItemStyle-Width="60px" HeaderText="Documento">
<ItemTemplate>
<asp:Literal ID="LtlDocumentacion" runat="server" Text='<%# Eval("Documentacion") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ControlStyle-CssClass="template" ItemStyle-HorizontalAlign="Left" ItemStyle-Width="275" HeaderText="Formato">
<ItemTemplate>
<asp:Literal ID="LtlDocumentacionFormato" runat="server" Text='<%# Eval("DocumentacionFormato") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Left" HeaderText="Documentacion Tipo">
<ItemTemplate>
<asp:Literal ID="LtlDocumentacionTipo" runat="server" Text='<%# Eval("DocumentacionTipo") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Left" HeaderText="Dias Limite">
<ItemTemplate>
<asp:Literal ID="LtlDocumentacionDiasLimite" runat="server" Text='<%# If(Eval("DiasLimite").ToString() = "" Or Eval("DiasLimite").ToString() = "0", "-", Eval("DiasLimite").ToString()) %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Left" HeaderText="Periodicidad">
<ItemTemplate>
<asp:Literal ID="LtlPeriodicidad" runat="server" Text='<%# If(Eval("Periodicidad").ToString() = "" Or Eval("Periodicidad").ToString() = "0", "-", Eval("Periodicidad").ToString()) %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Left" HeaderText="Aplica Limite">
<ItemTemplate>
<asp:Literal ID="LtlAplicaDiasLimite" runat="server" Text='<%# If(Eval("AplicaDiasLimite").ToString() = "1", "Si", "No") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Left" HeaderText="Aplica Vencimiento">
<ItemTemplate>
<asp:Literal ID="LtlDocumentacionAplicaFechaVencimiento" runat="server" Text='<%# If(Eval("AplicaFechaVencimiento").ToString() = "1", "Si", "No") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Left" HeaderText="Estatus">
<ItemTemplate>
<asp:Literal ID="LtlDocumentacionEstatus" runat="server" Text='<%# If(Eval("Estatus").ToString() = "True", "Activo", "Inactivo") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Left" HeaderText="Requerido">
<ItemTemplate>
<asp:Literal ID="LtlRequerido" runat="server" Text='<%# If(Eval("Requerido").ToString() = "True", "Requerido", "No requerido") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Right" HeaderText="Orden" ItemStyle-Width="100">
<ItemTemplate>
<asp:Literal ID="LtlOrden" runat="server" Text='<%# Eval("Orden") %>' />
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Center" ItemStyle-Width="50px">
<ItemTemplate>
<asp:Literal ID="ImgDownLoad" runat="server"></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Center" ItemStyle-Width="50px">
<ItemTemplate>
<asp:LinkButton ID="imgE" runat="server" AlternateText="Editar" ToolTip="Editar documento" CausesValidation="False" OnClick="Edit_ClickDocumentacion"
CssClass="btn btn-circle btn-sm green" Text="<i class='fa fa-pencil' Tittle='Editar Documento' ></i>" />
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Center" ItemStyle-Width="50px">
<ItemTemplate>
<asp:LinkButton ID="lnkEliminar" OnClick="Remove_ClickDocumentacion" runat="server" AlternateText="Editar" ToolTip="Eliminar" CausesValidation="False"
CssClass="btn btn-circle btn-sm red" Text="<i class='icon-trash' title='Eliminar'></i>" Title="Eliminar Documento" data-toggle="confirmation" data-popout="true" data-original-title="¿Desea eliminar el documento?" data-btn-ok-label="si" />
</ItemTemplate>
</asp:TemplateField>
</Columns>
</asp:GridView>
</ContentTemplate>
</asp:UpdatePanel>
</div>
</div>
<div class="row col-md-12 ">
<asp:LinkButton runat="server" Visible="false" CommandArgument="4" ID="BtnDocumentacionNext4" CssClass="btn btn-primary" data-toggle="tooltip" data-placement="left" ValidationGroup="GpoDocumentacion" Text="Guardar"></asp:LinkButton>
</div>
</ContentTemplate>
<Triggers>
<asp:AsyncPostBackTrigger ControlID="BtnDocumentacionNext4" />
</Triggers>
</asp:UpdatePanel>
</ContentTemplate>
</asp:UpdatePanel>
<div id="divAgregarDocumentacion" class="modal ADS fade" role="dialog">
<div class="modal-dialog" style="width: 450px;">
<asp:UpdatePanel runat="server" class="modal-content" ID="UpModalDocumentacion" UpdateMode="Conditional">
<ContentTemplate>
<div class="modal-header ">
<button type="button" class="close" data-dismiss="modal">×</button>
<h4 class="modal-title">
<h4> <asp:Literal ID="LtlTituloModalDocumentacion" runat="server">Agregar Documento</asp:Literal></h4>
</h4>
</div>
<div class="modal-body">
<div class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="Txtdocumentacion" CssClass="form-control" MaxLength="100" runat="server"></asp:TextBox>
<asp:RequiredFieldValidator ID="rfvTxtdocumentacion" runat="server" ControlToValidate="Txtdocumentacion" ValidationGroup="GrpEscolaridad" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Institución''</b> es necesario, por favor ingréselo."></asp:RequiredFieldValidator>
<label for="<%= Txtdocumentacion.ClientID.ToString()%>">Documento:</label>
</div>
<div class="form-group form-md-line-input input-iconright">
<asp:DropDownList ID="DdlDocumentacionTipo" runat="server" Width="150" CssClass=" select2me form-control " DataValueField="CveDocumentacionTipo" DataTextField="DocumentacionTipo">
</asp:DropDownList>
<asp:RequiredFieldValidator InitialValue="-1" ID="rfvDdlDocumentacionTipo" ControlToValidate="DdlDocumentacionTipo" CssClass="help-block errorimput" ValidationGroup="GrpEscolaridad" runat="server" ErrorMessage="Seleccione una de las opciones"></asp:RequiredFieldValidator>
<label for="<%= DdlDocumentacionTipo.ClientID.ToString()%>">Tipo de documento:</label>
</div>
<div class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtOrden" CssClass="form-control" onkeypress="validate(event)" MaxLength="3" runat="server"></asp:TextBox>
<asp:RequiredFieldValidator ID="rfvTxtOrden" runat="server" ControlToValidate="TxtOrden" ValidationGroup="GrpEscolaridad" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Institución''</b> es necesario, por favor ingréselo."></asp:RequiredFieldValidator>
<ajax:FilteredTextBoxExtender ID="filTxtOrden" runat="server" TargetControlID="TxtOrden" FilterType="Numbers" ValidChars="" />
<label for="<%= TxtOrden.ClientID.ToString()%>">Orden:</label>
</div>
<%-- <div class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtDocumentacionFormato" CssClass="form-control" MaxLength="50" runat="server"></asp:TextBox>
<ajax:FilteredTextBoxExtender ID="filTxtDocumentacionFormato" runat="server" TargetControlID="TxtDocumentacionFormato" FilterType="Numbers, uppercaseLetters,LowercaseLetters,Custom" ValidChars="_" />
<label for="<%= TxtDocumentacionFormato.ClientID.ToString()%>">Nombre de Formato:</label>
</div>--%>
<div class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtDiasLimite" CssClass="form-control" onkeypress="validate(event)" MaxLength="2" runat="server"></asp:TextBox>
<asp:RequiredFieldValidator ID="rfvTxtDiasLimite" runat="server" ControlToValidate="TxtDiasLimite" ValidationGroup="GrpEscolaridad" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo es necesario, por favor ingréselo."></asp:RequiredFieldValidator>
<ajax:FilteredTextBoxExtender ID="FilTxtDiasLimite" runat="server" TargetControlID="TxtDiasLimite" FilterType="Numbers" ValidChars="" />
<label for="<%= TxtOrden.ClientID.ToString()%>">Dias Limite:</label>
</div>
<div class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtPeriodicidad" CssClass="form-control" onkeypress="validate(event)" MaxLength="2" runat="server"></asp:TextBox>
<asp:RequiredFieldValidator ID="RfvTxtPeriodicidad" runat="server" ControlToValidate="TxtPeriodicidad" ValidationGroup="GrpEscolaridad" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo es necesario, por favor ingréselo."></asp:RequiredFieldValidator>
<ajax:FilteredTextBoxExtender ID="FILTxtPeriodicidad" runat="server" TargetControlID="TxtPeriodicidad" FilterType="Numbers" ValidChars="" />
<label for="<%= TxtPeriodicidad.ClientID.ToString()%>">Periodicidad:</label>
</div>
<div class="form-group form-md-line-input input-iconright">
<asp:CheckBox ID="ChkAplicaDiasLimite" runat="server" Text ="Aplica Dias Limite" />
</div>
<div class="form-group form-md-line-input input-iconright">
<asp:CheckBox ID="ChkAplicaFechaVencimiento" runat="server" Text ="Aplica Fecha de Vencimiento" />
</div>
<div class="form-group form-md-line-input input-iconright">
<asp:CheckBox ID="chkRequerido" runat="server" Text ="Requerido" />
</div>
<div class="form-group form-md-line-input input-iconright">
<asp:CheckBox ID="chkEstatus" runat="server" Text ="Activo" />
</div>
<div class="form-group form-md-line-input input-iconright ">
<div class="row ">
<div class="col-md-12">
<asp:TextBox ID="TxtFileDocumentacion" CssClass="ADSdropzone hidden" data-maxFile="1" Text="" runat="server"></asp:TextBox>
</div>
</div>
</div>
</div>
<div class="modal-footer">
<asp:Button ID="BtnAgregarDocumentoModal" runat="server" class="btn btn-success" Text="Agregar" ValidationGroup="GrpEscolaridad" />
<button id="BtnCancelarEscolaridadModal4" runat="server" type="button" class="btn default" data-dismiss="modal">Cancelar</button>
</div>
</ContentTemplate>
</asp:UpdatePanel>
</div>
</div>
<div id="DvTags" class="modal ADS fade" role="dialog">
<div class="modal-dialog" style="width: 450px;">
<asp:UpdatePanel runat="server" class="modal-content" ID="UpEtiquetas" UpdateMode="Conditional">
<ContentTemplate>
<div class="modal-header ">
<button type="button" class="close" data-dismiss="modal">×</button>
<h4 class="modal-title">
<h4> <asp:Literal ID="Literal2" runat="server">Etiquetas</asp:Literal></h4>
</h4>
</div>
<div class="modal-body">
<table class="table table-hover">
<thead>
<tr>
<th>Etiqueta</th>
<th>Descripción</th>
</tr>
</thead>
<tbody>
<tr><td>{Nombres}</td><td>Nombre</td></tr>
<tr><td>{APaterno}</td><td>Apellido Paterno</td></tr>
<tr><td>{AMaterno}</td><td>Apellido Materno</td></tr>
<tr><td>{NombreCompleto}</td><td>Nombre Completo</td></tr>
<tr><td>{RFC}</td><td></td></tr>
<tr><td>{Estatura}</td> <td></td></tr>
<tr><td>{Peso}</td><td></td></tr>
<tr><td>{LugarNacimiento}</td><td>Lugar de nacimie</td></tr>
<tr><td>{Edad}</td><td></td></tr>
<tr><td>{NombreTelEmergencia}</td><td>Nombre y telefono al presentarse una emergencia</td></tr>
<tr><td>{TipoSangre}</td><td></td></tr>
<tr><td>{SubProyecto}</td><td>Se refiere a la sucursal o centro de costos</td></tr>
<tr><td>{EstadoCivil}</td><td></td></tr>
<tr><td>{Direccion}</td><td></td></tr>
<tr><td>{Vivienda}</td><td></td></tr>
<tr><td>{ViviendaDueno}</td><td></td></tr>
<tr><td>{CreditoInfonavit}</td><td></td></tr>
<tr><td>{RentaMensual}</td><td></td></tr>
<tr><td>{TransportePublico}</td><td></td></tr>
<tr><td>{TrabajadoAnteriormente}</td><td>La persona a trabajado enteriormente en la empresa</td></tr>
<tr><td>{TrabajadoAnteriormenteObservaciones}</td><td>Detalle de trabajo enterior en empresa</td></tr>
<tr><td>{ParientesEmpresa}</td><td>Se tienen parientes en la empresa</td></tr>
<tr><td>{AcusadoDelito}</td><td></td></tr>
<tr><td>{AcusadoDelitoObservaciones}</td><td></td></tr>
<tr><td>{Calle}</td><td></td></tr>
<tr><td>{Colonia}</td><td></td></tr>
<tr><td>{CP}</td><td></td></tr>
<tr><td>{Telefono}</td><td></td></tr>
<tr><td>{Celular}</td><td></td></tr>
<tr><td>{Correo}</td><td></td></tr>
<tr><td>{NumeroSS}</td><td></td></tr>
<tr><td>{Licencia}</td><td></td></tr>
<tr><td>{CartillaMilitar}</td><td></td></tr>
<tr><td>{CURP}</td><td></td></tr>
<tr><td>{CredencialElector}</td><td></td></tr>
<tr><td>{FechaIngreso}</td><td></td></tr>
<tr><td>{Puesto}</td><td></td></tr>
<tr><td>{FechaActual}</td><td></td></tr>
<tr><td>{FechaActualDF}</td><td></td></tr>
</tbody>
</table>
</div>
<div class="modal-footer">
<button id="btnCerrarEtiquetas" runat="server" type="button" class="btn btn-Default" data-dismiss="modal">Cerrar</button>
</div>
</ContentTemplate>
</asp:UpdatePanel>
</div>
</div>
</div>
</asp:Content>
<asp:Content ID="Content7" ContentPlaceHolderID="JS" runat="Server">
<script>
function validate(evt) {
var theEvent = evt || window.event;
var key = theEvent.keyCode || theEvent.which;
key = String.fromCharCode(key);
var regex = /[0-9]|\./;
if (!regex.test(key)) {
theEvent.returnValue = false;
if (theEvent.preventDefault) theEvent.preventDefault();
}
}
</script>
</asp:Content>

414
Edoc/CatDocumentos.aspx.vb Normal file
View File

@@ -0,0 +1,414 @@

Imports System.Data
Imports System.Linq
Imports Extensiones
Imports System.IO
Partial Class RH_CatDocumentos
Inherits ClsPaginas
Private Property DTDocumentacion As DataTable
Get
If ViewState("DTDocumentacion") Is Nothing Then
Return New DataTable
Else
Return DirectCast(ViewState("DTDocumentacion"), DataTable)
End If
End Get
Set(value As DataTable)
ViewState("DTDocumentacion") = value
End Set
End Property
Property Documentacion As String
Get
If ViewState("Documentacion") Is Nothing Then
Return "-1"
Else
Return ViewState("Documentacion").ToString
End If
End Get
Set(value As String)
ViewState("Documentacion") = value
End Set
End Property
Property CveDocumentacion As Integer
Get
If ViewState("CveDocumentacion") Is Nothing Then
Return -1
Else
Return DirectCast(ViewState("CveDocumentacion"), Integer)
End If
End Get
Set(value As Integer)
ViewState("CveDocumentacion") = value
End Set
End Property
Private Property DocumentacionTipo As String
Get
If ViewState("DocumentacionTipo") Is Nothing Then
Return ""
Else
Return ViewState("DocumentacionTipo").ToString
End If
End Get
Set(value As String)
End Set
End Property
Private Property CveDocumentacionTipo As Integer
Get
If ViewState("CveDocumentacionTipo") Is Nothing Then
Return -1
Else
Return DirectCast(ViewState("CveDocumentacionTipo"), Integer)
End If
End Get
Set(value As Integer)
ViewState("CveDocumentacionTipo") = value
End Set
End Property
Property ActualizarDocumentacion As Boolean
Get
If ViewState("ActualizarDocumentacion") Is Nothing Then
Return True
Else
Return DirectCast(ViewState("ActualizarDocumentacion"), Boolean)
End If
End Get
Set(value As Boolean)
ViewState("ActualizarDocumentacion") = value
End Set
End Property
Property Estatus As Boolean
Get
If ViewState("Estatus") Is Nothing Then
Return 0
Else
Return DirectCast(ViewState("Estatus"), Boolean)
End If
End Get
Set(value As Boolean)
ViewState("Estatus") = value
End Set
End Property
Property DocumentacionFormato As String
Get
If ViewState("DocumentacionFormato") Is Nothing Then
Return ""
Else
Return ViewState("DocumentacionFormato").ToString
End If
End Get
Set(value As String)
ViewState("DocumentacionFormato") = value
End Set
End Property
Property Requerido As Boolean
Get
If ViewState("Requerido") Is Nothing Then
Return True
Else
Return DirectCast(ViewState("Requerido"), Boolean)
End If
End Get
Set(value As Boolean)
ViewState("Requerido") = value
End Set
End Property
Property Orden As Integer
Get
If ViewState("Orden") Is Nothing Then
Return -1
Else
Return DirectCast(ViewState("Orden"), Integer)
End If
End Get
Set(value As Integer)
ViewState("Orden") = value
End Set
End Property
Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
If Not Page.IsPostBack Then
CargaDocumentacion()
CargaComboDocumentacion()
End If
End Sub
#Region "D O C U M E N T A C I O N"
Protected Sub BtnAgregarDocumento_Click(sender As Object, e As EventArgs) Handles BtnAgregarDocumento.Click
ResetFormDocumentacion()
RegistraScript("$('#divAgregarDocumentacion').modal({ backdrop: 'static', keyboard: false});")
End Sub
Private Sub ResetFormDocumentacion()
Txtdocumentacion.Text = ""
TxtOrden.Text = ""
TxtPeriodicidad.Text = ""
TxtDiasLimite.Text = ""
BtnAgregarDocumentoModal.Text = "Agregar"
LtlTituloModalDocumentacion.Text = "Agregar documentación"
'TxtDocumentacionFormato.Text = ""
DdlDocumentacionTipo.SelectedIndex = 0
chkEstatus.Checked = True
chkRequerido.Checked = True
ActualizarDocumentacion = False
UpModalDocumentacion.Update()
End Sub
Private Sub CargaDocumentacion()
Dim objRH As New ClsEdocumentacion
If objRH.DocumentacionGet(-1, -1, -1, UsuarioActual.Empresa.CveEmpresa) Then
DTDocumentacion = objRH.DtResultados
GvDocumentos.DataSource = objRH.DtResultados
Else
DTDocumentacion = Nothing
GvDocumentos.DataSource = Nothing
End If
objRH.Dispose()
GvDocumentos.DataBind()
UPGvDocumentos.Update()
End Sub
Private Sub CargaComboDocumentacion()
Dim objDocumentacion As New ClsEdocumentacion
If objDocumentacion.DocumentacionTipoGet(UsuarioActual.CveEmpresa) Then
DdlDocumentacionTipo.DataSource = objDocumentacion.DtResultados
End If
objDocumentacion.Dispose()
DdlDocumentacionTipo.DataBind()
DdlDocumentacionTipo.Items.Insert(0, New ListItem("Seleccione un tipo", "-1"))
End Sub
Public Sub Edit_ClickDocumentacion(sender As Object, e As EventArgs)
Dim GvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow)
CveDocumentacion = GvRow.DataKey("CveDocumentacion")
Documentacion = GvRow.DataKey("Documentacion")
DocumentacionFormato = GvRow.DataKey("DocumentacionFormato")
CveDocumentacionTipo = GvRow.DataKey("CveDocumentacionTipo")
DocumentacionTipo = GvRow.DataKey("DocumentacionTipo")
Orden = GvRow.DataKey("Orden")
Estatus = GvRow.DataKey("Estatus")
Requerido = GvRow.DataKey("Requerido")
Txtdocumentacion.Text = Documentacion
TxtOrden.Text = Orden
TxtDiasLimite.Text = GvRow.DataKey("DiasLimite")
ChkAplicaDiasLimite.Checked = GvRow.DataKey("AplicaDiasLimite")
TxtPeriodicidad.Text = GvRow.DataKey("Periodicidad")
ChkAplicaFechaVencimiento.Checked = GvRow.DataKey("AplicaFechaVencimiento")
DdlDocumentacionTipo.SelectedValueExist(CveDocumentacionTipo)
chkEstatus.Checked = Estatus
chkRequerido.Checked = Requerido
LtlTituloModalDocumentacion.Text = "Actualizar Documento: " & Documentacion
BtnAgregarDocumentoModal.Text = "Actualizar"
UpModalDocumentacion.Update()
ActualizarDocumentacion = True
RegistraScript("$('#divAgregarDocumentacion').modal({ backdrop: 'static', keyboard: false});")
End Sub
Private Function GuardarArchivo(_CveDocumentacion As Integer) As String
Dim respuesta As String = ""
Dim FileExtension As String = "-1"
Dim Filesgral As List(Of Archivo) = TxtFileDocumentacion.getfiles().Archivos
Dim Filename As String = ""
For Each fileItem As Archivo In Filesgral
Try
respuesta = fileItem.filenameO
FileExtension = IO.Path.GetExtension(String.Format("{0}Temp\{1}", AppDomain.CurrentDomain.BaseDirectory, fileItem.filename)).Replace(".", "")
Dim tempArray() As String
tempArray = fileItem.filename.ToString().Split("-".ToCharArray())
Dim rutaDestino As String = UsuarioActual.Empresa.Ruta & "Formatos\" & _CveDocumentacion & "_" & fileItem.filenameO
Dim docAnterior As String = UsuarioActual.Empresa.Ruta & "Formatos\" & _CveDocumentacion & "_" & DocumentacionFormato
If DocumentacionFormato.Trim.Length > 0 Then
If File.Exists(docAnterior) Then
File.Delete(docAnterior)
End If
End If
If Not Directory.Exists(UsuarioActual.Empresa.Ruta & "\Formatos") Then
Directory.CreateDirectory(UsuarioActual.Empresa.Ruta & "\Formatos")
End If
If System.IO.File.Exists(rutaDestino) Then
System.IO.File.Delete(rutaDestino)
End If
System.IO.File.Move(fileItem.FileUrl, rutaDestino)
Catch ex As Exception
OnError("Error al cargar archivo", ex)
End Try
TxtFileDocumentacion.Text = ""
UpModalDocumentacion.Update()
Next
Return respuesta
End Function
Public Sub Remove_ClickDocumentacion(sender As Object, e As EventArgs)
Dim GvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow)
Dim _CveDocumentacion As Integer = GvRow.DataKey("CveDocumentacion")
Dim _documetacionFormato As String = GvRow.DataKey("DocumentacionFormato")
Dim objEdoc As New ClsEdocumentacion
If objEdoc.DocumentacionRemove(_CveDocumentacion, UsuarioActual.Empresa.CveEmpresa) Then
EliminarDocumentoDisco(_documetacionFormato)
Alert("Documento eliminado correctamente", TipoMensaje.MsgInformacion)
CargaDocumentacion()
End If
End Sub
Private Sub EliminarDocumentoDisco(documento As String)
Dim archivo As String = UsuarioActual.Empresa.Ruta & "Formatos\" & documento
If File.Exists(archivo) Then
File.Delete(archivo)
End If
End Sub
Protected Sub BtnAgregarDocumentoModal_Click(sender As Object, e As EventArgs) Handles BtnAgregarDocumentoModal.Click
Dim objRH As New ClsEdocumentacion
Dim intCompleto As Integer = 0
Dim _estatus As Integer = 0
Dim _requerido As Integer = 0
Dim _formato As String = ""
If chkEstatus.Checked Then
_estatus = 1
End If
If chkRequerido.Checked Then
_requerido = 1
End If
If ActualizarDocumentacion Then
_formato = GuardarArchivo(CveDocumentacion)
If objRH.DocumentacionUpdate(CveDocumentacion, Txtdocumentacion.Text.Trim, _formato, DdlDocumentacionTipo.SelectedValue.ToEntero, _estatus, TxtOrden.Text.ToEntero, _requerido, TxtDiasLimite.Text.ToEntero, ChkAplicaDiasLimite.Checked, ChkAplicaFechaVencimiento.Checked, UsuarioActual.Empresa.CveEmpresa,
TxtPeriodicidad.Text.ToEntero) Then
RegistraScript(String.Format("$('#{0}').modal('hide');", "divAgregarDocumentacion"))
Alert("Documento Actualizado correctamente.", TipoMensaje.MsgInformacion)
CargaDocumentacion()
End If
Else
If objRH.DocumentacionAdd(Txtdocumentacion.Text.Trim, _formato, DdlDocumentacionTipo.SelectedValue.ToEntero, _estatus, TxtOrden.Text.ToEntero, _requerido, TxtDiasLimite.Text.ToEntero, ChkAplicaDiasLimite.Checked, ChkAplicaFechaVencimiento.Checked, UsuarioActual.Empresa.CveEmpresa, TxtPeriodicidad.Text.ToEntero) Then
CveDocumentacion = objRH.DtResultados(0)(0).ToString.ToEntero
_formato = GuardarArchivo(CveDocumentacion)
If objRH.DocumentacionUpdate(CveDocumentacion, Txtdocumentacion.Text.Trim, _formato, DdlDocumentacionTipo.SelectedValue.ToEntero, _estatus, TxtOrden.Text.ToEntero, _requerido, TxtDiasLimite.Text.ToEntero, ChkAplicaDiasLimite.Checked, ChkAplicaFechaVencimiento.Checked, UsuarioActual.Empresa.CveEmpresa,
TxtPeriodicidad.Text.ToEntero) Then
End If
RegistraScript(String.Format("$('#{0}').modal('hide');", "divAgregarDocumentacion"))
Alert("Documento agregado correctamente.", TipoMensaje.MsgInformacion)
CargaDocumentacion()
End If
End If
ActualizarDocumentacion = False
End Sub
Protected Sub GvDocumentos_RowDataBound(sender As Object, e As GridViewRowEventArgs) Handles GvDocumentos.RowDataBound
If e.Row.RowType = DataControlRowType.DataRow Then
Dim _CveDocumentacion As Integer = e.Row.DBCampo("CveDocumentacion").ToString.ToEntero
Dim DocumetacionFormato As String = e.Row.DBCampo("DocumentacionFormato").ToString
Dim ImgDownLoad As Literal = e.Row.FCLiteral("ImgDownLoad")
Dim separado As Char() = {"."}
Dim array() As String = DocumetacionFormato.Split(separado)
Dim extencion As String = ""
If array.Length > 0 Then
extencion = array(array.Length - 1)
End If
If DocumetacionFormato.Trim.Length > 0 Then
Dim linkDescarga = "/Empresas/" & UsuarioActual.Empresa.CveEmpresa & "/Formatos/" & _CveDocumentacion & "_" & DocumetacionFormato
Dim linkDescargaArchivo = UsuarioActual.Empresa.Ruta & "\Formatos\" & _CveDocumentacion & "_" & DocumetacionFormato
If File.Exists(linkDescargaArchivo) Then
ImgDownLoad.Visible = True
If extencion.Length > 0 Then
ImgDownLoad.Text = String.Format(" <a class='btn btn-circle btn-sm blue' href='{0}' target='_black' download='{1}'><i class='fa fa-download' title='Descargar Formato'></i></a>", linkDescarga, DocumetacionFormato)
Else
ImgDownLoad.Text = String.Format(" <a class='btn btn-circle btn-sm blue' href='{0}' target='_black' download='{1}'><i class='fa fa-download' title='Descargar Formato'></i></a>", linkDescarga, DocumetacionFormato)
End If
Else
ImgDownLoad.Visible = False
End If
Else
ImgDownLoad.Visible = False
End If
End If
End Sub
#End Region
End Class

468
Edoc/CatDocumentosContratos.aspx Normal file
View File

@@ -0,0 +1,468 @@
<%@ Page Title="RH - Catálogo de Géneros" 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>
<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
</asp:Content>
<asp:Content ID="Content3" ContentPlaceHolderID="HB" runat="Server">
</asp:Content>
<asp:Content ID="Content4" ContentPlaceHolderID="E" runat="Server">
Documentos Contratos
</asp:Content>
<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
<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>
</li>
</ContentTemplate>--%>
</asp:UpdatePanel>
</asp:Content>
<asp:Content ID="Content6" ContentPlaceHolderID="C" runat="Server">
<asp:UpdatePanel ID="UpTitulos" runat="server" UpdateMode="Conditional">
<ContentTemplate>
</ContentTemplate>
</asp:UpdatePanel>
<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" >
<Columns>
<asp:TemplateField HeaderText="Género">
<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:TemplateField>
<asp:TemplateField HeaderText="Fecha">
<ItemTemplate>
<asp:Literal ID="LtlFecha" runat="server" Text='<%# Eval("FechaIng", "{0:d}") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<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>
<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>--%>
<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">
<ContentTemplate>
<div class="modal-header ">
<button type="button" class="close" data-dismiss="modal">×</button>
<h4 class="modal-title">
<asp:Literal ID="LtlTituloModalTiposD" runat="server">Tipo contrato</asp:Literal></h4>
</div>
<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>
<i></i>
</div>
<br ID="saltoDeLinea" runat="server" />
<div ID="CheckActiveSection" runat="server" class="form-group form-md-line-input input-iconright">
<label for="ChkEstatus">Estatus:</label>&nbsp;
<asp:CheckBox ID="ChkEstatus" runat="server" CssClass="make-switchsd" data-size="small" Text=" " Checked="true" />
<i></i>
</div>
</div>
<br />
<div class="modal-footer">
<asp:Button ID="BtnAgregarTiposDModal" runat="server" class="btn btn-success" Text="Agregar" ValidationGroup="GrpTiposD" />
<button id="Button" runat="server" type="button" class="btn default" data-dismiss="modal">Cancelar</button>
</div>
</ContentTemplate>
</asp:UpdatePanel>
</div>
</div>
</ContentTemplate>
</asp:UpdatePanel>
</asp:Content>
<asp:Content ID="Content7" ContentPlaceHolderID="JS" runat="Server">
<script>
function MuestraModal() {
$('#DivAgregarTiposContrato').modal('show')
}
</script>
</asp:Content>

116
Edoc/CatDocumentosContratos.aspx.vb Normal file
View File

@@ -0,0 +1,116 @@
Option Strict On
Imports System.Data
Imports System.Linq
Imports Extensiones
Partial Class Edoc_CatDocumentosContratos
Inherits ClsPaginas
Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
If Not Page.IsPostBack Then
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
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 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
' 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
End Class

165
Edoc/CatTipoContratos.aspx Normal file
View File

@@ -0,0 +1,165 @@
<%@ Page Title="RH - Catálogo de Géneros" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="CatTipoContratos.aspx.vb" Inherits="Edoc_CatTipoContrato" %>
<%@ Register Assembly="AjaxControlToolkit" Namespace="AjaxControlToolkit" TagPrefix="asp" %>
<asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server">
</asp:Content>
<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
</asp:Content>
<asp:Content ID="Content3" ContentPlaceHolderID="HB" runat="Server">
</asp:Content>
<asp:Content ID="Content4" ContentPlaceHolderID="E" runat="Server">
Catálogo Tipos de Contrato
</asp:Content>
<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
<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>
</li>
</ContentTemplate>
</asp:UpdatePanel>
</asp:Content>
<asp:Content ID="Content6" ContentPlaceHolderID="C" runat="Server">
<asp:UpdatePanel ID="UpTitulos" runat="server" UpdateMode="Conditional">
<ContentTemplate>
</ContentTemplate>
</asp:UpdatePanel>
<asp:UpdatePanel ID="UpDatos" runat="server" UpdateMode="Conditional">
<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" >
<Columns>
<asp:TemplateField HeaderText="Género">
<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:TemplateField>
<asp:TemplateField HeaderText="Fecha">
<ItemTemplate>
<asp:Literal ID="LtlFecha" runat="server" Text='<%# Eval("FechaIng", "{0:d}") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<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>
<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>--%>
<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">
<ContentTemplate>
<div class="modal-header ">
<button type="button" class="close" data-dismiss="modal">×</button>
<h4 class="modal-title">
<asp:Literal ID="LtlTituloModalTiposD" runat="server">Tipo contrato</asp:Literal></h4>
</div>
<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>
<i></i>
</div>
<br ID="saltoDeLinea" runat="server" />
<div ID="CheckActiveSection" runat="server" class="form-group form-md-line-input input-iconright">
<label for="ChkEstatus">Estatus:</label>&nbsp;
<asp:CheckBox ID="ChkEstatus" runat="server" CssClass="make-switchsd" data-size="small" Text=" " Checked="true" />
<i></i>
</div>
</div>
<br />
<div class="modal-footer">
<asp:Button ID="BtnAgregarTiposDModal" runat="server" class="btn btn-success" Text="Agregar" ValidationGroup="GrpTiposD" />
<button id="Button" runat="server" type="button" class="btn default" data-dismiss="modal">Cancelar</button>
</div>
</ContentTemplate>
</asp:UpdatePanel>
</div>
</div>
</ContentTemplate>
</asp:UpdatePanel>
</asp:Content>
<asp:Content ID="Content7" ContentPlaceHolderID="JS" runat="Server">
<script>
function MuestraModal() {
$('#DivAgregarTiposContrato').modal('show')
}
</script>
</asp:Content>

116
Edoc/CatTipoContratos.aspx.vb Normal file
View File

@@ -0,0 +1,116 @@
Option Strict On
Imports System.Data
Imports System.Linq
Imports Extensiones
Partial Class Edoc_CatTipoContrato
Inherits ClsPaginas
Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
If Not Page.IsPostBack Then
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
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 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
' 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
End Class

3
General/CatDocumentacionTipo.aspx
View File

@@ -100,7 +100,8 @@ Catalogo Documentacion Tipo
<asp:DropDownList ID="DdlEdocmodulo" CssClass="form-control select2me" runat="server" Width="200px">
<asp:ListItem Selected="True" Value="-1">Seleccione uno</asp:ListItem>
<asp:ListItem Value="1">Recursos Humanos</asp:ListItem>
<asp:ListItem Value="2">Clientes</asp:ListItem>
<asp:ListItem Value="2">Clientes</asp:ListItem>
<asp:ListItem Value="3">Proveedor</asp:ListItem>
</asp:DropDownList>
<asp:RequiredFieldValidator ID="RfvEdocmodulo" InitialValue="-1" runat="server" ControlToValidate="DdlEdocmodulo" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Modulo''</b> es necesario, por favor ingréselo." ValidationGroup="VGMEdoc"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="VcoEdocmodulo" runat="server" HighlightCssClass="vco" TargetControlID="RfvEdocmodulo"></ajax:ValidatorCalloutExtender>

188
PortalProveedor/PortalProveedor.aspx
View File

@@ -798,10 +798,184 @@
</ContentTemplate>
</ajax:TabPanel>
<%---2020/02/06 - Auditoria--%>
<ajax:TabPanel ID="TabAuditoria" runat="server" HeaderText="<i class='fa fa-search'></i> Auditoría" Visible="True">
<ContentTemplate>
<asp:UpdatePanel ID="UpTabAuditoria" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<div class="row">
<asp:UpdatePanel ID="UPGvDocumentos" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<div class="col-md-12">
<asp:GridView ID="GvDocumentos" runat="server" AutoGenerateColumns="False"
DataKeyNames="CveDocumentacion,Documentacion,Orden,CveDocumentacionElectronica,Adjunto,Estatus,Observacion,Fecha,FechaIng,Usuario,FechaLimite,FechaVigencia,DiasLimite,AplicaDiasLimite,AplicaFechaVencimiento"
EmptyDataText="No se encontraron registros de documentos" CssClass="table table-hover table-advance Widthall" GridLines="None">
<Columns>
<asp:TemplateField ItemStyle-HorizontalAlign="center" ItemStyle-Width="60px">
<ItemTemplate>
<asp:Literal ID="ImgRequired" runat="server"></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ControlStyle-CssClass="template" ItemStyle-HorizontalAlign="Left" ItemStyle-Width="275" HeaderText="SubProyecto">
<ItemTemplate>
<asp:Literal ID="LtlSubProyecto" runat="server" Text='<%# Eval("SubProyecto") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ControlStyle-CssClass="template" ItemStyle-HorizontalAlign="Left" ItemStyle-Width="275" HeaderText="Contrato">
<ItemTemplate>
<asp:Literal ID="LtlContrato" runat="server" Text='<%# Eval("Contrato") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ControlStyle-CssClass="template" ItemStyle-HorizontalAlign="Left" ItemStyle-Width="100" HeaderText="Vencimiento" HeaderStyle-HorizontalAlign="Center">
<ItemTemplate>
<asp:Literal ID="LtlVencimiento" runat="server" Text='<%# Eval("Vencimiento") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ControlStyle-CssClass="template" ItemStyle-HorizontalAlign="Left" ItemStyle-Width="275" HeaderText="Documento">
<ItemTemplate>
<asp:Literal ID="LtlDocumentacion" runat="server" Text='<%# Eval("Documentacion") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Center" HeaderText="Estado" ItemStyle-Width="40px">
<ItemTemplate>
<%--<asp:CheckBox ID="chkEstatus" runat="server" CssClass="make-switchsd" Enabled="false"></asp:CheckBox>--%>
<asp:Literal ID="LtlEstatus" runat="server" Text='<%# Eval("SCompleto") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Left" HeaderText="Observaciones" ItemStyle-Width="100">
<ItemTemplate>
<asp:TextBox ID="TxtObservaciones" Width="300" MaxLength="100" runat="server" Text='<%# Eval("Observacion") %>' onkeypress="return false;" ></asp:TextBox>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Left" HeaderText="Fecha limite" ItemStyle-Width="100" Visible="false">
<ItemTemplate>
<asp:TextBox ID="TxtFechaLimite" Width="100" onKeyPress="return false;" MaxLength="10" runat="server" Text='<%# Eval("FechaLimite") %>'></asp:TextBox>
<ajax:CalendarExtender runat="server" ID="Calendario6" TargetControlID="TxtFechaLimite" Enabled="True"></ajax:CalendarExtender>
<asp:RequiredFieldValidator ID="rfvFechaI6" runat="server" ControlToValidate="TxtFechaLimite" Display="None" ErrorMessage="El campo <b>''Fecha limite''</b> es requerido por la aplicación, por favor ingrese una fecha." ValidationGroup="GrpRL"></asp:RequiredFieldValidator>
<asp:CompareValidator ID="cvFechaI6" runat="server" ControlToValidate="TxtFechaLimite" Display="None" ErrorMessage="El campo <b>''Fecha Limite''</b> no tienes el formato correcto, por favor intente de nuevo con el siguiente formato: (dd/mm/yyyy)." Operator="DataTypeCheck" Type="Date" ValidationGroup="GrpRL"></asp:CompareValidator>
<ajax:ValidatorCalloutExtender ID="vcoFfvFI4" runat="server" HighlightCssClass="vco" TargetControlID="rfvFechaI6" Width="350px"></ajax:ValidatorCalloutExtender>
<ajax:ValidatorCalloutExtender ID="vcoCvFI4" runat="server" HighlightCssClass="vco" TargetControlID="cvFechaI6" Width="350px"></ajax:ValidatorCalloutExtender>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Left" HeaderText="Vigencia" ItemStyle-Width="100" Visible="false">
<ItemTemplate>
<asp:TextBox ID="TxtFechaVigencia" Width="100" MaxLength="10" runat="server" Text='<%# Eval("FechaVigencia") %>'></asp:TextBox>
<ajax:CalendarExtender runat="server" ID="Calendario7" TargetControlID="TxtFechaVigencia" Enabled="True"></ajax:CalendarExtender>
<asp:CompareValidator ID="cvTxtFechaVigencia" runat="server" ControlToValidate="TxtFechaVigencia" Display="None" ErrorMessage="El campo <b>''Fecha Limite''</b> no tienes el formato correcto, por favor intente de nuevo con el siguiente formato: (dd/mm/yyyy)." Operator="DataTypeCheck" Type="Date" ValidationGroup="GrpRL"></asp:CompareValidator>
<ajax:ValidatorCalloutExtender ID="vcoCvFI5" runat="server" HighlightCssClass="vco" TargetControlID="cvTxtFechaVigencia" Width="350px"></ajax:ValidatorCalloutExtender>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Right" ItemStyle-Width="50px" HeaderText="Cargar">
<ItemTemplate>
<asp:LinkButton ID="ImgUpload" runat="server" OnClick="UploadModal_ClickDocumentacion" AlternateText="Editar" CausesValidation="False"
CssClass="btn btn-circle btn-sm green" Text="<i class='fa fa-upload' title='Subir documento' ></i>" />
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Left" ItemStyle-Width="50px" HeaderText="Ver">
<ItemTemplate>
<asp:Literal ID="ImgDownLoad" runat="server"></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<%-- <asp:TemplateField ItemStyle-HorizontalAlign="Right" ItemStyle-Width="50px">
<ItemTemplate>
<asp:LinkButton ID="ImgE" OnClick="Update_ClickDocumentacion" runat="server" AlternateText="Editar" ToolTip="Aplicar Cambios" CausesValidation="False"
CssClass="btn btn-circle btn-sm blue" Text="<i class='fa fa-check' title='Aplicar Cambios'></i>" />
</ItemTemplate>
</asp:TemplateField>--%>
</Columns>
</asp:GridView>
</div>
</ContentTemplate>
</asp:UpdatePanel>
</div>
</ContentTemplate>
</asp:UpdatePanel>
</ContentTemplate>
</ajax:TabPanel>
</ajax:TabContainer>
<div id="ModalUploadDoc" class="modal ADS fade" role="dialog">
<div class="modal-dialog">
<asp:UpdatePanel runat="server" class="modal-content" ID="UpModalReferenciasVerificacion" UpdateMode="Conditional">
<ContentTemplate>
<div class="modal-content">
<div class="modal-header ">
<button type="button" class="close" data-dismiss="modal">&times;</button>
<asp:UpdatePanel ID="UpModalTitleUploadDocumento" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<h4 class="modal-title">
<asp:Literal ID="LtlModalUploadTitulo" runat="server"></asp:Literal></h4>
</ContentTemplate>
</asp:UpdatePanel>
</div>
<div class="modal-body">
<asp:UpdatePanel runat="server" ID="UPModalUploadDoc" UpdateMode="Conditional">
<ContentTemplate>
<div class="row">
<div class="col-md-12">
<asp:TextBox ID="TxtFileDocumentacion" CssClass="ADSdropzone hidden" data-maxFile="1" Text="" runat="server"></asp:TextBox>
</div>
</div>
</ContentTemplate>
</asp:UpdatePanel>
</div>
<div class="modal-footer">
<asp:UpdatePanel runat="server" UpdateMode="Conditional">
<ContentTemplate>
<asp:Button ID="btnUploadFileDoc" runat="server" ClientIDMode="Static" Text="Guardar" CssClass="btn btn-primary" />
<button type="button" class="btn btn-danger" data-dismiss="modal">Cancelar</button>
</ContentTemplate>
</asp:UpdatePanel>
</div>
</div>
</ContentTemplate>
</asp:UpdatePanel>
</div>
</div>
@@ -853,6 +1027,16 @@
});
});
function RestrictSpace() {
if (event.keyCode == 32) {
event.returnValue = false;
return false;
}
}
</script>
e
</asp:Content>

1102
PortalProveedor/PortalProveedor.aspx.vb
View File

File diff suppressed because it is too large Load Diff