Merge branch 'master' of http://192.168.10.111:8383/SIG
This commit is contained in:
@@ -621,10 +621,14 @@ Public Class ClsNominas
|
||||
Return Retorno
|
||||
End Function
|
||||
|
||||
Public Function AddNom_NominasDetalles(CveNomina As Integer, CvePeriodo As Integer, CvePersonal As Integer, CveConcepto As Integer, Importe As Decimal, ImporteGravado As Decimal, ImporteExento As Decimal) As Boolean
|
||||
Public Function AddUPNom_NominasDetalles(CveNomina As Integer, CvePeriodo As Integer, CvePersonal As Integer, CveConcepto As Integer,
|
||||
Importe As Decimal, ImporteGravado As Decimal, ImporteExento As Decimal, ImporteValor As Decimal,
|
||||
CveUsuario As Integer, IsEdited As Boolean,
|
||||
chkImporte As Integer, chkImporteGravado As Integer, chkImporteValor As Integer
|
||||
) As Boolean
|
||||
Dim Retorno As Boolean = False
|
||||
|
||||
DataAdapter("PA_Nom_NominasDetallesAdd")
|
||||
DataAdapter("PA_Nom_NominasDetallesAddUP")
|
||||
|
||||
With SqlAdapter.SelectCommand.Parameters
|
||||
.Add("CveNomina", SqlDbType.Int).Value = CveNomina
|
||||
@@ -634,6 +638,12 @@ Public Class ClsNominas
|
||||
.Add("Importe", SqlDbType.Float).Value = Importe
|
||||
.Add("ImporteGravado", SqlDbType.Float).Value = ImporteGravado
|
||||
.Add("ImporteExento", SqlDbType.Float).Value = ImporteExento
|
||||
.Add("ImporteValor", SqlDbType.Float).Value = ImporteValor
|
||||
.Add("CveUsuario", SqlDbType.Int).Value = CveUsuario
|
||||
.Add("IsEdited", SqlDbType.Bit).Value = IsEdited
|
||||
.Add("chkImporteValor", SqlDbType.Int).Value = chkImporteValor
|
||||
.Add("chkImporte", SqlDbType.Int).Value = chkImporte
|
||||
.Add("chkImporteGravado", SqlDbType.Int).Value = chkImporteGravado
|
||||
End With
|
||||
|
||||
Try
|
||||
@@ -646,31 +656,56 @@ Public Class ClsNominas
|
||||
Return Retorno
|
||||
End Function
|
||||
|
||||
Public Function UpdateNom_NominasDetalles(CveNominaDetalle As Integer, Importe As Decimal, ImporteExento As Decimal, ImporteGravado As Decimal) As Boolean
|
||||
Dim Retorno As Boolean = False
|
||||
DataAdapter("PA_Nom_NominasDetallesUpdate")
|
||||
'Public Function AddNom_NominasDetalles(CveNomina As Integer, CvePeriodo As Integer, CvePersonal As Integer, CveConcepto As Integer, Importe As Decimal, ImporteGravado As Decimal, ImporteExento As Decimal) As Boolean
|
||||
' Dim Retorno As Boolean = False
|
||||
|
||||
With SqlAdapter.SelectCommand.Parameters
|
||||
.Add("CveNominaDetalle", SqlDbType.Int).Value = CveNominaDetalle
|
||||
.Add("Importe", SqlDbType.Float).Value = Importe
|
||||
.Add("ImporteExento", SqlDbType.Float).Value = ImporteExento
|
||||
.Add("ImporteGravado", SqlDbType.Float).Value = ImporteGravado
|
||||
End With
|
||||
' DataAdapter("PA_Nom_NominasDetallesAdd")
|
||||
|
||||
Try
|
||||
SqlAdapter.Fill(Data)
|
||||
Retorno = True
|
||||
'
|
||||
Catch sqlex As SqlException
|
||||
If sqlex.Message.Contains("x5010") Then
|
||||
Me.OnError("Ocurrió un error al eliminar el Movimiento de Nomina(Timbrada).", sqlex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
|
||||
Else
|
||||
Me.OnError("Ocurrió un error al eliminar el Movimiento de Nomina.", sqlex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
|
||||
End If
|
||||
End Try
|
||||
' With SqlAdapter.SelectCommand.Parameters
|
||||
' .Add("CveNomina", SqlDbType.Int).Value = CveNomina
|
||||
' .Add("CvePeriodo", SqlDbType.Int).Value = CvePeriodo
|
||||
' .Add("CvePersonal", SqlDbType.Int).Value = CvePersonal
|
||||
' .Add("CveConcepto", SqlDbType.Int).Value = CveConcepto
|
||||
' .Add("Importe", SqlDbType.Float).Value = Importe
|
||||
' .Add("ImporteGravado", SqlDbType.Float).Value = ImporteGravado
|
||||
' .Add("ImporteExento", SqlDbType.Float).Value = ImporteExento
|
||||
' End With
|
||||
|
||||
Return Retorno
|
||||
End Function
|
||||
' Try
|
||||
' SqlAdapter.Fill(Data)
|
||||
' Retorno = True
|
||||
' Catch Ex1 As SqlException
|
||||
' Me.OnError("Ocurrió un error al Guardar el Movimiento de Nomina.", Ex1, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
|
||||
' End Try
|
||||
|
||||
' Return Retorno
|
||||
'End Function
|
||||
|
||||
'Public Function UpdateNom_NominasDetalles(CveNominaDetalle As Integer, Importe As Decimal, ImporteExento As Decimal, ImporteGravado As Decimal) As Boolean
|
||||
' Dim Retorno As Boolean = False
|
||||
' DataAdapter("PA_Nom_NominasDetallesUpdate")
|
||||
|
||||
' With SqlAdapter.SelectCommand.Parameters
|
||||
' .Add("CveNominaDetalle", SqlDbType.Int).Value = CveNominaDetalle
|
||||
' .Add("Importe", SqlDbType.Float).Value = Importe
|
||||
' .Add("ImporteExento", SqlDbType.Float).Value = ImporteExento
|
||||
' .Add("ImporteGravado", SqlDbType.Float).Value = ImporteGravado
|
||||
' End With
|
||||
|
||||
' Try
|
||||
' SqlAdapter.Fill(Data)
|
||||
' Retorno = True
|
||||
' '
|
||||
' Catch sqlex As SqlException
|
||||
' If sqlex.Message.Contains("x5010") Then
|
||||
' Me.OnError("Ocurrió un error al eliminar el Movimiento de Nomina(Timbrada).", sqlex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
|
||||
' Else
|
||||
' Me.OnError("Ocurrió un error al eliminar el Movimiento de Nomina.", sqlex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
|
||||
' End If
|
||||
' End Try
|
||||
|
||||
' Return Retorno
|
||||
'End Function
|
||||
|
||||
Public Function DeleteNom_NominasDetalles(CveConcepto As Integer, CvePersonal As Integer, CvePeriodo As Integer) As Boolean
|
||||
Dim Retorno As Boolean = False
|
||||
@@ -1770,7 +1805,7 @@ Public Class ClsNominas
|
||||
End Function
|
||||
#End Region
|
||||
|
||||
#Region ""
|
||||
#Region "Periodos"
|
||||
Public Function GetPeriodos(CveTipoPeriodo As Integer, CveEmpresa As Integer, Ejercicio As Integer, Mes As Integer, CvePeriodo As Integer, Optional CveEstatus As Integer = -1) As Boolean
|
||||
|
||||
Dim Retorno As Boolean = False
|
||||
@@ -2172,34 +2207,6 @@ Public Class ClsNominas
|
||||
End Try
|
||||
Return Retorno
|
||||
End Function
|
||||
Public Function AddUPNom_NominasDetalles(CveNomina As Integer, CvePeriodo As Integer, CvePersonal As Integer, CveConcepto As Integer, Importe As Decimal, ImporteGravado As Decimal, ImporteExento As Decimal, ImporteValor As Decimal, CveUsuario As Integer, Optional IsEdited As Boolean = False) As Boolean
|
||||
Dim Retorno As Boolean = False
|
||||
|
||||
DataAdapter("PA_Nom_NominasDetallesAddUP")
|
||||
|
||||
With SqlAdapter.SelectCommand.Parameters
|
||||
.Add("CveNomina", SqlDbType.Int).Value = CveNomina
|
||||
.Add("CvePeriodo", SqlDbType.Int).Value = CvePeriodo
|
||||
.Add("CvePersonal", SqlDbType.Int).Value = CvePersonal
|
||||
.Add("CveConcepto", SqlDbType.Int).Value = CveConcepto
|
||||
.Add("Importe", SqlDbType.Float).Value = Importe
|
||||
.Add("ImporteGravado", SqlDbType.Float).Value = ImporteGravado
|
||||
.Add("ImporteExento", SqlDbType.Float).Value = ImporteExento
|
||||
.Add("ImporteValor", SqlDbType.Float).Value = ImporteValor
|
||||
.Add("CveUsuario", SqlDbType.Int).Value = CveUsuario
|
||||
.Add("IsEdited", SqlDbType.Bit).Value = IsEdited
|
||||
End With
|
||||
|
||||
Try
|
||||
SqlAdapter.Fill(Data)
|
||||
Retorno = True
|
||||
Catch Ex1 As SqlException
|
||||
Me.OnError("Ocurrió un error al Guardar el Movimiento de Nomina.", Ex1, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
|
||||
End Try
|
||||
|
||||
Return Retorno
|
||||
End Function
|
||||
|
||||
Public Function ProcesarSUA(txtSUA As String, cveEmpresa As Int32) As Boolean
|
||||
Dim retorno As Boolean = False
|
||||
DTSet = New DataSet()
|
||||
@@ -2298,7 +2305,7 @@ Public Class ClsNominas
|
||||
Dim retorno As Boolean = False
|
||||
Try
|
||||
DTSet = New DataSet()
|
||||
DataAdapter("PA_Nom_NominaEmpleado", CommandType.StoredProcedure)
|
||||
DataAdapter("PA_Nom_NominaEmpleadoV2", CommandType.StoredProcedure)
|
||||
With SqlAdapter.SelectCommand.Parameters
|
||||
.Add("@CveProyecto", SqlDbType.Int).Value = CveProyecto
|
||||
.Add("@CveSubProyecto", SqlDbType.Int).Value = CveSubProyecto
|
||||
|
||||
@@ -217,7 +217,7 @@ public partial class Nomina_Aguinaldo : ClsPaginas
|
||||
if (CveNomina > 0)
|
||||
{
|
||||
|
||||
if (!objNomina.AddUPNom_NominasDetalles(objNomina.CveNomina, CvePeriodoSeleccionado, CvePersonal, CveConcepto, Importe, ImporteGravado, ImporteExento, ImporteValor, UsuarioActual.CveUsuario))
|
||||
if (!objNomina.AddUPNom_NominasDetalles(objNomina.CveNomina, CvePeriodoSeleccionado, CvePersonal, CveConcepto, Importe, ImporteGravado, ImporteExento, ImporteValor, UsuarioActual.CveUsuario, false, 1, 1, 1))
|
||||
{
|
||||
continuar = false;
|
||||
}
|
||||
|
||||
@@ -1232,7 +1232,7 @@ public partial class Nomina_Finiquito : ClsPaginas
|
||||
if (continuar)
|
||||
{
|
||||
|
||||
if (!objNomina.AddUPNom_NominasDetalles(CveNomina, CvePeriodoSeleccionado, CvePersonal, CveConcepto, ImporteConcepto, ImporteGravadoConcepto, ImporteExentoConcepto, ImporteValor, UsuarioActual.CveUsuario))
|
||||
if (!objNomina.AddUPNom_NominasDetalles(CveNomina, CvePeriodoSeleccionado, CvePersonal, CveConcepto, ImporteConcepto, ImporteGravadoConcepto, ImporteExentoConcepto, ImporteValor, UsuarioActual.CveUsuario, false, 1, 1, 1))
|
||||
{
|
||||
continuar = false;
|
||||
}
|
||||
@@ -1345,6 +1345,10 @@ public partial class Nomina_Finiquito : ClsPaginas
|
||||
|
||||
protected void BtnAceptarMC_Click(object sender, EventArgs e)
|
||||
{
|
||||
|
||||
int chkImporte = 1;
|
||||
int chkImporteGravado = 1;
|
||||
int chkImporteValor = 1;
|
||||
bool continuar = true;
|
||||
int CveNomina = 0;
|
||||
double Total = 0;
|
||||
@@ -1395,7 +1399,7 @@ public partial class Nomina_Finiquito : ClsPaginas
|
||||
if (continuar)
|
||||
{
|
||||
|
||||
if (!objNomina.AddUPNom_NominasDetalles(CveNomina, CvePeriodoFiniquito, CvePersonal, CveConcepto, ImporteConcepto, ImporteGravadoConcepto, ImporteExentoConcepto, ImporteValor, UsuarioActual.CveUsuario, true))
|
||||
if (!objNomina.AddUPNom_NominasDetalles(CveNomina, CvePeriodoFiniquito, CvePersonal, CveConcepto, ImporteConcepto, ImporteGravadoConcepto, ImporteExentoConcepto, ImporteValor, UsuarioActual.CveUsuario, true, chkImporte, chkImporteGravado, chkImporteValor))
|
||||
{
|
||||
continuar = false;
|
||||
}
|
||||
|
||||
@@ -130,8 +130,8 @@ public partial class Nomina_NomTimbrados : ClsPaginas
|
||||
case "DESCUENTO": drow["DESCUENTO"] = xtr.Value; break;
|
||||
case "TIPODECOMPROBANTE": drow["TIPODECOMPROBANTE"] = xtr.Value; break;
|
||||
}
|
||||
switch (xtr.Name.ToUpper())
|
||||
{
|
||||
//switch (xtr.Name.ToUpper())
|
||||
//{
|
||||
//case "XMLNS:CFDI": xmlCFDI.comprobante.xmlns_cfdi = xtr.Value; break;
|
||||
//case "XMLNS:XSI": xmlCFDI.comprobante.xmlns_xsi = xtr.Value; break;
|
||||
//case "XSI:SCHEMALOCATION": xmlCFDI.comprobante.xsi_schemaLocation = xtr.Value; break;
|
||||
@@ -155,7 +155,7 @@ public partial class Nomina_NomTimbrados : ClsPaginas
|
||||
//case "NOCERTIFICADO": xmlCFDI.comprobante.NoCertificado = xtr.Value; break;
|
||||
//case "SELLO": xmlCFDI.comprobante.Sello = xtr.Value; break;
|
||||
//case "CERTIFICADO": xmlCFDI.comprobante.Certificado = xtr.Value; break;
|
||||
}
|
||||
//}
|
||||
cont = xtr.MoveToNextAttribute();
|
||||
}
|
||||
cont = xtr.MoveToFirstAttribute();
|
||||
@@ -244,8 +244,8 @@ public partial class Nomina_NomTimbrados : ClsPaginas
|
||||
cont = xtr.MoveToFirstAttribute();
|
||||
while (cont)
|
||||
{
|
||||
switch (xtr.Name.ToUpper())
|
||||
{
|
||||
//switch (xtr.Name.ToUpper())
|
||||
//{
|
||||
//case "CLAVEPRODSERV": concepto.ClaveProdServ = xtr.Value; break;
|
||||
//case "NOIDENTIFICACION": concepto.NoIdentificacion = xtr.Value; break;
|
||||
//case "CANTIDAD": concepto.Cantidad = xtr.Value; break;
|
||||
@@ -255,7 +255,7 @@ public partial class Nomina_NomTimbrados : ClsPaginas
|
||||
//case "IMPORTE": decimal Importe = 0; decimal.TryParse(xtr.Value, out Importe); concepto.Importe = Importe; ; break;
|
||||
//case "DESCUENTO": decimal DDescuento = 0; decimal.TryParse(xtr.Value, out DDescuento); concepto.Descuento = DDescuento; ; break;
|
||||
//case "DESCRIPCION": concepto.Descripcion = xtr.Value; break;
|
||||
}
|
||||
//}
|
||||
cont = xtr.MoveToNextAttribute();
|
||||
}
|
||||
xtr.MoveToFirstAttribute();
|
||||
@@ -377,22 +377,22 @@ public partial class Nomina_NomTimbrados : ClsPaginas
|
||||
while (conts)
|
||||
{
|
||||
|
||||
decimal Base = 0;
|
||||
switch (xtr.Name.ToUpper())
|
||||
{
|
||||
//case "FECHAPAGO": xmlCFDI.complemento.Pagos.FechaPago = xtr.Value; break;
|
||||
//case "FORMADEPAGOP": xmlCFDI.complemento.Pagos.FormaDePagoP = xtr.Value; break;
|
||||
//case "FORMADEPAGOPTEXT": xmlCFDI.complemento.Pagos.FormaDePagoPText = xtr.Value; break;
|
||||
//case "MONEDAP": xmlCFDI.complemento.Pagos.MonedaP = xtr.Value; break;
|
||||
//case "MONTO": decimal.TryParse(xtr.Value, out Base); xmlCFDI.complemento.Pagos.Monto = Base; break;
|
||||
//case "TIPOCAMBIOP": decimal.TryParse(xtr.Value, out Base); xmlCFDI.complemento.Pagos.TipoCambioP = Base; break;
|
||||
//case "NUMOPERACION": xmlCFDI.complemento.Pagos.NumOperacion = xtr.Value; break;
|
||||
//case "NOMBANCOORDEXT": xmlCFDI.complemento.Pagos.NomBancoOrdExt = xtr.Value; break;
|
||||
//case "RFCEMISORCTAORD": xmlCFDI.complemento.Pagos.RfcEmisorCtaOrd = xtr.Value; break;
|
||||
//case "CTAORDENANTE": xmlCFDI.complemento.Pagos.CtaOrdenante = xtr.Value; break;
|
||||
//case "RFCEMISORCTABEN": xmlCFDI.complemento.Pagos.RfcEmisorCtaBen = xtr.Value; break;
|
||||
//case "CTABENEFICIARIO": xmlCFDI.complemento.Pagos.CtaBeneficiario = xtr.Value; break;
|
||||
}
|
||||
//decimal Base = 0;
|
||||
//switch (xtr.Name.ToUpper())
|
||||
//{
|
||||
// case "FECHAPAGO": xmlCFDI.complemento.Pagos.FechaPago = xtr.Value; break;
|
||||
// case "FORMADEPAGOP": xmlCFDI.complemento.Pagos.FormaDePagoP = xtr.Value; break;
|
||||
// case "FORMADEPAGOPTEXT": xmlCFDI.complemento.Pagos.FormaDePagoPText = xtr.Value; break;
|
||||
// case "MONEDAP": xmlCFDI.complemento.Pagos.MonedaP = xtr.Value; break;
|
||||
// case "MONTO": decimal.TryParse(xtr.Value, out Base); xmlCFDI.complemento.Pagos.Monto = Base; break;
|
||||
// case "TIPOCAMBIOP": decimal.TryParse(xtr.Value, out Base); xmlCFDI.complemento.Pagos.TipoCambioP = Base; break;
|
||||
// case "NUMOPERACION": xmlCFDI.complemento.Pagos.NumOperacion = xtr.Value; break;
|
||||
// case "NOMBANCOORDEXT": xmlCFDI.complemento.Pagos.NomBancoOrdExt = xtr.Value; break;
|
||||
// case "RFCEMISORCTAORD": xmlCFDI.complemento.Pagos.RfcEmisorCtaOrd = xtr.Value; break;
|
||||
// case "CTAORDENANTE": xmlCFDI.complemento.Pagos.CtaOrdenante = xtr.Value; break;
|
||||
// case "RFCEMISORCTABEN": xmlCFDI.complemento.Pagos.RfcEmisorCtaBen = xtr.Value; break;
|
||||
// case "CTABENEFICIARIO": xmlCFDI.complemento.Pagos.CtaBeneficiario = xtr.Value; break;
|
||||
//}
|
||||
conts = xtr.MoveToNextAttribute();
|
||||
}
|
||||
conts = xtr.MoveToFirstAttribute();
|
||||
@@ -404,20 +404,20 @@ public partial class Nomina_NomTimbrados : ClsPaginas
|
||||
while (conts)
|
||||
{
|
||||
|
||||
decimal Basep = 0;
|
||||
switch (xtr.Name.ToUpper())
|
||||
{
|
||||
//case "IDDOCUMENTO": objpago.IdDocumento = xtr.Value; break;
|
||||
//case "SERIE": objpago.Serie = xtr.Value; break;
|
||||
//case "FOLIO": objpago.Folio = xtr.Value; break;
|
||||
//case "MONEDADR": objpago.MonedaDR = xtr.Value; break;
|
||||
//case "METODODEPAGODR": objpago.MetodoDePagoDR = xtr.Value; break;
|
||||
//case "NUMPARCIALIDAD": objpago.NumParcialidad = xtr.Value; break;
|
||||
//case "IMPSALDOANT": decimal.TryParse(xtr.Value, out Basep); objpago.ImpSaldoAnt = Basep; break;
|
||||
//case "IMPPAGADO": decimal.TryParse(xtr.Value, out Basep); objpago.ImpPagado = Basep; break;
|
||||
//case "IMPSALDOINSOLUTO": decimal.TryParse(xtr.Value, out Basep); objpago.ImpSaldoInsoluto = Basep; break;
|
||||
//decimal Basep = 0;
|
||||
//switch (xtr.Name.ToUpper())
|
||||
//{
|
||||
// case "IDDOCUMENTO": objpago.IdDocumento = xtr.Value; break;
|
||||
// case "SERIE": objpago.Serie = xtr.Value; break;
|
||||
// case "FOLIO": objpago.Folio = xtr.Value; break;
|
||||
// case "MONEDADR": objpago.MonedaDR = xtr.Value; break;
|
||||
// case "METODODEPAGODR": objpago.MetodoDePagoDR = xtr.Value; break;
|
||||
// case "NUMPARCIALIDAD": objpago.NumParcialidad = xtr.Value; break;
|
||||
// case "IMPSALDOANT": decimal.TryParse(xtr.Value, out Basep); objpago.ImpSaldoAnt = Basep; break;
|
||||
// case "IMPPAGADO": decimal.TryParse(xtr.Value, out Basep); objpago.ImpPagado = Basep; break;
|
||||
// case "IMPSALDOINSOLUTO": decimal.TryParse(xtr.Value, out Basep); objpago.ImpSaldoInsoluto = Basep; break;
|
||||
|
||||
}
|
||||
//}
|
||||
conts = xtr.MoveToNextAttribute();
|
||||
}
|
||||
conts = xtr.MoveToFirstAttribute();
|
||||
|
||||
@@ -1389,6 +1389,9 @@ public partial class Nomina_Nomina2 : ClsPaginas
|
||||
protected void LnkCargarNomina_Click(object sender, EventArgs e)
|
||||
{
|
||||
|
||||
int chkImporteValor = 1;
|
||||
int chkImporte = 1;
|
||||
int chkImporteGravado = 0;
|
||||
List<Archivo> Filesgral = TxtArchivoNomina.getfiles().Archivos;
|
||||
bool continuar = Filesgral.Count > 0;
|
||||
string stringError = "";
|
||||
@@ -1512,7 +1515,7 @@ public partial class Nomina_Nomina2 : ClsPaginas
|
||||
{
|
||||
if (!dontsaveconcepto)//el usuario definira si desea actualizar o no el concepto en el periodo
|
||||
{
|
||||
if (!objNomina.AddUPNom_NominasDetalles(objNomina.CveNomina, CvePeriodoSeleccionado, CvePersonal, CveConcepto, Importe, ImporteGravado, ImporteExento, ImporteValor, UsuarioActual.CveUsuario, true))
|
||||
if (!objNomina.AddUPNom_NominasDetalles(objNomina.CveNomina, CvePeriodoSeleccionado, CvePersonal, CveConcepto, Importe, ImporteGravado, ImporteExento, ImporteValor, UsuarioActual.CveUsuario, true, chkImporte, chkImporteGravado, chkImporteValor))
|
||||
{
|
||||
rollback = true;
|
||||
}
|
||||
@@ -1841,6 +1844,9 @@ public partial class Nomina_Nomina2 : ClsPaginas
|
||||
}
|
||||
protected void BtnAceptarMC_Click(object sender, EventArgs e)
|
||||
{
|
||||
int chkImporte = 1;
|
||||
int chkImporteGravado = 1;
|
||||
int chkImporteValor = 1;
|
||||
bool continuar = true;
|
||||
int CveNomina = 0;
|
||||
double Total = 0;
|
||||
@@ -1896,7 +1902,7 @@ public partial class Nomina_Nomina2 : ClsPaginas
|
||||
if (continuar)
|
||||
{
|
||||
|
||||
if (!objNomina.AddUPNom_NominasDetalles(CveNomina, CvePeriodoSeleccionado, CvePersonal, CveConcepto, ImporteConcepto, ImporteGravadoConcepto, ImporteExentoConcepto, ImporteValor, UsuarioActual.CveUsuario, true))
|
||||
if (!objNomina.AddUPNom_NominasDetalles(CveNomina, CvePeriodoSeleccionado, CvePersonal, CveConcepto, ImporteConcepto, ImporteGravadoConcepto, ImporteExentoConcepto, ImporteValor, UsuarioActual.CveUsuario, true, chkImporte, chkImporteGravado, chkImporteValor))
|
||||
{
|
||||
continuar = false;
|
||||
}
|
||||
@@ -4737,8 +4743,11 @@ public partial class Nomina_Nomina2 : ClsPaginas
|
||||
|
||||
private bool autorizarNomina(int FiltroCvePersonal)
|
||||
{
|
||||
|
||||
bool continuar = true;
|
||||
|
||||
int chkImporte = 1;
|
||||
int chkImporteGravado = 1;
|
||||
int chkImporteValor = 1;
|
||||
string[] getcolumnas = new string[] { "CvePersonal", "CveMetodoPago", "SumaPercepciones", "Total", "SalarioDiario", "SalarioDiarioIMSS", "SalarioDiarioIntegrado", "DiasLaborados", "DiasFaltados", "DiasVacaciones", "DiasIncapacidad" };
|
||||
|
||||
DataTable dtr = dtempleados.FiltraParametros(string.Format("(CvePersonal={0} OR {0}=-1) AND CvePersonal > 0 AND NomAutorizado =0", FiltroCvePersonal), "", getcolumnas);
|
||||
@@ -4814,7 +4823,7 @@ public partial class Nomina_Nomina2 : ClsPaginas
|
||||
if (continuar)
|
||||
{
|
||||
|
||||
if (!objNomina.AddUPNom_NominasDetalles(CveNomina, CvePeriodoSeleccionado, CvePersonal, CveConcepto, ImporteConcepto, ImporteGravadoConcepto, ImporteExentoConcepto, ImporteValor, UsuarioActual.CveUsuario))
|
||||
if (!objNomina.AddUPNom_NominasDetalles(CveNomina, CvePeriodoSeleccionado, CvePersonal, CveConcepto, ImporteConcepto, ImporteGravadoConcepto, ImporteExentoConcepto, ImporteValor, UsuarioActual.CveUsuario,false, chkImporte, chkImporteGravado, chkImporteValor))
|
||||
{
|
||||
continuar = false;
|
||||
}
|
||||
@@ -5846,7 +5855,7 @@ public partial class Nomina_Nomina2 : ClsPaginas
|
||||
}
|
||||
catch (Exception ex)
|
||||
{
|
||||
// OnError("Error al cargar Formato vacaciones", ex);
|
||||
this.OnError("Error al cargar Formato vacaciones", ex);
|
||||
}
|
||||
}
|
||||
if (Documento.Length > 0)
|
||||
|
||||
1839
RH/CatPersonal.aspx
1839
RH/CatPersonal.aspx
File diff suppressed because it is too large
Load Diff
@@ -9,6 +9,19 @@ Imports Microsoft.Reporting.WebForms
|
||||
Partial Class RH_CatPersonal
|
||||
Inherits ClsPaginas
|
||||
|
||||
Private Property ISChange As Boolean
|
||||
Get
|
||||
|
||||
If ViewState("ISChange") Is Nothing Then
|
||||
Return False
|
||||
Else
|
||||
Return DirectCast(ViewState("ISChange"), Boolean)
|
||||
End If
|
||||
End Get
|
||||
Set(value As Boolean)
|
||||
ViewState("ISChange") = value
|
||||
End Set
|
||||
End Property
|
||||
Private Property DTDatos As DataTable
|
||||
Get
|
||||
|
||||
@@ -24,8 +37,12 @@ Partial Class RH_CatPersonal
|
||||
End Property
|
||||
Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
|
||||
If Not Page.IsPostBack Then
|
||||
If UsuarioActual.CveEmpresa.Contiene(1, 119, 158) Then
|
||||
HplAddVenta.Visible = False
|
||||
End If
|
||||
LnkAddPersonalSimplificado.Visible = Not HplAddVenta.Visible
|
||||
TxtFechaIngreso.Text = String.Format("{0:dd/MM/yyyy}", DateTime.Now)
|
||||
ViewState("Orden") = ""
|
||||
|
||||
CargaEscolaridad()
|
||||
CargaEstadoCivil()
|
||||
CargaDepartamento()
|
||||
@@ -41,6 +58,12 @@ Partial Class RH_CatPersonal
|
||||
CargaSupervisores()
|
||||
CargaMetodosPago()
|
||||
CargaDatos()
|
||||
CargaTipoRegimen()
|
||||
CargaJornada()
|
||||
CargaEstados()
|
||||
CargaSatRiesgoPuesto()
|
||||
|
||||
LoadDefaultValues()
|
||||
End If
|
||||
End Sub
|
||||
|
||||
@@ -135,6 +158,38 @@ Partial Class RH_CatPersonal
|
||||
|
||||
#Region " C O M B O S "
|
||||
|
||||
Private Sub LoadDefaultValues()
|
||||
DdlDepartamentoAdd.SelectedIndex = 1
|
||||
DdlRegimenContratacion.SelectedValueExist(1)
|
||||
DdlMetodoPagoAdd.SelectedValueExist(1)
|
||||
DdlTipoPeriodoAdd.SelectedValueExist(1)
|
||||
DdlTipoContratoAdd.SelectedValueExist(2)
|
||||
DdlJornada.SelectedValueExist(6)
|
||||
DdlPuestoAdd.SelectedIndex = 1
|
||||
DdlRiesgoPuesto.SelectedIndex = 1
|
||||
End Sub
|
||||
Private Sub CargaSatRiesgoPuesto()
|
||||
DdlRiesgoPuesto.DataSource = GlobalDTNomSatRiesgoPuesto
|
||||
DdlRiesgoPuesto.DataBind()
|
||||
End Sub
|
||||
Private Sub CargaJornada()
|
||||
DdlJornada.DataSource = GlobalDTJornadas
|
||||
DdlJornada.DataBind()
|
||||
End Sub
|
||||
Private Sub CargaEstados()
|
||||
DdlEstados.DataSource = GlobalDTGralEstados(1)
|
||||
DdlEstados.DataBind()
|
||||
End Sub
|
||||
Private Sub CargaTipoRegimen()
|
||||
Dim dt As DataTable = GlobalDTNomSatRegimenContratacion.Copy()
|
||||
For Each item As DataRow In dt.Rows
|
||||
item("RegimenContratacion") = String.Format("{1}{0} {2}", item("CveSATRegimenContratacion"), If(item("CveSATRegimenContratacion").ToString().Length > 1, "", "0"), item("RegimenContratacion"))
|
||||
Next
|
||||
dt.AcceptChanges()
|
||||
|
||||
DdlRegimenContratacion.DataSource = dt.FiltraParametros("", "RegimenContratacion")
|
||||
DdlRegimenContratacion.DataBind()
|
||||
End Sub
|
||||
Private Sub CargaEscolaridad()
|
||||
DdlEscolaridad.DataSource = GlobalDTEscolaridad
|
||||
DdlEscolaridad.DataBind()
|
||||
@@ -142,7 +197,9 @@ Partial Class RH_CatPersonal
|
||||
|
||||
Private Sub CargaGenero()
|
||||
DdlGenero.DataSource = GlobalDTGenero
|
||||
DdlGeneroAdd.DataSource = GlobalDTGenero
|
||||
DdlGenero.DataBind()
|
||||
DdlGeneroAdd.DataBind()
|
||||
End Sub
|
||||
|
||||
Private Sub CargaEstadoCivil()
|
||||
@@ -153,11 +210,15 @@ Partial Class RH_CatPersonal
|
||||
Private Sub CargaTipoPeriodo()
|
||||
DdlTipoPeriodo.DataSource = GlobalDTTipoPeriodo
|
||||
DdlTipoPeriodo.DataBind()
|
||||
DdlTipoPeriodoAdd.DataSource = GlobalDTTipoPeriodo
|
||||
DdlTipoPeriodoAdd.DataBind()
|
||||
End Sub
|
||||
|
||||
Private Sub CargaTiposContrato()
|
||||
DdlTipoContrato.DataSource = GlobalDTTiposContrato
|
||||
DdlTipoContrato.DataBind()
|
||||
DdlTipoContratoAdd.DataSource = GlobalDTTiposContrato
|
||||
DdlTipoContratoAdd.DataBind()
|
||||
End Sub
|
||||
|
||||
Private Sub CargaTurno()
|
||||
@@ -167,12 +228,16 @@ Partial Class RH_CatPersonal
|
||||
|
||||
Private Sub CargaDepartamento()
|
||||
DdlDepartamento.DataSource = GlobalDTDepartamentos.FiltraParametros("CveEmpresa = " & UsuarioActual.CveEmpresa)
|
||||
DdlDepartamentoAdd.DataSource = DdlDepartamento.DataSource
|
||||
DdlDepartamentoAdd.DataBind()
|
||||
DdlDepartamento.DataBind()
|
||||
End Sub
|
||||
|
||||
Private Sub CargaPuestos()
|
||||
DdlPuesto.DataSource = GlobalDTRHPuestos(UsuarioActual.CveEmpresa)
|
||||
DdlPuestoAdd.DataSource = DdlPuesto.DataSource
|
||||
DdlPuesto.DataBind()
|
||||
DdlPuestoAdd.DataBind()
|
||||
End Sub
|
||||
|
||||
Private Sub CargaRuta()
|
||||
@@ -214,6 +279,10 @@ Partial Class RH_CatPersonal
|
||||
End Sub
|
||||
|
||||
Private Sub CargaTipoCentroCosto()
|
||||
|
||||
CargarCentrosDeCosto(DdlProyectoAsignadoAdd, DdlSubProyectoAsignadoAdd, LblProyectoAsignado, LblSubProyectoAsignado)
|
||||
DivProyectosAsignado.Visible = LblProyectoAsignado.Visible
|
||||
|
||||
CargarCentrosDeCosto(DdlProyectoAsignado, DdlSubProyectoAsignado, LblProyecto, LblSubProyecto)
|
||||
DivProyecto.Visible = LblProyecto.Visible
|
||||
ChkSubProyecto.Text = LblSubProyecto.Text
|
||||
@@ -228,6 +297,8 @@ Partial Class RH_CatPersonal
|
||||
Private Sub CargaMetodosPago()
|
||||
DdlMetodoPago.DataSource = GlobalDTMetodosPago
|
||||
DdlMetodoPago.DataBind()
|
||||
DdlMetodoPagoAdd.DataSource = GlobalDTMetodosPago
|
||||
DdlMetodoPagoAdd.DataBind()
|
||||
End Sub
|
||||
|
||||
#End Region
|
||||
@@ -1041,4 +1112,74 @@ Partial Class RH_CatPersonal
|
||||
' End If
|
||||
'End Using
|
||||
End Sub
|
||||
|
||||
Protected Sub LnkGuardar_Click(sender As Object, e As EventArgs)
|
||||
DdlTurno.SelectedIndex = 1
|
||||
Dim CveEtadoCivil = 1
|
||||
Dim CveEstatusPersonal = 1
|
||||
Dim CveEscolaridad As Integer = 0
|
||||
Dim isSindicalizado As Boolean = (DDlSindicalizado.SelectedValue = "1")
|
||||
Dim CvePuesto As Integer = DdlPuestoAdd.SelectedValue.ToEntero()
|
||||
Dim CveSATRiesgoPuesto As Integer = DdlRiesgoPuesto.SelectedValue.ToEntero()
|
||||
Dim continuar As Boolean = False
|
||||
Dim CvePersonal As Integer = 0
|
||||
Using ObjPersonal As New ClsRH()
|
||||
|
||||
If ObjPersonal.AddPersonal("-1", TxtAPaterno.Text.Trim, TxtAMaterno.Text.Trim, TxtNombres.Text.Trim, "", TxtFechaIngreso.Text.ToDate,
|
||||
DdlTipoPeriodoAdd.SelectedValue.ToEntero, TxtNumeroSS.Text.Trim, ChkSeInscribioSS.Checked, 0,
|
||||
0, 0, 0, 0, 15, 25, DdlMetodoPagoAdd.SelectedValue.ToEntero, TxtFechaIngreso.Text.Trim.ToDate, "-1",
|
||||
DdlTipoContratoAdd.SelectedValue.ToEntero, "",
|
||||
DdlTurno.SelectedValue.ToEntero, CvePuesto,
|
||||
DdlDepartamentoAdd.SelectedValue.ToEntero,
|
||||
-1, CveEscolaridad,
|
||||
CveEtadoCivil, DdlGeneroAdd.SelectedValue.ToEntero(),
|
||||
-1, "-1", CveEstatusPersonal, TxtFechaNacimiento.Text.ToDate,
|
||||
"", "", "", "", "", "", "",
|
||||
DdlEstados.SelectedValue.ToEntero, "", "", TxtRFC.Text.Trim,
|
||||
TxtCURP.Text.Trim, "", "", -1, CveSATRiesgoPuesto, DdlRegimenContratacion.SelectedValue.ToEntero,
|
||||
-1, DdlSubProyectoAsignadoAdd.SelectedValue.ToEntero, "",
|
||||
DdlSupervisor.SelectedValue.ToEntero, "", "", DdlJornada.SelectedValue.ToEntero, -1, "-1",
|
||||
0, "Seleccione", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1, -1, CveUniforme:=-1,
|
||||
TelefonoExtension:="", CelularPersonal:="", TelefonoMarcadoRapido:="", ContactoAlterno:="", CveTipodeSalario:=DDlTipoSalario.SelectedValue.ToEntero(), Sindicalizado:=isSindicalizado, CvePais:=151) Then
|
||||
Alert(String.Format("El empleado a sido agregado satisfactoriamente <a href=""/RH/Personal.aspx?CvePersonal={0}"">Ver empleado</a>", ObjPersonal.CvePersonal), TipoMensaje.ToastInformacion, "", 0)
|
||||
continuar = True
|
||||
ISChange = True
|
||||
Else
|
||||
'Alert("El empleado a sido agregado satisfactoriamente", TipoMensaje.ToastInformacion, "", 0)
|
||||
End If
|
||||
End Using
|
||||
DdlTurno.SelectedValueExist(-1)
|
||||
If continuar Then
|
||||
LimpiarCampos()
|
||||
If chkcontinuarAgregando.Checked Then
|
||||
Else
|
||||
|
||||
RegistraScript("$('#DmodalAddPersonal').modal('hide');")
|
||||
End If
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Protected Sub LimpiarCampos()
|
||||
TxtAPaterno.Text = ""
|
||||
TxtAMaterno.Text = ""
|
||||
TxtNombres.Text = ""
|
||||
TxtFechaNacimiento.Text = ""
|
||||
TxtNumeroSS.Text = ""
|
||||
TxtCURP.Text = ""
|
||||
TxtRFC.Text = ""
|
||||
End Sub
|
||||
|
||||
Protected Sub LnkAddPersonalSimplificado_Click(sender As Object, e As EventArgs)
|
||||
ISChange = False
|
||||
UpAddPerSimplificado.Update()
|
||||
LimpiarCampos()
|
||||
RegistraScript("$('#DmodalAddPersonal').modal();")
|
||||
End Sub
|
||||
|
||||
Protected Sub ClickOnHideModal_Click(sender As Object, e As EventArgs)
|
||||
If ISChange Then
|
||||
CargaDatos()
|
||||
End If
|
||||
|
||||
End Sub
|
||||
End Class
|
||||
|
||||
@@ -876,7 +876,7 @@ Partial Class RH_Personal
|
||||
divBitacora.Visible = True
|
||||
CargaGvBitacora()
|
||||
Else
|
||||
|
||||
LoadDefaultValues()
|
||||
'Configuración de Modalidad Insert
|
||||
|
||||
ImgAddObs.Visible = False
|
||||
@@ -935,6 +935,20 @@ Partial Class RH_Personal
|
||||
AgregarEventosAsincronosGvVacaciones()
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
Private Sub LoadDefaultValues()
|
||||
DdlDepartamento.SelectedIndex = 1
|
||||
DdlRegimenContratacion.SelectedValueExist(1)
|
||||
DdlMetodoPago.SelectedValueExist(1)
|
||||
DdlTipoPeriodo.SelectedValueExist(1)
|
||||
DdlTipoContrato.SelectedValueExist(2)
|
||||
DdlJornada.SelectedValueExist(6)
|
||||
DdlPuesto.SelectedIndex = 1
|
||||
DdlTurno.SelectedIndex = 1
|
||||
DdlEstatusPersonal.SelectedValue = "1"
|
||||
DdlRiesgoPuesto.SelectedIndex = 1
|
||||
End Sub
|
||||
Private Sub CargaCuentasContables()
|
||||
Dim ObjContabilidad As New ClsContPAQi(UsuarioActual.Empresa)
|
||||
If ObjContabilidad.GetCuentas(-1, "-1", -1) Then
|
||||
|
||||
@@ -10,7 +10,7 @@
|
||||
padding: 0px 5px;
|
||||
}
|
||||
|
||||
.nolineheight TxtNombreCliente line-height: 1;
|
||||
.nolineheight {line-height: 1;
|
||||
}
|
||||
|
||||
.claseesconder {
|
||||
|
||||
Reference in New Issue
Block a user