AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Merge branch 'master' of http://jperez@192.168.10.111:8383/SIG.git

Browse Source
This commit is contained in:
Jonathan Alexis Perez Morales
2023-08-07 15:52:09 -07:00
parent d3b20c66a8 aa9fa03bdc
commit 6d4b342861
20 changed files with 5521 additions and 5048 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
App_Code/ClsFinanzas.vb
View File

@@ -277,6 +277,7 @@ Public Class ClsFinanzas
.Add("@Opcion", SqlDbType.Int).Value = Opcion
End With
Try
SqlAdapter.SelectCommand.CommandTimeout = 0
SqlAdapter.Fill(Data)
Retorno = True
Catch ex As Exception
@@ -304,6 +305,7 @@ Public Class ClsFinanzas
End With
Try
SqlAdapter.SelectCommand.CommandTimeout = 0
SqlAdapter.Fill(Data)
Retorno = True
Catch ex As Exception
@@ -355,6 +357,7 @@ Public Class ClsFinanzas
End With
Try
SqlAdapter.SelectCommand.CommandTimeout = 0
SqlAdapter.Fill(Data)
Retorno = True
Catch ex As Exception

2
App_Code/ClsPaginas.vb
View File

@@ -9207,7 +9207,7 @@ Public Class ClsPaginas
'PaginaDict.Add("/Sistemas/CatEmpresas.aspx".ToUpper(), 2)
PaginaDict.Add("/Sistemas/CatEmpresas.aspx".ToUpper(), 24)
PaginaDict.Add("/Sistemas/Empresa.aspx".ToUpper(), 2)
PaginaDict.Add("/Sistemas/Empresa2.aspx".ToUpper(), -1)
PaginaDict.Add("/Sistemas/Empresa2.aspx".ToUpper(), 1341)
PaginaDict.Add("/Sistemas/CatUsuarios.aspx".ToUpper(), 20)
PaginaDict.Add("/Sistemas/Usuarios.aspx".ToUpper(), 20)
PaginaDict.Add("/Sistemas/UsuarioDetalle.aspx".ToUpper(), 20)

4
Compras/ReembolsosComprobaciones.aspx.vb
View File

@@ -432,8 +432,8 @@ Partial Class Compras_ReembolsosComprobaciones
FoliosFechasValFechaDocumentoMesInferior.AppendLine($"Folio: { gvRowVal.DataKey("SerieFolio") } fecha: {gvRowVal.DataKey("FechaCompra").ToDate.ToString("dd/MM/yyyy") } <br/>")
ValFechaDocumento = True
ElseIf AnioFactura = AnioDocumento And MesDocumento > MesFactura Then
FoliosFechasValFechaDocumentoPagoMesSuperior.AppendLine($"Folio: { gvRowVal.DataKey("SerieFolio") } fecha: {gvRowVal.DataKey("FechaCompra").ToDate.ToString("dd/MM/yyyy") } <br/>")
ValFechaDocumento = True
'FoliosFechasValFechaDocumentoPagoMesSuperior.AppendLine($"Folio: { gvRowVal.DataKey("SerieFolio") } fecha: {gvRowVal.DataKey("FechaCompra").ToDate.ToString("dd/MM/yyyy") } <br/>")
'ValFechaDocumento = True
End If
End If

46
Empresas/154/Formatos/EntradasSalidas.rdlc
View File

@@ -320,6 +320,9 @@
</Paragraph>
</Paragraphs>
<rd:DefaultName>Textbox18</rd:DefaultName>
<Visibility>
<Hidden>=IIF(Parameters!OcultarImportes.Value.ToString() = "False", True,False)</Hidden>
</Visibility>
<Style>
<Border>
<Color>White</Color>
@@ -723,6 +726,9 @@
</Paragraph>
</Paragraphs>
<rd:DefaultName>Textbox19</rd:DefaultName>
<Visibility>
<Hidden>=IIF(Parameters!OcultarImportes.Value.ToString() = "False", True,False)</Hidden>
</Visibility>
<Style>
<Border>
<Color>White</Color>
@@ -779,6 +785,9 @@
</Paragraph>
</Paragraphs>
<rd:DefaultName>Textbox22</rd:DefaultName>
<Visibility>
<Hidden>=IIF(Parameters!OcultarImportes.Value.ToString() = "False", True,False)</Hidden>
</Visibility>
<Style>
<Border>
<Color>White</Color>
@@ -835,6 +844,9 @@
</Paragraph>
</Paragraphs>
<rd:DefaultName>Textbox25</rd:DefaultName>
<Visibility>
<Hidden>=IIF(Parameters!OcultarImportes.Value.ToString() = "False", True,False)</Hidden>
</Visibility>
<Style>
<Border>
<Color>White</Color>
@@ -891,6 +903,9 @@
</Paragraph>
</Paragraphs>
<rd:DefaultName>Textbox28</rd:DefaultName>
<Visibility>
<Hidden>=IIF(Parameters!OcultarImportes.Value.ToString() = "False", True,False)</Hidden>
</Visibility>
<Style>
<Border>
<Color>White</Color>
@@ -1210,6 +1225,9 @@
</Paragraph>
</Paragraphs>
<rd:DefaultName>SaldoIniImp</rd:DefaultName>
<Visibility>
<Hidden>=IIF(Parameters!OcultarImportes.Value.ToString() = "False", True,False)</Hidden>
</Visibility>
<Style>
<Border>
<Style>None</Style>
@@ -1255,6 +1273,9 @@
</Paragraph>
</Paragraphs>
<rd:DefaultName>EntradaImp</rd:DefaultName>
<Visibility>
<Hidden>=IIF(Parameters!OcultarImportes.Value.ToString() = "False", True,False)</Hidden>
</Visibility>
<Style>
<Border>
<Style>None</Style>
@@ -1300,6 +1321,9 @@
</Paragraph>
</Paragraphs>
<rd:DefaultName>SalidaImp</rd:DefaultName>
<Visibility>
<Hidden>=IIF(Parameters!OcultarImportes.Value.ToString() = "False", True,False)</Hidden>
</Visibility>
<Style>
<Border>
<Style>None</Style>
@@ -1345,6 +1369,9 @@
</Paragraph>
</Paragraphs>
<rd:DefaultName>SaldoFImp</rd:DefaultName>
<Visibility>
<Hidden>=IIF(Parameters!OcultarImportes.Value.ToString() = "False", True,False)</Hidden>
</Visibility>
<Style>
<Border>
<Style>None</Style>
@@ -1598,6 +1625,9 @@
</Paragraph>
</Paragraphs>
<rd:DefaultName>Textbox30</rd:DefaultName>
<Visibility>
<Hidden>=IIF(Parameters!OcultarImportes.Value.ToString() = "False", True,False)</Hidden>
</Visibility>
<Style>
<Border>
<Color>LightGrey</Color>
@@ -1610,6 +1640,7 @@
<PaddingBottom>2pt</PaddingBottom>
</Style>
</Textbox>
<rd:Selected>true</rd:Selected>
</CellContents>
</TablixCell>
<TablixCell>
@@ -1634,6 +1665,9 @@
</Paragraph>
</Paragraphs>
<rd:DefaultName>Textbox31</rd:DefaultName>
<Visibility>
<Hidden>=IIF(Parameters!OcultarImportes.Value.ToString() = "False", True,False)</Hidden>
</Visibility>
<Style>
<Border>
<Color>LightGrey</Color>
@@ -1670,6 +1704,9 @@
</Paragraph>
</Paragraphs>
<rd:DefaultName>Textbox32</rd:DefaultName>
<Visibility>
<Hidden>=IIF(Parameters!OcultarImportes.Value.ToString() = "False", True,False)</Hidden>
</Visibility>
<Style>
<Border>
<Color>LightGrey</Color>
@@ -1706,6 +1743,9 @@
</Paragraph>
</Paragraphs>
<rd:DefaultName>Textbox33</rd:DefaultName>
<Visibility>
<Hidden>=IIF(Parameters!OcultarImportes.Value.ToString() = "False", True,False)</Hidden>
</Visibility>
<Style>
<Border>
<Color>LightGrey</Color>
@@ -2176,6 +2216,12 @@
<AllowBlank>true</AllowBlank>
<Prompt>ReportParameter1</Prompt>
</ReportParameter>
<ReportParameter Name="OcultarImportes">
<DataType>String</DataType>
<Nullable>true</Nullable>
<AllowBlank>true</AllowBlank>
<Prompt>ReportParameter1</Prompt>
</ReportParameter>
</ReportParameters>
<EmbeddedImages>
<EmbeddedImage Name="LOGOSERVECENJPG">

4288
Empresas/48/Formatos/EntradasSalidas.rdlc
View File

File diff suppressed because it is too large Load Diff

60
Empresas/Grales/Formatos/EntradasSalidas.rdlc
View File

@@ -303,6 +303,9 @@
</Paragraph>
</Paragraphs>
<rd:DefaultName>Textbox18</rd:DefaultName>
<Visibility>
<Hidden>=IIF(Parameters!OcultarImportes.Value.ToString() = "False", True,False)</Hidden>
</Visibility>
<Style>
<Border>
<Color>White</Color>
@@ -698,6 +701,9 @@
</Paragraph>
</Paragraphs>
<rd:DefaultName>Textbox19</rd:DefaultName>
<Visibility>
<Hidden>=IIF(Parameters!OcultarImportes.Value.ToString() = "False", True,False)</Hidden>
</Visibility>
<Style>
<Border>
<Color>White</Color>
@@ -754,6 +760,9 @@
</Paragraph>
</Paragraphs>
<rd:DefaultName>Textbox22</rd:DefaultName>
<Visibility>
<Hidden>=IIF(Parameters!OcultarImportes.Value.ToString() = "False", True,False)</Hidden>
</Visibility>
<Style>
<Border>
<Color>White</Color>
@@ -810,6 +819,9 @@
</Paragraph>
</Paragraphs>
<rd:DefaultName>Textbox25</rd:DefaultName>
<Visibility>
<Hidden>=IIF(Parameters!OcultarImportes.Value.ToString() = "False", True,False)</Hidden>
</Visibility>
<Style>
<Border>
<Color>White</Color>
@@ -866,6 +878,9 @@
</Paragraph>
</Paragraphs>
<rd:DefaultName>Textbox28</rd:DefaultName>
<Visibility>
<Hidden>=IIF(Parameters!OcultarImportes.Value.ToString = "False", True,False)</Hidden>
</Visibility>
<Style>
<Border>
<Color>White</Color>
@@ -1185,6 +1200,9 @@
</Paragraph>
</Paragraphs>
<rd:DefaultName>SaldoIniImp</rd:DefaultName>
<Visibility>
<Hidden>=IIF(Parameters!OcultarImportes.Value.ToString() = "False", True,False)</Hidden>
</Visibility>
<Style>
<Border>
<Style>None</Style>
@@ -1217,7 +1235,6 @@
<Value>=IIF(Fields!EntradaImp.Value = "0", "-", Fields!EntradaImp.Value)</Value>
<Style>
<FontSize>8pt</FontSize>
<FontWeight>=Iif(Fields!CvePS.Value=-1, "Medium","Default")</FontWeight>
<Format>#,0.00</Format>
<Color>=Iif(Fields!CvePS.Value=-1, "White","Black")</Color>
<Language>es-MX</Language>
@@ -1230,6 +1247,9 @@
</Paragraph>
</Paragraphs>
<rd:DefaultName>EntradaImp</rd:DefaultName>
<Visibility>
<Hidden>=IIF(Parameters!OcultarImportes.Value.ToString() = "False", True,False)</Hidden>
</Visibility>
<Style>
<Border>
<Style>None</Style>
@@ -1262,7 +1282,6 @@
<Value>=IIF(Fields!SalidaImp.Value = "0", "-", Fields!SalidaImp.Value)</Value>
<Style>
<FontSize>8pt</FontSize>
<FontWeight>=Iif(Fields!CvePS.Value=-1, "Medium","Default")</FontWeight>
<Format>#,0.00</Format>
<Color>=Iif(Fields!CvePS.Value=-1, "White","Black")</Color>
<Language>es-MX</Language>
@@ -1275,6 +1294,9 @@
</Paragraph>
</Paragraphs>
<rd:DefaultName>SalidaImp</rd:DefaultName>
<Visibility>
<Hidden>=IIF(Parameters!OcultarImportes.Value.ToString() = "False", True,False)</Hidden>
</Visibility>
<Style>
<Border>
<Style>None</Style>
@@ -1307,7 +1329,6 @@
<Value>=IIF(Fields!SaldoFImp.Value = "0", "-", Fields!SaldoFImp.Value)</Value>
<Style>
<FontSize>8pt</FontSize>
<FontWeight>=Iif(Fields!CvePS.Value=-1, "Medium","Default")</FontWeight>
<Format>#,0.00</Format>
<Color>=Iif(Fields!CvePS.Value=-1, "White","Black")</Color>
<Language>es-MX</Language>
@@ -1320,6 +1341,9 @@
</Paragraph>
</Paragraphs>
<rd:DefaultName>SaldoFImp</rd:DefaultName>
<Visibility>
<Hidden>=IIF(Parameters!OcultarImportes.Value.ToString() = "False", True,False)</Hidden>
</Visibility>
<Style>
<Border>
<Style>None</Style>
@@ -1573,6 +1597,9 @@
</Paragraph>
</Paragraphs>
<rd:DefaultName>Textbox30</rd:DefaultName>
<Visibility>
<Hidden>=IIF(Parameters!OcultarImportes.Value.ToString() = "False", True,False)</Hidden>
</Visibility>
<Style>
<Border>
<Color>LightGrey</Color>
@@ -1599,7 +1626,6 @@
<Value>=Sum(Fields!EntradaImp.Value, "DataSet1")</Value>
<Style>
<FontSize>8pt</FontSize>
<FontWeight>=Iif(Fields!CvePS.Value=-1, "Medium","Default")</FontWeight>
<Format>#,0.00</Format>
<Language>es-MX</Language>
</Style>
@@ -1609,6 +1635,9 @@
</Paragraph>
</Paragraphs>
<rd:DefaultName>Textbox31</rd:DefaultName>
<Visibility>
<Hidden>=IIF(Parameters!OcultarImportes.Value.ToString() = "False", True,False)</Hidden>
</Visibility>
<Style>
<Border>
<Color>LightGrey</Color>
@@ -1635,7 +1664,6 @@
<Value>=Sum(Fields!SalidaImp.Value, "DataSet1")</Value>
<Style>
<FontSize>8pt</FontSize>
<FontWeight>=Iif(Fields!CvePS.Value=-1, "Medium","Default")</FontWeight>
<Format>#,0.00</Format>
<Language>es-MX</Language>
</Style>
@@ -1645,6 +1673,9 @@
</Paragraph>
</Paragraphs>
<rd:DefaultName>Textbox32</rd:DefaultName>
<Visibility>
<Hidden>=IIF(Parameters!OcultarImportes.Value.ToString() = "False", True,False)</Hidden>
</Visibility>
<Style>
<Border>
<Color>LightGrey</Color>
@@ -1671,7 +1702,6 @@
<Value>=Sum(Fields!SaldoFImp.Value, "DataSet1")</Value>
<Style>
<FontSize>8pt</FontSize>
<FontWeight>=Iif(Fields!CvePS.Value=-1, "Medium","Default")</FontWeight>
<Format>#,0.00</Format>
<Language>es-MX</Language>
</Style>
@@ -1681,6 +1711,9 @@
</Paragraph>
</Paragraphs>
<rd:DefaultName>Textbox33</rd:DefaultName>
<Visibility>
<Hidden>=IIF(Parameters!OcultarImportes.Value.ToString() = "False", True,False)</Hidden>
</Visibility>
<Style>
<Border>
<Color>LightGrey</Color>
@@ -1693,6 +1726,7 @@
<PaddingBottom>2pt</PaddingBottom>
</Style>
</Textbox>
<rd:Selected>true</rd:Selected>
</CellContents>
</TablixCell>
</TablixCells>
@@ -2108,15 +2142,20 @@
<ReportParameters>
<ReportParameter Name="pEmp">
<DataType>String</DataType>
<Nullable>true</Nullable>
<AllowBlank>true</AllowBlank>
<Prompt>ReportParameter1</Prompt>
</ReportParameter>
<ReportParameter Name="pImg">
<DataType>String</DataType>
<Nullable>true</Nullable>
<AllowBlank>true</AllowBlank>
<Prompt>ReportParameter1</Prompt>
</ReportParameter>
<ReportParameter Name="FechaInicial">
<DataType>DateTime</DataType>
<DataType>String</DataType>
<Nullable>true</Nullable>
<AllowBlank>true</AllowBlank>
<Prompt>ReportParameter1</Prompt>
</ReportParameter>
<ReportParameter Name="FechaFinal">
@@ -2133,6 +2172,7 @@
</ReportParameter>
<ReportParameter Name="UsuarioImprimio">
<DataType>String</DataType>
<Nullable>true</Nullable>
<AllowBlank>true</AllowBlank>
<Prompt>ReportParameter1</Prompt>
</ReportParameter>
@@ -2142,6 +2182,12 @@
<AllowBlank>true</AllowBlank>
<Prompt>ReportParameter1</Prompt>
</ReportParameter>
<ReportParameter Name="OcultarImportes">
<DataType>String</DataType>
<Nullable>true</Nullable>
<AllowBlank>true</AllowBlank>
<Prompt>ReportParameter1</Prompt>
</ReportParameter>
</ReportParameters>
<rd:ReportUnitType>Cm</rd:ReportUnitType>
<rd:ReportID>1d5d9525-4bdd-4783-9df6-cce93069c30f</rd:ReportID>

2996
Empresas/Grales/Formatos/RepExistenciasCostos.rdlc
View File

File diff suppressed because it is too large Load Diff

2676
Empresas/Grales/Formatos/RepKardex.rdlc
View File

File diff suppressed because it is too large Load Diff

16
Finanzas/RepRazonesFinancieras2.aspx
View File

@@ -61,7 +61,8 @@
<asp:DropDownList ID="DdlEjercicio2" runat="server" CssClass="select2me" DataTextField="Ejercicio" DataValueField="Ejercicio" Width="130px" AutoPostBack="true" >
</asp:DropDownList>
</div>
<label class="col-md-2" style="width: 80px;" runat="server" id="LblPeriodo" visible="false" >Periodo: </label>
<label class="col-md-1" runat="server" id="LblPeriodo" visible="false" >Periodo: </label>
<div class="col-md-2 " runat="server" id="DivPeriodo" visible="false">
<asp:DropDownList ID="DdlPeriodo" runat="server" Width="150px" CssClass="select2me">
<asp:ListItem Text="Enero" Value="1"></asp:ListItem>
@@ -81,9 +82,20 @@
<asp:Label runat="server" ID="LblSubProyecto" CssClass="col-md-1" Visible="false">SubProyecto:</asp:Label>
<div class="col-md-2" runat="server" visible="false">
<asp:DropDownList ID="DdlSubproyecto" CssClass="form-control input-sm select2me" runat="server" DataTextField="SubProyecto" DataValueField="CveSubProyecto" Width="95%" AutoPostBack="True">
<asp:DropDownList ID="DdlSubproyecto" CssClass="form-control input-sm select2me" runat="server" DataTextField="SubProyecto" DataValueField="CveSubProyecto" Width="100%" AutoPostBack="True">
</asp:DropDownList>
</div>
<label class="col-md-1" runat="server" id="LblVisualizacion" visible="false" >Visualización: </label>
<div class="col-md-2" runat="server" visible="false" id="DVVisualizacion" >
<asp:DropDownList runat="server" ID="DdlVisualizacion" CssClass="select2me" Width="150px" >
<asp:ListItem Value="1">Comparativo</asp:ListItem>
<asp:ListItem Value="2">Trazabilidad</asp:ListItem>
</asp:DropDownList>
</div>
</div>
</div>
</div>

33
Finanzas/RepRazonesFinancieras2.aspx.vb
View File

@@ -63,10 +63,6 @@ Partial Class Finanzas_RepRazonesFinancieras2
End If
End Sub
Protected Sub DdlEjercicio_SelectedIndexChanged(sender As Object, e As EventArgs)
ValidaEjercicios()
End Sub
@@ -332,9 +328,6 @@ Partial Class Finanzas_RepRazonesFinancieras2
GVRatiosOcultarColumnas(GVRatios, 1)
Dim CveSubProyecto = DdlSubproyecto.SelectedValue.ToEntero
Dim FechasConsultar As String = GetFechasConsultar()
@@ -505,6 +498,9 @@ Partial Class Finanzas_RepRazonesFinancieras2
DivPeriodo.Visible = False
DdlPeriodo.SelectedValueExist(12)
DVVisualizacion.Visible = False
LblVisualizacion.Visible = False
DdlEjercicio.SelectedValue = Nothing
DdlEjercicio2.SelectedValue = Nothing
@@ -521,6 +517,8 @@ Partial Class Finanzas_RepRazonesFinancieras2
AddHandler DdlEjercicio2.SelectedIndexChanged, AddressOf DdlEjercicio2_SelectedIndexChanged
CargaEjercicios()
Else
DVVisualizacion.Visible = True
LblVisualizacion.Visible = True
RemoveHandler CType(DdlEjercicio, DropDownList).SelectedIndexChanged, AddressOf DdlEjercicio_SelectedIndexChanged
RemoveHandler CType(DdlEjercicio2, DropDownList).SelectedIndexChanged, AddressOf DdlEjercicio2_SelectedIndexChanged
@@ -614,7 +612,6 @@ Partial Class Finanzas_RepRazonesFinancieras2
If DdlEjercicio2.SelectedValue.ToEntero >= DdlEjercicio.SelectedValue.ToEntero Then
Dim x As Integer = DdlEjercicio.SelectedValue.ToEntero
For x = DdlEjercicio.SelectedValue.ToEntero To DdlEjercicio2.SelectedValue.ToEntero
ListaFechas.Add($"{x}-12-31")
Next x
@@ -623,8 +620,24 @@ Partial Class Finanzas_RepRazonesFinancieras2
Else ' POR MESES
ListaFechas.Add($"{DdlEjercicio.SelectedValue}-01".ToDate.LastDayOfMonth.ToString("yyyy-MM-dd"))
ListaFechas.Add($"{DdlEjercicio2.SelectedValue}-01".ToDate.LastDayOfMonth.ToString("yyyy-MM-dd"))
If DdlVisualizacion.SelectedValue.ToEntero = 1 Then
ListaFechas.Add($"{DdlEjercicio.SelectedValue}-01".ToDate.LastDayOfMonth.ToString("yyyy-MM-dd"))
ListaFechas.Add($"{DdlEjercicio2.SelectedValue}-01".ToDate.LastDayOfMonth.ToString("yyyy-MM-dd"))
Else
Dim FechaInicial As Date = $"{DdlEjercicio.SelectedValue}-01".ToDate.LastDayOfMonth.ToString("yyyy-MM-dd").ToDate
Dim FechaFinal As Date = $"{DdlEjercicio2.SelectedValue}-01".ToDate.LastDayOfMonth.ToString("yyyy-MM-dd").ToDate
Dim FechaTemp As Date = FechaInicial.LastDayOfMonth
ListaFechas.Add(FechaTemp.ToString("yyyy-MM-dd"))
While FechaFinal >= FechaTemp
FechaTemp = FechaTemp.AddMonths(1).LastDayOfMonth
ListaFechas.Add(FechaTemp.ToString("yyyy-MM-dd"))
End While
End If
End If

1
Inventarios/Kardex.aspx.vb
View File

@@ -474,6 +474,7 @@ Partial Class Inventarios_Kardex
params.Add(New ReportParameter("AgrupadoPor", $"<b>Agrupado Por:</b>&nbsp;{SerieAgrupado}{EntradaSalida}{Almacen}{UM}{FechaIn}{FechaFn}"))
params.Add(New ReportParameter("LogoPath", If(Imagen.Exists, $"file://{Imagen.FullName}", "")))
params.Add(New ReportParameter("OcultarImportes", UsuarioActual.TienePermisoProceso(201).ToString))
ImprimirPDF("Empresas/Grales/Formatos/RepKardex.rdlc", dt, params, "ReporteKardex", Formato)
Else
Alert("No hay datos consultados", TipoMensaje.MsgAdvertencia)

4
Inventarios/RepEntradasSalidas.aspx
View File

@@ -4,10 +4,10 @@
<asp:UpdatePanel ID="UPAcciones" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<li>
<asp:LinkButton ID="LnkImprimir" runat="server"><i class="fa fa-ad-pdf"></i> Generar PDF</asp:LinkButton>
<asp:LinkButton ID="LnkImprimir" runat="server"><i class="fa fa-file-pdf-o"></i> PDF</asp:LinkButton>
</li>
<li>
<asp:LinkButton ID="LnkExportar" runat="server"><i class="fa fa-ad-excel"></i> Generar Excel</asp:LinkButton>
<asp:LinkButton ID="LnkExportar" runat="server"><i class="fa fa-file-excel-o"></i> Excel</asp:LinkButton>
</li>
<li>

8
Inventarios/RepEntradasSalidas.aspx.vb
View File

@@ -366,6 +366,7 @@ Partial Class Inventarios_ReporteEntradasSalidas
Dim PS = If(DdlPS.SelectedValue = "-1", "", $"&emsp;<b>PS:</b>&nbsp;{DdlPS.SelectedText}")
Dim FechaIn As String = $"&emsp;<b>Fecha&nbsp;Inicio:</b>&nbsp;{TxtFechaI.Text}"
Dim FechaFn As String = $"&emsp;<b>Fecha&nbsp;Fin:</b>&nbsp;{TxtFechaF.Text}"
If TxtFechaI.Text = "" Then FechaIn = ""
If TxtFechaF.Text = "" Then FechaFn = ""
@@ -379,6 +380,8 @@ Partial Class Inventarios_ReporteEntradasSalidas
Dim Ruta As String = UsuarioActual.Empresa.Ruta
Dim NombreArchivoDescarga = "ReporteEntradas-Salidas"
Dim params As New List(Of ReportParameter)
If UsuarioActual.CveEmpresa.Contiene(119) Then
If FormatoInventario Then
@@ -401,7 +404,8 @@ Partial Class Inventarios_ReporteEntradasSalidas
RutaPDF = "Empresas/Grales/Formatos/EntradasSalidas.rdlc"
End If
Dim params As New List(Of ReportParameter)
params.Add(New ReportParameter("pEmp", UsuarioActual.Empresa.Empresa))
Dim Imagen As New System.IO.FileInfo($"{UsuarioActual.Empresa.Ruta}/Logo.png")
params.Add(New ReportParameter("pImg", If(Imagen.Exists, $"file://{Imagen.FullName}", "")))
@@ -415,6 +419,8 @@ Partial Class Inventarios_ReporteEntradasSalidas
params.Add(New ReportParameter("FechaFinal", FechaF))
params.Add(New ReportParameter("AgrupadoPor", $"{Almacen}{TipoMov}{Moneda}{SoloConMov}{Proveedor}{Clasificacion}{Familia}{SubFamilia}{PS}{FechaIn}{FechaFn}"))
End If
params.Add(New ReportParameter("OcultarImportes", UsuarioActual.TienePermisoProceso(201).ToString))
ImprimirPDF(RutaPDF, If(FormatoInventario, dt.FiltraParametros("", "RazonSocial, PS ASC"), dt), params, NombreArchivoDescarga, Formato:=Formato)
End Sub

7
Inventarios/RepExistenciasCostos.aspx
View File

@@ -20,10 +20,10 @@
</asp:Content>
<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
<li>
<asp:LinkButton ID="LnkImprimir" runat="server"><i class="fa fa-ad-pdf"></i> Generar PDF</asp:LinkButton>
<asp:LinkButton ID="LnkImprimir" runat="server"><i class="fa fa-file-pdf-o"></i> PDF</asp:LinkButton>
</li>
<li>
<asp:LinkButton ID="LnkExportar" runat="server"><i class="fa fa-ad-excel"></i> Generar Excel</asp:LinkButton>
<asp:LinkButton ID="LnkExportar" runat="server"><i class="fa fa-file-excel-o"></i> Excel</asp:LinkButton>
</li>
<li>
<asp:HyperLink NavigateUrl="#" data-toggle="modal" data-target="#DivPersonalizar" ID="ImgPersonalizar" runat="server"> <i class="fa fa-pencil"></i> Personalizar</asp:HyperLink>
@@ -152,10 +152,13 @@
<asp:BoundField HeaderText="Activo Fijo" DataField="CodigoAF" ItemStyle-HorizontalAlign="Left" Visible="false" />
<asp:BoundField HeaderText="SubProyecto" DataField="SubProyecto" ItemStyle-HorizontalAlign="Left" Visible="false" />
<asp:BoundField HeaderText="Entradas" ItemStyle-Width="75px" DataField="Entradas" DataFormatString="{0:#,###.##}" ItemStyle-HorizontalAlign="Right"/>
<asp:BoundField HeaderText="Costo" ItemStyle-Width="100px" DataField="CostoE" DataFormatString="{0:#,###.##}" ItemStyle-HorizontalAlign="Right"/>
<asp:BoundField HeaderText="Salidas" ItemStyle-Width="75px" DataField="Salidas" DataFormatString="{0:#,###.##}" ItemStyle-HorizontalAlign="Right"/>
<asp:BoundField HeaderText="Costo" ItemStyle-Width="100px" DataField="CostoS" DataFormatString="{0:#,###.##}" ItemStyle-HorizontalAlign="Right"/>
<asp:BoundField HeaderText="Existencia" ItemStyle-Width="75px" DataField="ExistenciaAcum" DataFormatString="{0:#,###.##}" ItemStyle-HorizontalAlign="Right"/>
<asp:BoundField HeaderText="Valor" ItemStyle-Width="100px" DataField="ValorAcum" DataFormatString="{0:#,###.##}" ItemStyle-HorizontalAlign="Right"/>
</Columns>
</asp:GridView>

1
Inventarios/RepExistenciasCostos.aspx.vb
View File

@@ -298,6 +298,7 @@ Partial Class Inventarios_RepExistenciasCostos
params.Add(New ReportParameter("FechaImpresion", Now.ToDateTime.ToShortDateString))
params.Add(New ReportParameter("Filtros", $"{FechaIn} {FechaFn} {Proveedor} {Concepto} {Almacen} {Clasificacion} {PS} {Moneda}"))
params.Add(New ReportParameter("LogoPath", If(Imagen.Exists, $"file://{Imagen.FullName}", "")))
params.Add(New ReportParameter("OcultarImportes", UsuarioActual.TienePermisoProceso(201).ToString))
ImprimirPDF("Empresas/Grales/Formatos/RepExistenciasCostos.rdlc", DtData, params, "ReporteExistenciasCostos", Formato:=reporte)
Else
Alert("No hay datos consultados", TipoMensaje.MsgAdvertencia)

268
Sistemas/Empresa.aspx
View File

@@ -1635,82 +1635,170 @@
</div>
</ContentTemplate>
</ajax:TabPanel>
<ajax:TabPanel HeaderText="Plantilla Manda Correo" ID="TabPlantillaCorreo" runat="server">
<ContentTemplate>
<div class="row">
<div class="col-md-12">
<div class="portlet light smmallpadding bordered">
<div class="portlet-title">
<div class="caption font-green">
<i class="icon-pin font-green"></i>
<span class="caption-subject bold uppercase">Plantilla Manda Correo</span>
</div>
<div class="actions">
<div class="btn-group">
</div>
</div>
<div class="tools">
<a href="javascript:;" class="collapse"></a>
</div>
</div>
<div class="portlet-body">
<asp:Label ID="Lbl" runat="server" Text=""></asp:Label>
<br />
<br />
<li>{"FolioFactura"}</li>
<li>{"ImporteFactura"}</li>
<li>{"FechaFactura"}</li>
<li>{"FechaVencimiento"}</li>
<li>{"RazonSocialEmisor"}</li>
<li>{"RazonSocialReceptor"}</li>
<asp:TextBox ID="TxtAsunto" runat="server" ClientIDMode="Static" MaxLength="150"></asp:TextBox>
<asp:TextBox ID="TxtPlantillaVenta" runat="server" ClientIDMode="Static" MaxLength="5000" TextMode="MultiLine" Height="300px" Width="960px"></asp:TextBox>
<ajax:HtmlEditorExtender ID="HTMLPlantillaVenta" runat="server" TargetControlID="TxtPlantillaVenta" DisplaySourceTab="True" EnableSanitization="false">
<Toolbar>
<ajax:Undo />
<ajax:Redo />
<ajax:Bold />
<ajax:Italic />
<ajax:Underline />
<ajax:StrikeThrough />
<ajax:Subscript />
<ajax:Superscript />
<ajax:JustifyLeft />
<ajax:JustifyCenter />
<ajax:JustifyRight />
<ajax:JustifyFull />
<ajax:InsertOrderedList />
<ajax:InsertUnorderedList />
<ajax:CreateLink />
<ajax:UnLink />
<ajax:RemoveFormat />
<ajax:SelectAll />
<ajax:UnSelect />
<ajax:Delete />
<ajax:Cut />
<ajax:Copy />
<ajax:Paste />
<ajax:BackgroundColorSelector />
<ajax:ForeColorSelector />
<ajax:FontNameSelector />
<ajax:FontSizeSelector />
<ajax:Indent />
<ajax:Outdent />
<ajax:InsertHorizontalRule />
<ajax:HorizontalSeparator />
</Toolbar>
</ajax:HtmlEditorExtender>
<asp:Button ID="BtnGuardarPlantilla" runat="server" CssClass="btn btn-primary" align="center" Text="Guardar" />
</div>
</div>
</div>
</div>
</ContentTemplate>
<ajax:TabPanel HeaderText="Plantilla Manda Correo" ID="TabPlantillaCorreo" runat="server">
<ContentTemplate>
<div class="row">
<div class="col-md-6">
<div class="portlet light xspadding bordered">
<div class="portlet-title">
<div class="caption font-green">
<i class="icon-pin font-green"></i>
<span class="caption-subject bold uppercase">Plantilla Manda Correo Venta</span>
</div>
<div class="actions">
<div class="btn-group">
</div>
</div>
<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 href="javascript:;" class="collapse"></a>
</div>
</div>
<div class="portlet-body">
<div class="row">
<div class="col-md-12">
<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>
<label for="<%= TxtAsunto.ClientID.ToString()%>">Asunto:</label>
<i></i>
</div>
<br />
<asp:TextBox ID="TxtPlantillaVenta" runat="server" ClientIDMode="Static" MaxLength="5000" TextMode="MultiLine" Height="300px" Width="100%"></asp:TextBox>
<ajax:HtmlEditorExtender ID="HTMLPlantillaVenta" runat="server" TargetControlID="TxtPlantillaVenta" DisplaySourceTab="True" EnableSanitization="false">
<Toolbar>
<ajax:Undo />
<ajax:Redo />
<ajax:Bold />
<ajax:Italic />
<ajax:Underline />
<ajax:StrikeThrough />
<ajax:Subscript />
<ajax:Superscript />
<ajax:JustifyLeft />
<ajax:JustifyCenter />
<ajax:JustifyRight />
<ajax:JustifyFull />
<ajax:InsertOrderedList />
<ajax:InsertUnorderedList />
<ajax:CreateLink />
<ajax:UnLink />
<ajax:RemoveFormat />
<ajax:SelectAll />
<ajax:UnSelect />
<ajax:Delete />
<ajax:Cut />
<ajax:Copy />
<ajax:Paste />
<ajax:BackgroundColorSelector />
<ajax:ForeColorSelector />
<ajax:FontNameSelector />
<ajax:FontSizeSelector />
<ajax:Indent />
<ajax:Outdent />
<ajax:InsertHorizontalRule />
<ajax:HorizontalSeparator />
</Toolbar>
</ajax:HtmlEditorExtender>
</div>
</div>
</div>
</div>
</div>
<div class="col-md-6">
<div class="portlet light xspadding bordered">
<div class="portlet-title">
<div class="caption font-green">
<i class="icon-pin font-green"></i>
<span class="caption-subject bold uppercase">Plantilla Manda Correo Cotización</span>
</div>
<div class="actions">
<div class="btn-group">
</div>
</div>
<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 href="javascript:;" class="collapse"></a>
</div>
</div>
<div class="portlet-body">
<div class="row">
<div class="col-md-12">
<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"></asp:TextBox>
<label for="<%= TxtAsuntoCotizacion.ClientID.ToString()%>">Asunto:</label>
<i></i>
</div>
<br />
<asp:TextBox ID="TxtPlantillaCotizacion" runat="server" ClientIDMode="Static" MaxLength="5000" TextMode="MultiLine" Height="300px" Width="100%"></asp:TextBox>
<ajax:HtmlEditorExtender ID="HtmlEditorExtender1" runat="server" TargetControlID="TxtPlantillaCotizacion" DisplaySourceTab="True" EnableSanitization="false">
<Toolbar>
<ajax:Undo />
<ajax:Redo />
<ajax:Bold />
<ajax:Italic />
<ajax:Underline />
<ajax:StrikeThrough />
<ajax:Subscript />
<ajax:Superscript />
<ajax:JustifyLeft />
<ajax:JustifyCenter />
<ajax:JustifyRight />
<ajax:JustifyFull />
<ajax:InsertOrderedList />
<ajax:InsertUnorderedList />
<ajax:CreateLink />
<ajax:UnLink />
<ajax:RemoveFormat />
<ajax:SelectAll />
<ajax:UnSelect />
<ajax:Delete />
<ajax:Cut />
<ajax:Copy />
<ajax:Paste />
<ajax:BackgroundColorSelector />
<ajax:ForeColorSelector />
<ajax:FontNameSelector />
<ajax:FontSizeSelector />
<ajax:Indent />
<ajax:Outdent />
<ajax:InsertHorizontalRule />
<ajax:HorizontalSeparator />
</Toolbar>
</ajax:HtmlEditorExtender>
</div>
</div>
</div>
</div>
</div>
</div>
<div class="row">
<div class="col-md-12">
<asp:Button ID="BtnGuardarPlantilla" runat="server" CssClass="btn btn-primary" align="center" Text="Guardar Plantillas" />
</div>
</div>
</ContentTemplate>
</ajax:TabPanel>
</ajax:TabContainer>
</ContentTemplate>
</asp:UpdatePanel>
@@ -1788,6 +1876,38 @@
</asp:UpdatePanel>
<div id="DVModalEqiqutas" class="modal ADS fade" role="dialog">
<div class="modal-dialog">
<div class="modal-content" >
<div class="modal-header ">
<button type="button" class="close" data-dismiss="modal">&times;</button>
<h4 class="modal-title">Etiquetas Disponibles</h4>
</div>
<div class="modal-body">
<ul>
<li>{"FolioFactura"}</li>
<li>{"ImporteFactura"}</li>
<li>{"FechaFactura"}</li>
<li>{"FechaVencimiento"}</li>
<li>{"RazonSocialEmisor"}</li>
<li>{"RazonSocialReceptor"}</li>
</ul>
</div>
<br />
<div class="modal-footer">
<div class="row">
<div class="col-md-12">
<button type="button" class="btn btn-danger" data-dismiss="modal">Cerrar</button>
</div>
</div>
</div>
</div>
</div>
</div>
</asp:Content>
<asp:Content ID="Content7" ContentPlaceHolderID="JS" runat="server">

20
Sistemas/Empresa.aspx.vb
View File

@@ -199,8 +199,7 @@ Partial Class Sistemas_Empresa
BtnGuardar.Text = "Guardar Cambios"
'Plantilla Correo
TxtPlantillaVenta.Text = UsuarioActual.Empresa.PlantillaMailVenta
TxtAsunto.Text = UsuarioActual.Empresa.AsuntoPlantillaMailVenta
Else
'Configuración de Modalidad Insert
@@ -320,6 +319,12 @@ Partial Class Sistemas_Empresa
TxtImporte.Text = .Importe.ToString
TipoContabilidad = .TipoContabilidad
TxtPlantillaVenta.Text = .PlantillaMailVenta
TxtAsunto.Text = .AsuntoPlantillaMailVenta
TxtPlantillaCotizacion.Text = .AsuntoPlantillaMailVentaCotizacion
TxtAsuntoCotizacion.Text = .PlantillaMailVentaCotizacion
'NUEVOS
TxtAreaGeografica.Text = .AreaGeografica
DdlProtocolo.Text = .Buzon_Tipo
@@ -1317,10 +1322,19 @@ Partial Class Sistemas_Empresa
End If
Dim ObjEmpresa As New ClsSisEmpresas()
If ObjEmpresa.UpdatePlantillaMail("AsuntoPlantillaMailVenta", TxtAsunto.Text.Trim, "PlantillaMailVenta", TxtPlantillaVenta.Text.Trim, UsuarioActual.CveEmpresa) Then
If ObjEmpresa.UpdatePlantillaMail("AsuntoPlantillaMailVenta", TxtAsunto.Text.Trim, "PlantillaMailVenta", TxtPlantillaVenta.Text.Trim, CveEmpresa) Then
If ObjEmpresa.UpdatePlantillaMail("AsuntoPlantillaMailVentaCotizacion", TxtAsuntoCotizacion.Text.Trim, "PlantillaMailVentaCotizacion", TxtPlantillaCotizacion.Text.Trim, CveEmpresa) Then
End If
Alert("La plantilla de mail de ventas se guardó correctamente.", TipoMensaje.MsgInformacion)
UsuarioActual.Empresa.PlantillaMailVenta = TxtPlantillaVenta.Text.Trim
UsuarioActual.Empresa.AsuntoPlantillaMailVenta = TxtAsunto.Text.Trim
UsuarioActual.Empresa.AsuntoPlantillaMailVentaCotizacion = TxtPlantillaCotizacion.Text.Trim
UsuarioActual.Empresa.PlantillaMailVentaCotizacion = TxtAsuntoCotizacion.Text.Trim
'TxtPlantillaVenta.Text = ""
'TxtAsunto.Text = ""
End If

63
Sistemas/Empresa2.aspx
View File

@@ -171,7 +171,7 @@
<div runat="server" class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtRFC" runat="server" MaxLength="13" CssClass="form-control"></asp:TextBox>
<label for="<%= TxtRFC.ClientID.ToString()%>">RFC:</label>
<asp:RegularExpressionValidator ID="REVRFC" runat="server" Display="Dynamic" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''RFC''</b> es incorrecto, por favor ingréselo." ValidationGroup="GrpGuardar" ControlToValidate="TxtRFC" ValidationExpression="^[a-zA-Z.)(/\\&-]{3,4}(\d{6})((\D|\d){2})((\D|\d){1})$"></asp:RegularExpressionValidator>
<asp:RegularExpressionValidator ID="REVRFC" runat="server" Display="Dynamic" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''RFC''</b> es incorrecto, por favor ingréselo." ValidationGroup="GrpGuardar" ControlToValidate="TxtRFC" ValidationExpression="^[a-zA-Z.)(/\\&ñÑ-]{3,4}(\d{6})((\D|\d){2})((\D|\d){1})$"></asp:RegularExpressionValidator>
<asp:RequiredFieldValidator ID="RFVRFC" runat="server" ControlToValidate="TxtRFC" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''RFC''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="VCERFC" runat="server" HighlightCssClass="vco" TargetControlID="RFVRFC" Width="300px"></ajax:ValidatorCalloutExtender>
<ajax:ValidatorCalloutExtender ID="VCEREVRFC" runat="server" HighlightCssClass="vco" TargetControlID="REVRFC" Width="300px"></ajax:ValidatorCalloutExtender>
@@ -218,25 +218,31 @@
<asp:RequiredFieldValidator ID="RFVMail" runat="server" ControlToValidate="TxtMail" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Mail''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="VCEMail" runat="server" HighlightCssClass="vco" TargetControlID="RFVMail" Width="300px"></ajax:ValidatorCalloutExtender>
<ajax:ValidatorCalloutExtender ID="VCEMailInvalido" runat="server" HighlightCssClass="vco" TargetControlID="REVMail" Width="300px"></ajax:ValidatorCalloutExtender>
<asp:RegularExpressionValidator ID="REVMail" runat="server" ValidationExpression="\w+([-+.]\w+)*@\w+([-.]\w+)*\.\w+([-.]\w+)*" ControlToValidate="TxtMail" ErrorMessage="<b><span style='text-decoration: underline'></span></b><br />Favor de Introducir una direccion <b>''Mail''</b> Valida."></asp:RegularExpressionValidator>
<asp:RegularExpressionValidator ID="REVMail" runat="server" ValidationExpression="\w+([-+.]\w+)*@\w+([-.]\w+)*\.\w+([-.]\w+)*" ControlToValidate="TxtMail" Display="Dynamic"
ErrorMessage="<b><span style='text-decoration: underline'></span></b><br />Favor de Introducir una direccion <b>''Mail''</b> Valida."></asp:RegularExpressionValidator>
<i></i>
</div>
</div>
</div>
<div class="row">
<div class="form-group col-md-6 ">
<label>Mostrar Ret. IVA: </label>
<asp:CheckBox ID="ChkMostrarRetIVA" runat="server" CssClass="make-switchsd" data-size="small" />
<div runat="server" class="form-group form-md-line-input input-iconright">
<asp:CheckBox ID="ChkMostrarRetIVA" runat="server" CssClass="form-control make-switchsd" style="margin-top:15px!important" data-size="small" />
<label for="<%= ChkMostrarRetIVA.ClientID.ToString()%>" style="margin-top:-13px!important" >Mostrar Ret. IVA:</label>
</div>
</div>
<div class="form-group col-md-6 ">
<label>Mostrar Ret. ISR: </label>
<asp:CheckBox ID="ChkMostrarRetISR" runat="server" CssClass="make-switchsd" data-size="small" />
<div runat="server" class="form-group form-md-line-input input-iconright">
<asp:CheckBox ID="ChkMostrarRetISR" runat="server" CssClass="form-control make-switchsd" style="margin-top:15px!important" data-size="small" />
<label for="<%= ChkMostrarRetISR.ClientID.ToString()%>" style="margin-top:-13px!important" >Mostrar Ret. ISR:</label>
</div>
</div>
</div>
<div class="row">
<%-- <div class="row">
<div class="col-md-6">
<div runat="server" class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtImporte" CssClass="form-control " runat="server" MaxLength="50" ValidationGroup="GrpGuardar"></asp:TextBox>
@@ -248,7 +254,7 @@
<div class="col-md-6">
</div>
</div>
</div>--%>
<br />
</div>
@@ -279,7 +285,7 @@
<div class="row">
<div class="col-md-6">
<div class="col-md-8">
<div runat="server" class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtArchivoKey" runat="server" CssClass="form-control"></asp:TextBox>
<label for="<%= TxtArchivoKey.ClientID.ToString()%>">Archivo Key:</label>
@@ -299,7 +305,7 @@
</div>
<div class="row">
<div class="col-md-6">
<div class="col-md-8">
<div runat="server" class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtArchivoCer" runat="server" CssClass="form-control"></asp:TextBox>
<label for="<%= TxtArchivoCer.ClientID.ToString()%>">Archivo CER:</label>
@@ -320,7 +326,7 @@
<div class="row">
<div class="col-md-6">
<div class="col-md-8">
<div runat="server" class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtArchivoPfx" runat="server" CssClass="form-control" ></asp:TextBox>
<label for="<%= TxtArchivoPfx.ClientID.ToString()%>">Archivo PFX:</label>
@@ -362,11 +368,7 @@
</div>
<br />
<div class="row">
<div class="col-md-6">
<asp:LinkButton ID="LnkRegistrarPAC3" runat="server" CssClass="Texto" OnClick="LnkRegistrarPAC3_Click">Registrar en ProFact</asp:LinkButton>
</div>
</div>
</ContentTemplate>
<Triggers>
<asp:PostBackTrigger ControlID="LbArchivoKeyDescarga" />
@@ -461,7 +463,7 @@
<div class="form-group col-md-6 ">
<div runat="server" class="form-group form-md-line-input input-iconright">
<asp:CheckBox ID="ChkSendMailSSL" Text=" " CssClass="form-control make-switchsd" runat="server" style="margin-top:15px!important" />
<asp:CheckBox ID="ChkSendMailSSL" Text=" " CssClass="form-control make-switchsd" runat="server" style="margin-top:15px!important" data-size="small" />
<label for="<%= ChkSendMailSSL.ClientID.ToString()%>" style="margin-top:-13px!important" >SSL:</label>
</div>
</div>
@@ -522,7 +524,7 @@
</div>
<div class="form-group col-md-6 ">
<div runat="server" class="form-group form-md-line-input input-iconright">
<asp:CheckBox ID="ChkBuzon_SSL" Text=" " CssClass="form-control make-switchsd" runat="server" style="margin-top:15px!important" />
<asp:CheckBox ID="ChkBuzon_SSL" Text=" " CssClass="form-control make-switchsd" runat="server" style="margin-top:15px!important" data-size="small" />
<label for="<%= ChkSendMailSSL.ClientID.ToString()%>" style="margin-top:-13px!important" >SSL:</label>
</div>
</div>
@@ -673,7 +675,7 @@
<div class="row">
<div class="form-group col-md-6 ">
<div runat="server" class="form-group form-md-line-input input-iconright">
<asp:CheckBox ID="ChkDefaultAsistencias" Text=" " CssClass="form-control make-switchsd" runat="server" style="margin-top:15px!important" />
<asp:CheckBox ID="ChkDefaultAsistencias" Text=" " CssClass="form-control make-switchsd" runat="server" style="margin-top:15px!important" data-size="small" />
<label for="<%= ChkDefaultAsistencias.ClientID.ToString()%>" style="margin-top:-13px!important" >Default Asistencias:</label>
</div>
</div>
@@ -710,7 +712,7 @@
<div class="row">
<div class="form-group col-md-6 ">
<div runat="server" class="form-group form-md-line-input input-iconright">
<asp:CheckBox ID="ChkReqCentroCostos" Text=" " CssClass="form-control make-switchsd" runat="server" style="margin-top:15px!important" />
<asp:CheckBox ID="ChkReqCentroCostos" Text=" " CssClass="form-control make-switchsd" runat="server" style="margin-top:15px!important" data-size="small" />
<label for="<%= ChkReqCentroCostos.ClientID.ToString()%>" style="margin-top:-13px!important" >Requiere Centro De Costos::</label>
</div>
</div>
@@ -785,11 +787,14 @@
<div class="row">
<div class="col-md-12">
<div class="col-md-12">
Asunto: <asp:TextBox ID="TxtAsunto" runat="server" ClientIDMode="Static" MaxLength="150"></asp:TextBox>
<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>
<label for="<%= TxtAsunto.ClientID.ToString()%>">Asunto:</label>
<i></i>
</div>
<br />
<asp:TextBox ID="TxtPlantillaVenta" runat="server" ClientIDMode="Static" MaxLength="5000" TextMode="MultiLine" Height="300px" Width="100%"></asp:TextBox>
<ajax:HtmlEditorExtender ID="HTMLPlantillaVenta" runat="server" TargetControlID="TxtPlantillaVenta" DisplaySourceTab="True" EnableSanitization="false">
@@ -855,7 +860,14 @@
<div class="row">
<div class="col-md-12">
Asunto: <asp:TextBox ID="TxtAsuntoCotizacion" runat="server" ClientIDMode="Static" MaxLength="150"></asp:TextBox>
<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"></asp:TextBox>
<label for="<%= TxtAsuntoCotizacion.ClientID.ToString()%>">Asunto:</label>
<i></i>
</div>
<br />
<asp:TextBox ID="TxtPlantillaCotizacion" runat="server" ClientIDMode="Static" MaxLength="5000" TextMode="MultiLine" Height="300px" Width="100%"></asp:TextBox>
<ajax:HtmlEditorExtender ID="HtmlEditorExtender1" runat="server" TargetControlID="TxtPlantillaCotizacion" DisplaySourceTab="True" EnableSanitization="false">
<Toolbar>
@@ -909,6 +921,7 @@
</ContentTemplate>
</ajax:TabPanel>
</ajax:TabContainer>
</ContentTemplate>
</asp:UpdatePanel>

6
Sistemas/Empresa2.aspx.vb
View File

@@ -480,7 +480,7 @@ Partial Class Sistemas_Empresa2
'DdlCvePac.SelectedValueExist(.CvePAC.ToString)
DdlRegimen.SelectedValue = .CveRegimenFiscal.ToString
TxtCURP.Text = .CURP
TxtImporte.Text.ToDecimal
'TxtImporte.Text.ToDecimal
TxtCIEC.Text = .CIEC
'DdlPlataforma.SelectedValue = .CvePlataforma.ToString
UsaAC = .UsaAC
@@ -496,7 +496,7 @@ Partial Class Sistemas_Empresa2
DdlTipoCentroDeCostos.SelectedValue = .Tipo_CentroCosto.ToString
ChkReqCentroCostos.Checked = .RequiereCentroCostos
DdlTerminalTipo.SelectedValue = .PV_TerminalTipo.ToString
TxtImporte.Text = .Importe.ToString
'TxtImporte.Text = .Importe.ToString
TipoContabilidad = .TipoContabilidad
TxtPlantillaVenta.Text = .PlantillaMailVenta
@@ -760,7 +760,7 @@ Partial Class Sistemas_Empresa2
ChkBuzon_SSL.Checked, TxtBuzon_USR.Text.Trim, TxtBuzon_PWD.Text.Trim, UsuarioActual.CveEmpresa, DdlProtocolo.SelectedValue,
"-1", "-1", -1, SSLSoporte, "-1", "-1", "-1", -1, -1, -1, -1, -1, -1, -1, -1, "", TxtAreaGeografica.Text.Trim,
-1, -1, TxtNombreCorto.Text, TxtCURP.Text.Trim, DdlRegimen.SelectedValue.ToEntero, 1,
TxtImporte.Text.ToDecimal, TxtCIEC.Text, 1, UsaAC,
-1, TxtCIEC.Text, 1, UsaAC,
TxtPorDepreciacion.Text.ToDecimal, TxtExtension.Text, TxtLocalidad.Text, DdlMetodoInventario.SelectedValue.ToEntero, AsientoContable, TxtPeriodoActual.Text.ToEntero,
TxtEjercicioActual.Text.ToEntero, ChkDefaultAsistencias.Checked, TxtDiasPermitidos.Text.ToEntero, DdlTipoCentroDeCostos.SelectedValue.ToEntero, ChkReqCentroCostos.Checked,
DdlTerminalTipo.SelectedValue.ToEntero, IdCuentaDSV:=-1, IdCuentaImpuestosLocales:=-1, IdCuentaIEPSxAcreditar:=-1, IdCuentaIEPSAcreditable:=-1,

67
Ventas/Clientes.aspx.vb
View File

@@ -2245,26 +2245,53 @@ Partial Class Clientes
End If
ObjVenta.Dispose()
If UsuarioActual.Empresa.PlantillaMailVenta.Trim.Length > 0 Then
Cuerpo = UsuarioActual.Empresa.PlantillaMailVenta
Cuerpo = Cuerpo.Replace("{""NombreEmpresa""}", UsuarioActual.Empresa.Empresa)
Cuerpo = Cuerpo.Replace("{""NombreCliente""}", LtlCliente.Text.Trim)
Cuerpo = Cuerpo.Replace("{""TipoDocumento""}", TipoComprobante)
Cuerpo = Cuerpo.Replace("{""SerieFolio""}", HdnSerieFolio.Value.ToString())
If Dr IsNot Nothing Then
Cuerpo = Cuerpo.Replace("{""Fecha""}", Dr("Fecha").ToString().ToDate().ToShortDateString())
Cuerpo = Cuerpo.Replace("{""Total""}", Dr("Total").ToString().FormatoNumero())
Cuerpo = Cuerpo.Replace("{""FechaVencimiento""}", Dr("FechaVencimiento").ToString().ToDate().ToShortDateString())
End If
End If
If UsuarioActual.Empresa.AsuntoPlantillaMailVenta.Trim.Length > 0 Then
Asunto = UsuarioActual.Empresa.AsuntoPlantillaMailVenta
Asunto = Asunto.Replace("{""TipoDocumento""}", TipoComprobante)
Asunto = Asunto.Replace("{""Sucursal""}", HdnSubProyecto.Value.ToString())
Asunto = Asunto.Replace("{""SerieFolio""}", HdnSerieFolio.Value.ToString())
End If
If HdnTipoDocto.Value.ToString() = "Cot" Then
If UsuarioActual.Empresa.AsuntoPlantillaMailVentaCotizacion.Trim.Length > 0 Then
Cuerpo = UsuarioActual.Empresa.AsuntoPlantillaMailVentaCotizacion
Cuerpo = Cuerpo.Replace("{""NombreEmpresa""}", UsuarioActual.Empresa.Empresa)
Cuerpo = Cuerpo.Replace("{""NombreCliente""}", LtlCliente.Text.Trim)
Cuerpo = Cuerpo.Replace("{""TipoDocumento""}", TipoComprobante)
Cuerpo = Cuerpo.Replace("{""SerieFolio""}", HdnSerieFolio.Value.ToString())
If Dr IsNot Nothing Then
Cuerpo = Cuerpo.Replace("{""Fecha""}", Dr("Fecha").ToString().ToDate().ToShortDateString())
Cuerpo = Cuerpo.Replace("{""Total""}", Dr("Total").ToString().FormatoNumero())
Cuerpo = Cuerpo.Replace("{""FechaVencimiento""}", Dr("FechaVencimiento").ToString().ToDate().ToShortDateString())
End If
End If
If UsuarioActual.Empresa.AsuntoPlantillaMailVentaCotizacion.Trim.Length > 0 Then
Asunto = UsuarioActual.Empresa.AsuntoPlantillaMailVentaCotizacion
Asunto = Asunto.Replace("{""TipoDocumento""}", TipoComprobante)
Asunto = Asunto.Replace("{""Sucursal""}", HdnSubProyecto.Value.ToString())
Asunto = Asunto.Replace("{""SerieFolio""}", HdnSerieFolio.Value.ToString())
End If
Else
If UsuarioActual.Empresa.PlantillaMailVenta.Trim.Length > 0 Then
Cuerpo = UsuarioActual.Empresa.PlantillaMailVenta
Cuerpo = Cuerpo.Replace("{""NombreEmpresa""}", UsuarioActual.Empresa.Empresa)
Cuerpo = Cuerpo.Replace("{""NombreCliente""}", LtlCliente.Text.Trim)
Cuerpo = Cuerpo.Replace("{""TipoDocumento""}", TipoComprobante)
Cuerpo = Cuerpo.Replace("{""SerieFolio""}", HdnSerieFolio.Value.ToString())
If Dr IsNot Nothing Then
Cuerpo = Cuerpo.Replace("{""Fecha""}", Dr("Fecha").ToString().ToDate().ToShortDateString())
Cuerpo = Cuerpo.Replace("{""Total""}", Dr("Total").ToString().FormatoNumero())
Cuerpo = Cuerpo.Replace("{""FechaVencimiento""}", Dr("FechaVencimiento").ToString().ToDate().ToShortDateString())
End If
End If
If UsuarioActual.Empresa.AsuntoPlantillaMailVenta.Trim.Length > 0 Then
Asunto = UsuarioActual.Empresa.AsuntoPlantillaMailVenta
Asunto = Asunto.Replace("{""TipoDocumento""}", TipoComprobante)
Asunto = Asunto.Replace("{""Sucursal""}", HdnSubProyecto.Value.ToString())
Asunto = Asunto.Replace("{""SerieFolio""}", HdnSerieFolio.Value.ToString())
End If
End If
If UsuarioActual.Empresa.TipoFacturacion = "CFDi" AndAlso HdnTipoDocto.Value.Contiene("Ing", "Egs", "Ant", "Dev") Then
Dim PDF As String = $"{Ruta}PDF\{HdnTipoDocto.Value}\{HdnFolioVenta.Value}.pdf"
Dim XML As String = $"{Ruta}XML\{HdnTipoDocto.Value}\{HdnFolioVenta.Value}.xml"