Merge branch 'master' of http://192.168.10.111:8383/SIG
This commit is contained in:
@@ -2237,6 +2237,11 @@ Partial Class Compras_Compras
|
||||
|
||||
If UsuarioActual.Empresa.Funcionalidad(577).ToString = "1" Then
|
||||
|
||||
'If UsuarioActual.CveRol = 1 Then
|
||||
' Alert("Ok funcionalidad 577")
|
||||
'End If
|
||||
|
||||
|
||||
If RetencionIVA = 0 And IVAOriginal > 0 Then
|
||||
For Each dRow As DataRow In TmpDT.Rows
|
||||
If dRow("CveTipoPS").ToString.ToEntero = 1 Then
|
||||
@@ -5828,9 +5833,15 @@ Partial Class Compras_Compras
|
||||
CveCuenta = ObjConta.DtResultados.Rows(0)("IdCuentaRetIVACirculacionSIG").ToString.ToEntero
|
||||
End If
|
||||
End If
|
||||
End If
|
||||
|
||||
'Agregamos el Opuesto del 22 -> 15
|
||||
End If
|
||||
|
||||
|
||||
If UsuarioActual.Empresa.Funcionalidad(577).ToEntero = 1 Then
|
||||
IdCtaContable = UsuarioActual.Empresa.Funcionalidad(578).ToEntero
|
||||
End If
|
||||
|
||||
|
||||
'Agregamos el Opuesto del 22 -> 15
|
||||
If importeMovimiento <> 0 Then
|
||||
If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, Not TipoMovimiento, importeMovimiento, Referencia, 15, Concepto + If(tipoCambioActual > 1, $" TC: {tipoCambioActual} ${importeMovimiento.FormatoNumero(2)}", ""), FechaMovimiento, IdCtaContable, -1, CveCompra:=CveCompra, CveProveedor:=CveProveedorConcepto, CveAcreedor:=CveAcreedor, CveIE:=CveIE, CvePersonal:=CvePersonal, CveColectiva:=CveColectiva, CveCreditoDetalle:=CveCreditoDetalle, ImporteMX:=importeMovimiento * tipoCambioActual, ImporteME:=If(tipoCambioActual = 1, 0, importeMovimiento), CveCuenta:=CveCuenta, Contabilizable:=SeContabiliza, TipoCambio:=tipoCambioActual) Then
|
||||
ErrorPrepoliza = True
|
||||
@@ -8467,7 +8478,9 @@ Partial Class Compras_Compras
|
||||
If DdlRetIVAConcepto.Items.Count > 0 Then
|
||||
If DdlRetIVAConcepto.SelectedValue.ToEntero = 1 Then
|
||||
ImporteMovimiento = Math.Round(PorcentajePago * TxtRetIVA.Text.ToDecimal, 2)
|
||||
importeMN = ImporteMovimiento * tipoCambio
|
||||
importeMN = ImporteMovimiento * tipoCambio
|
||||
|
||||
|
||||
If CtaProveedorRetIVA > 0 Then
|
||||
IdCtaContable = CtaProveedorRetIVA
|
||||
CveCuenta = CveCuentaProveedorRetIVA
|
||||
@@ -8481,10 +8494,19 @@ Partial Class Compras_Compras
|
||||
End If
|
||||
End If
|
||||
End If
|
||||
End If
|
||||
|
||||
|
||||
If UsuarioActual.Empresa.Funcionalidad(577).ToEntero = 1 Then
|
||||
IdCtaContable = UsuarioActual.Empresa.Funcionalidad(578).ToEntero
|
||||
End If
|
||||
|
||||
|
||||
End If
|
||||
End If
|
||||
|
||||
End If
|
||||
|
||||
|
||||
Case 183 'RetIVA x Acreditar Fletes P.F.
|
||||
If Not gvr.DataKey("TipoDocto").Contiene("NC", "DEV", "Ant") Then
|
||||
If DdlRetIVAConcepto.Items.Count > 0 Then
|
||||
@@ -16988,6 +17010,26 @@ Partial Class Compras_Compras
|
||||
CompruebaAgregar()
|
||||
GuardaAC()
|
||||
End If
|
||||
|
||||
If UsuarioActual.Empresa.Funcionalidad(577).ToString = "1" Then
|
||||
|
||||
'If UsuarioActual.CveRol = 1 Then
|
||||
' Alert($"Ok funcionalidad 577 RetencionIVA { RetencionIVA} IVAOriginal {IVAOriginal}")
|
||||
'End If
|
||||
|
||||
If RetencionIVA = 0 And IVAOriginal > 0 Then
|
||||
For Each dRow As DataRow In TmpDT.Rows
|
||||
If dRow("CveTipoPS").ToString.ToEntero = 1 Then
|
||||
tdIVA6.Visible = True
|
||||
Exit For
|
||||
End If
|
||||
Next
|
||||
End If
|
||||
|
||||
End If
|
||||
|
||||
|
||||
|
||||
UpPS.Update()
|
||||
CargaGvPersonal()
|
||||
End Sub
|
||||
|
||||
@@ -1889,10 +1889,9 @@ Partial Class PopUpVerFactura
|
||||
params.Add(New ReportParameter("Fecha", Fecha)) 'TxtFecha.Text
|
||||
params.Add(New ReportParameter("NombreEntrego", Capturo)) 'UsuarioActual.Nombre
|
||||
params.Add(New ReportParameter("NombreAccion", Recibio)) 'TxtResponsable.Text
|
||||
params.Add(New ReportParameter("Accion", "Recibió")) 'Antes Trasladó
|
||||
params.Add(New ReportParameter("Accion", "RECIBE")) 'Antes Trasladó
|
||||
params.Add(New ReportParameter("Observaciones", Observaciones))
|
||||
|
||||
|
||||
Dim DTCliente As New DataTable
|
||||
Dim SBDireccionO As New StringBuilder()
|
||||
Dim SBDireccionD As New StringBuilder()
|
||||
@@ -2003,6 +2002,16 @@ Partial Class PopUpVerFactura
|
||||
|
||||
ImprimirPDF(String.Format(RutaFormato, UsuarioActual.Empresa.Ruta), DtMovimientos, params, String.Format("Aviso de Traslado - {0}", Folio), RDSName:="DsInventarios")
|
||||
Else
|
||||
Dim Imagen As New System.IO.FileInfo(String.Format("{0}/Logo.png", UsuarioActual.Empresa.Ruta))
|
||||
Dim logouri = String.Format("{0}://{1}:{2}/Empresas/{3}/Logo.png", Request.Url.Scheme, Request.Url.Host, Request.Url.Port, UsuarioActual.CveEmpresa)
|
||||
|
||||
If Imagen.Exists Then
|
||||
params.Add(New ReportParameter("LogoPath", logouri))
|
||||
Else
|
||||
params.Add(New ReportParameter("LogoPath", ""))
|
||||
End If
|
||||
params.Add(New ReportParameter("Origen", Almacen))
|
||||
params.Add(New ReportParameter("Destino", AlmacenDestino))
|
||||
params.Add(New ReportParameter("FechaImpresion", DateTime.Now.ToString("dd/MM/yyyy")))
|
||||
params.Add(New ReportParameter("UsuarioImprimio", UsuarioActual.Nombre))
|
||||
params.Add(New ReportParameter("Empresa", UsuarioActual.Empresa.Empresa))
|
||||
@@ -2042,6 +2051,17 @@ Partial Class PopUpVerFactura
|
||||
|
||||
ImprimirPDF(String.Format("{0}Formatos\Traslado.rdlc", UsuarioActual.Empresa.Ruta), DtMovimientos, params, String.Format("Recepción de Traslado - {0}", Folio), RDSName:="DsInventarios")
|
||||
Else
|
||||
Dim Imagen As New System.IO.FileInfo(String.Format("{0}/Logo.png", UsuarioActual.Empresa.Ruta))
|
||||
Dim logouri = String.Format("{0}://{1}:{2}/Empresas/{3}/Logo.png", Request.Url.Scheme, Request.Url.Host, Request.Url.Port, UsuarioActual.CveEmpresa)
|
||||
|
||||
If Imagen.Exists Then
|
||||
params.Add(New ReportParameter("LogoPath", logouri))
|
||||
Else
|
||||
params.Add(New ReportParameter("LogoPath", ""))
|
||||
End If
|
||||
params.Add(New ReportParameter("Origen", Almacen))
|
||||
params.Add(New ReportParameter("Destino", AlmacenDestino))
|
||||
|
||||
params.Add(New ReportParameter("FechaImpresion", DateTime.Now.ToString("dd/MM/yyyy")))
|
||||
params.Add(New ReportParameter("UsuarioImprimio", UsuarioActual.Nombre))
|
||||
params.Add(New ReportParameter("Empresa", UsuarioActual.Empresa.Empresa))
|
||||
|
||||
@@ -106,6 +106,7 @@
|
||||
<label class="col-md-1">Fecha:</label>
|
||||
<div class="col-md-1">
|
||||
<asp:TextBox runat="server" ID="TxtFechaUnificacion" Width="75px"></asp:TextBox>
|
||||
<ajax:MaskedEditExtender ID="MEEFechaUnificacion" runat="server" TargetControlID="TxtFechaUnificacion" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
|
||||
</div>
|
||||
|
||||
<div class="col-md-1">
|
||||
@@ -120,7 +121,7 @@
|
||||
<asp:DropDownList ID="DdlCheque" CssClass="form-control input-sm select2me" Width="100%" AppendDataBoundItems="true" runat="server" DataTextField="FolioFecha" DataValueField="CveIE"></asp:DropDownList>
|
||||
</div>
|
||||
<div class="col-md-1">
|
||||
<asp:LinkButton data-toggle="tooltip" data-placement="top" ToolTip="Vincular Egreso" runat="server" ID="BtnVincularEgreso" OnClick="BtnVincularEgreso_Click" Text="<i class='fa fa-check' style='color:green'></i>" CssClass="btn btn-default btn-circle btn-xs" />
|
||||
<asp:LinkButton data-toggle="tooltip" data-placement="top" ToolTip="Vincular Egreso" runat="server" ID="BtnVincularEgreso" OnClick="BtnVincularEgreso_Click" Text="<i class='fa fa-check' style='color:green'></i>" CssClass="btn btn-default btn-circle btn-xs" />
|
||||
</div>
|
||||
</div>
|
||||
|
||||
|
||||
Reference in New Issue
Block a user