Carga masiva de periodos

carga masiva de conceptos
alerta de periodos no cargados en nominas y carga
Correccion  en el catalogo de puestos para que no asigne todas la empresas al global  de la empresa
This commit is contained in:
JORGE LUIS CAUDILLO ESPARZA
2023-11-20 07:37:53 -07:00
parent f85d769c12
commit 13f7b26b2d
8 changed files with 1542 additions and 1269 deletions

View File

@@ -3363,9 +3363,6 @@ Public Class ClsNominas
Return retorno Return retorno
End Function End Function
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 Public Function RunQuery(errormsg As String) As Boolean
Dim retorno As Boolean = False Dim retorno As Boolean = False
Try Try
@@ -3684,6 +3681,43 @@ Public Class ClsNominas
Return retorno Return retorno
End Function End Function
Public Function ConceptosGetallnewEmpresa(CveEmpresaOrigen As Integer, CveEmpresaDestino As Integer) As Boolean
Dim retorno As Boolean = False
DataAdapter("PA_Nom_ConceptosGetallnewEmpresa", CommandType.StoredProcedure)
With SqlAdapter.SelectCommand.Parameters
.Add("@CveEmpresaOrigen", SqlDbType.Int).Value = CveEmpresaOrigen
.Add("@CveEmpresaDestino", SqlDbType.Int).Value = CveEmpresaDestino
End With
Try
SqlAdapter.Fill(Data)
retorno = True
Catch ex As Exception
OnError("Ocurrió un error al clonar los conceptos de nominas.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
End Try
Return retorno
End Function
Public Function CargaPeriodosEjercicio(ejercicio As Int32, cveTipoPeriodo As Int32, cveSubTipoPeriodo As Int32, numero As Int32, fechaInicio As String, cveEmpresa As Int32, cveUsuario As Int32) As Boolean
Dim retorno As Boolean = False
DataAdapter("PA_Nom_CargaPeriodosEjercicio", CommandType.StoredProcedure)
addParameters("@Ejercicio", SqlDbType.Int, ejercicio)
addParameters("@CveTipoPeriodo", SqlDbType.Int, cveTipoPeriodo)
addParameters("@CveSubTipoPeriodo", SqlDbType.Int, cveSubTipoPeriodo)
addParameters("@Numero", SqlDbType.Int, numero)
addParameters("@FechaInicio", SqlDbType.VarChar, fechaInicio)
addParameters("@CveEmpresa", SqlDbType.Int, cveEmpresa)
addParameters("@CveUsuario", SqlDbType.Int, cveUsuario)
retorno = RunQuery("Ocurrió un error al realizar la carga de periodos.")
Return retorno
End Function
Public Sub addParameters(varsql As String, sqltipe As SqlDbType, valor As Object)
SqlAdapter.SelectCommand.Parameters.Add(varsql, sqltipe).Value = valor
End Sub
#Region "IDisposable Support" #Region "IDisposable Support"
' IDisposable ' IDisposable
Protected Overridable Sub Dispose(ByVal disposing As Boolean) Protected Overridable Sub Dispose(ByVal disposing As Boolean)

View File

@@ -19,7 +19,10 @@
<asp:UpdatePanel ID="UppAddAcciones" runat="server"> <asp:UpdatePanel ID="UppAddAcciones" runat="server">
<ContentTemplate> <ContentTemplate>
<li> <li>
<asp:LinkButton ID="LnkAddPeriodo" runat="server" Text="Agregar"><i class="fa fa-plus-circle"></i> Agregar</asp:LinkButton> <asp:LinkButton ID="LnkAddPeriodo" runat="server" ><i class="fa fa-plus-circle"></i> Agregar</asp:LinkButton>
</li>
<li>
<asp:LinkButton ID="LnkCargaMasivaModal" runat="server" OnClick="LnkCargaMasivaModal_Click"> Carga Masiva</asp:LinkButton>
</li> </li>
</ContentTemplate> </ContentTemplate>
</asp:UpdatePanel> </asp:UpdatePanel>
@@ -477,6 +480,72 @@
</asp:UpdatePanel> </asp:UpdatePanel>
</div> </div>
</div> </div>
<div id="divCargaMasiva" class="modal ADS fade" role="dialog">
<asp:UpdatePanel ID="UpCargaMasiva" class="modal-dialog modal" tabindex="-1" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<div class="modal-content rowpadding">
<div class="modal-header">
<button type="button" class="close" data-dismiss="modal" aria-label="Close">
<span aria-hidden="true">&times;</span>
</button>
<h4 class="modal-title" id="H1" runat="server">
<asp:Label runat="server" ID="Label1" Text="Agregar Periodo"></asp:Label>
</h4>
</div>
<div class="modal-body">
<br />
<div class="row">
<div class="col-md-2">Ejercicio:</div>
<div class="col-md-4">
<asp:DropDownList ID="DdlEjercicioCM" DataTextField="Ejercicio" DataValueField="Ejercicio" CssClass="form-control input-sm select2me" runat="server"></asp:DropDownList>
</div>
</div>
<br />
<div class="row">
<div class="col-xs-2" style="text-align: left">Tipo Periodo:</div>
<div class="col-xs-4">
<asp:DropDownList ID="DdlTipoPeriodoCM" CssClass="select2me form-control" runat="server" DataValueField="CveTipoPeriodo" DataTextField="TipoPeriodo" Width="100%"></asp:DropDownList>
</div>
<div class="col-xs-2" style="text-align: left">Subtipo Periodo:</div>
<div class="col-xs-4">
<asp:TextBox ID="TxtCveSubTipoPeriodoCM" Text="1" runat="server" CssClass=" form-control input-sm" CausesValidation="true" MaxLength="70" ValidationGroup="GrpGuardar" Width="100%"></asp:TextBox>
</div>
</div>
<br />
<div class="row">
<div class="col-xs-2" style="text-align: left;">
Numero:
</div>
<div class="col-xs-4">
<asp:TextBox ID="TxtNumeroCM" Text="1" runat="server" CssClass=" form-control input-sm" CausesValidation="true" MaxLength="70" ValidationGroup="GrpGuardar" Width="100%"></asp:TextBox>
</div>
<div class="col-xs-2" style="text-align: left; padding-top: 10px;">
Fecha Inicio:
</div>
<div class="col-xs-4">
<div class="input-group input-sm input-small date date-picker" data-date-format="dd/mm/yyyy" style="padding-left: 0px;">
<asp:TextBox ID="TxtFechaInicioCM" runat="server" CssClass="form-control" MaxLength="10"></asp:TextBox>
<span class="input-group-btn ">
<asp:LinkButton runat="server" ID="LnkFechaInicioCM" class="btn default"><i class="fa fa-calendar"></i></asp:LinkButton>
</span>
</div>
<ajax:MaskedEditExtender ID="MEEFechaInicioCM" runat="server" TargetControlID="TxtFechaInicioCM" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
<ajax:CalendarExtender ID="CEEFechaInicioCM" runat="server" TargetControlID="TxtFechaInicioCM" PopupButtonID="LnkFechaInicioCM" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
</div>
</div>
</div>
<div class="modal-footer">
<asp:LinkButton ID="LnkCargaMasiva" OnClick="LnkCargaMasiva_Click" runat="server" CssClass="btn btn-primary" ValidationGroup="grpno validacion"> <i class='material-icons'>done_all</i> Guardar</asp:LinkButton>
<button type="button" class="btn btn-default" data-dismiss="modal">Cancelar</button>
</div>
</div>
</ContentTemplate>
</asp:UpdatePanel>
</div>
</asp:Content> </asp:Content>
<asp:Content ID="Content7" ContentPlaceHolderID="JS" runat="Server"> <asp:Content ID="Content7" ContentPlaceHolderID="JS" runat="Server">
<script>function ADSBegin() { FiltrarTablaV2('.TxtBusqueda', '.GvDatos') }</script> <script>function ADSBegin() { FiltrarTablaV2('.TxtBusqueda', '.GvDatos') }</script>

View File

@@ -60,9 +60,11 @@ Partial Class Nomina_CatPeriodos
Private Sub CargaTipoPeriodo() Private Sub CargaTipoPeriodo()
DdlTipoPeriodo.DataSource = GlobalDTTipoPeriodo DdlTipoPeriodo.DataSource = GlobalDTTipoPeriodo
DdlTipoPeriodoAdd.DataSource = GlobalDTTipoPeriodo DdlTipoPeriodoAdd.DataSource = GlobalDTTipoPeriodo
DdlTipoPeriodoCM.DataSource = GlobalDTTipoPeriodo
DdlTipoPeriodo.DataBind() DdlTipoPeriodo.DataBind()
DdlTipoPeriodoAdd.DataBind() DdlTipoPeriodoAdd.DataBind()
DdlTipoPeriodoCM.DataBind()
End Sub End Sub
@@ -71,11 +73,14 @@ Partial Class Nomina_CatPeriodos
Dim ObjNom_Periodos As New ClsNominas Dim ObjNom_Periodos As New ClsNominas
If ObjNom_Periodos.GetEjercicios(UsuarioActual.CveEmpresa) Then If ObjNom_Periodos.GetEjercicios(UsuarioActual.CveEmpresa) Then
DdlEjercicio.DataSource = ObjNom_Periodos.DtResultados DdlEjercicio.DataSource = ObjNom_Periodos.DtResultados
DdlEjercicioCM.DataSource = ObjNom_Periodos.DtResultados
Else Else
DdlEjercicio.DataSource = Nothing DdlEjercicio.DataSource = Nothing
DdlEjercicioCM.DataSource = Nothing
End If End If
ObjNom_Periodos.Dispose() ObjNom_Periodos.Dispose()
DdlEjercicio.DataBind() DdlEjercicio.DataBind()
DdlEjercicioCM.DataBind()
DdlEjercicio.Items.Insert(0, New ListItem("Todos", "-1")) DdlEjercicio.Items.Insert(0, New ListItem("Todos", "-1"))
End Sub End Sub
@@ -368,4 +373,23 @@ Partial Class Nomina_CatPeriodos
Next Next
UpModalPerido.Update() UpModalPerido.Update()
End Sub End Sub
Protected Sub LnkCargaMasiva_Click(sender As Object, e As EventArgs)
Dim ejercicio As Integer = DdlEjercicioCM.SelectedValue.ToEntero()
Dim cveTipoPeriodo As Integer = DdlTipoPeriodoCM.SelectedValue.ToEntero()
Dim cveSubTipoPeriodo As Integer = TxtCveSubTipoPeriodoCM.Text.ToEntero()
Dim numero As Integer = TxtNumeroCM.Text.ToEntero()
Dim fechaInicio As String = TxtFechaInicioCM.Text
Using onom As New ClsNominas
If onom.CargaPeriodosEjercicio(ejercicio, cveTipoPeriodo, cveSubTipoPeriodo, numero, fechaInicio, UsuarioActual.CveEmpresa, UsuarioActual.CveUsuario) Then
Alert("Se cargo satisfactoriamente.")
End If
End Using
End Sub
Protected Sub LnkCargaMasivaModal_Click(sender As Object, e As EventArgs)
RegistraScript("$('#divCargaMasiva').modal('show');")
End Sub
End Class End Class

View File

@@ -323,7 +323,7 @@
<div class="row"> <div class="row">
<label class="col-md-1 compoonenlabel" style="max-width: 65px;">Ejercicio: </label> <label class="col-md-1 compoonenlabel" style="max-width: 65px;">Ejercicio: </label>
<div class="col-md-1"> <div class="col-md-1">
<asp:DropDownList ID="DdlEjercicios" runat="server" OnSelectedIndexChanged="DdlEjercicios_SelectedIndexChanged" Style="width: 100% !important;" CssClass="select2me" DataValueField="Ejercicio" DataTextField="Ejercicio"></asp:DropDownList> <asp:DropDownList ID="DdlEjercicios" runat="server" OnSelectedIndexChanged="DdlEjercicios_SelectedIndexChanged" AutoPostBack="true" Style="width: 100% !important;" CssClass="select2me" DataValueField="Ejercicio" DataTextField="Ejercicio"></asp:DropDownList>
</div> </div>
<label class="col-md-1 compoonenlabel" style="max-width: 100px;">Tipo Período:</label> <label class="col-md-1 compoonenlabel" style="max-width: 100px;">Tipo Período:</label>
@@ -4673,6 +4673,71 @@
<div id="divCargaMasiva" class="modal ADS fade" role="dialog">
<asp:UpdatePanel ID="UpCargaMasiva" class="modal-dialog modal" tabindex="-1" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<div class="modal-content rowpadding">
<div class="modal-header">
<button type="button" class="close" data-dismiss="modal" aria-label="Close">
<span aria-hidden="true">&times;</span>
</button>
<h4 class="modal-title" id="H1" runat="server">
<asp:Label runat="server" ID="Label3" Text="Agregar Periodo"></asp:Label>
</h4>
</div>
<div class="modal-body">
<br />
<div class="row">
<div class="col-md-2">Ejercicio:</div>
<div class="col-md-4">
<asp:DropDownList ID="DdlEjercicioCM" DataTextField="Ejercicio" DataValueField="Ejercicio" CssClass="form-control input-sm select2me" runat="server"></asp:DropDownList>
</div>
</div>
<br />
<div class="row">
<div class="col-xs-2" style="text-align: left">Tipo Periodo:</div>
<div class="col-xs-4">
<asp:DropDownList ID="DdlTipoPeriodoCMB" CssClass="select2me form-control" runat="server" DataValueField="CveTipoPeriodo" DataTextField="TipoPeriodo" Width="100%"></asp:DropDownList>
</div>
<div class="col-xs-2" style="text-align: left">Subtipo Periodo:</div>
<div class="col-xs-4">
<asp:TextBox ID="TxtCveSubTipoPeriodoCM" Text="1" runat="server" CssClass=" form-control input-sm" CausesValidation="true" MaxLength="70" ValidationGroup="GrpGuardar" Width="100%"></asp:TextBox>
</div>
</div>
<br />
<div class="row">
<div class="col-xs-2" style="text-align: left;">
Numero:
</div>
<div class="col-xs-4">
<asp:TextBox ID="TxtNumeroCM" Text="1" runat="server" CssClass=" form-control input-sm" CausesValidation="true" MaxLength="70" ValidationGroup="GrpGuardar" Width="100%"></asp:TextBox>
</div>
<div class="col-xs-2" style="text-align: left; padding-top: 10px;">
Fecha Inicio:
</div>
<div class="col-xs-4">
<div class="input-group input-sm input-small date date-picker" data-date-format="dd/mm/yyyy" style="padding-left: 0px;">
<asp:TextBox ID="TxtFechaInicioCM" runat="server" CssClass="form-control" MaxLength="10"></asp:TextBox>
<span class="input-group-btn ">
<asp:LinkButton runat="server" ID="LnkFechaInicioCM" class="btn default"><i class="fa fa-calendar"></i></asp:LinkButton>
</span>
</div>
<ajax:MaskedEditExtender ID="MEEFechaInicioCM" runat="server" TargetControlID="TxtFechaInicioCM" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
<ajax:CalendarExtender ID="CEEFechaInicioCM" runat="server" TargetControlID="TxtFechaInicioCM" PopupButtonID="LnkFechaInicioCM" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
</div>
</div>
</div>
<div class="modal-footer">
<asp:LinkButton ID="LnkCargaMasiva" OnClick="LnkCargaMasiva_Click" runat="server" CssClass="btn btn-primary" ValidationGroup="grpno validacion"> <i class='material-icons'>done_all</i> Guardar</asp:LinkButton>
<button type="button" class="btn btn-default" data-dismiss="modal">Cancelar</button>
</div>
</div>
</ContentTemplate>
</asp:UpdatePanel>
</div>

View File

@@ -448,8 +448,10 @@ public partial class Nomina_Nomina2 : ClsPaginas
} }
DdlEjercicios.DataSource = dtejercicio; DdlEjercicios.DataSource = dtejercicio;
DdlEjerciciosCM.DataSource = dtejercicio; DdlEjerciciosCM.DataSource = dtejercicio;
DdlEjercicioCM.DataSource = dtejercicio;
DdlEjercicios.DataBind(); DdlEjercicios.DataBind();
DdlEjerciciosCM.DataBind(); DdlEjerciciosCM.DataBind();
DdlEjercicioCM.DataBind();
ListItem litem = null; ListItem litem = null;
if ((dtejercicio != null) && dtejercicio.Rows.Count > 0) if ((dtejercicio != null) && dtejercicio.Rows.Count > 0)
{ {
@@ -487,6 +489,8 @@ public partial class Nomina_Nomina2 : ClsPaginas
DdlTipoPeriodo.DataSource = get_GlobalDTTipoPeriodos(UsuarioActual.CveEmpresa); DdlTipoPeriodo.DataSource = get_GlobalDTTipoPeriodos(UsuarioActual.CveEmpresa);
DdlTipoPeriodoCM.DataSource = DdlTipoPeriodo.DataSource; DdlTipoPeriodoCM.DataSource = DdlTipoPeriodo.DataSource;
DdlTipoPeriodoSim.DataSource = DdlTipoPeriodo.DataSource; DdlTipoPeriodoSim.DataSource = DdlTipoPeriodo.DataSource;
DdlTipoPeriodoCMB.DataSource = DdlTipoPeriodo.DataSource;
DdlTipoPeriodoCMB.DataBind();
DdlTipoPeriodoSim.DataBind(); DdlTipoPeriodoSim.DataBind();
DdlTipoPeriodoCM.DataBind(); DdlTipoPeriodoCM.DataBind();
DdlTipoPeriodo.DataBind(); DdlTipoPeriodo.DataBind();
@@ -507,6 +511,11 @@ public partial class Nomina_Nomina2 : ClsPaginas
{ {
if (objperiodos.GetPeriodos(tipoPeriodo, UsuarioActual.CveEmpresa, ejercicio, -1, -1)) if (objperiodos.GetPeriodos(tipoPeriodo, UsuarioActual.CveEmpresa, ejercicio, -1, -1))
{ {
if (objperiodos.DtResultados.Rows.Count == 0)
{
Alert("No existen periodos registrados en este año y tipo de periodo,¿desea registrarlos masivamente?",TipoMensaje.MsgConfirmacion, "$(\"#divCargaMasiva\").modal(\"show\");",TextoConfirmacion:"Aceptar",TextoSegundoBoton:"No");
}
dtPeriodos = objperiodos.DtResultados.FiltraParametros("Estatus IN (1,2,3,4,5)"); dtPeriodos = objperiodos.DtResultados.FiltraParametros("Estatus IN (1,2,3,4,5)");
} }
} }
@@ -525,7 +534,6 @@ public partial class Nomina_Nomina2 : ClsPaginas
protected void DdlTipoPeriodo_SelectedIndexChanged(object sender, EventArgs e) protected void DdlTipoPeriodo_SelectedIndexChanged(object sender, EventArgs e)
{ {
cargaPeriodos(); cargaPeriodos();
DdlEjercicios.AutoPostBack = true;
} }
protected void DdlPeriodo_SelectedIndexChanged(object sender, EventArgs e) protected void DdlPeriodo_SelectedIndexChanged(object sender, EventArgs e)
@@ -10943,4 +10951,22 @@ public partial class Nomina_Nomina2 : ClsPaginas
protected void LnkCargaMasiva_Click(object sender, EventArgs e)
{
int ejercicio = DdlEjercicioCM.SelectedValue.ToEntero();
int cveTipoPeriodo = DdlTipoPeriodoCMB.SelectedValue.ToEntero();
int cveSubTipoPeriodo = TxtCveSubTipoPeriodoCM.Text.ToEntero();
int numero = TxtNumeroCM.Text.ToEntero();
string fechaInicio = TxtFechaInicioCM.Text;
using (ClsNominas onom = new ClsNominas())
{
if (onom.CargaPeriodosEjercicio(ejercicio, cveTipoPeriodo, cveSubTipoPeriodo, numero, fechaInicio, UsuarioActual.CveEmpresa, UsuarioActual.CveUsuario))
{
Alert("Se cargo satisfactoriamente.");
}
}
}
} }

View File

@@ -135,7 +135,7 @@ Partial Class RH_CatPuesto
CargaCatalogoOcupaciones() CargaCatalogoOcupaciones()
If ObjPuestos.GetPuestos(-1) Then If ObjPuestos.GetPuestos(UsuarioActual.CveEmpresa) Then
GvPuestos.DataSource = ObjPuestos.DtResultados.FiltraParametros("CveEmpresa = " & UsuarioActual.CveEmpresa) GvPuestos.DataSource = ObjPuestos.DtResultados.FiltraParametros("CveEmpresa = " & UsuarioActual.CveEmpresa)
GlobalDTRHPuestos(UsuarioActual.CveEmpresa) = ObjPuestos.DtResultados GlobalDTRHPuestos(UsuarioActual.CveEmpresa) = ObjPuestos.DtResultados
@@ -344,12 +344,12 @@ Partial Class RH_CatPuesto
If CvePuesto = -1 And Actualizar = False Then If CvePuesto = -1 And Actualizar = False Then
If ObjPuestos.AddPuesto(TxtPuesto.Text.Trim, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, DdlOcupacion.SelectedValue.ToEntero) Then If ObjPuestos.AddPuesto(TxtPuesto.Text.Trim, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, DdlOcupacion.SelectedValue.ToEntero) Then
If ObjPuestos.GetPuestos(-1) Then Application("GlobalDTRHPuestos") = ObjPuestos.DtResultados Else Application("GlobalDTRHPuestos") = Nothing If ObjPuestos.GetPuestos(UsuarioActual.CveEmpresa) Then Application("GlobalDTRHPuestos") = ObjPuestos.DtResultados Else Application("GlobalDTRHPuestos") = Nothing
Alert("Puesto agregado correctamente.") Alert("Puesto agregado correctamente.")
End If End If
Else Else
If ObjPuestos.UpdatePuesto(CvePuesto, TxtPuesto.Text.Trim, estatus, UsuarioActual.CveUsuario, DdlOcupacion.SelectedValue.ToEntero) Then If ObjPuestos.UpdatePuesto(CvePuesto, TxtPuesto.Text.Trim, estatus, UsuarioActual.CveUsuario, DdlOcupacion.SelectedValue.ToEntero) Then
If ObjPuestos.GetPuestos(-1) Then Application("GlobalDTRHPuestos") = ObjPuestos.DtResultados Else Application("GlobalDTRHPuestos") = Nothing If ObjPuestos.GetPuestos(UsuarioActual.CveEmpresa) Then Application("GlobalDTRHPuestos") = ObjPuestos.DtResultados Else Application("GlobalDTRHPuestos") = Nothing
Alert("Puesto actualizado correctamente.") Alert("Puesto actualizado correctamente.")
End If End If
End If End If
@@ -372,7 +372,7 @@ Partial Class RH_CatPuesto
Dim _CvePuesto As Integer = GvRow.DataKey("CvePuesto").ToEntero Dim _CvePuesto As Integer = GvRow.DataKey("CvePuesto").ToEntero
If objRH.RemovePuesto(_CvePuesto) Then If objRH.RemovePuesto(_CvePuesto) Then
If objRH.GetPuestos(-1) Then Application("GlobalDTRHPuestos") = objRH.DtResultados Else Application("GlobalDTRHPuestos") = Nothing If objRH.GetPuestos(UsuarioActual.CveEmpresa) Then Application("GlobalDTRHPuestos") = objRH.DtResultados Else Application("GlobalDTRHPuestos") = Nothing
CargaDatos() CargaDatos()
Else Else
Alert("Ocurrio un error al eliminar el puesto", TipoMensaje.MsgError) Alert("Ocurrio un error al eliminar el puesto", TipoMensaje.MsgError)

View File

@@ -1,8 +1,7 @@
<%@ Page Title="" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="Empresa.aspx.vb" Inherits="Sistemas_Empresa" %> <%@ Page Title="" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="Empresa.aspx.vb" Inherits="Sistemas_Empresa" %>
<%@ Register Assembly="AjaxControlToolkit" Namespace="AjaxControlToolkit" TagPrefix="asp" %> <%@ Register Assembly="AjaxControlToolkit" Namespace="AjaxControlToolkit" TagPrefix="asp" %>
<asp:Content ID="Content1" ContentPlaceHolderID="H" runat="Server">
</asp:Content>
<asp:Content ID="Content4" ContentPlaceHolderID="css" runat="Server"> <asp:Content ID="Content4" ContentPlaceHolderID="css" runat="Server">
<style> <style>
.GVGrupoEmpresas td:nth-child(1) { .GVGrupoEmpresas td:nth-child(1) {
@@ -17,7 +16,20 @@
<asp:Content ID="Content2" ContentPlaceHolderID="E" runat="Server"> <asp:Content ID="Content2" ContentPlaceHolderID="E" runat="Server">
<asp:Literal ID="LtlTitulo" runat="server" Text="Registro de Empresas"></asp:Literal> <asp:Literal ID="LtlTitulo" runat="server" Text="Registro de Empresas"></asp:Literal>
</asp:Content> </asp:Content>
<asp:Content ID="Content3" ContentPlaceHolderID="C" runat="Server">
<asp:Content ID="Content3" ContentPlaceHolderID="H" runat="Server">
<asp:UpdatePanel ID="UpAccciones" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<li>
<asp:LinkButton ID="LnkClonmarCNomModal" OnClick="LnkClonmarCNomModal_Click" runat="server"><i class="fa fa-clone"></i> Clonar Conceptos Nómina</asp:LinkButton>
</li>
</ContentTemplate>
</asp:UpdatePanel>
</asp:Content>
<asp:Content ID="Content5" ContentPlaceHolderID="C" runat="Server">
<script language="javascript" type="text/javascript"> <script language="javascript" type="text/javascript">
function SetText(ObjFrom, ObjTo) { function SetText(ObjFrom, ObjTo) {
@@ -153,7 +165,7 @@
<asp:TextBox ID="TxtLocalidad" runat="server" MaxLength="50" Width="200px"></asp:TextBox> <asp:TextBox ID="TxtLocalidad" runat="server" MaxLength="50" Width="200px"></asp:TextBox>
</td> </td>
</tr> </tr>
<%-- <tr> <%-- <tr>
<td>Régimen:</td> <td>Régimen:</td>
<td> <td>
<asp:TextBox ID="TxtRegimen" runat="server" MaxLength="100" Width="350px"></asp:TextBox> <asp:TextBox ID="TxtRegimen" runat="server" MaxLength="100" Width="350px"></asp:TextBox>
@@ -265,14 +277,13 @@
<td>Huso Horario:</td> <td>Huso Horario:</td>
<td> <td>
<%--<asp:DropDownList ID="DdlUTCHora" runat="server" CssClass="form-control select2me" Width="300px"></asp:DropDownList> --%> <%--<asp:DropDownList ID="DdlUTCHora" runat="server" CssClass="form-control select2me" Width="300px"></asp:DropDownList> --%>
<asp:DropDownList ID="DdlZonaHoraria" DataTextField="DisplayText" DataValueField="CveZonaHoraria" runat="server" CssClass="form-control input-sm select2me" Width="300px"> <asp:DropDownList ID="DdlZonaHoraria" DataTextField="DisplayText" DataValueField="CveZonaHoraria" runat="server" CssClass="form-control input-sm select2me" Width="300px">
</asp:DropDownList> </asp:DropDownList>
<asp:RequiredFieldValidator ID="RfvDdlZonaHoraria" runat="server" ControlToValidate="DdlZonaHoraria" Display="None" <asp:RequiredFieldValidator ID="RfvDdlZonaHoraria" runat="server" ControlToValidate="DdlZonaHoraria" Display="None"
ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Huso Horario'</b> es necesario, por favor ingréselo." InitialValue="-1" ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator> ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Huso Horario'</b> es necesario, por favor ingréselo." InitialValue="-1" ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="vceRfvDdlZonaHoraria" runat="server" HighlightCssClass="vco" TargetControlID="RfvDdlZonaHoraria" Width="300px"></ajax:ValidatorCalloutExtender> <ajax:ValidatorCalloutExtender ID="vceRfvDdlZonaHoraria" runat="server" HighlightCssClass="vco" TargetControlID="RfvDdlZonaHoraria" Width="300px"></ajax:ValidatorCalloutExtender>
</td> </td>
</tr> </tr>
</table> </table>
</div> </div>
</div> </div>
@@ -343,7 +354,7 @@
</td> </td>
<td> <td>
<asp:LinkButton ID="LnkArchivoKey" runat="server" CssClass="btn btn-circle btn-sm green" Text="<i title='Subir Documento' class='fa fa-upload' title='Subir Documento' tooltip='Subir' ></i>" /> <asp:LinkButton ID="LnkArchivoKey" runat="server" CssClass="btn btn-circle btn-sm green" Text="<i title='Subir Documento' class='fa fa-upload' title='Subir Documento' tooltip='Subir' ></i>" />
<asp:LinkButton ID="LbArchivoKeyDescarga" runat="server" CssClass="btn btn-circle btn-sm blue" Text="<i title='Bajar Documento' class='fa fa-download' title='Bajar Documento' tooltip='Descargar'></i>" Visible="false"/> <asp:LinkButton ID="LbArchivoKeyDescarga" runat="server" CssClass="btn btn-circle btn-sm blue" Text="<i title='Bajar Documento' class='fa fa-download' title='Bajar Documento' tooltip='Descargar'></i>" Visible="false" />
</td> </td>
</tr> </tr>
<tr> <tr>
@@ -352,8 +363,8 @@
<asp:TextBox ID="TxtArchivoCer" runat="server" MaxLength="115" Width="200px"></asp:TextBox> <asp:TextBox ID="TxtArchivoCer" runat="server" MaxLength="115" Width="200px"></asp:TextBox>
</td> </td>
<td> <td>
<asp:LinkButton ID="LnkArchivoCer" runat="server" CssClass="btn btn-circle btn-sm green" Text="<i title='Subir Documento' class='fa fa-upload' title='Subir Documento' tooltip='Subir' ></i>"/> <asp:LinkButton ID="LnkArchivoCer" runat="server" CssClass="btn btn-circle btn-sm green" Text="<i title='Subir Documento' class='fa fa-upload' title='Subir Documento' tooltip='Subir' ></i>" />
<asp:LinkButton ID="LbArchivoCerDescarga" runat="server" CssClass="btn btn-circle btn-sm blue" Text="<i title='Bajar Documento' class='fa fa-download' title='Bajar Documento' tooltip='Descargar'></i>" Visible="false"/> <asp:LinkButton ID="LbArchivoCerDescarga" runat="server" CssClass="btn btn-circle btn-sm blue" Text="<i title='Bajar Documento' class='fa fa-download' title='Bajar Documento' tooltip='Descargar'></i>" Visible="false" />
</td> </td>
</tr> </tr>
<tr> <tr>
@@ -362,8 +373,8 @@
<asp:TextBox ID="TxtArchivoPfx" runat="server" MaxLength="115" Width="200px"></asp:TextBox> <asp:TextBox ID="TxtArchivoPfx" runat="server" MaxLength="115" Width="200px"></asp:TextBox>
</td> </td>
<td> <td>
<asp:LinkButton ID="LnkArchivoPfx" runat="server" CssClass="btn btn-circle btn-sm green" Text="<i title='Subir Documento' class='fa fa-upload' title='Subir Documento' tooltip='Subir' ></i>"/> <asp:LinkButton ID="LnkArchivoPfx" runat="server" CssClass="btn btn-circle btn-sm green" Text="<i title='Subir Documento' class='fa fa-upload' title='Subir Documento' tooltip='Subir' ></i>" />
<asp:LinkButton ID="LbArchivoPfxDescarga" runat="server" CssClass="btn btn-circle btn-sm blue" Text="<i title='Bajar Documento' class='fa fa-download' title='Bajar Documento' tooltip='Descargar'></i>" Visible="false"/> <asp:LinkButton ID="LbArchivoPfxDescarga" runat="server" CssClass="btn btn-circle btn-sm blue" Text="<i title='Bajar Documento' class='fa fa-download' title='Bajar Documento' tooltip='Descargar'></i>" Visible="false" />
</td> </td>
</tr> </tr>
<tr> <tr>
@@ -450,30 +461,30 @@
ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El Campo <b>''Contraseña''</b> es necesario, por favor ingréselo." ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El Campo <b>''Contraseña''</b> es necesario, por favor ingréselo."
ValidationGroup="GrpUpDatosFiel"></asp:RequiredFieldValidator> ValidationGroup="GrpUpDatosFiel"></asp:RequiredFieldValidator>
<div class="row"> <div class="row">
<div class="col-md-6"> <div class="col-md-6">
<div>Archivo CER</div> <div>Archivo CER</div>
<div> <div>
<asp:TextBox ID="TxtFielArchivoCER" ClientIDMode="Static" CssClass="ADSdropzone hidden" runat="server"></asp:TextBox> <asp:TextBox ID="TxtFielArchivoCER" ClientIDMode="Static" CssClass="ADSdropzone hidden" runat="server"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVTxtFielArchivoCER" runat="server" CssClass="help-block errorimput" ControlToValidate="TxtImporte" InitialValue="[]" <asp:RequiredFieldValidator ID="RFVTxtFielArchivoCER" runat="server" CssClass="help-block errorimput" ControlToValidate="TxtImporte" InitialValue="[]"
ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El Archivo <b>''Archivo CER''</b> es necesario, por favor ingréselo." ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El Archivo <b>''Archivo CER''</b> es necesario, por favor ingréselo."
ValidationGroup="GrpUpDatosFiel"></asp:RequiredFieldValidator> ValidationGroup="GrpUpDatosFiel"></asp:RequiredFieldValidator>
</div>
</div> </div>
<div class="col-md-6">
<div>Archivo Key</div>
<div>
<asp:TextBox ID="TxtFielArchivoKey" ClientIDMode="Static" CssClass="ADSdropzone hidden" runat="server"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVFielArchivoKey" runat="server" CssClass="help-block errorimput" ControlToValidate="TxtImporte" InitialValue="[]"
ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El Archivo <b>''Archivo Key''</b> es necesario, por favor ingréselo."
ValidationGroup="GrpUpDatosFiel"></asp:RequiredFieldValidator>
</div>
</div>
</div> </div>
</div>
<div class="col-md-6">
<div>Archivo Key</div>
<div>
<asp:TextBox ID="TxtFielArchivoKey" ClientIDMode="Static" CssClass="ADSdropzone hidden" runat="server"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVFielArchivoKey" runat="server" CssClass="help-block errorimput" ControlToValidate="TxtImporte" InitialValue="[]"
ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El Archivo <b>''Archivo Key''</b> es necesario, por favor ingréselo."
ValidationGroup="GrpUpDatosFiel"></asp:RequiredFieldValidator>
</div>
</div>
</div>
</div>
<div class="modal-footer"> <div class="modal-footer">
<asp:UpdatePanel ID="UpFooter" runat="server" UpdateMode="Conditional"> <asp:UpdatePanel ID="UpFooter" runat="server" UpdateMode="Conditional">
<ContentTemplate> <ContentTemplate>
@@ -505,12 +516,11 @@
<div class="portlet-body"> <div class="portlet-body">
<table border="0" width="100%"> <table border="0" width="100%">
<tr> <tr>
<%-- <td width="120px">Registro Patronal:</td> <%-- <td width="120px">Registro Patronal:</td>
<td> <td>
<asp:TextBox ID="TxtRegistoPatronal" runat="server" MaxLength="50" Width="200px" ValidationGroup="GrpGuardar"></asp:TextBox> <asp:TextBox ID="TxtRegistoPatronal" runat="server" MaxLength="50" Width="200px" ValidationGroup="GrpGuardar"></asp:TextBox>
</td>--%> </td>--%>
</tr> </tr>
<tr> <tr>
<td>Área Geográfica:</td> <td>Área Geográfica:</td>
@@ -776,23 +786,19 @@
</div> </div>
<div class="col-md-6"> <div class="col-md-6">
</div> </div>
</div> </div>
<div class="row"> <div class="row">
<div class="col-md-6"> <div class="col-md-6">
</div> </div>
<div class="col-md-6"> <div class="col-md-6">
</div> </div>
</div> </div>
<div class="row"> <div class="row">
<div class="col-md-6"> <div class="col-md-6">
</div> </div>
</div> </div>
@@ -1193,7 +1199,7 @@
</div> </div>
</div> </div>
<div class="tools"> <div class="tools">
<a data-toggle="modal" data-target="#DVModalEqiqutas" id="LnkEtiquetasVenta" runat="server" class="caption-subject bold font-green" style="font-size:12px!important"> <i class="fa fa-tags"></i> Etiquetas Disponibles</a> <a data-toggle="modal" data-target="#DVModalEqiqutas" id="LnkEtiquetasVenta" runat="server" class="caption-subject bold font-green" style="font-size: 12px!important"><i class="fa fa-tags"></i>Etiquetas Disponibles</a>
<a href="javascript:;" class="collapse"></a> <a href="javascript:;" class="collapse"></a>
</div> </div>
</div> </div>
@@ -1204,10 +1210,10 @@
<div class="col-md-12"> <div class="col-md-12">
<div runat="server" class="form-group form-md-line-input input-iconright"> <div runat="server" class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtAsunto" runat="server" ClientIDMode="Static" MaxLength="150" CssClass="form-control" ></asp:TextBox> <asp:TextBox ID="TxtAsunto" runat="server" ClientIDMode="Static" MaxLength="150" CssClass="form-control"></asp:TextBox>
<label for="<%= TxtAsunto.ClientID.ToString()%>">Asunto:</label> <label for="<%= TxtAsunto.ClientID.ToString()%>">Asunto:</label>
<i></i> <i></i>
</div> </div>
<br /> <br />
<asp:TextBox ID="TxtPlantillaVenta" runat="server" ClientIDMode="Static" MaxLength="5000" TextMode="MultiLine" Height="300px" Width="100%"></asp:TextBox> <asp:TextBox ID="TxtPlantillaVenta" runat="server" ClientIDMode="Static" MaxLength="5000" TextMode="MultiLine" Height="300px" Width="100%"></asp:TextBox>
@@ -1252,7 +1258,7 @@
</div> </div>
</div> </div>
<div class="col-md-6"> <div class="col-md-6">
<div class="portlet light xspadding bordered"> <div class="portlet light xspadding bordered">
<div class="portlet-title"> <div class="portlet-title">
<div class="caption font-green"> <div class="caption font-green">
@@ -1261,11 +1267,10 @@
</div> </div>
<div class="actions"> <div class="actions">
<div class="btn-group"> <div class="btn-group">
</div> </div>
</div> </div>
<div class="tools"> <div class="tools">
<a data-toggle="modal" data-target="#DVModalEqiqutas" id="LnkEtiquetasCotizacion" runat="server" class="caption-subject bold font-green" style="font-size:12px!important"> <i class="fa fa-tags"></i> Etiquetas Disponibles</a> <a data-toggle="modal" data-target="#DVModalEqiqutas" id="LnkEtiquetasCotizacion" runat="server" class="caption-subject bold font-green" style="font-size: 12px!important"><i class="fa fa-tags"></i>Etiquetas Disponibles</a>
<a href="javascript:;" class="collapse"></a> <a href="javascript:;" class="collapse"></a>
</div> </div>
</div> </div>
@@ -1277,8 +1282,8 @@
<div runat="server" class="form-group form-md-line-input input-iconright"> <div runat="server" class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtAsuntoCotizacion" runat="server" ClientIDMode="Static" MaxLength="150" CssClass="form-control" TextMode="SingleLine"></asp:TextBox> <asp:TextBox ID="TxtAsuntoCotizacion" runat="server" ClientIDMode="Static" MaxLength="150" CssClass="form-control" TextMode="SingleLine"></asp:TextBox>
<label for="<%= TxtAsuntoCotizacion.ClientID.ToString()%>">Asunto:</label> <label for="<%= TxtAsuntoCotizacion.ClientID.ToString()%>">Asunto:</label>
<i></i> <i></i>
</div> </div>
<br /> <br />
@@ -1327,10 +1332,10 @@
</div> </div>
<div class="row"> <div class="row">
<div class="col-md-12"> <div class="col-md-12">
<asp:Button ID="BtnGuardarPlantilla" runat="server" CssClass="btn btn-primary" align="center" Text="Guardar Plantillas" /> <asp:Button ID="BtnGuardarPlantilla" runat="server" CssClass="btn btn-primary" align="center" Text="Guardar Plantillas" />
</div> </div>
</div> </div>
</ContentTemplate> </ContentTemplate>
@@ -1364,51 +1369,52 @@
<ContentTemplate> <ContentTemplate>
<div id="ModalArchvivo" class="modal ADS fade" role="dialog"> <div id="ModalArchvivo" class="modal ADS fade" role="dialog">
<div class="modal-dialog"> <div class="modal-dialog">
<!-- Modal content--> <!-- Modal content-->
<div class="modal-content" style="width: 700px;"> <div class="modal-content" style="width: 700px;">
<div class="modal-header "> <div class="modal-header ">
<button type="button" class="close" data-dismiss="modal">&times;</button> <button type="button" class="close" data-dismiss="modal">&times;</button>
<h4 class="modal-title"><asp:Label runat="server" ID="LblModalCertificadosTitulo"></asp:Label></h4> <h4 class="modal-title">
</div> <asp:Label runat="server" ID="LblModalCertificadosTitulo"></asp:Label></h4>
</div>
<div class="modal-body" style="height: 200px;"> <div class="modal-body" style="height: 200px;">
<asp:UpdatePanel runat="server" ID="UpAddArchivo" UpdateMode="Conditional"> <asp:UpdatePanel runat="server" ID="UpAddArchivo" UpdateMode="Conditional">
<ContentTemplate> <ContentTemplate>
<div class="row"> <div class="row">
<div class="col-md-12"> <div class="col-md-12">
<div> <div>
<asp:TextBox ID="TxtCargaImg" CssClass="ADSdropzone hidden" Text="" runat="server"></asp:TextBox> <asp:TextBox ID="TxtCargaImg" CssClass="ADSdropzone hidden" Text="" runat="server"></asp:TextBox>
</div>
</div>
</div> </div>
</div> <%--<div>
</div>
<%--<div>
<asp:TextBox ID="Anexo" CssClass="ADSdropzone hidden" data-maxFile="1" Text="" runat="server"></asp:TextBox> <asp:TextBox ID="Anexo" CssClass="ADSdropzone hidden" data-maxFile="1" Text="" runat="server"></asp:TextBox>
</div> --%> </div> --%>
</ContentTemplate> </ContentTemplate>
</asp:UpdatePanel> </asp:UpdatePanel>
</div> </div>
<br /> <br />
<div class="modal-footer"> <div class="modal-footer">
<asp:UpdatePanel runat="server"> <asp:UpdatePanel runat="server">
<ContentTemplate> <ContentTemplate>
<div class="row"> <div class="row">
<div class="col-md-12"> <div class="col-md-12">
<asp:Button ID="BtnGuardarArchivo" runat="server" OnClick="BtnGuardarArchivo_Click" ClientIDMode="Static" Text="Guardar" CssClass="btn btn-primary" /> <asp:Button ID="BtnGuardarArchivo" runat="server" OnClick="BtnGuardarArchivo_Click" ClientIDMode="Static" Text="Guardar" CssClass="btn btn-primary" />
<button type="button" class="btn btn-danger" data-dismiss="modal">Cancelar</button> <button type="button" class="btn btn-danger" data-dismiss="modal">Cancelar</button>
</div> </div>
</div> </div>
</ContentTemplate> </ContentTemplate>
</asp:UpdatePanel> </asp:UpdatePanel>
</div>
</div>
</div> </div>
</div> </div>
</div>
</div>
@@ -1417,9 +1423,9 @@
<div id="DVModalEqiqutas" class="modal ADS fade" role="dialog"> <div id="DVModalEqiqutas" class="modal ADS fade" role="dialog">
<div class="modal-dialog"> <div class="modal-dialog">
<div class="modal-content" > <div class="modal-content">
<div class="modal-header "> <div class="modal-header ">
<button type="button" class="close" data-dismiss="modal">&times;</button> <button type="button" class="close" data-dismiss="modal">&times;</button>
<h4 class="modal-title">Etiquetas Disponibles</h4> <h4 class="modal-title">Etiquetas Disponibles</h4>
@@ -1433,7 +1439,7 @@
<li>{"FechaVencimiento"}</li> <li>{"FechaVencimiento"}</li>
<li>{"RazonSocialEmisor"}</li> <li>{"RazonSocialEmisor"}</li>
<li>{"RazonSocialReceptor"}</li> <li>{"RazonSocialReceptor"}</li>
<li>{"Vigencia"}</li> <li>{"Vigencia"}</li>
<li>{"AtencionA"}</li> <li>{"AtencionA"}</li>
</ul> </ul>
</div> </div>
@@ -1450,6 +1456,30 @@
</div> </div>
<div id="ModalClonarConceptosNominas" class="modal ADS fade" role="dialog">
<asp:UpdatePanel runat="server" class="modal-dialog" ID="UpAltasUpdate" UpdateMode="Conditional">
<ContentTemplate>
<div class="modal-content">
<div class="modal-header ">
<button type="button" class="close" data-dismiss="modal">&times;</button><h4 class="modal-title">Clonar Conceptos</h4>
</div>
<div class="modal-body">
<label> Empresa Origen:</label>
<asp:DropDownList ID="DdlEmpresa" runat="server" AutoPostBack="true" AppendDataBoundItems="true" DataTextField="Empresa" DataValueField="CveEmpresa" Class="form-control input-inline input-sm select2me" Style="width: 400px !important;" ValidationGroup="GrpGuardar">
<asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem>
</asp:DropDownList>
</div>
<div class="modal-footer">
<asp:Button ID="LnkClonarConceptosNomina" runat="server" Text="Actualizar" OnClick="LnkClonarConceptosNomina_Click" class="btn btn-primary" />
<button type="button" class="btn btn-danger" data-dismiss="modal">Cancelar</button>
</div>
</div>
</ContentTemplate>
</asp:UpdatePanel>
</div>
</asp:Content> </asp:Content>
<asp:Content ID="Content7" ContentPlaceHolderID="JS" runat="server"> <asp:Content ID="Content7" ContentPlaceHolderID="JS" runat="server">

View File

@@ -147,7 +147,8 @@ Partial Class Sistemas_Empresa
End If End If
End If End If
DdlEmpresa.DataSource = GlobalDTEmpresas
DdlEmpresa.DataBind()
CargaDdlPac() CargaDdlPac()
CargaRegimenFiscal() CargaRegimenFiscal()
CargaGridIndicadores() CargaGridIndicadores()
@@ -994,4 +995,28 @@ Partial Class Sistemas_Empresa
End Sub End Sub
Protected Sub LnkClonmarCNomModal_Click(sender As Object, e As EventArgs)
RegistraScript("$('#ModalClonarConceptosNominas').modal();")
End Sub
Protected Sub LnkClonarConceptosNomina_Click(sender As Object, e As EventArgs)
Dim CveEmpresaOrigen = DdlEmpresa.SelectedValue.ToEntero()
Dim cveEmpresaDestino = CveEmpresa ' Request("CveEmpresa").ToString().ToEntero()
If (CveEmpresaOrigen > 0 AndAlso cveEmpresaDestino > 0) Then
Using onom = New ClsNominas
If onom.ConceptosGetallnewEmpresa(CveEmpresaOrigen, CveEmpresa) Then
Alert("los conceptos se clonaron satisfactoriamente", TipoMensaje.MsgInformacion)
End If
End Using
Else
If CveEmpresaOrigen > 0 Then
Alert("ya debe estar generado la empresa destino", TipoMensaje.MsgAdvertencia)
Else
Alert("Debe seleccionar una empresa Origen", TipoMensaje.MsgAdvertencia)
End If
End If
End Sub
End Class End Class