Merge branch 'master' of http://jperez@192.168.10.111:8383/SIG.git
This commit is contained in:
@@ -5,8 +5,7 @@ Imports System.Data
|
||||
Imports Extensiones
|
||||
|
||||
Partial Class Bancos_RepCortes
|
||||
Inherits ClsPaginas
|
||||
Private Shared missing As Object = System.Reflection.Missing.Value
|
||||
Inherits ClsPaginas
|
||||
|
||||
#Region "PROPIEDADES"
|
||||
Private Property DtCortes As DataTable
|
||||
@@ -174,10 +173,12 @@ Partial Class Bancos_RepCortes
|
||||
GvP.DataSource = Vn.DtResultados
|
||||
DtCortesVentasResumen = Vn.DtResultados
|
||||
End If
|
||||
If Vn.GetCortesDetalleVentasResumenIVA(CveCorte, DdlSubProyectos.SelectedValue.ToEntero, UsuarioActual.CveEmpresa) Then
|
||||
GvPorIVA.DataSource = Vn.DtResultados
|
||||
End If
|
||||
|
||||
If UsuarioActual.CveEmpresa.Contiene(190, 192) Then
|
||||
If Vn.GetCortesDetalleVentasResumenIVA(CveCorte, DdlSubProyectos.SelectedValue.ToEntero, UsuarioActual.CveEmpresa) Then
|
||||
GvPorIVA.DataSource = Vn.DtResultados
|
||||
End If
|
||||
End If
|
||||
|
||||
If Vent.GetCortesDetalleVentas(CveCorte, DdlSubProyectos.SelectedValue.ToEntero, UsuarioActual.CveEmpresa, 2) Then
|
||||
GvD.DataSource = Vent.DtResultados
|
||||
DtCortesVentas = Vent.DtResultados
|
||||
|
||||
@@ -30,7 +30,6 @@ Partial Class Inicio
|
||||
For Each item As DataRow In theDataSet.Tables(0).Rows
|
||||
sb.AppendFormat("{0};", item("Uuid").ToString())
|
||||
Next
|
||||
|
||||
If objventas.GetFacturasCanceladasPendientes(sb.ToString(), CveEmpresa) Then
|
||||
retorno = True
|
||||
End If
|
||||
@@ -41,12 +40,11 @@ Partial Class Inicio
|
||||
End If
|
||||
End If
|
||||
Else
|
||||
Alert("Error al obtener cancelaciones pendientes: " & resp.Descripcion, ModExtensiones.TipoMensaje.MsgError)
|
||||
Alert("Los servicios del SAT presentan intermitencia y no se puede obtener la información de cancelaciones pendientes: " & resp.Descripcion, ModExtensiones.TipoMensaje.MsgError)
|
||||
End If
|
||||
|
||||
Catch ex As Exception
|
||||
retorno = False
|
||||
Me.OnError("Error al obtener cancelaciones pendientes: ", ex, "")
|
||||
Me.OnError("Los servicios del SAT presentan intermitencia y no se puede obtener la información: ", ex, "")
|
||||
End Try
|
||||
gvCancelaPendiente.DataBind()
|
||||
Return retorno
|
||||
|
||||
@@ -4,19 +4,11 @@ Option Strict On
|
||||
Imports Extensiones
|
||||
Imports System.IO
|
||||
Imports System.Data
|
||||
Imports Telerik.Web.UI
|
||||
Imports System.Data.SqlClient
|
||||
Imports Stimulsoft.Report.StiOptions.Export
|
||||
Imports Modelos
|
||||
Imports System.Runtime.InteropServices.ComTypes
|
||||
Imports APP_Code_CSharp
|
||||
Imports System.ComponentModel.Design
|
||||
|
||||
Partial Class OS_OrdenesServicios
|
||||
Inherits ClsPaginas
|
||||
|
||||
#Region "Propiedades"
|
||||
Private Shared missing As Object = System.Reflection.Missing.Value
|
||||
Private Property CveCliente As Integer
|
||||
Get
|
||||
Return ViewState("CveCliente").ToString.ToEntero
|
||||
@@ -436,11 +428,6 @@ Partial Class OS_OrdenesServicios
|
||||
|
||||
LblCuentaEquipoTH.Visible = False
|
||||
DdlCuentaEquipo.Visible = False
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
TREstatus2.Visible = If(TipoEstatus.Contiene(4, 5), False, True)
|
||||
|
||||
DdlPsModalFinalizar.setEsWebService(UsuarioActual.Empresa.Funcionalidad(105) = "1")
|
||||
@@ -456,8 +443,6 @@ Partial Class OS_OrdenesServicios
|
||||
DdlPsModalFinalizar.ddl.Items.Insert(0, New ListItem("Seleccione el Producto", "-1"))
|
||||
End If
|
||||
|
||||
|
||||
|
||||
End If
|
||||
|
||||
If UsuarioActual.Empresa.Funcionalidad(578).ToEntero = 1 Then
|
||||
@@ -735,9 +720,6 @@ Partial Class OS_OrdenesServicios
|
||||
TxtIdentificadorCliente.Text = ObjOS.IdentificadorCliente
|
||||
TxtFolioAdicional.Text = ObjOS.FolioAdicional
|
||||
|
||||
|
||||
|
||||
|
||||
CargaEventoBitacora()
|
||||
CargaHistorial()
|
||||
CargaDetalles()
|
||||
@@ -762,7 +744,6 @@ Partial Class OS_OrdenesServicios
|
||||
ViewState("CveCliente") = ObjVentas.DtResultados.Rows(0)("CveCliente").ToString.ToEntero
|
||||
CargaCliente(CveCliente)
|
||||
|
||||
|
||||
Dim Drow As DataRow = ObjVentas.DtResultados.Rows(0)
|
||||
If UsuarioActual.Empresa.Funcionalidad(578) = "1" Then
|
||||
TxtDescripcion.Text = Drow("SerieFolio").ToString
|
||||
@@ -822,10 +803,7 @@ Partial Class OS_OrdenesServicios
|
||||
|
||||
TmpDT.Rows.Add(drt)
|
||||
Cons = Cons + 1
|
||||
|
||||
|
||||
End If
|
||||
|
||||
Next
|
||||
GvPS.DataSource = TmpDT
|
||||
GvPS.DataBind()
|
||||
@@ -845,8 +823,6 @@ Partial Class OS_OrdenesServicios
|
||||
Dim IDOSDetalle As Integer = 1
|
||||
|
||||
CreaDT()
|
||||
|
||||
|
||||
If ObjOrdenServicio.GetOrdenesServiciosDetalle(CveOS) Then
|
||||
If ObjOrdenServicio.DtResultados IsNot Nothing Then
|
||||
For Each Row As DataRow In ObjOrdenServicio.DtResultados.Rows
|
||||
@@ -999,13 +975,9 @@ Partial Class OS_OrdenesServicios
|
||||
End Sub
|
||||
Private Sub CargaCliente(CveCliente As Integer, Optional Estatus As Integer = 1, Optional CargaPublicoGeneral As Boolean = False)
|
||||
|
||||
|
||||
|
||||
Dim ObjCliente As New ClsClientes()
|
||||
|
||||
Dim NombreCliente As String = "-1"
|
||||
|
||||
|
||||
If CargaPublicoGeneral Then
|
||||
NombreCliente = "PUBLICO EN GENERAL"
|
||||
End If
|
||||
@@ -1225,10 +1197,6 @@ Partial Class OS_OrdenesServicios
|
||||
|
||||
'ObjEstatusPermisos.Dispose()
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
'OS Estatus Inicial
|
||||
If tipoEstatus = 1 And UsuarioActual.TienePermisoProceso(366) Then
|
||||
Exit Sub
|
||||
@@ -1256,7 +1224,6 @@ Partial Class OS_OrdenesServicios
|
||||
|
||||
UpGuardar.Visible = False
|
||||
|
||||
|
||||
End Sub
|
||||
#End Region
|
||||
|
||||
@@ -3365,7 +3332,7 @@ Partial Class OS_OrdenesServicios
|
||||
|
||||
End Sub
|
||||
|
||||
Private Function GeneraRemision(CveVentaPedido As Integer, ByRef TransaccionSQL As SqlTransaction) As RespuestaFacturacion
|
||||
Private Function GeneraRemision(CveVentaPedido As Integer, ByRef TransaccionSQL As SqlClient.SqlTransaction) As RespuestaFacturacion
|
||||
|
||||
Dim Respuesta As New RespuestaFacturacion()
|
||||
Dim CveRemisionGenerada As Integer = -1
|
||||
|
||||
@@ -819,7 +819,7 @@
|
||||
</asp:DropDownList>
|
||||
<label for="<%= DdlIEPSPorcentaje.ClientID.ToString()%>">IEPS Porcentaje:</label>
|
||||
</div>
|
||||
<div class="form-group form-md-line-input input-iconright" title="El precio no está determinado por el valor de la lista de precio, este es manual.">
|
||||
<div style="display:none;" class="form-group form-md-line-input input-iconright" title="El precio no está determinado por el valor de la lista de precio, este es manual.">
|
||||
<label>Precio Libre de Lista</label>
|
||||
<asp:CheckBox ID="ChkPrecioLibre" CssClass="make-switchsd" data-size="small" runat="server" Checked="False" />
|
||||
</div>
|
||||
|
||||
@@ -5611,7 +5611,7 @@
|
||||
Cantidad
|
||||
</HeaderTemplate>
|
||||
<ItemTemplate>
|
||||
<asp:TextBox ID="TxtCantidadRem" runat="server" Style="text-align: right;" Text='<%#Eval("Cantidad", "{0:#,###.#####}").ToString%>' MaxLength="12" Width="46px" Height="24px"></asp:TextBox>
|
||||
<asp:TextBox ID="TxtCantidadRem" runat="server" Style="text-align: right;" Text='<%#Eval("Cantidad", "{0:####.#####}").ToString%>' MaxLength="12" Width="46px" Height="24px"></asp:TextBox>
|
||||
<asp:RangeValidator ID="RVCantRem" runat="server" Type="Double" MinimumValue="0" MaximumValue='<%#Eval("Cantidad", "{0:####.#####}").ToString%>' ErrorMessage="Cantidad Excedida" ControlToValidate="TxtCantidadRem" ValidationGroup="GprGvRemPS" Display="Dynamic" SetFocusOnError="True"></asp:RangeValidator>
|
||||
<ajax:ValidatorCalloutExtender ID="VCECantidad3" runat="server" HighlightCssClass="vco" TargetControlID="RVCantRem" Width="300px"></ajax:ValidatorCalloutExtender>
|
||||
</ItemTemplate>
|
||||
|
||||
Reference in New Issue
Block a user