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

SMS Remision Pedido campo documentacion

Browse Source
This commit is contained in:
rakcsle
2023-12-29 12:59:50 -07:00
parent beedaf54a8
commit ea9df1491d
7 changed files with 50 additions and 34 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
App_Code/ClsPaginas.vb
View File

@@ -5846,6 +5846,11 @@ Public Class ClsPaginas
params.Add(New ReportParameter("Tipo", TipoDocumento))
params.Add(New ReportParameter("Ref", TipoDocumentoRef))
params.Add(New ReportParameter("AplicaPagare", AplicaPagare))
If UsuarioActual.Empresa.Funcionalidad(578) = "1" Then
params.Add(New ReportParameter("Documentacion", Vta.Cliente.Documentacion))
End If
RutaFormato = String.Format("{0}Formatos\{1}.rdlc", UsuarioActual.Empresa.Ruta, NombreArchivo)
RutaFormatoDefault = String.Format("Empresas\Grales\Formatos\{0}.rdlc", NombreArchivo)
@@ -5946,6 +5951,11 @@ Public Class ClsPaginas
params.Add(New ReportParameter("Ref", TipoDocumentoRef))
params.Add(New ReportParameter("AplicaPagare", AplicaPagare))
params.Add(New ReportParameter("CveAlmacenTraspasoOrigen", Vta.CveAlmacenTraspasoOrigen.ToString))
If UsuarioActual.Empresa.Funcionalidad(578) = "1" Then
params.Add(New ReportParameter("Documentacion", Vta.Cliente.Documentacion))
End If
RutaFormato = String.Format("{0}Formatos\{1}.rdlc", UsuarioActual.Empresa.Ruta, NombreArchivo)
RutaFormatoDefault = String.Format("Empresas\Grales\Formatos\{0}.rdlc", NombreArchivo)
Case "Pd2"
@@ -6257,7 +6267,7 @@ Public Class ClsPaginas
Dim paramsArray As New JArray()
For Each rds As ReportDataSource In DataSource
Dim Nombre As String = rds.Name
If RutaReporte.Contains("Factura.mrt") OrElse RutaReporte.Contains("Remision.mrt") OrElse RutaReporte.Contains("Cotizacion.mrt") OrElse RutaReporte.Contains("NotaDevolucion.mrt") Then
If RutaReporte.Contains("Factura.mrt") OrElse RutaReporte.Contains("Remision.mrt") OrElse RutaReporte.Contains("Cotizacion.mrt") OrElse RutaReporte.Contains("NotaDevolucion.mrt") OrElse RutaReporte.Contains("Pedido.mrt") Then
Select Case rds.Name
Case "DsOC"
Nombre = "DtDetalle"

1
App_Code/Modelos.vb
View File

@@ -7959,6 +7959,7 @@ Namespace Modelos
Public Property ImprimeNombreSucursal As Integer
Public Property CobranzaCorreo As String
Public Property UsaProductoAlterno As Boolean = False
Public Property Documentacion As String = ""
End Class
<Serializable>

1
Compras/PopUpVerFactura.aspx.vb
View File

@@ -3043,6 +3043,7 @@ Partial Class PopUpVerFactura
Vta.Cliente.CodigoRegimenFiscal = dtVentas(0)("CodigoRegimenFiscal").ToString
Vta.Cliente.RegimenFiscal = dtVentas(0)("RegimenFiscal").ToString
Vta.Cliente.UsaProductoAlterno = CBool(dtVentas(0)("UsaProductoAlterno"))
Vta.Cliente.Documentacion = dtVentas(0)("Documentacion").ToString
Vta.RefDocto = dtVentas(0)("Ref").ToString
Vta.CveVenta = dtVentas(0)("CveVenta").ToString.ToEntero

51
Empresas/Grales/Formatos/CartaPorteTimbrado.rdlc
View File

@@ -847,7 +847,7 @@
<Paragraph>
<TextRuns>
<TextRun>
<Value>MERCANCIAS</Value>
<Value>Mercancias</Value>
<Style>
<FontFamily>Myriad Pro</FontFamily>
<FontSize>9pt</FontSize>
@@ -890,7 +890,7 @@
<Paragraph>
<TextRuns>
<TextRun>
<Value>DISTANCIA</Value>
<Value>Distancia</Value>
<Style>
<FontFamily>Myriad Pro</FontFamily>
<FontSize>8pt</FontSize>
@@ -1261,7 +1261,7 @@
<Paragraph>
<TextRuns>
<TextRun>
<Value>NOMBRE</Value>
<Value>Nombre</Value>
<Style>
<FontFamily>Myriad Pro</FontFamily>
<FontSize>8pt</FontSize>
@@ -1301,7 +1301,7 @@
<Paragraph>
<TextRuns>
<TextRun>
<Value>FECHA</Value>
<Value>Fecha</Value>
<Style>
<FontFamily>Myriad Pro</FontFamily>
<FontSize>8pt</FontSize>
@@ -1341,7 +1341,7 @@
<Paragraph>
<TextRuns>
<TextRun>
<Value>DIRECCIÓN</Value>
<Value>Dirección</Value>
<Style>
<FontFamily>Myriad Pro</FontFamily>
<FontSize>8pt</FontSize>
@@ -1450,7 +1450,7 @@
<Paragraph>
<TextRuns>
<TextRun>
<Value>REMITENTES Y DESTINATARIOS</Value>
<Value>Remitentes Y Destinatarios</Value>
<Style>
<FontFamily>Myriad Pro</FontFamily>
<FontSize>9pt</FontSize>
@@ -1646,7 +1646,7 @@
<Paragraph>
<TextRuns>
<TextRun>
<Value>LICENCIA</Value>
<Value>Licencia</Value>
<Style>
<FontFamily>Myriad Pro</FontFamily>
<FontSize>8pt</FontSize>
@@ -1686,7 +1686,7 @@
<Paragraph>
<TextRuns>
<TextRun>
<Value>NOMBRE OPERADOR</Value>
<Value>Nombre Operador</Value>
<Style>
<FontFamily>Myriad Pro</FontFamily>
<FontSize>8pt</FontSize>
@@ -1795,7 +1795,7 @@
<Paragraph>
<TextRuns>
<TextRun>
<Value>OPERADORES</Value>
<Value>Operadores</Value>
<Style>
<FontFamily>Myriad Pro</FontFamily>
<FontSize>9pt</FontSize>
@@ -2199,7 +2199,7 @@
<Paragraph>
<TextRuns>
<TextRun>
<Value>TRANSPORTE</Value>
<Value>Transporte</Value>
<Style>
<FontFamily>Myriad Pro</FontFamily>
<FontSize>9pt</FontSize>
@@ -2410,7 +2410,7 @@
<Paragraph>
<TextRuns>
<TextRun>
<Value>DATOS DEL CLIENTE</Value>
<Value>Datos Del Cliente</Value>
<Style>
<FontFamily>Myriad Pro</FontFamily>
<FontSize>9pt</FontSize>
@@ -2452,7 +2452,7 @@
<Paragraph>
<TextRuns>
<TextRun>
<Value>CANTIDAD</Value>
<Value>Cant.</Value>
<Style>
<FontFamily>Myriad Pro</FontFamily>
<FontSize>8pt</FontSize>
@@ -2486,7 +2486,7 @@
<TablixBody>
<TablixColumns>
<TablixColumn>
<Width>3.03118cm</Width>
<Width>2.65924cm</Width>
</TablixColumn>
<TablixColumn>
<Width>8.93664cm</Width>
@@ -2693,7 +2693,7 @@
<Paragraph>
<TextRuns>
<TextRun>
<Value>UNIDAD DE MEDIDA</Value>
<Value>Unidad De Medida</Value>
<Style>
<FontFamily>Myriad Pro</FontFamily>
<FontSize>8pt</FontSize>
@@ -2733,7 +2733,7 @@
<Paragraph>
<TextRuns>
<TextRun>
<Value>DESCRIPCIÓN</Value>
<Value>Descripción</Value>
<Style>
<FontFamily>Myriad Pro</FontFamily>
<FontSize>8pt</FontSize>
@@ -2813,7 +2813,7 @@
<Paragraph>
<TextRuns>
<TextRun>
<Value>IMPORTE</Value>
<Value>Importe</Value>
<Style>
<FontFamily>Myriad Pro</FontFamily>
<FontSize>8pt</FontSize>
@@ -2907,7 +2907,7 @@
<Top>13.75012cm</Top>
<Left>0.33883cm</Left>
<Height>1.12062cm</Height>
<Width>19.20418cm</Width>
<Width>18.83224cm</Width>
<ZIndex>13</ZIndex>
<Style>
<Border>
@@ -2922,7 +2922,7 @@
<Paragraph>
<TextRuns>
<TextRun>
<Value>CONCEPTOS</Value>
<Value>Conceptos</Value>
<Style>
<FontFamily>Myriad Pro</FontFamily>
<FontSize>9pt</FontSize>
@@ -2998,7 +2998,7 @@
<Paragraph>
<TextRuns>
<TextRun>
<Value>SUBTOTAL:</Value>
<Value>SubTotal:</Value>
<Style>
<FontFamily>Myriad Pro</FontFamily>
<FontSize>9pt</FontSize>
@@ -3078,7 +3078,7 @@
<Paragraph>
<TextRuns>
<TextRun>
<Value>DESCUENTOS:</Value>
<Value>Descuentos:</Value>
<Style>
<FontFamily>Myriad Pro</FontFamily>
<FontSize>9pt</FontSize>
@@ -3155,7 +3155,7 @@
<Paragraph>
<TextRuns>
<TextRun>
<Value>TOTAL:</Value>
<Value>Total:</Value>
<Style>
<FontFamily>Myriad Pro</FontFamily>
<FontSize>9pt</FontSize>
@@ -3480,7 +3480,7 @@
<Paragraph>
<TextRuns>
<TextRun>
<Value>RELACIÓN</Value>
<Value>Relación</Value>
<Style>
<FontFamily>Myriad Pro</FontFamily>
<FontSize>8pt</FontSize>
@@ -3805,7 +3805,7 @@
<Paragraph>
<TextRuns>
<TextRun>
<Value>FOLIOS RELACIONADOS</Value>
<Value>Folios Relacionados</Value>
<Style>
<FontFamily>Myriad Pro</FontFamily>
<FontSize>9pt</FontSize>
@@ -4053,7 +4053,8 @@
<Source>External</Source>
<Value>=Parameters!LogoPath.Value</Value>
<Sizing>FitProportional</Sizing>
<Left>0.16845in</Left>
<Top>0.38703cm</Top>
<Left>0.18258in</Left>
<Height>0.46171in</Height>
<Width>1.23522in</Width>
<ZIndex>2</ZIndex>
@@ -4069,7 +4070,7 @@
<Paragraph>
<TextRuns>
<TextRun>
<Value>CARTA PORTE - TRASLADO</Value>
<Value>Carta Porte - Traslado</Value>
<Style>
<FontFamily>Myriad Pro</FontFamily>
<FontSize>9pt</FontSize>

13
Ventas/CatMedicos.aspx
View File

@@ -472,10 +472,7 @@
</div>
</div>
<div class="col-md-6">
<div class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtTorre" CssClass="form-control " runat="server" MaxLength="50" CausesValidation="true"></asp:TextBox>
<label for="<%= TxtTorre.ClientID.ToString()%>">Torre:</label>
</div>
</div>
</div>
@@ -528,12 +525,18 @@
<label for="<%= TxtLugar.ClientID.ToString()%>">Hospital:</label>
</div>
</div>
<div class="col-md-6">
<div class="col-md-3">
<div class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtConsultorio" CssClass="form-control " runat="server" MaxLength="50" CausesValidation="true"></asp:TextBox>
<label for="<%= TxtConsultorio.ClientID.ToString()%>">Consultorio:</label>
</div>
</div>
<div class="col-md-3">
<div class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtTorre" CssClass="form-control " runat="server" MaxLength="50" CausesValidation="true"></asp:TextBox>
<label for="<%= TxtTorre.ClientID.ToString()%>">Torre:</label>
</div>
</div>
</div>

4
Ventas/CatMedicos.aspx.vb
View File

@@ -145,7 +145,7 @@ Partial Class Ventas_CatMedicos
Public Sub LnkAgregarMedico_Click(sender As Object, e As EventArgs)
LbAgregar.Text = "Agregar"
LtlTituloModal.Text = "Agregar Medico"
LtlTituloModal.Text = "Agregar Médico"
TxtMedico.Text = ""
TxtCedulaProfecional.Text = ""
@@ -198,7 +198,7 @@ Partial Class Ventas_CatMedicos
DVEstatus.Visible = True
LbAgregar.Text = "Actualizar"
LtlTituloModal.Text = $"Actualizar Medico {TxtCedulaProfecional.Text}"
LtlTituloModal.Text = $"Actualizar Médico {TxtCedulaProfecional.Text}"
UpModal.Update()
RegistraScript("$('#DVAgregarMedico').modal();")

2
Ventas/Clientes.aspx
View File

@@ -735,7 +735,7 @@
<div class="col-md-10">
<div runat="server" class="form-group form-md-line-input input-iconright">
<asp:DropDownList ID="DdlPrecioLista" runat="server" CssClass="form-control select2me" Width="100%" DataTextField="PrecioLista" DataValueField="CvePrecioLista"></asp:DropDownList>
<asp:RequiredFieldValidator ID="RfvDdlPrecioLista" InitialValue="-1" runat="server" CssClass="help-block errorimput" ControlToValidate="DdlPrecioLista"
<asp:RequiredFieldValidator ID="RfvDdlPrecioLista" Visible="false" InitialValue="-1" runat="server" CssClass="help-block errorimput" ControlToValidate="DdlPrecioLista"
ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Lista de Precio''</b> es necesario, por favor ingréselo."
ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<label for="<%= DdlPrecioLista.ClientID.ToString()%>">Precio Lista:</label>