Commit inicial Ventas Productivo
This commit is contained in:
JORGE LUIS CAUDILLO ESPARZA
193
Fiscal/PopUpConfiguracion.aspx
Normal file
193
Fiscal/PopUpConfiguracion.aspx
Normal file
@@ -0,0 +1,193 @@
|
||||
<%@ Page Title="Fiscal - Configuración" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="PopUpConfiguracion.aspx.vb" Inherits="Fiscal_PopUpConfiguracion" %>
|
||||
|
||||
<%@ Register Assembly="AjaxControlToolkit" Namespace="AjaxControlToolkit" TagPrefix="asp" %>
|
||||
<asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server">
|
||||
</asp:Content>
|
||||
<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
|
||||
</asp:Content>
|
||||
<asp:Content ID="Content3" ContentPlaceHolderID="HB" runat="Server">
|
||||
</asp:Content>
|
||||
<asp:Content ID="Content4" ContentPlaceHolderID="E" runat="Server">
|
||||
Configuración de Cuentas Contables
|
||||
</asp:Content>
|
||||
<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
|
||||
</asp:Content>
|
||||
<asp:Content ID="Content6" ContentPlaceHolderID="C" runat="Server">
|
||||
<table border="0" class="contenido">
|
||||
<tr>
|
||||
<td align="left">
|
||||
<div>
|
||||
<div>
|
||||
<fieldset>
|
||||
<legend><b>Cuentas de Activo:</b></legend>
|
||||
<table border="0">
|
||||
<tr>
|
||||
<td>IVA Acreditable: </td>
|
||||
<td>
|
||||
<asp:DropDownList ID="DdlCtaIVAAcreditable" runat="server" AppendDataBoundItems="true" DataTextField="CtaCodigo" DataValueField="Id" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 206px !important;">
|
||||
<asp:ListItem Selected="True" Text="Seleccione" Value="0"></asp:ListItem>
|
||||
</asp:DropDownList>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>IVA por Acreditar: </td>
|
||||
<td>
|
||||
<asp:DropDownList ID="DdlCtaIVAxAcreditar" runat="server" AppendDataBoundItems="true" DataTextField="CtaCodigo" DataValueField="Id" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 206px !important;">
|
||||
<asp:ListItem Selected="True" Text="Seleccione" Value="0"></asp:ListItem>
|
||||
</asp:DropDownList>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>Subsidio al Empleado: </td>
|
||||
<td>
|
||||
<asp:DropDownList ID="DdlCtaSubsidioEmpleado" runat="server" AppendDataBoundItems="true" DataTextField="CtaCodigo" DataValueField="Id" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 206px !important;">
|
||||
<asp:ListItem Selected="True" Text="Seleccione" Value="0"></asp:ListItem>
|
||||
</asp:DropDownList>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>IDE: </td>
|
||||
<td>
|
||||
<asp:DropDownList ID="DdlCtaIDE" runat="server" AppendDataBoundItems="true" DataTextField="CtaCodigo" DataValueField="Id" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 206px !important;">
|
||||
<asp:ListItem Selected="True" Text="Seleccione" Value="0"></asp:ListItem>
|
||||
</asp:DropDownList>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>ISR Ejercido: </td>
|
||||
<td>
|
||||
<asp:DropDownList ID="DdlCtaISREjercido" runat="server" AppendDataBoundItems="true" DataTextField="CtaCodigo" DataValueField="Id" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 206px !important;">
|
||||
<asp:ListItem Selected="True" Text="Seleccione" Value="0"></asp:ListItem>
|
||||
</asp:DropDownList>
|
||||
</td>
|
||||
</tr>
|
||||
</table>
|
||||
</fieldset>
|
||||
</div>
|
||||
</div>
|
||||
</td>
|
||||
<td rowspan="2">
|
||||
<div>
|
||||
<div>
|
||||
<fieldset>
|
||||
<legend><b>Cuentas de Pasivo:</b></legend>
|
||||
<table border="0">
|
||||
<tr>
|
||||
<td>IVA por Pagar: </td>
|
||||
<td>
|
||||
<asp:DropDownList ID="DdlCtaIvaxPagar" runat="server" AppendDataBoundItems="true" DataTextField="CtaCodigo" DataValueField="Id" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 206px !important;">
|
||||
<asp:ListItem Selected="True" Text="Seleccione" Value="0"></asp:ListItem>
|
||||
</asp:DropDownList>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>IVA pendiente por Pagar: </td>
|
||||
<td>
|
||||
<asp:DropDownList ID="DdlCtaIvaPndPagar" runat="server" AppendDataBoundItems="true" DataTextField="CtaCodigo" DataValueField="Id" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 206px !important;">
|
||||
<asp:ListItem Selected="True" Text="Seleccione" Value="0"></asp:ListItem>
|
||||
</asp:DropDownList>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>ISR: </td>
|
||||
<td>
|
||||
<asp:DropDownList ID="DdlCtaISR" runat="server" AppendDataBoundItems="true" DataTextField="CtaCodigo" DataValueField="Id" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 206px !important;">
|
||||
<asp:ListItem Selected="True" Text="Seleccione" Value="0"></asp:ListItem>
|
||||
</asp:DropDownList>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>IETU: </td>
|
||||
<td>
|
||||
<asp:DropDownList ID="DdlCtaIETU" runat="server" AppendDataBoundItems="true" DataTextField="CtaCodigo" DataValueField="Id" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 206px !important;">
|
||||
<asp:ListItem Selected="True" Text="Seleccione" Value="0"></asp:ListItem>
|
||||
</asp:DropDownList>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>ISPT: </td>
|
||||
<td>
|
||||
<asp:DropDownList ID="DdlCtaISPT" runat="server" AppendDataBoundItems="true" DataTextField="CtaCodigo" DataValueField="Id" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 206px !important;">
|
||||
<asp:ListItem Selected="True" Text="Seleccione" Value="0"></asp:ListItem>
|
||||
</asp:DropDownList>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>IMSS: </td>
|
||||
<td>
|
||||
<asp:DropDownList ID="DdlCtaIMSS" runat="server" AppendDataBoundItems="true" DataTextField="CtaCodigo" DataValueField="Id" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 206px !important;">
|
||||
<asp:ListItem Selected="True" Text="Seleccione" Value="0"></asp:ListItem>
|
||||
</asp:DropDownList>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>RCV: </td>
|
||||
<td>
|
||||
<asp:DropDownList ID="DdlCtaRCV" runat="server" AppendDataBoundItems="true" DataTextField="CtaCodigo" DataValueField="Id" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 206px !important;">
|
||||
<asp:ListItem Selected="True" Text="Seleccione" Value="0"></asp:ListItem>
|
||||
</asp:DropDownList>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>Infonavit: </td>
|
||||
<td>
|
||||
<asp:DropDownList ID="DdlCtaInfonavit" runat="server" AppendDataBoundItems="true" DataTextField="CtaCodigo" DataValueField="Id" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 206px !important;">
|
||||
<asp:ListItem Selected="True" Text="Seleccione" Value="0"></asp:ListItem>
|
||||
</asp:DropDownList>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>ISRTP: </td>
|
||||
<td>
|
||||
<asp:DropDownList ID="DdlCtaISRTP" runat="server" AppendDataBoundItems="true" DataTextField="CtaCodigo" DataValueField="Id" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 206px !important;">
|
||||
<asp:ListItem Selected="True" Text="Seleccione" Value="0"></asp:ListItem>
|
||||
</asp:DropDownList>
|
||||
</td>
|
||||
</tr>
|
||||
</table>
|
||||
</fieldset>
|
||||
</div>
|
||||
</div>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td align="left">
|
||||
<div>
|
||||
<div>
|
||||
<fieldset>
|
||||
<legend><b>Cuentas de Estado de Resultados:</b></legend>
|
||||
<table border="0">
|
||||
<tr>
|
||||
<td>Otros Ingresos: </td>
|
||||
<td>
|
||||
<asp:DropDownList ID="DdlCtaOtrosIngresos" runat="server" AppendDataBoundItems="true" DataTextField="CtaCodigo" DataValueField="Id" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 206px !important;">
|
||||
<asp:ListItem Selected="True" Text="Seleccione" Value="0"></asp:ListItem>
|
||||
</asp:DropDownList>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>Desc. Sobre Ventas (DSV): </td>
|
||||
<td>
|
||||
<asp:DropDownList ID="DdlCtaDSV" runat="server" AppendDataBoundItems="true" DataTextField="CtaCodigo" DataValueField="Id" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 206px !important;">
|
||||
<asp:ListItem Selected="True" Text="Seleccione" Value="0"></asp:ListItem>
|
||||
</asp:DropDownList>
|
||||
</td>
|
||||
</tr>
|
||||
</table>
|
||||
</fieldset>
|
||||
</div>
|
||||
</div>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td style="text-align: center;" colspan="2">
|
||||
<asp:UpdatePanel ID="Upn" runat="server">
|
||||
<ContentTemplate>
|
||||
<asp:Button ID="BtnGuardar" runat="server" Text="Guardar Cambios" class="btn btn-primary" /></ContentTemplate>
|
||||
</asp:UpdatePanel>
|
||||
</td>
|
||||
</tr>
|
||||
</table>
|
||||
</asp:Content>
|
||||
<asp:Content ID="Content7" ContentPlaceHolderID="JS" runat="Server">
|
||||
</asp:Content>
|
||||
122
Fiscal/PopUpConfiguracion.aspx.vb
Normal file
122
Fiscal/PopUpConfiguracion.aspx.vb
Normal file
@@ -0,0 +1,122 @@
|
||||
Option Explicit On
|
||||
Option Strict On
|
||||
|
||||
Imports Extensiones
|
||||
|
||||
Partial Class Fiscal_PopUpConfiguracion
|
||||
Inherits ClsPaginas
|
||||
|
||||
Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
|
||||
If Not IsPostBack Then
|
||||
CType(Me.Master, BaseMasterPage).EsPopup = True
|
||||
CType(Me.Master, BaseMasterPage).PopupWidth = 915
|
||||
RegistraScript("$get('tdContenido').style.height='350px'")
|
||||
CargaCombos()
|
||||
CargaDatos()
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub CargaCombos()
|
||||
Dim ObjContabilidad As New ClsContPAQi(UsuarioActual.Empresa.ServerContPAQi, UsuarioActual.Empresa.BDContPAQi, UsuarioActual.Empresa.UsrContPAQi, UsuarioActual.Empresa.PwdContPAQi)
|
||||
If ObjContabilidad.GetCuentas(-1, "-1", -1) Then
|
||||
'Inicio Activos
|
||||
DdlCtaIVAAcreditable.DataSource = ObjContabilidad.DtResultados
|
||||
DdlCtaIVAxAcreditar.DataSource = ObjContabilidad.DtResultados
|
||||
DdlCtaSubsidioEmpleado.DataSource = ObjContabilidad.DtResultados
|
||||
DdlCtaIDE.DataSource = ObjContabilidad.DtResultados
|
||||
DdlCtaISREjercido.DataSource = ObjContabilidad.DtResultados
|
||||
'Fin Activos
|
||||
|
||||
'Inicio Pasivos
|
||||
DdlCtaIvaxPagar.DataSource = ObjContabilidad.DtResultados
|
||||
DdlCtaIvaPndPagar.DataSource = ObjContabilidad.DtResultados
|
||||
DdlCtaISR.DataSource = ObjContabilidad.DtResultados
|
||||
DdlCtaIETU.DataSource = ObjContabilidad.DtResultados
|
||||
DdlCtaISPT.DataSource = ObjContabilidad.DtResultados
|
||||
DdlCtaIMSS.DataSource = ObjContabilidad.DtResultados
|
||||
DdlCtaRCV.DataSource = ObjContabilidad.DtResultados
|
||||
DdlCtaInfonavit.DataSource = ObjContabilidad.DtResultados
|
||||
DdlCtaISRTP.DataSource = ObjContabilidad.DtResultados
|
||||
'Fin Pasivos
|
||||
|
||||
'Inicio ER
|
||||
DdlCtaOtrosIngresos.DataSource = ObjContabilidad.DtResultados
|
||||
DdlCtaDSV.DataSource = ObjContabilidad.DtResultados
|
||||
'Fin ER
|
||||
Else
|
||||
'Inicio Activos
|
||||
DdlCtaIVAAcreditable.DataSource = Nothing
|
||||
DdlCtaIVAxAcreditar.DataSource = Nothing
|
||||
DdlCtaSubsidioEmpleado.DataSource = Nothing
|
||||
DdlCtaIDE.DataSource = Nothing
|
||||
DdlCtaISREjercido.DataSource = Nothing
|
||||
'Fin Activos
|
||||
|
||||
'Inicio Pasivos
|
||||
DdlCtaIvaxPagar.DataSource = Nothing
|
||||
DdlCtaIvaPndPagar.DataSource = Nothing
|
||||
DdlCtaISR.DataSource = Nothing
|
||||
DdlCtaIETU.DataSource = Nothing
|
||||
DdlCtaISPT.DataSource = Nothing
|
||||
DdlCtaIMSS.DataSource = Nothing
|
||||
DdlCtaRCV.DataSource = Nothing
|
||||
DdlCtaInfonavit.DataSource = Nothing
|
||||
DdlCtaISRTP.DataSource = Nothing
|
||||
'Fin Pasivos
|
||||
|
||||
'Inicio ER
|
||||
DdlCtaOtrosIngresos.DataSource = Nothing
|
||||
DdlCtaDSV.DataSource = Nothing
|
||||
'Fin ER
|
||||
End If
|
||||
'Inicio Activos
|
||||
DdlCtaIVAAcreditable.DataBind()
|
||||
DdlCtaIVAxAcreditar.DataBind()
|
||||
DdlCtaSubsidioEmpleado.DataBind()
|
||||
DdlCtaIDE.DataBind()
|
||||
DdlCtaISREjercido.DataBind()
|
||||
ObjContabilidad.Dispose()
|
||||
'Fin Activos
|
||||
|
||||
'Inicio Pasivos
|
||||
DdlCtaIvaxPagar.DataBind()
|
||||
DdlCtaIvaPndPagar.DataBind()
|
||||
DdlCtaISR.DataBind()
|
||||
DdlCtaIETU.DataBind()
|
||||
DdlCtaISPT.DataBind()
|
||||
DdlCtaIMSS.DataBind()
|
||||
DdlCtaRCV.DataBind()
|
||||
DdlCtaInfonavit.DataBind()
|
||||
DdlCtaISRTP.DataBind()
|
||||
'Fin Pasivos
|
||||
|
||||
'Inicio ER
|
||||
DdlCtaOtrosIngresos.DataBind()
|
||||
DdlCtaDSV.DataBind()
|
||||
'Fin ER
|
||||
End Sub
|
||||
|
||||
Private Sub CargaDatos()
|
||||
Dim ObjFiscal As New ClsFISConfiguracion()
|
||||
If ObjFiscal.GetConfiguracion(UsuarioActual.CveEmpresa) Then
|
||||
'Activo
|
||||
DdlCtaIVAAcreditable.SelectedValue = ObjFiscal.ActIVAAcreditable.ToString
|
||||
DdlCtaIVAxAcreditar.SelectedValue = ObjFiscal.ActIVAxAcreditar.ToString
|
||||
'Pasivo
|
||||
DdlCtaIvaxPagar.SelectedValue = ObjFiscal.PasIVAxPagar.ToString
|
||||
DdlCtaIvaPndPagar.SelectedValue = ObjFiscal.PasIVAxAcreditar.ToString
|
||||
'ER
|
||||
DdlCtaOtrosIngresos.SelectedValue = ObjFiscal.EROtrosIngresos.ToString
|
||||
DdlCtaDSV.SelectedValue = ObjFiscal.ERDSV.ToString
|
||||
End If
|
||||
ObjFiscal.Dispose()
|
||||
End Sub
|
||||
|
||||
Protected Sub BtnGuardar_Click(sender As Object, e As System.EventArgs) Handles BtnGuardar.Click
|
||||
Dim ObjFiscal As New ClsFISConfiguracion()
|
||||
If ObjFiscal.AddConfiguracion(DdlCtaIVAAcreditable.SelectedValue.ToEntero, DdlCtaIVAxAcreditar.SelectedValue.ToEntero, DdlCtaIvaxPagar.SelectedValue.ToEntero, DdlCtaIvaPndPagar.SelectedValue.ToEntero, DdlCtaOtrosIngresos.SelectedValue.ToEntero, DdlCtaDSV.SelectedValue.ToEntero, UsuarioActual.CveEmpresa) Then
|
||||
Alert("La configuración se guardó correctamente.", TipoMensaje.MsgInformacion)
|
||||
End If
|
||||
ObjFiscal.Dispose()
|
||||
End Sub
|
||||
End Class
|
||||
Reference in New Issue
Block a user