Merge branch 'master' of http://jperez@192.168.10.111:8383/SIG.git
This commit is contained in:
@@ -335,7 +335,7 @@ Public Class ClsContratos
|
|||||||
Optional TipoGarantia As Integer = -1, Optional Folio As Integer = -1, Optional FechaVenc As Date = Nothing, Optional EstatusFianza As Integer = -1, Optional CvePeriodo As Integer = -1, Optional CveContratoPlantilla As Integer = -1, Optional CveCuentaEquipo As Integer = -1,
|
Optional TipoGarantia As Integer = -1, Optional Folio As Integer = -1, Optional FechaVenc As Date = Nothing, Optional EstatusFianza As Integer = -1, Optional CvePeriodo As Integer = -1, Optional CveContratoPlantilla As Integer = -1, Optional CveCuentaEquipo As Integer = -1,
|
||||||
Optional CveVendedor As Integer = -1, Optional Observaciones As String = "", Optional CveDireccionEnvio As Integer = -1, Optional AplicaImpuestosLocales As Boolean = False, Optional CorreoNotificacionPedDev As String = "",
|
Optional CveVendedor As Integer = -1, Optional Observaciones As String = "", Optional CveDireccionEnvio As Integer = -1, Optional AplicaImpuestosLocales As Boolean = False, Optional CorreoNotificacionPedDev As String = "",
|
||||||
Optional FacturacionCicilica As Boolean = False, Optional FacturacionCiclicaAutomatico As Boolean = False, Optional DiaMesFacturacion As Integer = 1, Optional ObservacionesGenerales As String = "",
|
Optional FacturacionCicilica As Boolean = False, Optional FacturacionCiclicaAutomatico As Boolean = False, Optional DiaMesFacturacion As Integer = 1, Optional ObservacionesGenerales As String = "",
|
||||||
Optional CveTipoAF As Integer = Nothing, Optional CveChofer As Integer = Nothing, Optional CveChofer2 As Integer = Nothing, Optional CveAF As Integer = Nothing, Optional CantidadPasajeros As Integer = Nothing, Optional CveRuta As Integer = Nothing, Optional CvePartida As Integer = Nothing, Optional CveDestino As Integer = Nothing, Optional CveMasivo As Integer = Nothing) As Integer
|
Optional CveTipoAF As Integer = Nothing, Optional CveChofer As Integer = Nothing, Optional CveChofer2 As Integer = Nothing, Optional CveAF As Integer = Nothing, Optional CantidadPasajeros As Integer = Nothing, Optional CvePartida As Integer = Nothing, Optional CveDestino As Integer = Nothing, Optional CveMasivo As Integer = Nothing) As Integer
|
||||||
|
|
||||||
Dim Retorno As Integer = -1
|
Dim Retorno As Integer = -1
|
||||||
DataAdapter("PA_Con_ContratosAdd")
|
DataAdapter("PA_Con_ContratosAdd")
|
||||||
@@ -397,7 +397,6 @@ Public Class ClsContratos
|
|||||||
.Add("@CveChofer2", SqlDbType.Int).Value = CveChofer2
|
.Add("@CveChofer2", SqlDbType.Int).Value = CveChofer2
|
||||||
.Add("@CveAF", SqlDbType.Int).Value = CveAF
|
.Add("@CveAF", SqlDbType.Int).Value = CveAF
|
||||||
.Add("@CantidadPasajeros", SqlDbType.Int).Value = CantidadPasajeros
|
.Add("@CantidadPasajeros", SqlDbType.Int).Value = CantidadPasajeros
|
||||||
.Add("@CveRuta", SqlDbType.Int).Value = CveRuta
|
|
||||||
.Add("@CvePartida", SqlDbType.Int).Value = CvePartida
|
.Add("@CvePartida", SqlDbType.Int).Value = CvePartida
|
||||||
.Add("@CveDestino", SqlDbType.Int).Value = CveDestino
|
.Add("@CveDestino", SqlDbType.Int).Value = CveDestino
|
||||||
.Add("@CveMasivo", SqlDbType.Int).Value = CveMasivo
|
.Add("@CveMasivo", SqlDbType.Int).Value = CveMasivo
|
||||||
|
|||||||
@@ -626,13 +626,13 @@ Public Class Timbres
|
|||||||
Return Retorno
|
Return Retorno
|
||||||
|
|
||||||
End Function
|
End Function
|
||||||
Public Function Timbrar() As Boolean
|
Public Function Timbrar(Optional CvePACEspecifico As Integer = -1) As Boolean
|
||||||
|
|
||||||
Dim Respuesta As Boolean = False
|
Dim Respuesta As Boolean = False
|
||||||
|
|
||||||
Dim ObjTimbrado As New Timbrado
|
Dim ObjTimbrado As New Timbrado
|
||||||
|
|
||||||
If ObjTimbrado.TimbrarFactura(UsuarioActual, ObjFactura) Then
|
If ObjTimbrado.TimbrarFactura(UsuarioActual, ObjFactura, CvePACEspecial:=CvePACEspecifico) Then
|
||||||
Respuesta = True
|
Respuesta = True
|
||||||
Else
|
Else
|
||||||
Respuesta = False
|
Respuesta = False
|
||||||
|
|||||||
Binary file not shown.
BIN
Bin/Bin.rar
BIN
Bin/Bin.rar
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
@@ -3293,7 +3293,7 @@ Partial Class Compras_Compras
|
|||||||
If RetIVAOriginal > 0 Then
|
If RetIVAOriginal > 0 Then
|
||||||
Dim CalRetIVAPor As Decimal = (RetIVAOriginal * 1 / SubTotal2Original).RoundAD(6).ToDecimal
|
Dim CalRetIVAPor As Decimal = (RetIVAOriginal * 1 / SubTotal2Original).RoundAD(6).ToDecimal
|
||||||
|
|
||||||
If (CalRetIVAPor).RoundSQL(6) = 0.106667 OrElse (CalRetIVAPor).RoundSQL(6) = 0.053333 Then
|
If (CalRetIVAPor).RoundSQL(5) = 0.10666 OrElse (CalRetIVAPor).RoundSQL(5) = 0.05333 Then
|
||||||
DdlRetIVAConcepto.SelectedValueExist("1") '10.66 servicios profesionales
|
DdlRetIVAConcepto.SelectedValueExist("1") '10.66 servicios profesionales
|
||||||
End If
|
End If
|
||||||
If RetIVAFlete Then '4 Fletes
|
If RetIVAFlete Then '4 Fletes
|
||||||
@@ -3314,6 +3314,7 @@ Partial Class Compras_Compras
|
|||||||
'permitido en un margen de 1% a 2%
|
'permitido en un margen de 1% a 2%
|
||||||
If RetISRResico OrElse (CalRetISRPor >= 0.01 AndAlso CalRetISRPor <= 0.02) Then '1.25 Recico regimen simplificado confianza
|
If RetISRResico OrElse (CalRetISRPor >= 0.01 AndAlso CalRetISRPor <= 0.02) Then '1.25 Recico regimen simplificado confianza
|
||||||
DdlRetISRConcepto.SelectedValueExist("3")
|
DdlRetISRConcepto.SelectedValueExist("3")
|
||||||
|
RetISRResico = True
|
||||||
End If
|
End If
|
||||||
End If
|
End If
|
||||||
End If
|
End If
|
||||||
|
|||||||
@@ -1481,7 +1481,7 @@ Sello digital del SAT:
|
|||||||
<ClientRectangle>0,2.68,14.6,0.8</ClientRectangle>
|
<ClientRectangle>0,2.68,14.6,0.8</ClientRectangle>
|
||||||
<Conditions isList="true" count="0" />
|
<Conditions isList="true" count="0" />
|
||||||
<Expressions isList="true" count="0" />
|
<Expressions isList="true" count="0" />
|
||||||
<Font>Myriad Pro,9,Regular,Point,False,0</Font>
|
<Font>Myriad Pro,8,Regular,Point,False,0</Font>
|
||||||
<Guid>179a957f89d04921b856805a4c2e9d49</Guid>
|
<Guid>179a957f89d04921b856805a4c2e9d49</Guid>
|
||||||
<Margins>0,0,0,0</Margins>
|
<Margins>0,0,0,0</Margins>
|
||||||
<Name>Text9</Name>
|
<Name>Text9</Name>
|
||||||
@@ -1542,7 +1542,7 @@ DESPUES DE 72 HORAS POSTERIORES A LA FECHA DE ELABORACIÓN"</Text>
|
|||||||
<ReportAlias>Factura</ReportAlias>
|
<ReportAlias>Factura</ReportAlias>
|
||||||
<ReportChanged>1/18/2024 9:39:09 AM</ReportChanged>
|
<ReportChanged>1/18/2024 9:39:09 AM</ReportChanged>
|
||||||
<ReportCreated>7/11/2022 2:49:19 PM</ReportCreated>
|
<ReportCreated>7/11/2022 2:49:19 PM</ReportCreated>
|
||||||
<ReportFile>Factura.mrt</ReportFile>
|
<ReportFile>C:\inetpub\WWWSigGit\Empresas\186\Formatos\Factura.mrt</ReportFile>
|
||||||
<ReportGuid>4a902ea660c34d0baeae36e92ea35edd</ReportGuid>
|
<ReportGuid>4a902ea660c34d0baeae36e92ea35edd</ReportGuid>
|
||||||
<ReportName>Factura</ReportName>
|
<ReportName>Factura</ReportName>
|
||||||
<ReportUnit>Centimeters</ReportUnit>
|
<ReportUnit>Centimeters</ReportUnit>
|
||||||
|
|||||||
@@ -1056,7 +1056,7 @@ Fecha Cirugia: {FechaCirugia}</Text>
|
|||||||
<ClientRectangle>0,2.48,13.2,0.8</ClientRectangle>
|
<ClientRectangle>0,2.48,13.2,0.8</ClientRectangle>
|
||||||
<Conditions isList="true" count="0" />
|
<Conditions isList="true" count="0" />
|
||||||
<Expressions isList="true" count="0" />
|
<Expressions isList="true" count="0" />
|
||||||
<Font>Myriad Pro,9,Regular,Point,False,0</Font>
|
<Font>Myriad Pro,8,Regular,Point,False,0</Font>
|
||||||
<Guid>1891a87e013d48868bd75b5710529e30</Guid>
|
<Guid>1891a87e013d48868bd75b5710529e30</Guid>
|
||||||
<Margins>0,0,0,0</Margins>
|
<Margins>0,0,0,0</Margins>
|
||||||
<Name>Text13</Name>
|
<Name>Text13</Name>
|
||||||
|
|||||||
@@ -1080,7 +1080,7 @@ Vendedor: {VendedorNombre}</Text>
|
|||||||
<ClientRectangle>0,2.48,10.6,1</ClientRectangle>
|
<ClientRectangle>0,2.48,10.6,1</ClientRectangle>
|
||||||
<Conditions isList="true" count="0" />
|
<Conditions isList="true" count="0" />
|
||||||
<Expressions isList="true" count="0" />
|
<Expressions isList="true" count="0" />
|
||||||
<Font>Myriad Pro,9,Regular,Point,False,0</Font>
|
<Font>Myriad Pro,8,Regular,Point,False,0</Font>
|
||||||
<Guid>fca703f575e74a9f8bc6628424c9a960</Guid>
|
<Guid>fca703f575e74a9f8bc6628424c9a960</Guid>
|
||||||
<Margins>0,0,0,0</Margins>
|
<Margins>0,0,0,0</Margins>
|
||||||
<Name>Text13</Name>
|
<Name>Text13</Name>
|
||||||
@@ -1138,7 +1138,7 @@ Episodio: {Episodio}</Text>
|
|||||||
<ReportAlias>Report</ReportAlias>
|
<ReportAlias>Report</ReportAlias>
|
||||||
<ReportChanged>10/11/2022 8:18:55 PM</ReportChanged>
|
<ReportChanged>10/11/2022 8:18:55 PM</ReportChanged>
|
||||||
<ReportCreated>7/11/2022 2:49:19 PM</ReportCreated>
|
<ReportCreated>7/11/2022 2:49:19 PM</ReportCreated>
|
||||||
<ReportFile>Remision.mrt</ReportFile>
|
<ReportFile>C:\inetpub\WWWSigGit\Empresas\186\Formatos\Remision.mrt</ReportFile>
|
||||||
<ReportGuid>49b2dec77fe542ea952b501bf54fafb1</ReportGuid>
|
<ReportGuid>49b2dec77fe542ea952b501bf54fafb1</ReportGuid>
|
||||||
<ReportName>Report</ReportName>
|
<ReportName>Report</ReportName>
|
||||||
<ReportUnit>Centimeters</ReportUnit>
|
<ReportUnit>Centimeters</ReportUnit>
|
||||||
|
|||||||
@@ -1016,7 +1016,8 @@ Partial Class Inventarios_TraspasoAlmacen
|
|||||||
'AGREGAMOS LA SALIDA DEL ALMACEN ORIGEN
|
'AGREGAMOS LA SALIDA DEL ALMACEN ORIGEN
|
||||||
CveMovimientoSalida = ObjInventario.AddMovimiento(DdlAlmacenOrigen.SelectedValue.ToEntero, TipoMovimientoSalida, 1, Fecha, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1, -1, -1, -1,
|
CveMovimientoSalida = ObjInventario.AddMovimiento(DdlAlmacenOrigen.SelectedValue.ToEntero, TipoMovimientoSalida, 1, Fecha, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1, -1, -1, -1,
|
||||||
Observaciones:=TxtObservaciones.Text.Trim, Recibio:=If(ChkTransitorio.Checked, TxtResponsable.Text.Trim, "-1"),
|
Observaciones:=TxtObservaciones.Text.Trim, Recibio:=If(ChkTransitorio.Checked, TxtResponsable.Text.Trim, "-1"),
|
||||||
CveAlmacenDestino:=DdlAlmacenDestino.SelectedValue.ToEntero, GastoIndirecto:=If(ChkTransitorio.Checked And TxtGastoIndirecto.Text.ToDecimal > 0, TxtGastoIndirecto.Text, "-1").ToDecimal, ResponsableCarga:="", ResponsableRecibio:="",
|
CveAlmacenDestino:=DdlAlmacenDestino.SelectedValue.ToEntero, GastoIndirecto:=If(ChkTransitorio.Checked And TxtGastoIndirecto.Text.ToDecimal > 0, TxtGastoIndirecto.Text, "-1").ToDecimal,
|
||||||
|
ResponsableCarga:="", ResponsableRecibio:="",
|
||||||
Modulo:="TA/G2", CveFolioGarantia:=CveFolioGarantia)
|
Modulo:="TA/G2", CveFolioGarantia:=CveFolioGarantia)
|
||||||
FolioSalida = ObjInventario.Folio
|
FolioSalida = ObjInventario.Folio
|
||||||
Folio = ObjInventario.Folio
|
Folio = ObjInventario.Folio
|
||||||
@@ -2754,7 +2755,7 @@ Partial Class Inventarios_TraspasoAlmacen
|
|||||||
|
|
||||||
MensajeAlert.Append("<br/><br/>")
|
MensajeAlert.Append("<br/><br/>")
|
||||||
|
|
||||||
If ObjTimbres.Timbrar() Then
|
If ObjTimbres.Timbrar(CvePACEspecifico:=4) Then
|
||||||
|
|
||||||
Try
|
Try
|
||||||
PdfFactura(ObjTimbres.ObjFactura)
|
PdfFactura(ObjTimbres.ObjFactura)
|
||||||
@@ -3001,8 +3002,8 @@ Partial Class Inventarios_TraspasoAlmacen
|
|||||||
ProductosNoCargados.AppendFormat("{0},", RowPS("PSCodigo").ToString())
|
ProductosNoCargados.AppendFormat("{0},", RowPS("PSCodigo").ToString())
|
||||||
End If
|
End If
|
||||||
|
|
||||||
Else
|
Else
|
||||||
RowsNoCargados = RowsNoCargados + 1
|
RowsNoCargados = RowsNoCargados + 1
|
||||||
ProductosNoCargados.AppendFormat("{0},", RowExcel("Producto").ToString())
|
ProductosNoCargados.AppendFormat("{0},", RowExcel("Producto").ToString())
|
||||||
End If
|
End If
|
||||||
End If
|
End If
|
||||||
|
|||||||
@@ -10,7 +10,7 @@
|
|||||||
<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
|
<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
|
||||||
<style>
|
<style>
|
||||||
.my-1 {
|
.my-1 {
|
||||||
margin-block: 1rem;
|
|
||||||
}
|
}
|
||||||
</style>
|
</style>
|
||||||
</asp:Content>
|
</asp:Content>
|
||||||
@@ -26,163 +26,163 @@
|
|||||||
<%-- Información General --%>
|
<%-- Información General --%>
|
||||||
<ajax:TabPanel runat="server" HeaderText="Información General" CssClass="tabBodyOverride">
|
<ajax:TabPanel runat="server" HeaderText="Información General" CssClass="tabBodyOverride">
|
||||||
<ContentTemplate>
|
<ContentTemplate>
|
||||||
<%-- Datos del Contrato --%>
|
<div class="row">
|
||||||
<div class="portlet light bordered">
|
<div class="col-md-7">
|
||||||
<div class="portlet-title">
|
<%-- Datos del Contrato --%>
|
||||||
<div class="tools">
|
<div class="portlet light bordered">
|
||||||
<a href="javascript;" data-idchekbox="C_chkexpand" class=" collapse" data-original-title=""
|
<div class="portlet-title">
|
||||||
title=""></a><span class="hidden">
|
<div class="tools">
|
||||||
<input id="C_chkexpand" type="checkbox" name="ctl00$C$chkexpand" checked="checked"></span>
|
<a href="javascript;" data-idchekbox="C_chkexpand" class=" collapse" data-original-title=""
|
||||||
</div>
|
title=""></a><span class="hidden">
|
||||||
<div class="caption uppercase" style="position: relative;">
|
<input id="C_chkexpand" type="checkbox" name="ctl00$C$chkexpand" checked="checked"></span>
|
||||||
<i class="fa fa-info-circle"></i>Datos del Contrato
|
</div>
|
||||||
</div>
|
<div class="caption uppercase" style="position: relative;">
|
||||||
</div>
|
<i class="fa fa-info-circle"></i>Datos del Contrato
|
||||||
|
</div>
|
||||||
<div class="portlet-body rowpadding">
|
|
||||||
<div class="row my-1">
|
|
||||||
<label class="col-md-4 bold text-primary">Folio</label>
|
|
||||||
<asp:Label class="col-md-8" runat="server" ID="LbFolio" Text="Folio"></asp:Label>
|
|
||||||
</div>
|
|
||||||
|
|
||||||
<div class="row my-1">
|
|
||||||
<label class="col-md-4">Cliente</label>
|
|
||||||
<div class="col-md-8">
|
|
||||||
<ADS:Dropdownlost CssClassDdl="select2me" ID="DdlClientes" Width="86%" data-metodo="getcliente"
|
|
||||||
runat="server" DataTextField="NombreComercial" DataValueField="CveCliente" CssStyle="width: 86%;"
|
|
||||||
UsaWebService="true" Enabled="false"></ADS:Dropdownlost>
|
|
||||||
<asp:LinkButton runat="server" CssClass="btn btn-primary fa-add" Width="12%"
|
|
||||||
PostBackUrl="~/Ventas/Clientes.aspx?CveCliente=-1"></asp:LinkButton>
|
|
||||||
</div>
|
</div>
|
||||||
</div>
|
|
||||||
|
|
||||||
<div class="row">
|
<div class="portlet-body rowpadding">
|
||||||
<label class="col-md-4">Servicio</label>
|
<div class="row my-1">
|
||||||
<div class="col-md-8">
|
<label class="col-md-2 text-primary">Folio</label>
|
||||||
<asp:TextBox ID="TxtDescripcion" runat="server" MaxLength="70" Width="100%"
|
<asp:Label class="col-md-10" runat="server" ID="LbFolio" Text=""></asp:Label>
|
||||||
TextMode="MultiLine"
|
</div>
|
||||||
Rows="2"></asp:TextBox>
|
|
||||||
<asp:RequiredFieldValidator ID="RFVDescripcion" runat="server" ControlToValidate="TxtDescripcion"
|
|
||||||
Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Servicio''</b> es necesario, por favor ingréselo."
|
|
||||||
ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
|
|
||||||
<ajax:ValidatorCalloutExtender ID="VCEDescripcion" runat="server" HighlightCssClass="vco"
|
|
||||||
TargetControlID="RFVDescripcion" Width="100%">
|
|
||||||
</ajax:ValidatorCalloutExtender>
|
|
||||||
</div>
|
|
||||||
</div>
|
|
||||||
|
|
||||||
<div class="row my-1">
|
<div class="row my-1">
|
||||||
<label class="col-md-4">Observaciones</label>
|
<label class="col-md-2">Cliente</label>
|
||||||
<div class="col-md-8">
|
<div class="col-md-10">
|
||||||
<asp:TextBox ID="TxtObservaciones" runat="server" MaxLength="70" Width="100%"
|
<ADS:Dropdownlost CssClassDdl="select2me" ID="DdlClientes" Width="86%" data-metodo="getcliente"
|
||||||
TextMode="MultiLine"
|
runat="server" DataTextField="NombreComercial" DataValueField="CveCliente" CssStyle="width: 86%;"
|
||||||
Rows="2"></asp:TextBox>
|
UsaWebService="true" Enabled="false"></ADS:Dropdownlost>
|
||||||
</div>
|
<asp:LinkButton runat="server" CssClass="btn btn-primary fa-add" Width="12%"
|
||||||
</div>
|
PostBackUrl="~/Ventas/Clientes.aspx?CveCliente=-1"></asp:LinkButton>
|
||||||
|
</div>
|
||||||
|
</div>
|
||||||
|
|
||||||
<div class="row">
|
<div class="row">
|
||||||
<label class="col-md-4">Lugar de Salida</label>
|
<label class="col-md-2">Servicio</label>
|
||||||
<div class="col-md-8">
|
<div class="col-md-10">
|
||||||
<asp:TextBox ID="TxtUbicacion" runat="server" MaxLength="70" Width="100%"></asp:TextBox>
|
<asp:TextBox ID="TxtDescripcion" runat="server" MaxLength="70" Width="100%"
|
||||||
</div>
|
TextMode="MultiLine"
|
||||||
</div>
|
Rows="2"></asp:TextBox>
|
||||||
|
<asp:RequiredFieldValidator ID="RFVDescripcion" runat="server" ControlToValidate="TxtDescripcion"
|
||||||
|
Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Servicio''</b> es necesario, por favor ingréselo."
|
||||||
|
ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
|
||||||
|
<ajax:ValidatorCalloutExtender ID="VCEDescripcion" runat="server" HighlightCssClass="vco"
|
||||||
|
TargetControlID="RFVDescripcion" Width="100%">
|
||||||
|
</ajax:ValidatorCalloutExtender>
|
||||||
|
</div>
|
||||||
|
</div>
|
||||||
|
|
||||||
<div class="row my-1">
|
<div class="row my-1">
|
||||||
<label class="col-md-4">Fecha Salida</label>
|
<label class="col-md-2">Observaciones</label>
|
||||||
<div class="col-md-8">
|
<div class="col-md-10">
|
||||||
<asp:TextBox ID="TxtFechaSalida" runat="server" CssClass="form-control" CausesValidation="True"
|
<asp:TextBox ID="TxtObservaciones" runat="server" MaxLength="70" Width="100%"
|
||||||
Width="100%"
|
TextMode="MultiLine"
|
||||||
type="datetime"></asp:TextBox>
|
Rows="2"></asp:TextBox>
|
||||||
<asp:RequiredFieldValidator ID="RFVTxtFechaSalida" runat="server" ControlToValidate="TxtFechaSalida"
|
</div>
|
||||||
Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fecha Salida''</b> es necesario, por favor ingréselo."
|
</div>
|
||||||
ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
|
|
||||||
<ajax:ValidatorCalloutExtender ID="VCETxtFechaSalida" runat="server" HighlightCssClass="vco"
|
|
||||||
TargetControlID="RFVTxtFechaSalida" Width="100%">
|
|
||||||
</ajax:ValidatorCalloutExtender>
|
|
||||||
</div>
|
|
||||||
</div>
|
|
||||||
|
|
||||||
<div class="row">
|
<div class="row">
|
||||||
<label class="col-md-4">Fecha Regreso</label>
|
<label class="col-md-2">Lugar de Salida</label>
|
||||||
<div class="col-md-8">
|
<div class="col-md-10">
|
||||||
<asp:TextBox ID="TxtFechaRegreso" runat="server" CssClass="form-control" CausesValidation="True"
|
<asp:TextBox ID="TxtUbicacion" runat="server" MaxLength="70" Width="100%"></asp:TextBox>
|
||||||
Width="100%"
|
</div>
|
||||||
type="datetime"></asp:TextBox>
|
</div>
|
||||||
<asp:RequiredFieldValidator ID="RFVTxtFechaRegreso" runat="server" ControlToValidate="TxtFechaRegreso"
|
|
||||||
Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fecha Regreso''</b> es necesario, por favor ingréselo."
|
|
||||||
ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
|
|
||||||
<ajax:ValidatorCalloutExtender ID="ValidatorCalloutExtender1" runat="server" HighlightCssClass="vco"
|
|
||||||
TargetControlID="RFVTxtFechaRegreso" Width="100%">
|
|
||||||
</ajax:ValidatorCalloutExtender>
|
|
||||||
</div>
|
|
||||||
</div>
|
|
||||||
|
|
||||||
<div class="row my-1">
|
<div class="row my-1">
|
||||||
<label class="col-md-4">Cantidad de pasajeros</label>
|
<label class="col-md-2">Fecha Salida</label>
|
||||||
<div class="col-md-8">
|
<div class="col-md-10">
|
||||||
<asp:TextBox ID="TxtCantidadPasajeros" CssStyle="col-md-8 form-control" runat="server"
|
<asp:TextBox ID="TxtFechaSalida" runat="server" CssClass="form-control" CausesValidation="True"
|
||||||
type="number"
|
Width="100%"
|
||||||
Width="100%"></asp:TextBox>
|
type="datetime"></asp:TextBox>
|
||||||
<asp:RequiredFieldValidator ID="RFVCantidadPasajeros" runat="server" ControlToValidate="TxtCantidadPasajeros"
|
<asp:RequiredFieldValidator ID="RFVTxtFechaSalida" runat="server" ControlToValidate="TxtFechaSalida"
|
||||||
Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Cantidad de pasajeros''</b> es necesario, por favor ingréselo."
|
Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fecha Salida''</b> es necesario, por favor ingréselo."
|
||||||
ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
|
ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
|
||||||
<ajax:ValidatorCalloutExtender ID="VCECantidadPasajeros" runat="server" HighlightCssClass="VCOCantidadPasajeros"
|
<ajax:ValidatorCalloutExtender ID="VCETxtFechaSalida" runat="server" HighlightCssClass="vco"
|
||||||
TargetControlID="RFVCantidadPasajeros" Width="100%">
|
TargetControlID="RFVTxtFechaSalida" Width="100%">
|
||||||
</ajax:ValidatorCalloutExtender>
|
</ajax:ValidatorCalloutExtender>
|
||||||
</div>
|
</div>
|
||||||
</div>
|
</div>
|
||||||
|
|
||||||
<div class="row">
|
<div class="row">
|
||||||
<label class="col-md-4">Tipo Unidad</label>
|
<label class="col-md-2">Fecha Regreso</label>
|
||||||
<div class="col-md-8">
|
<div class="col-md-10">
|
||||||
<asp:DropDownList ID="DdlTipoAF" AppendDataBoundItems="true" DataTextField="TipoActivoFijo"
|
<asp:TextBox ID="TxtFechaRegreso" runat="server" CssClass="form-control" CausesValidation="True"
|
||||||
DataValueField="CveTipoActivoFijo" Class="table-group-action-input form-control input-inline select2me"
|
Width="100%"
|
||||||
Width="100%" runat="server">
|
type="datetime"></asp:TextBox>
|
||||||
</asp:DropDownList>
|
<asp:RequiredFieldValidator ID="RFVTxtFechaRegreso" runat="server" ControlToValidate="TxtFechaRegreso"
|
||||||
<asp:RequiredFieldValidator ID="RFVTipoAF" runat="server" ControlToValidate="DdlTipoAF"
|
Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fecha Regreso''</b> es necesario, por favor ingréselo."
|
||||||
Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Tipo de Unidad''</b> es necesario, por favor ingréselo."
|
ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
|
||||||
ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
|
<ajax:ValidatorCalloutExtender ID="ValidatorCalloutExtender1" runat="server" HighlightCssClass="vco"
|
||||||
<ajax:ValidatorCalloutExtender ID="VCETipoAF" runat="server" HighlightCssClass="vco"
|
TargetControlID="RFVTxtFechaRegreso" Width="100%">
|
||||||
TargetControlID="RFVTipoAF" Width="400px">
|
</ajax:ValidatorCalloutExtender>
|
||||||
</ajax:ValidatorCalloutExtender>
|
</div>
|
||||||
</div>
|
</div>
|
||||||
</div>
|
|
||||||
|
|
||||||
<div class="row my-1">
|
<div class="row my-1">
|
||||||
<label class="col-md-4">Costo dólares</label>
|
<label class="col-md-2">Cant. pasajeros</label>
|
||||||
<div class="col-md-8">
|
<div class="col-md-10">
|
||||||
<asp:TextBox ID="TxtDolares" CssStyle=" form-control" runat="server" type="number"
|
<asp:TextBox ID="TxtCantidadPasajeros" CssStyle="col-md-10 form-control" runat="server"
|
||||||
Width="95%"></asp:TextBox>
|
type="number"
|
||||||
<span class="fa fa-dollar"></span>
|
Width="100%"></asp:TextBox>
|
||||||
</div>
|
<asp:RequiredFieldValidator ID="RFVCantidadPasajeros" runat="server" ControlToValidate="TxtCantidadPasajeros"
|
||||||
</div>
|
Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Cantidad de pasajeros''</b> es necesario, por favor ingréselo."
|
||||||
|
ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
|
||||||
|
<ajax:ValidatorCalloutExtender ID="VCECantidadPasajeros" runat="server" HighlightCssClass="VCOCantidadPasajeros"
|
||||||
|
TargetControlID="RFVCantidadPasajeros" Width="100%">
|
||||||
|
</ajax:ValidatorCalloutExtender>
|
||||||
|
</div>
|
||||||
|
</div>
|
||||||
|
|
||||||
<div class="row">
|
<div class="row">
|
||||||
<label class="col-md-4">Costo pesos</label>
|
<label class="col-md-2">Tipo Unidad</label>
|
||||||
<div class="col-md-8">
|
<div class="col-md-10">
|
||||||
<asp:TextBox ID="TxtPesos" CssStyle=" form-control" runat="server" type="number"
|
<asp:DropDownList ID="DdlTipoAF" AppendDataBoundItems="true" DataTextField="TipoActivoFijo"
|
||||||
Width="95%"></asp:TextBox>
|
DataValueField="CveTipoActivoFijo" Class="table-group-action-input form-control input-inline select2me"
|
||||||
<span class="fa fa-dollar"></span>
|
Width="100%" runat="server">
|
||||||
</div>
|
</asp:DropDownList>
|
||||||
</div>
|
<asp:RequiredFieldValidator ID="RFVTipoAF" runat="server" ControlToValidate="DdlTipoAF"
|
||||||
|
Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Tipo de Unidad''</b> es necesario, por favor ingréselo."
|
||||||
|
ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
|
||||||
|
<ajax:ValidatorCalloutExtender ID="VCETipoAF" runat="server" HighlightCssClass="vco"
|
||||||
|
TargetControlID="RFVTipoAF" Width="400px">
|
||||||
|
</ajax:ValidatorCalloutExtender>
|
||||||
|
</div>
|
||||||
|
</div>
|
||||||
|
|
||||||
<div class="row my-1">
|
<div class="row my-1">
|
||||||
<label class="col-md-4">Anticipo</label>
|
<label class="col-md-2">Costo dólares</label>
|
||||||
<div class="col-md-8">
|
<div class="col-md-10">
|
||||||
<asp:TextBox ID="TxtAnticipo" CssStyle=" form-control" Width="95%" runat="server"
|
<asp:TextBox ID="TxtDolares" CssStyle=" form-control" runat="server" type="number"
|
||||||
type="decimal"></asp:TextBox>
|
Width="95%"></asp:TextBox>
|
||||||
<span class="fa fa-percent"></span>
|
<span class="fa fa-dollar"></span>
|
||||||
|
</div>
|
||||||
|
</div>
|
||||||
|
|
||||||
|
<div class="row">
|
||||||
|
<label class="col-md-2">Costo pesos</label>
|
||||||
|
<div class="col-md-10">
|
||||||
|
<asp:TextBox ID="TxtPesos" CssStyle=" form-control" runat="server" type="number"
|
||||||
|
Width="95%"></asp:TextBox>
|
||||||
|
<span class="fa fa-dollar"></span>
|
||||||
|
</div>
|
||||||
|
</div>
|
||||||
|
|
||||||
|
<div class="row my-1">
|
||||||
|
<label class="col-md-2">Anticipo</label>
|
||||||
|
<div class="col-md-10">
|
||||||
|
<asp:TextBox ID="TxtAnticipo" CssStyle=" form-control" Width="95%" runat="server"
|
||||||
|
type="decimal"></asp:TextBox>
|
||||||
|
<span class="fa fa-percent"></span>
|
||||||
|
</div>
|
||||||
|
</div>
|
||||||
</div>
|
</div>
|
||||||
</div>
|
</div>
|
||||||
</div>
|
</div>
|
||||||
</div>
|
</div>
|
||||||
</ContentTemplate>
|
</ContentTemplate>
|
||||||
</ajax:TabPanel>
|
|
||||||
<%-- Pre init --%>
|
|
||||||
<ajax:TabPanel runat="server" HeaderText="PreInit" CssClass="row">
|
|
||||||
<ContentTemplate>
|
|
||||||
</ContentTemplate>
|
|
||||||
</ajax:TabPanel>
|
</ajax:TabPanel>
|
||||||
|
|
||||||
<%-- Boletos --%>
|
<%-- Boletos --%>
|
||||||
<ajax:TabPanel runat="server" HeaderText="Boletos" CssClass="row" Visible="false"
|
<ajax:TabPanel runat="server" HeaderText="Boletos" CssClass="row" Visible="false"
|
||||||
ID="TabBoletos">
|
ID="TabBoletos">
|
||||||
|
|||||||
@@ -19,8 +19,8 @@ Partial Class ListadoContratos
|
|||||||
End Property
|
End Property
|
||||||
#End Region
|
#End Region
|
||||||
Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
|
Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
|
||||||
txtFechaI.Text = DateTime.Now.AddMonths(-1).ToString("MM/dd/yyyy").Replace(" ", "T")
|
txtFechaI.Text = DateTime.Now.AddMonths(-1).ToShortDateString
|
||||||
txtFechaF.Text = DateTime.Now.AddDays(7).ToString("MM/dd/yyyy").Replace(" ", "T")
|
txtFechaF.Text = DateTime.Now.AddDays(7).ToShortDateString
|
||||||
|
|
||||||
If Not IsPostBack Then
|
If Not IsPostBack Then
|
||||||
InicializaCombos()
|
InicializaCombos()
|
||||||
@@ -56,6 +56,7 @@ Partial Class ListadoContratos
|
|||||||
GvContratos.DataSource = ObjContratos.DtResultados
|
GvContratos.DataSource = ObjContratos.DtResultados
|
||||||
GvContratos.DataBind()
|
GvContratos.DataBind()
|
||||||
End If
|
End If
|
||||||
|
ObjContratos.Dispose()
|
||||||
|
|
||||||
'Generamos Folio - NumeroContrato
|
'Generamos Folio - NumeroContrato
|
||||||
Dim CveSubProyecto As Integer = GlobalDTSubProyectos(-1, -1, CveEmpresa:=UsuarioActual.CveEmpresa).FiltroPrimeroValor("CveSubProyecto", "TipoSucursal = 1").ToEntero
|
Dim CveSubProyecto As Integer = GlobalDTSubProyectos(-1, -1, CveEmpresa:=UsuarioActual.CveEmpresa).FiltroPrimeroValor("CveSubProyecto", "TipoSucursal = 1").ToEntero
|
||||||
|
|||||||
@@ -107,6 +107,7 @@ Partial Class ListadoViajes
|
|||||||
|
|
||||||
Protected Sub AddViaje(sender As Object, e As EventArgs)
|
Protected Sub AddViaje(sender As Object, e As EventArgs)
|
||||||
'Generador de Viajes Masivos
|
'Generador de Viajes Masivos
|
||||||
|
Dim CveSubProyecto As Integer = DdlRutas.SelectedValue.ToEntero 'GlobalDTSubProyectos(-1, -1, CveEmpresa:=UsuarioActual.CveEmpresa).FiltroPrimeroValor("CveSubProyecto", "TipoSucursal = 1").ToEntero
|
||||||
If IsMasivo.Checked = True Then
|
If IsMasivo.Checked = True Then
|
||||||
If TxtFechaInicial.Text = "" Or TxtFrecuencia.Text = "" Then
|
If TxtFechaInicial.Text = "" Or TxtFrecuencia.Text = "" Then
|
||||||
Alert("Es necesario agregar la fecha inicial y la frecuencia", TipoMensaje.MsgAdvertencia)
|
Alert("Es necesario agregar la fecha inicial y la frecuencia", TipoMensaje.MsgAdvertencia)
|
||||||
@@ -127,7 +128,6 @@ Partial Class ListadoViajes
|
|||||||
Dim ObjContratos As New ClsContratos
|
Dim ObjContratos As New ClsContratos
|
||||||
|
|
||||||
'Generamos folio
|
'Generamos folio
|
||||||
Dim CveSubProyecto As Integer = GlobalDTSubProyectos(-1, -1, CveEmpresa:=UsuarioActual.CveEmpresa).FiltroPrimeroValor("CveSubProyecto", "TipoSucursal = 1").ToEntero
|
|
||||||
If ObjFolio.GetFolios("Con", UsuarioActual.CveEmpresa, CveSubProyecto:=CveSubProyecto) Then
|
If ObjFolio.GetFolios("Con", UsuarioActual.CveEmpresa, CveSubProyecto:=CveSubProyecto) Then
|
||||||
If ObjFolio.DtResultados.Rows.Count > 0 Then
|
If ObjFolio.DtResultados.Rows.Count > 0 Then
|
||||||
Dim drr As DataRow = ObjFolio.DtResultados.FiltroPrimero("")
|
Dim drr As DataRow = ObjFolio.DtResultados.FiltroPrimero("")
|
||||||
@@ -136,7 +136,7 @@ Partial Class ListadoViajes
|
|||||||
End If
|
End If
|
||||||
'Agregamos contrato
|
'Agregamos contrato
|
||||||
ObjContratos.IniciaTransacSQL()
|
ObjContratos.IniciaTransacSQL()
|
||||||
If ObjContratos.AddContratos(LbFolio.Text, "", "", UsuarioActual.CveProveedor, -1, -1, fecha, fecha, "", "", 10, -1, -1, -1, -1, "", "", -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, False, -1, -1, -1, -1, 0, CveContratoTipo:=35, CveContratosEstatus:=50, CveRuta:=DdlRutas.Text.ToEntero, CvePartida:=DdlPartida.SelectedValue.ToEntero, CveDestino:=DdlDestino.SelectedValue.ToEntero, CveMasivo:=CveMasivo, CveVendedor:=UsuarioActual.CveVendedor) > 0 Then
|
If ObjContratos.AddContratos(LbFolio.Text, "", "", UsuarioActual.CveProveedor, -1, -1, fecha, fecha, "", "", CveSubProyecto, -1, -1, -1, -1, "", "", -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, False, -1, -1, -1, -1, 0, CveContratoTipo:=35, CveContratosEstatus:=50, CvePartida:=DdlPartida.SelectedValue.ToEntero, CveDestino:=DdlDestino.SelectedValue.ToEntero, CveMasivo:=CveMasivo, CveVendedor:=UsuarioActual.CveVendedor) > 0 Then
|
||||||
ObjContratos.Commit()
|
ObjContratos.Commit()
|
||||||
End If
|
End If
|
||||||
'Actualizamos Folio
|
'Actualizamos Folio
|
||||||
@@ -164,13 +164,13 @@ Partial Class ListadoViajes
|
|||||||
Try
|
Try
|
||||||
'Agregamos Viaje
|
'Agregamos Viaje
|
||||||
If BtnGuardar.Text = "Agregar" Then
|
If BtnGuardar.Text = "Agregar" Then
|
||||||
If ObjContratos.AddContratos(LbFolio.Text, "", "", UsuarioActual.CveProveedor, -1, -1, TxtFechaViaje.Text.ToDate, TxtFechaViaje.Text.ToDate, "", "", -1, -1, -1, -1, -1, "", "", -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, False, 0, 0, 0, 2, 0, CveContratoTipo:=35, CveContratosEstatus:=50, CvePartida:=DdlPartida.SelectedValue.ToEntero, CveDestino:=DdlDestino.SelectedValue.ToEntero) > 0 Then
|
If ObjContratos.AddContratos(LbFolio.Text, "", "", UsuarioActual.CveProveedor, -1, -1, TxtFechaViaje.Text.ToDate, TxtFechaViaje.Text.ToDate, "", "", CveSubProyecto, -1, -1, -1, -1, "", "", -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, False, 0, 0, 0, 2, 0, CveContratoTipo:=35, CveContratosEstatus:=50, CvePartida:=DdlPartida.SelectedValue.ToEntero, CveDestino:=DdlDestino.SelectedValue.ToEntero) > 0 Then
|
||||||
ObjContratos.Commit()
|
ObjContratos.Commit()
|
||||||
Alert("Viaje agregado correctamente.")
|
Alert("Viaje agregado correctamente.")
|
||||||
End If
|
End If
|
||||||
Else
|
Else
|
||||||
'Actualizamos Viaje
|
'Actualizamos Viaje
|
||||||
If ObjContratos.UpdateContratos(CveContrato.ToEntero, LbFolio.Text, "", "", UsuarioActual.CveProveedor, -1, -1, TxtFechaInicial.Text.ToDate, TxtFechaInicial.Text.ToDate, "", "", DdlRutas.SelectedValue.ToEntero, -1, -1, -1, -1, "", "", -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, False, -1, -1, -1, 2, 0, CveContratoTipo:=35, CveContratosEstatus:=50, CvePartida:=DdlPartida.SelectedValue.ToEntero, CveDestino:=DdlDestino.SelectedValue.ToEntero) = True Then
|
If ObjContratos.UpdateContratos(CveContrato.ToEntero, LbFolio.Text, "", "", UsuarioActual.CveProveedor, -1, -1, TxtFechaInicial.Text.ToDate, TxtFechaInicial.Text.ToDate, "", "", CveSubProyecto, -1, -1, -1, -1, "", "", -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, False, -1, -1, -1, 2, 0, CveContratoTipo:=35, CveContratosEstatus:=50, CvePartida:=DdlPartida.SelectedValue.ToEntero, CveDestino:=DdlDestino.SelectedValue.ToEntero) = True Then
|
||||||
ObjContratos.Commit()
|
ObjContratos.Commit()
|
||||||
Alert("El viaje se actualizó correctamente.")
|
Alert("El viaje se actualizó correctamente.")
|
||||||
End If
|
End If
|
||||||
@@ -180,12 +180,8 @@ Partial Class ListadoViajes
|
|||||||
ObjContratos.RollBack()
|
ObjContratos.RollBack()
|
||||||
Finally
|
Finally
|
||||||
'Reiniciamos modal
|
'Reiniciamos modal
|
||||||
DdlRutas.Text = ""
|
|
||||||
TxtFechaViaje.Text = ""
|
TxtFechaViaje.Text = ""
|
||||||
DdlPartida.Text = ""
|
|
||||||
DdlDestino.SelectedValue = ""
|
|
||||||
'Actualizamos Folio
|
'Actualizamos Folio
|
||||||
Dim CveSubProyecto As Integer = GlobalDTSubProyectos(-1, -1, CveEmpresa:=UsuarioActual.CveEmpresa).FiltroPrimeroValor("CveSubProyecto", "TipoSucursal = 1").ToEntero
|
|
||||||
Dim ObjFolios As New ClsGralFolios
|
Dim ObjFolios As New ClsGralFolios
|
||||||
If ObjFolios.UpdateFolioActual(CveSubProyecto, "Con", True, UsuarioActual.CveEmpresa) Then
|
If ObjFolios.UpdateFolioActual(CveSubProyecto, "Con", True, UsuarioActual.CveEmpresa) Then
|
||||||
ObjFolios.Dispose()
|
ObjFolios.Dispose()
|
||||||
|
|||||||
@@ -545,7 +545,7 @@ public partial class Ventas_RepCancelacionesPorRespuesta : ClsPaginas
|
|||||||
CveEstatusFactura = -1;
|
CveEstatusFactura = -1;
|
||||||
}
|
}
|
||||||
|
|
||||||
retorno = factura.CancelarPorRefacturacion(factura.CveMotivoCancelacion, factura.MotivoCancelacion, FolioSustitucion: FolioSustitucion, CveEstatusFacturaAsignado: CveEstatusFactura);
|
retorno = factura.CancelarPorRefacturacion(factura.CveMotivoCancelacion, factura.MotivoCancelacion, FolioSustitucion: FolioSustitucion, CveEstadoCancelacion: CveEstatusFactura);
|
||||||
}
|
}
|
||||||
else
|
else
|
||||||
{
|
{
|
||||||
|
|||||||
@@ -13319,14 +13319,26 @@ Partial Class Ventas
|
|||||||
End If
|
End If
|
||||||
End If
|
End If
|
||||||
|
|
||||||
If UsuarioActual.Empresa.Funcionalidad(578) = "1" AndAlso EsVentaMedica AndAlso RBLTipoVenta.SelectedValue.ToEntero <> 2 Then
|
If UsuarioActual.Empresa.Funcionalidad(578) = "1" AndAlso EsVentaMedica Then
|
||||||
|
|
||||||
|
CveAlmacenTraspasoDestino = CveAlmacenAsignado
|
||||||
|
|
||||||
|
If RBLTipoVenta.SelectedValue.ToEntero = 2 Then
|
||||||
|
If Not ChkRequiereTecnico.Checked Then
|
||||||
|
CveAlmacenTraspasoDestino = GlobalDTAlmacen(UsuarioActual.CveEmpresa).FiltroPrimeroValor("CveAlmacen", $"CveTipoAlmacen = 10 AND CveSubProyecto = {DdlSubProyectoDatos.SelectedValue}").ToString().ToEntero()
|
||||||
|
End If
|
||||||
|
|
||||||
|
If CveAlmacenTraspasoDestino <= 0 Then
|
||||||
|
ErrorList.Add("Ocurrió un error al seleccionar el almacen de entrega por adelantado.")
|
||||||
|
End If
|
||||||
|
|
||||||
If CveAlmacenAsignado <= 0 Then
|
|
||||||
ErrorList.Add("Ocurrió un error al seleccionar el almacen de resguardo del cliente.")
|
|
||||||
Else
|
Else
|
||||||
CveAlmacenTraspasoDestino = CveAlmacenAsignado
|
If CveAlmacenTraspasoDestino <= 0 Then
|
||||||
|
ErrorList.Add("Ocurrió un error al seleccionar el almacen de resguardo del cliente.")
|
||||||
|
End If
|
||||||
End If
|
End If
|
||||||
|
|
||||||
|
|
||||||
End If
|
End If
|
||||||
|
|
||||||
Dim TotalImpuestoLocal As Double = 0
|
Dim TotalImpuestoLocal As Double = 0
|
||||||
@@ -13398,6 +13410,7 @@ Partial Class Ventas
|
|||||||
CveMedico = DdlMedico.SelectedValue.ToEntero
|
CveMedico = DdlMedico.SelectedValue.ToEntero
|
||||||
CveProcedimiento = DdlProcedimiento.SelectedValue.ToEntero
|
CveProcedimiento = DdlProcedimiento.SelectedValue.ToEntero
|
||||||
CveTipoVentaGuardar = If(SeEstaFActurandoVentaMedica, CveTipoVenta, RBLTipoVenta.SelectedValue.ToEntero)
|
CveTipoVentaGuardar = If(SeEstaFActurandoVentaMedica, CveTipoVenta, RBLTipoVenta.SelectedValue.ToEntero)
|
||||||
|
'CveAlmacenTraspasoDestino
|
||||||
End If
|
End If
|
||||||
|
|
||||||
|
|
||||||
@@ -36415,7 +36428,7 @@ Partial Class Ventas
|
|||||||
DvModalRequiereOSFecha.Visible = True
|
DvModalRequiereOSFecha.Visible = True
|
||||||
Case "2" ' Pago Directo
|
Case "2" ' Pago Directo
|
||||||
ChkRequiereTecnicoModal.Checked = True
|
ChkRequiereTecnicoModal.Checked = True
|
||||||
ChkRequiereTecnicoModal.Enabled = False
|
ChkRequiereTecnicoModal.Enabled = True
|
||||||
DvModalRequiereOSFecha.Visible = True
|
DvModalRequiereOSFecha.Visible = True
|
||||||
DvModalTipoVentaCliente.Visible = True
|
DvModalTipoVentaCliente.Visible = True
|
||||||
Case "3" 'A-Vista
|
Case "3" 'A-Vista
|
||||||
@@ -36617,15 +36630,21 @@ Partial Class Ventas
|
|||||||
|
|
||||||
If RBLTipoVenta.SelectedValue.Contiene("2") Then 'si es pago directo es factura
|
If RBLTipoVenta.SelectedValue.Contiene("2") Then 'si es pago directo es factura
|
||||||
'DdlTipoComprobante.SelectedValueExist("Ing")
|
'DdlTipoComprobante.SelectedValueExist("Ing")
|
||||||
DdlTipoComprobante.SelectedValueExist("Ped")
|
|
||||||
|
|
||||||
TrVentasMedicas1.Visible = True
|
TrVentasMedicas1.Visible = True
|
||||||
TrVentasMedicas2.Visible = True
|
TrVentasMedicas2.Visible = True
|
||||||
|
|
||||||
TdFechaOS1.Visible = True
|
TdFechaOS1.Visible = True
|
||||||
TdFechaOS2.Visible = True
|
TdFechaOS2.Visible = True
|
||||||
ChkRequiereTecnico.Checked = True
|
ChkRequiereTecnico.Checked = ChkRequiereTecnicoModal.Checked
|
||||||
ChkRequiereTecnico.Enabled = False
|
ChkRequiereTecnico.Enabled = True
|
||||||
|
|
||||||
|
If ChkRequiereTecnico.Checked Then
|
||||||
|
DdlTipoComprobante.SelectedValueExist("Ped")
|
||||||
|
Else
|
||||||
|
DdlTipoComprobante.SelectedValueExist("Rem")
|
||||||
|
End If
|
||||||
|
|
||||||
|
|
||||||
ElseIf RBLTipoVenta.SelectedValue.Contiene("3") Then ' A vista
|
ElseIf RBLTipoVenta.SelectedValue.Contiene("3") Then ' A vista
|
||||||
DdlTipoComprobante.Items.Insert(DdlTipoComprobante.Items.Count, New ListItem("Pedido", "Ped"))
|
DdlTipoComprobante.Items.Insert(DdlTipoComprobante.Items.Count, New ListItem("Pedido", "Ped"))
|
||||||
|
|||||||
Reference in New Issue
Block a user