>
+
>
Tipo Movto
@@ -136,6 +134,7 @@
+
diff --git a/Documentacion/TableroMaterialidad.aspx.cs b/Documentacion/TableroMaterialidad.aspx.cs
index fb1099367..799367bb0 100644
--- a/Documentacion/TableroMaterialidad.aspx.cs
+++ b/Documentacion/TableroMaterialidad.aspx.cs
@@ -1128,8 +1128,8 @@ namespace ADSistemaLibrary3.SatXml
case "TIPOJORNADA": xmlCFDI.complemento.nomina12.Receptor.CodigoTipoJornada = xtr.Value; break;
case "PUESTO": xmlCFDI.complemento.nomina12.Receptor.Puesto = xtr.Value; break;
case "RIESGOPUESTO": xmlCFDI.complemento.nomina12.Receptor.CodigoRiesgoPuesto = xtr.Value; break;
- case "SALARIOBASECOTAPOR": xmlCFDI.complemento.nomina12.Receptor.SBC = xtr.Value.ToDouble(); break;
- case "SALARIODIARIOINTEGRADO": xmlCFDI.complemento.nomina12.Receptor.SDI = xtr.Value.ToDouble(); break;
+ case "SALARIOBASECOTAPOR": xmlCFDI.complemento.nomina12.Receptor.SBC = xtr.Value.ToDecimal(); break;
+ case "SALARIODIARIOINTEGRADO": xmlCFDI.complemento.nomina12.Receptor.SDI = xtr.Value.ToDecimal(); break;
case "CLAVEENTFED": xmlCFDI.complemento.nomina12.Receptor.CodigoEntidadFederativa = xtr.Value; break;
case "PERIODICIDADPAGO": xmlCFDI.complemento.nomina12.Receptor.TipoPeriodo = xtr.Value; break;
case "CUENTABANCARIA": xmlCFDI.complemento.nomina12.Receptor.NumeroCuenta = xtr.Value; break;
diff --git a/Documentacion/TableroMaterialidad2.aspx.cs b/Documentacion/TableroMaterialidad2.aspx.cs
index 4be48e720..c0992e8d3 100644
--- a/Documentacion/TableroMaterialidad2.aspx.cs
+++ b/Documentacion/TableroMaterialidad2.aspx.cs
@@ -1047,8 +1047,8 @@ namespace ADSistemaLibrary43.SatXml
case "TIPOJORNADA": xmlCFDI.complemento.nomina12.Receptor.CodigoTipoJornada = xtr.Value; break;
case "PUESTO": xmlCFDI.complemento.nomina12.Receptor.Puesto = xtr.Value; break;
case "RIESGOPUESTO": xmlCFDI.complemento.nomina12.Receptor.CodigoRiesgoPuesto = xtr.Value; break;
- case "SALARIOBASECOTAPOR": xmlCFDI.complemento.nomina12.Receptor.SBC = xtr.Value.ToDouble(); break;
- case "SALARIODIARIOINTEGRADO": xmlCFDI.complemento.nomina12.Receptor.SDI = xtr.Value.ToDouble(); break;
+ case "SALARIOBASECOTAPOR": xmlCFDI.complemento.nomina12.Receptor.SBC = xtr.Value.ToDecimal(); break;
+ case "SALARIODIARIOINTEGRADO": xmlCFDI.complemento.nomina12.Receptor.SDI = xtr.Value.ToDecimal(); break;
case "CLAVEENTFED": xmlCFDI.complemento.nomina12.Receptor.CodigoEntidadFederativa = xtr.Value; break;
case "PERIODICIDADPAGO": xmlCFDI.complemento.nomina12.Receptor.TipoPeriodo = xtr.Value; break;
case "CUENTABANCARIA": xmlCFDI.complemento.nomina12.Receptor.NumeroCuenta = xtr.Value; break;
diff --git a/Inventarios/PopUpExistenciasAlmacen.aspx b/Inventarios/PopUpExistenciasAlmacen.aspx
index b72e43d20..fbf6c963d 100644
--- a/Inventarios/PopUpExistenciasAlmacen.aspx
+++ b/Inventarios/PopUpExistenciasAlmacen.aspx
@@ -159,17 +159,10 @@
-
+ <%--
--%>
<%--
--%>
-
-
-
-
-
-
-
-
-
+
+
<%--
--%>
@@ -180,8 +173,7 @@
- <%--
--%>
-
+
@@ -189,8 +181,16 @@
-
+
+
+
+
+
+
+
+
+
diff --git a/Inventarios/PopUpExistenciasAlmacen.aspx.vb b/Inventarios/PopUpExistenciasAlmacen.aspx.vb
index 06de2d38f..4f276a596 100644
--- a/Inventarios/PopUpExistenciasAlmacen.aspx.vb
+++ b/Inventarios/PopUpExistenciasAlmacen.aspx.vb
@@ -274,10 +274,14 @@ Partial Class Inventarios_Default
Dim ObjInventarios As New ClsInventarios
If ObjInventarios.GetExistenciasMedRin(DDlPS.SelectedValue.ToEntero, UsuarioActual.CveEmpresa, DdlRin.SelectedValue.ToEntero, DdlMedidas.SelectedValue.ToEntero) Then
GvMedRin.DataSource = ObjInventarios.DtResultados
+ If ObjInventarios.DtResultados.Rows.Count > 0 Then
+ GvMedRin.Columns(5).Visible = ObjInventarios.DtResultados.MAX("CantidadMinimaPromo") <> ""
+ End If
End If
ObjInventarios.Dispose()
GvMedRin.DataBind()
UPDatos.Update()
+
DivMedRin.Visible = True
End Sub
diff --git a/Inventarios/RecepcionAlmacen.aspx.vb b/Inventarios/RecepcionAlmacen.aspx.vb
index 6c57c0feb..0d8130362 100644
--- a/Inventarios/RecepcionAlmacen.aspx.vb
+++ b/Inventarios/RecepcionAlmacen.aspx.vb
@@ -4054,7 +4054,6 @@ Partial Class Inventarios_RecepcionAlmacen
ObjInventario.GetMovimientosDetalle(CveMovimiento, UsuarioActual.CveEmpresa)
Dim TotalCosto As Decimal = ObjInventario.DtResultados.SUMD("Total").RoundSQL()
- Dim IdCtaContableCostoInd As Integer = 0
'si reciben parcialidades de producto. en base al total de la importacion y lo recibido.
Dim PorcentajeRecepcionCompras As Decimal = TotalCosto / DtTempCompras.SUMD("SubTotalTC")
Dim ConceptoPartida As String = String.Format("{0}- Inv#{1}", HLFolio.Text, InvFolio)
@@ -4071,19 +4070,15 @@ Partial Class Inventarios_RecepcionAlmacen
Dim ImporteAbonoME As Decimal = 0
Dim CveConceptoCostoIndirecto As Integer = If(CveImportacionSurtir > 0, 240, 237)
- If ObjConta.GetRetCuenta(CveConceptoCostoIndirecto, UsuarioActual.CveEmpresa) AndAlso ObjConta.DtResultados.Rows.Count > 0 Then
- IdCtaContableCostoInd = ObjConta.DtResultados.FiltroPrimeroValor("IdCtaContable").ToEntero
- End If
-
If UsaComplementariaCostoIndirecto Then
CveConceptoCostoIndirecto = If(CveImportacionSurtir > 0, 241, 238)
ImporteAbono = SubTotalPartida
ImporteAbonoME = (SubTotalPartida * dr("TipoCambio").ToString.ToDecimal) - SubTotalPartida
End If
- If ObjConta.AddPrePolizasDetalle(CvePrePoliza, True, ImporteAbono, ConceptoPartida, CveConceptoCostoIndirecto, ConceptoPartida, FechaMovto, IdCtaContableCostoInd, -1, CveCompra:=CveComp, CveProveedor:=dr("CveProveedor").ToString.ToEntero, CveMovimientoAlmacen:=CveMovimiento, ImporteMX:=ImporteAbono, CveSubProyecto:=CveSubProyecto) Then
+ If ObjConta.AddPrePolizasDetalle(CvePrePoliza, True, ImporteAbono, ConceptoPartida, CveConceptoCostoIndirecto, ConceptoPartida, FechaMovto, 0, -1, CveCompra:=CveComp, CveProveedor:=dr("CveProveedor").ToString.ToEntero, CveMovimientoAlmacen:=CveMovimiento, ImporteMX:=ImporteAbono, CveSubProyecto:=CveSubProyecto) Then
' si tiene valor es que hay complementaria
If ImporteAbonoME > 0 Then
- If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, True, ImporteAbono, ConceptoPartida, If(CveImportacionSurtir > 0, 242, 239), ConceptoPartida, FechaMovto, IdCtaContableCostoInd, -1, CveCompra:=CveComp, CveProveedor:=dr("CveProveedor").ToString.ToEntero, CveMovimientoAlmacen:=CveMovimiento, ImporteMX:=ImporteAbono) Then
+ If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, True, ImporteAbono, ConceptoPartida, If(CveImportacionSurtir > 0, 242, 239), ConceptoPartida, FechaMovto, 0, -1, CveCompra:=CveComp, CveProveedor:=dr("CveProveedor").ToString.ToEntero, CveMovimientoAlmacen:=CveMovimiento, ImporteMX:=ImporteAbono) Then
ErrorMovInv = True
End If
End If
diff --git a/Inventarios/RepEntregaAlmacenRuta.aspx.cs b/Inventarios/RepEntregaAlmacenRuta.aspx.cs
index bb7aa24d7..8ce5fc4b8 100644
--- a/Inventarios/RepEntregaAlmacenRuta.aspx.cs
+++ b/Inventarios/RepEntregaAlmacenRuta.aspx.cs
@@ -188,7 +188,22 @@ public partial class General_RepEntregaAlmacenRuta : ClsPaginas
}
}
+ private int CveCliente
+ {
+ get
+ {
+ if (ViewState["CveCliente"] == null)
+ {
+ ViewState["CveCliente"] = -1;
+ }
+ return ViewState["CveCliente"].ToString().ToEntero();
+ }
+ set
+ {
+ ViewState["CveCliente"] = value;
+ }
+ }
private int CveDireccionOrigen
{
@@ -356,10 +371,7 @@ public partial class General_RepEntregaAlmacenRuta : ClsPaginas
GridViewRow GvRow = (GridViewRow)(((LinkButton)sender).NamingContainer);
CveEntregaAlmacen = GvRow.DataKey("CveEntregaAlmacen").ToEntero();
- CveTimbre = GvRow.DataKey("CveTimbre").ToEntero();
-
- int CveCliente = GvRow.DataKey("CveCliente").ToEntero();
- int CveAlmacen = GvRow.DataKey("CveAlmacen").ToEntero();
+ CveTimbre = GvRow.DataKey("CveTimbre").ToEntero();
DdlModalCamion.SelectedValueExist(GvRow.DataKey("CveCamion"));
DdlModalChofer.SelectedValueExist(GvRow.DataKey("CveChofer"));
@@ -383,6 +395,7 @@ public partial class General_RepEntregaAlmacenRuta : ClsPaginas
}
CveDireccionOrigen = GvRow.DataKey("CveDireccionOrigen").ToEntero();
CveDireccionDestino = GvRow.DataKey("CveDireccionDestino").ToEntero();
+ CveCliente = GvRow.DataKey("CveCliente").ToEntero();
ModalActualizaDirecciones(CveTimbre);
@@ -398,15 +411,12 @@ public partial class General_RepEntregaAlmacenRuta : ClsPaginas
DVDireccionDestino.Visible = true;
LnkDireccionDestino.Text = GvRow.DataKey("Direccion") + "
";
}
-
-
+
UpModalEditarentrega.Update();
RegistraScript("$('#DivEditarEntrega').modal({ backdrop: 'static', keyboard: false });");
-
-
+
}
-
-
+
private void ModalActualizaDirecciones(int CveTimbre)
{
ClsGenerales ObjGeneral = new ClsGenerales();
@@ -1028,9 +1038,10 @@ public partial class General_RepEntregaAlmacenRuta : ClsPaginas
public void EditDireccionOrigen_Click(object sender, EventArgs e)
{
- //GridViewRow GvRow = (GridViewRow)(((LinkButton)sender).NamingContainer);
+ //GridViewRow GvRow = (GridViewRow)(((LinkButton)sender).NamingContainer);
//int CveDireccionOrigen = GvRow.DataKey("CveDireccionOrigen").ToEntero();
CveDireccionEditar = CveDireccionOrigen;
+ //CveCliente = GvRow.DataKey("CveCliente").ToEntero();
LblTitulodireccion.Text = "Actualizar dirección origen";
CargaDatosDireccion(CveDireccionOrigen);
}
@@ -1067,7 +1078,7 @@ public partial class General_RepEntregaAlmacenRuta : ClsPaginas
TxtEnvioNoInt.Text = DT.Rows[0]["EnvioNoInt"].ToString();
TxtEnvioCP.Text = DT.Rows[0]["EnvioCP"].ToString();
- // TxtEnvioTel.Text = GvRow.DataKey("EnvioTel")
+ CveCliente = DT.Rows[0]["CveCliente"].ToString().ToEntero();
DdlDirClientePais.SelectedValueExist(DT.Rows[0]["CvePais"].ToString());
CargaDirClienteEstado();
@@ -1094,7 +1105,7 @@ public partial class General_RepEntregaAlmacenRuta : ClsPaginas
bool ErrorProceso = false;
//CveDireccionEditar
- if (!ObjCli.DireccionEnvioUpdate(-1, TxtEnvioDireccion.Text, TxtEnvioNoExt.Text, TxtEnvioNoInt.Text, "-1", "-1", "-1", TxtEnvioCP.Text, "-1", UsuarioActual.CveUsuario, -1, CveDireccionEditar, "-1", -1, "-1",
+ if (!ObjCli.DireccionEnvioUpdate(CveCliente, TxtEnvioDireccion.Text, TxtEnvioNoExt.Text, TxtEnvioNoInt.Text, "-1", "-1", "-1", TxtEnvioCP.Text, "-1", UsuarioActual.CveUsuario, -1, CveDireccionEditar, "-1", -1, "-1",
DdlDirClientePais.SelectedValue.ToEntero(), DdlDirClienteEstado.SelectedValue.ToEntero(), DdlDirClienteMunicipio.SelectedValue.ToEntero(), DdlDirClienteLocalidad.SelectedValue.ToEntero(), DdlDirClienteColonia.SelectedValue.ToEntero()))
{
ErrorProceso = true;
diff --git a/Nomina/Nomina.aspx.cs b/Nomina/Nomina.aspx.cs
index e02203aaa..9f6a31874 100644
--- a/Nomina/Nomina.aspx.cs
+++ b/Nomina/Nomina.aspx.cs
@@ -1,12 +1,7 @@
-
-using AjaxControlToolkit.HtmlEditor.ToolbarButtons;
-using ClbNegBICFDv3_3;
-using Extensiones;
+using Extensiones;
using iTextSharp.text.pdf;
-using Profact.TimbraCFDI40;
using System;
using System.Collections.Generic;
-using System.Collections.Specialized;
using System.Data;
using System.Drawing;
using System.IO;
@@ -328,11 +323,7 @@ public partial class Nomina_Nomina2 : ClsPaginas
DdlTipoTrabajador.SelectedValueExist("-1");
}
}
- if (UsuarioActual.CveUsuario == 100)
- {
- Alert("recuerda que solo la empresa (119) tiene activado el timbrado 4.0", TipoMensaje.ToastAdventencia);
- }
- //CreaObjetoEmpresa(UsuarioActual);
+
DataTable dtperinc = null;
using (ClsNominas objnom = new ClsNominas())
{
@@ -490,7 +481,7 @@ public partial class Nomina_Nomina2 : ClsPaginas
}
private void CargaTiposPeriodo()
{
- DdlTipoPeriodo.DataSource = GlobalDTTipoPeriodo.FiltraParametros("Estatus = 'Activo'");
+ DdlTipoPeriodo.DataSource = get_GlobalDTTipoPeriodos(UsuarioActual.CveEmpresa) ;
DdlTipoPeriodoCM.DataSource = DdlTipoPeriodo.DataSource;
DdlTipoPeriodoSim.DataSource = DdlTipoPeriodo.DataSource;
DdlTipoPeriodoSim.DataBind();
@@ -1442,7 +1433,7 @@ public partial class Nomina_Nomina2 : ClsPaginas
LogicNominas lognom = new LogicNominas();
string Msg = "";
- Msg = lognom.TimbrarNomina(CveNomina, CvePersonal, CvePeriodo, UsuarioActual, versionTimbre: VersionTimbradoEnum.Version4_0);
+ Msg = lognom.TimbrarNomina(CveNomina, CvePersonal, CvePeriodo, UsuarioActual, UsuarioActual.Empresa.CvePAC);
if (Msg != null && Msg.Length > 0)
{
@@ -8943,16 +8934,24 @@ public partial class Nomina_Nomina2 : ClsPaginas
CvePrePolizaasmilidos = objnom.DtResultados.Rows[0]["CvePrePolizaAsimilables"].ToString().ToEntero();
CvePrePolizaProrrateo = objnom.DtResultados.Rows[0]["CvePrePolizaProrrateo"].ToString().ToEntero();
}
- string mensaje = string.Format("La provision a sido autorizada.
Provision ", CvePrePolizaProvision);
+ string mensaje = string.Format("La provisión a sido generada.
Provisión ", CvePrePolizaProvision);
if (CvePrePolizaasmilidos > 0)
{
- mensaje = string.Format("{0}
Asimilados", mensaje, CvePrePolizaasmilidos);
-
+ mensaje = string.Format("{0}
Asimilados", mensaje, CvePrePolizaasmilidos);
}
if (CvePrePolizaProrrateo > 0)
{
- mensaje = string.Format("{0}
Prorrateo", mensaje, CvePrePolizaProrrateo);
-
+ mensaje = string.Format("{0}
Prorrateo", mensaje, CvePrePolizaProrrateo);
+ }
+ if (CvePrePolizaProvision > 0)
+ {
+ using (ClsContabilidad objconta = new ClsContabilidad())
+ {
+ var objUsuario = UsuarioActual;
+ if (objconta.ValidacionesPrePoliza(CvePrePolizaProvision, ref objUsuario))
+ {
+ }
+ }
}
Alert(mensaje);
}
@@ -8966,9 +8965,7 @@ public partial class Nomina_Nomina2 : ClsPaginas
if (ObjContaz.GetConta_ConceptosContables())
{
ContaConceptossource = ObjContaz.DtResultados;
-
}
-
}
if (UsuarioActual.Empresa.TipoContabilidad == 1)
@@ -9003,42 +9000,7 @@ public partial class Nomina_Nomina2 : ClsPaginas
GVProvision.DataBind();
RegistraScript("$('#ModalRegistraProvision').modal();");
UpRegistroProvision.Update();
- /*
- StringBuilder str = new StringBuilder();
- str.Append("
");
- str.Append("");
- //ConceptoContable ConceptoNomina CodigoNombreCompleto
-
- str.Append("");
- str.Append("| ");
- str.Append("Concepto Contable");
- str.Append(" | ");
- str.Append("");
- str.Append("Concepto Nomina");
- str.Append(" | ");
- str.Append("");
- str.Append("Personal");
- str.Append(" | ");
- str.Append("
");
- foreach (DataRow item in objnom.DTSetResultados.Tables[1].Rows)
- {
-
- str.Append("");
- str.Append("| ");
- str.Append(item["ConceptoContable"]);
- str.Append(" | ");
- str.Append("");
- str.Append(item["ConceptoNomina"]);
- str.Append(" | ");
- str.Append("");
- str.Append(item["CodigoNombreCompleto"]);
- str.Append(" | ");
- str.Append("
");
- }
- str.Append("");
- str.Append("
");
- Alert(string.Format("
no se pudo registrar la provisión, existen cuentas sin vincular.
{0}", str));
- */
+
}
}
}
diff --git a/OC/OC.aspx.vb b/OC/OC.aspx.vb
index 9980a85e2..216e04505 100644
--- a/OC/OC.aspx.vb
+++ b/OC/OC.aspx.vb
@@ -2401,7 +2401,15 @@ Partial Class OC_OC
TieneError = True
End If
+ ''validación que para empresas llanteras, y la clasif son llantas, que requiere la fecha de estimación
+ If UsuarioActual.Empresa.Funcionalidad(558) = "1" Then
+ Dim dtc As DataTable = DtDetalle.FiltraParametros("Clasificacion like '%Llanta%'")
+ If dtc IsNot Nothing AndAlso dtc.Rows.Count > 0 AndAlso TxtFechaEstimadaEntrega.Text.ToDate <= MinFecha Then
+ Alert("Cuando se incluyan productos llantas, deberán especificar fecha estimada de entrega.", TipoMensaje.MsgAdvertencia)
+ TieneError = True
+ End If
+ End If
'SI ES REQUISICION, NO REQUIERE COTIZACION Y ES ESTATUSFINALOK... ENTONCES DEBE DE TENER UN PROVEEDOR SELECCIONADO Y LOS PRECIOS CAPTURADOS
'If (TipoOC = "REQ" And ChkCotizacion.Checked = False And CboE.SelectedValue.ToEntero = CveEstatusFinalOK) OrElse TipoOC = "OC" Then
@@ -2590,9 +2598,6 @@ Partial Class OC_OC
'VALIDACIONES PARA GUARDAR
If ValidaGuardar() Then Exit Sub
-
-
-
Dim MsgError As String = "Hubo un error al registrar"
'VARIABLES
Dim CveProveedorSucursal As Integer = -1
diff --git a/RH/CatTurno.aspx.vb b/RH/CatTurno.aspx.vb
index f2bf474c2..db8defe5d 100644
--- a/RH/CatTurno.aspx.vb
+++ b/RH/CatTurno.aspx.vb
@@ -127,13 +127,7 @@ Partial Class RH_CatTurno
Private Sub CargaGlobalDTTurno()
- Dim ObjRH As New ClsRH
- If ObjRH.GetTurnos() Then
- Application("GlobalDTTurno") = ObjRH.DtResultados
- Else
- Application("GlobalDTTurno") = Nothing
- End If
- ObjRH.Dispose()
+ GlobalDTTurno(UsuarioActual.CveEmpresa) = Nothing
End Sub
Public Sub Delete_Click(sender As Object, e As EventArgs)
diff --git a/RH/Personal.aspx b/RH/Personal.aspx
index 9f87b141b..d576de5e0 100644
--- a/RH/Personal.aspx
+++ b/RH/Personal.aspx
@@ -292,16 +292,22 @@