This commit is contained in:
JORGE LUIS CAUDILLO ESPARZA
2021-12-17 08:19:26 -07:00
parent 04ab0c963c
commit 46c5c017dc
15 changed files with 2945 additions and 427 deletions

View File

@@ -2978,6 +2978,53 @@ Public Class ClsNominas
End Function
#End Region
Public Sub addParameters(varsql As String, sqltipe As SqlDbType, valor As Object)
SqlAdapter.SelectCommand.Parameters.Add(varsql, sqltipe).Value = valor
End Sub
Public Function RunQuery(errormsg As String) As Boolean
Dim retorno As Boolean = False
Try
SqlAdapter.Fill(Data)
retorno = True
Catch ex As Exception
retorno = False
OnError(errormsg, ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
End Try
Return retorno
End Function
Public Function PA_AGRO_Embarque_ManifiestoGet(cveSubproyecto As Int32, cveUsuario As Int32, cveEmpresa As Int32, cveEmbarqueManifiesto As Int32) As Boolean
Dim retorno As Boolean = False
DataAdapter("PA_AGRO_Embarque_ManifiestoGet", CommandType.StoredProcedure)
addParameters("@CveSubproyecto", SqlDbType.Int, cveSubproyecto)
addParameters("@CveUsuario", SqlDbType.Int, cveUsuario)
addParameters("@CveEmpresa", SqlDbType.Int, cveEmpresa)
addParameters("@CveEmbarqueManifiesto", SqlDbType.Int, cveEmbarqueManifiesto)
retorno = RunQuery("Ocurrió un error al obtener el PA_AGRO_Embarque_ManifiestoGet.")
Return retorno
End Function
Public Function PA_Agro_Embarque_PalletGet(cvePallet As Int32, cveCultivo As Int32, cveCultivoVariedad As Int32, cveEnvase As Int32, cveEtiqueta As Int32, cveEtiquetasporTarima As Int32, cveFormatoImpresion As Int32, cveTamaño As Int32, cveTipoTarima As Int32, cveEmpresa As Int32, cveEmbarqueManifiesto As Int32, cveTemporada As Int32) As Boolean
Dim retorno As Boolean = False
DataAdapter("PA_Agro_Embarque_PalletGet", CommandType.StoredProcedure)
addParameters("@CvePallet", SqlDbType.Int, cvePallet)
addParameters("@CveCultivo", SqlDbType.Int, cveCultivo)
addParameters("@CveCultivoVariedad", SqlDbType.Int, cveCultivoVariedad)
addParameters("@CveEnvase", SqlDbType.Int, cveEnvase)
addParameters("@CveEtiqueta", SqlDbType.Int, cveEtiqueta)
addParameters("@CveEtiquetasporTarima", SqlDbType.Int, cveEtiquetasporTarima)
addParameters("@CveFormatoImpresion", SqlDbType.Int, cveFormatoImpresion)
addParameters("@CveTamaño", SqlDbType.Int, cveTamaño)
addParameters("@CveTipoTarima", SqlDbType.Int, cveTipoTarima)
addParameters("@CveEmpresa", SqlDbType.Int, cveEmpresa)
addParameters("@CveEmbarqueManifiesto", SqlDbType.Int, cveEmbarqueManifiesto)
addParameters("@CveTemporada", SqlDbType.Int, cveTemporada)
retorno = RunQuery("Ocurrió un error al obtener el PA_Agro_Embarque_PalletGet.")
Return retorno
End Function
#Region "IDisposable Support"
' IDisposable
Protected Overridable Sub Dispose(ByVal disposing As Boolean)

View File

@@ -3178,10 +3178,14 @@ Namespace Extensiones
Public Sub SelectedValueExistInsert(Obj As DropDownList, Valor As Object, Texto As String)
If (Obj.Items.FindByValue(Valor.ToString()) IsNot Nothing) Then
Obj.SelectedValue = Valor.ToString
Obj.SelectedValue = Valor.ToString()
Else
Obj.Items.Insert(1, New ListItem(Texto, Valor.ToString))
Obj.SelectedValue = Valor.ToString
If Obj.Items.Count > 0 Then
Obj.Items.Insert(1, New ListItem(Texto, Valor.ToString()))
Else
Obj.Items.Insert(0, New ListItem(Texto, Valor.ToString()))
End If
Obj.SelectedValue = Valor.ToString()
End If
End Sub

View File

@@ -271,7 +271,8 @@ Public Class SIGWeb : Implements IHttpHandler, IRequiresSessionState
Response = context.Response
Dim tablaReporte As New DataTable
'"Empresas/Grales/Formatos/EquiposGPS.rdlc"
ImprimirPDF("D:\\ADSistemas\\Proyectos\\SIG\\SIGIT\\GPS\\PalletEtiqueta.rdlc", (New List(Of ReportDataSource)), params, "Equipo GPS")
'"D:\\ADSistemas\\Proyectos\\SIG\\SIGIT\\GPS\\PalletEtiqueta.rdlc"
ImprimirPDF("GPS/PalletEtiqueta.rdlc", (New List(Of ReportDataSource)), params, "Equipo GPS")
Return retorno
End Function
Private Function GetTokenAngular(context As HttpContext) As String

View File

@@ -195,11 +195,84 @@ Partial Class PopUpVerFactura
SeleccionaReporte(UrlParametros)
End If
End If
If Request("onlyPrint") IsNot Nothing Then
If Request("onlyPrint").ToString() = "Pallet" Then
imprimirpallet2(Request("CvePallet").ToString.ToEntero())
End If
If Request("onlyPrint").ToString() = "PalletCaja" Then
imprimirpallet(Request("CvePallet").ToString.ToEntero())
End If
End If
End If
End Sub
Private Sub imprimirpallet2(cvePallet As Integer)
Dim Envase As String = ""
Dim Tamano As String = ""
Dim Cultivo As String = ""
Dim noPallet As String = ""
Dim Variedad As String = ""
'Envase = "1 1/9"
'Tamano = "Small"
'Cultivo = "Tomate"
'noPallet = "000001"
'Variedad = "Golden"
Using objnom As New ClsNominas
If objnom.PA_Agro_Embarque_PalletGet(cvePallet, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1) And objnom.DtResultados.Rows.Count > 0 Then
Dim row As DataRow = objnom.DtResultados.Rows(0)
Envase = row("Envase").ToString()
Tamano = row("Tamaño").ToString()
Cultivo = row("Cultivo").ToString()
noPallet = row("Codigo").ToString()
Variedad = row("CultivoVariedad").ToString()
End If
End Using
Dim params As New List(Of ReportParameter)
params.Add(New ReportParameter("Envase", Envase))
params.Add(New ReportParameter("Tamano", Tamano))
params.Add(New ReportParameter("Cultivo", Cultivo))
params.Add(New ReportParameter("noPallet", noPallet))
params.Add(New ReportParameter("Variedad", Variedad))
Dim tablaReporte As New DataTable
'"Empresas/Grales/Formatos/EquiposGPS.rdlc"
'"D:\\ADSistemas\\Proyectos\\SIG\\SIGIT\\GPS\\PalletEtiqueta.rdlc"
ImprimirPDF("GPS/PalletEtiqueta2.rdlc", (New List(Of ReportDataSource)), params, "Equipo GPS")
End Sub
Private Sub imprimirpallet(cvePallet As Integer)
Dim Envase As String = ""
Dim Tamano As String = ""
Dim Cultivo As String = ""
Dim noPallet As String = ""
'Envase = "1 1/9"
'Tamano = "Small"
'Cultivo = "Tomate"
'noPallet = "000001"
Using objnom As New ClsNominas
If objnom.PA_Agro_Embarque_PalletGet(cvePallet, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1) And objnom.DtResultados.Rows.Count > 0 Then
Dim row As DataRow = objnom.DtResultados.Rows(0)
Envase = row("Envase").ToString()
Tamano = row("Tamaño").ToString()
Cultivo = row("Cultivo").ToString()
noPallet = row("Codigo").ToString()
End If
End Using
Dim params As New List(Of ReportParameter)
params.Add(New ReportParameter("Envase", Envase))
params.Add(New ReportParameter("Tamano", Tamano))
params.Add(New ReportParameter("Cultivo", Cultivo))
params.Add(New ReportParameter("noPallet", noPallet))
Dim tablaReporte As New DataTable
'"Empresas/Grales/Formatos/EquiposGPS.rdlc"
'"D:\\ADSistemas\\Proyectos\\SIG\\SIGIT\\GPS\\PalletEtiqueta.rdlc"
ImprimirPDF("GPS/PalletEtiqueta.rdlc", (New List(Of ReportDataSource)), params, "Equipo GPS")
End Sub
#Region "U S U A R I O - T O K E N"
Private Function ValidaUsuarioSistema(CveEmpresa As Integer, Optional CveUsuario As Integer = 100) As Usuario

View File

@@ -178,9 +178,64 @@
<strong style="font-size: 20px; margin-right: 25px;">Información: </strong>
Los documentos cargados serán relacionados en el periodo:
<asp:Literal runat="server" ID="LtlPeriodoXMLPDF"></asp:Literal>
</div>
<div>
<asp:TextBox ID="Anexoxmlpd" CssClass="ADSdropzone hidden" data-maxFile="1" Text="" runat="server"></asp:TextBox>
</div>
<div class="portlet light smmallpadding bordered">
<div class="portlet-title">
<div class="caption font-green">
<i class="fa fa-download font-green"></i>
<span class="caption-subject bold uppercase">Paso 1: Procesar 'ZIP'</span>
</div>
<div class="tools">
<a href="javascript:;" class="collapse" data-original-title="" title=""></a>
</div>
<div class="actions">
<div class="btn-group">
<asp:LinkButton ID="LnkCargarZip" CssClass="btn btn-success" OnClick="LnkCargarZip_Click" runat="server">Procesar</asp:LinkButton>
</div>
</div>
</div>
<div class="portlet-body rowpadding ">
<div>
<asp:TextBox ID="Anexoxmlpdf" CssClass="ADSdropzone hidden" data-maxfilesize ="500" data-maxFile="1" Text="" runat="server"></asp:TextBox>
</div>
</div>
</div>
<div class="portlet light smmallpadding bordered">
<div class="portlet-title">
<div class="caption font-green">
<i class="fa fa-download font-green"></i>
<span class="caption-subject bold uppercase">Paso 2: Guardar</span>
</div>
<div class="tools">
<a href="javascript:;" class="expand" data-original-title="" title=""></a>
</div>
</div>
<div class="portlet-body rowpadding " style="display: none">
<div class="row">
<div class="col-sm-6 col-sm-offset-3">
<div class="dashboard-stat red-intense">
<div class="visual"><i class="fa fa-bar-chart-o"></i></div>
<div class="details">
<div class="number">Documentos</div>
<div class="desc">
<label class="indicadortipo4 col-md-6 tooltips" data-original-title="">
<asp:Literal ID="LtlNoDoctos" runat="server"></asp:Literal></label>
<label class="indicadortipo4 col-md-6 tooltips" data-original-title=""></label>
<label class="indicadortipo4 col-md-6 tooltips" data-original-title="XML">
<asp:Literal ID="LtlNoXml" runat="server"></asp:Literal></label>
<label class="indicadortipo4 col-md-6 tooltips" data-original-title="PDF">
<asp:Literal ID="LtlNoPDF" runat="server"></asp:Literal></label>
</div>
</div>
<a class="more" href="javascript:;" data-toggle="dropdown" data-hover="dropdown" data-close-others="true" tabindex="0">Ver Más <i class="m-icon-swapright m-icon-white"></i>
</a>
</div>
</div>
</div>
</div>
</div>
</ContentTemplate>
</asp:UpdatePanel>
@@ -188,7 +243,7 @@
<div class="modal-footer">
<asp:UpdatePanel runat="server">
<ContentTemplate>
<asp:Button ID="BtnAddClienteDocumentoxmlpd" UseSubmitBehavior="false" OnClick="BtnAddClienteDocumentoxmlpd_Click" runat="server" Text="Guardar" CssClass="btn btn-primary" />
<%--<asp:Button ID="BtnAddClienteDocumentoxmlpd" UseSubmitBehavior="false" OnClick="BtnAddClienteDocumentoxmlpd_Click" runat="server" Text="Guardar" CssClass="btn btn-primary" />--%>
<button type="button" class="btn btn-danger" data-dismiss="modal">Cancelar</button>
</ContentTemplate>

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

View File

@@ -4,9 +4,10 @@ Option Strict On
Imports System.Data
Imports System.Linq
Imports Extensiones
Imports Microsoft.Reporting.WebForms
Partial Class Nomina_CatPeriodos
Inherits ClsPaginas
Inherits ClsPaginas
Private Property Comando As String
Get
Return ViewState("Comando").ToString
@@ -16,8 +17,11 @@ Partial Class Nomina_CatPeriodos
End Set
End Property
Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
If Not Page.IsPostBack Then
ViewState("Orden") = ""
If Not Page.IsPostBack Then
ViewState("Orden") = ""
CargaTipoPeriodo()
cargaEjercicios()
CargaDatos()
@@ -29,10 +33,10 @@ Partial Class Nomina_CatPeriodos
' LbAgregar.Enabled = False
'End If
End If
End Sub
End Sub
Public Sub CargaDatos()
Dim ObjNom_Periodos As New ClsNominas
Public Sub CargaDatos()
Dim ObjNom_Periodos As New ClsNominas
If ObjNom_Periodos.GetPeriodos(DdlTipoPeriodo.SelectedValue.ToEntero, UsuarioActual.CveEmpresa, DdlEjercicio.SelectedValue.ToEntero, -1, -1, DdlEstatus.SelectedValue.ToEntero) Then
ViewState("DTNom_Periodos") = ObjNom_Periodos.DtResultados.FiltraParametros("CveEmpresa = " & UsuarioActual.CveEmpresa)
GlobalDTNom_Periodos = ObjNom_Periodos.DtResultados
@@ -41,14 +45,14 @@ Partial Class Nomina_CatPeriodos
Me.GvDatos.DataSource = Nothing
End If
ObjNom_Periodos.Dispose()
ObjNom_Periodos.Dispose()
If ViewState("Orden").ToString() <> String.Empty Then
CargaGrid(ViewState("Orden").ToString())
Else
CargaGrid("")
End If
End Sub
If ViewState("Orden").ToString() <> String.Empty Then
CargaGrid(ViewState("Orden").ToString())
Else
CargaGrid("")
End If
End Sub
#Region " C O M B O S"

View File

@@ -4,12 +4,25 @@ Option Strict On
Imports System.Data
Imports System.Linq
Imports Extensiones
Imports Microsoft.Reporting.WebForms
Partial Class Nom_CatSatBancos
Inherits ClsPaginas
Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
If Not Page.IsPostBack Then
Dim params As New List(Of ReportParameter)
params.Add(New ReportParameter("Envase", "1 1/9"))
params.Add(New ReportParameter("Tamano", "Small"))
params.Add(New ReportParameter("Cultivo", "Tomate"))
params.Add(New ReportParameter("noPallet", "000001"))
params.Add(New ReportParameter("Variedad", "Golden"))
Dim tablaReporte As New DataTable
'"Empresas/Grales/Formatos/EquiposGPS.rdlc"
'"D:\\ADSistemas\\Proyectos\\SIG\\SIGIT\\GPS\\PalletEtiqueta.rdlc"
ImprimirPDF("GPS/PalletEtiqueta2.rdlc", (New List(Of ReportDataSource)), params, "Equipo GPS")
ViewState("Orden") = ""
CargaDatos()
End If
@@ -55,12 +68,12 @@ Partial Class Nom_CatSatBancos
#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
e.Row.Cells(0).Width = Unit.Pixel(80)
e.Row.Cells(1).Width = Unit.Pixel(160)
e.Row.Cells(0).Width = Unit.Pixel(80)
e.Row.Cells(1).Width = Unit.Pixel(160)
e.Row.Cells(2).Width = Unit.Pixel(315)
e.Row.Cells(3).Width = Unit.Pixel(100)
e.Row.Cells(4).Width = Unit.Pixel(100)
e.Row.Cells(5).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(100)
e.Row.Cells(6).Width = Unit.Pixel(100)
e.Row.Cells(7).Width = Unit.Pixel(61)
e.Row.Cells(0).HorizontalAlign = HorizontalAlign.Center

View File

@@ -1249,7 +1249,7 @@ public partial class Nomina_Nomina2 : ClsPaginas
Alert("Ocurrió un error al mover el archivo fiscal cancelado");
}
Nom.UpdateEstatusNomNominas(2, UsuarioActual.Empresa.CvePAC, "", "", ("01/01/2000").ToDate(), CveNomina, 0, 0, 0, 0, 0);
Nom.UpdateEstatusNomNominas(2, UsuarioActual.Empresa.CvePAC, "", ("01/01/2000").ToDate(), ("01/01/2000").ToDate(), CveNomina, 0, 0, 0, 0, 0);
Alert($"La nómina con folio fiscal '{FolioFiscal}' fue cancelada ante el SAT", TipoMensaje.MsgInformacion);
}

View File

@@ -23,12 +23,12 @@ public partial class RH_CalculoSBC : ClsPaginas
if (!IsPostBack)
{
ADSNetLibrary.SIGAPI.Services.Agropecuaria.IAgropecuariaService servicioAgro = new ADSNetLibrary.SIGAPI.Services.Agropecuaria.AgropecuariaService(System.Configuration.ConfigurationManager.ConnectionStrings["Conexion"].ConnectionString);
ADSNetLibrary.SIGAPI.Models.Agropecuaria.Request.ActividadGET acmo = new ADSNetLibrary.SIGAPI.Models.Agropecuaria.Request.ActividadGET();
acmo.cveEmpresa = UsuarioActual.CveEmpresa; acmo.cveActividad = -1;
var obj = servicioAgro.ActividadesGet(acmo);
GVDetalleParteVariable.DataSource = obj.Result;
GVDetalleParteVariable.DataBind();
//ADSNetLibrary.SIGAPI.Services.Agropecuaria.IAgropecuariaService servicioAgro = new ADSNetLibrary.SIGAPI.Services.Agropecuaria.AgropecuariaService(System.Configuration.ConfigurationManager.ConnectionStrings["Conexion"].ConnectionString);
//ADSNetLibrary.SIGAPI.Models.Agropecuaria.Request.ActividadGET acmo = new ADSNetLibrary.SIGAPI.Models.Agropecuaria.Request.ActividadGET();
//acmo.cveEmpresa = UsuarioActual.CveEmpresa; acmo.cveActividad = -1;
//var obj = servicioAgro.ActividadesGet(acmo);
//GVDetalleParteVariable.DataSource = obj.Result;
//GVDetalleParteVariable.DataBind();
}
}
@@ -117,7 +117,7 @@ public partial class RH_CalculoSBC : ClsPaginas
bool continuar = true;
using (ClsRH objrh = new ClsRH())
{
objrh.IniciaTransacSQL();
foreach (GridViewRow item in GVCalculosSBC.Rows)
{
int CvePersonal = item.DataKey("CvePersonal").ToEntero();//,,,
@@ -131,6 +131,15 @@ public partial class RH_CalculoSBC : ClsPaginas
}
}
if (continuar)
{
objrh.Commit();
}
else
{
objrh.RollBack ();
}
}
if (continuar)
{

View File

@@ -1501,7 +1501,8 @@ Partial Class RH_Personal
TxtNumExt.Text = ObjPersonal.NumExt
TxtNumInt.Text = ObjPersonal.NumInt
TxtColonia.Text = ObjPersonal.Colonia
DdlEstados.SelectedValueExist(ObjPersonal.CveEstado.ToString())
'DdlEstados.SelectedValueExist(ObjPersonal.CveEstado.ToString())
DdlEstados.SelectedValueExistInsert(ObjPersonal.CveEstado.ToString(), drow("EstadoText").ToString())
TxtCP.Text = ObjPersonal.CP
TxtColonia.Text = ObjPersonal.Colonia
TxtCiudad.Text = ObjPersonal.Ciudad

View File

@@ -562,26 +562,26 @@
<div class="form-group form-md-line-input">
<asp:TextBox ID="TxtCelular" CssClass="form-control" runat="server" MaxLength="150"></asp:TextBox>
<ajax:MaskedEditExtender ID="MaskedEditExtender5" runat="server" TargetControlID="TxtCelular" ClearMaskOnLostFocus="false" MaskType="None" Mask="(999) 999-9999" MessageValidatorTip="true" InputDirection="LeftToRight" ErrorTooltipEnabled="True"></ajax:MaskedEditExtender>
<label for="<%= TxtCelular.ClientID.ToString()%>">Celular: </label>
<asp:Label AssociatedControlID="TxtCelular" runat="server" Text="Celular:"></asp:Label>
</div>
<div class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtEmail" CssClass="form-control" runat="server" MaxLength="300"></asp:TextBox>
<ajax:FilteredTextBoxExtender ID="FilteredTextBoxExtender5" runat="server" FilterType="Numbers, LowercaseLetters, UppercaseLetters, Custom" ValidChars=".;@_-ñ" TargetControlID="TxtEmail" />
<asp:RegularExpressionValidator ID="REVEmail" runat="server" CssClass="help-block errorimput" ValidationExpression="(([a-zA-Z0-9ñÑ_\-\.]+)@((\[[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}\.)|(([a-zA-Z0-9\-]+\.)+))([a-zA-Z]{2,4}|[0-9]{1,3})(\]?)(\s*;\s*|\s*$))*" ControlToValidate="TxtEmail" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Email''</b> no es válido, por favor ingrése uno correcto." ValidationGroup="GrpGuardar"></asp:RegularExpressionValidator>
<label for="<%= TxtEmail.ClientID.ToString()%>">Correo Envío Factura:(xml/pdf) </label>
<asp:Label AssociatedControlID="TxtEmail" runat="server" Text="Correo Envío Factura:(xml/pdf):"></asp:Label>
<i></i>
</div>
<div class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtEmailCotizacion" CssClass="form-control" runat="server" MaxLength="300"></asp:TextBox>
<ajax:FilteredTextBoxExtender ID="FilteredTextBoxExtender2" runat="server" FilterType="Numbers, LowercaseLetters, UppercaseLetters, Custom" ValidChars=".;@_-ñ" TargetControlID="TxtEmailCotizacion" />
<asp:RegularExpressionValidator ID="RegularExpressionValidator2" runat="server" CssClass="help-block" ValidationExpression="(([a-zA-Z0-9ñÑ_\-\.]+)@((\[[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}\.)|(([a-zA-Z0-9\-]+\.)+))([a-zA-Z]{2,4}|[0-9]{1,3})(\]?)(\s*;\s*|\s*$))*" ControlToValidate="TxtEmailCotizacion" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Correo Cotización''</b> no es válido, por favor ingrése uno correcto." ValidationGroup="GrpGuardar"></asp:RegularExpressionValidator>
<label for="<%= TxtEmailCotizacion.ClientID.ToString()%>">Correo Envío Cotización: </label>
<asp:Label AssociatedControlID="TxtEmailCotizacion" runat="server" Text="Correo Envío Cotización:"></asp:Label>
<i></i>
</div>
<div class="form-group form-md-line-input">
<asp:TextBox ID="TxtPagina" CssClass="form-control" runat="server" MaxLength="50"></asp:TextBox>
<label for="<%= TxtPagina.ClientID.ToString()%>">Página: </label>
<asp:Label AssociatedControlID="TxtPagina" runat="server" Text="Página:"></asp:Label>
</div>
<%--<div class="form-group form-md-line-input">
<asp:TextBox ID="TxtGiro" CssClass="form-control" runat="server" MaxLength="50"></asp:TextBox>
@@ -590,7 +590,8 @@
<div class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtNotificar" CssClass="form-control" runat="server" MaxLength="300"></asp:TextBox>
<asp:RegularExpressionValidator ID="REVEnotificar" runat="server" CssClass="help-block errorimput" ValidationExpression="(([a-zA-Z0-9_\-\.]+)@((\[[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}\.)|(([a-zA-Z0-9\-]+\.)+))([a-zA-Z]{2,4}|[0-9]{1,3})(\]?)(\s*;\s*|\s*$))*" ControlToValidate="TxtNotificar" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Notificar A''</b> no es válido, por favor ingrése uno correcto." ValidationGroup="GrpGuardar"></asp:RegularExpressionValidator>
<label for="<%= TxtNotificar.ClientID.ToString()%>">Notificar Facturación a: </label>
<asp:Label AssociatedControlID="TxtNotificar" runat="server" Text="Notificar Facturación a:"></asp:Label>
<asp:Label AssociatedControlID="" runat="server" Text=""></asp:Label>
<i></i>
</div>
<div class="form-group ">
@@ -4098,7 +4099,14 @@
</div>
</div>
<div class="portlet-body">
<div class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtCorreoCumplimiento" CssClass="form-control" runat="server" MaxLength="300"></asp:TextBox>
<ajax:FilteredTextBoxExtender ID="FilteredTextBoxExtender9" runat="server" FilterType="Numbers, LowercaseLetters, UppercaseLetters, Custom" ValidChars=".;@_-ñ" TargetControlID="TxtCorreoCumplimiento" />
<asp:RegularExpressionValidator ID="RegularExpressionValidator4" runat="server" CssClass="help-block errorimput" ValidationExpression="(([a-zA-Z0-9ñÑ_\-\.]+)@((\[[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}\.)|(([a-zA-Z0-9\-]+\.)+))([a-zA-Z]{2,4}|[0-9]{1,3})(\]?)(\s*;\s*|\s*$))*" ControlToValidate="TxtCorreoCumplimiento" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Email''</b> no es válido, por favor ingrése uno correcto." ValidationGroup="GrpGuardarmaterialidad"></asp:RegularExpressionValidator>
<asp:Label AssociatedControlID="TxtCorreoCumplimiento" runat="server" Text="Correo cunmplimiento:"></asp:Label>
<i></i>
</div>
<div class="row">
<div class="col-md-6">
<asp:GridView ID="GVDocMaterialidad" runat="server" AutoGenerateColumns="False" Style="max-width: 900px!important; width: 100%"

View File

@@ -1122,6 +1122,14 @@ namespace ADSistemaLibrary2.SatXml
{
int cDepth = xtr.Depth;
while ((canread = xtr.Read()) && xtr.NodeType != XmlNodeType.Element) { }
{
}
while (canread && xtr.Depth > cDepth)
{
if (xtr.NodeType == XmlNodeType.Element && xtr.LocalName == "TimbreFiscalDigital" && xmlCFDI.comprobante.Version != null)
@@ -1136,9 +1144,29 @@ namespace ADSistemaLibrary2.SatXml
xmlCFDI.complemento.NoCertificadoSAT = xmlCFDI.comprobante.Version == "3.3" ? xtr.GetAttribute("NoCertificadoSAT") : xtr.GetAttribute("noCertificadoSAT");
xmlCFDI.complemento.SelloSAT = xmlCFDI.comprobante.Version == "3.3" ? xtr.GetAttribute("SelloSAT") : xtr.GetAttribute("selloSAT");
} else if (xtr.NodeType == XmlNodeType.Element && xtr.LocalName.ToUpper() == "NOMINA" && xmlCFDI.comprobante.Version != null)
{
xmlCFDI.complemento.nomina12 = new CFDINomina();
//Version="1.2" TipoNomina="E" FechaPago="2021-12-08"
//="2021-12-08" ="2021-12-08"
//="1" ="5026.31" ="254.34"
cont = xtr.MoveToFirstAttribute();
while (cont)
{
switch (xtr.Name.ToUpper())
{
case "FECHAPAGO": xmlCFDI.complemento.nomina12.FechaPago = xtr.Value.ToDateTime(); break;
case "FECHAINICIALPAGO": xmlCFDI.complemento.nomina12.FechaInicio = xtr.Value; break;
case "FECHAFINALPAGO": xmlCFDI.complemento.nomina12.FechaFin = xtr.Value; break;
case "NUMDIASPAGADOS": xmlCFDI.complemento.nomina12.NumDiasPagados= xtr.Value.ToEntero(); break;
case "TIPONOMINA": xmlCFDI.complemento.nomina12.TipoNomina = xtr.Value; break;
case "Version": xmlCFDI.complemento.nomina12.Version = xtr.Value; break;
}
cont = xtr.MoveToNextAttribute();
}
xtr.MoveToFirstAttribute();
}
if (xtr.NodeType == XmlNodeType.Element && xtr.LocalName == "Pagos" && xmlCFDI.comprobante.Version != null)
else if (xtr.NodeType == XmlNodeType.Element && xtr.LocalName == "Pagos" && xmlCFDI.comprobante.Version != null)
{
while ((canread = xtr.Read()) && xtr.NodeType != XmlNodeType.Element) { }
xmlCFDI.complemento.Pagos = new CFDIPago();
@@ -1245,6 +1273,7 @@ namespace ADSistemaLibrary2.SatXml
public class CFDIComplemento
{
public string xmlns_tfd { get; set; }
public string xsi_schemaLocation { get; set; }
public string Version { get; set; }
@@ -1255,6 +1284,7 @@ namespace ADSistemaLibrary2.SatXml
public string NoCertificadoSAT { get; set; }
public string SelloSAT { get; set; }
public CFDIPago Pagos { get; set; }
public CFDINomina nomina12 { get; set; }
public string CadenaOriginal
{
get

View File

@@ -382,6 +382,10 @@