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

-- corrección monedapreferente

Browse Source
This commit is contained in:
rrene
2023-09-20 12:09:05 -07:00
parent 5c76470a92
commit 247b768e36
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
OC/OC.aspx.vb
View File

@@ -5686,7 +5686,7 @@ Partial Class OC_OC
Else Else
DivIVAFacturar.Visible = True DivIVAFacturar.Visible = True
End If End If
CveMonedaPreferente = dtt.FiltroPrimeroValor("CveConfianzaProveedor").ToEntero() CveMonedaPreferente = dtt.FiltroPrimeroValor("CveMonedaPreferente").ToEntero()
If UsuarioActual.Empresa.Funcionalidad(565) = "1" Then If UsuarioActual.Empresa.Funcionalidad(565) = "1" Then
Me.CveConfianzaProveedor = dtt.FiltroPrimeroValor("CveConfianzaProveedor").ToEntero() Me.CveConfianzaProveedor = dtt.FiltroPrimeroValor("CveConfianzaProveedor").ToEntero()
'SI NO TIENE ASIGNADO UN NIVEL DE CONFIANZA SE ASIGNARA EL VALOR DE 'PROVEEDOR NO DEDICADO' 'SI NO TIENE ASIGNADO UN NIVEL DE CONFIANZA SE ASIGNARA EL VALOR DE 'PROVEEDOR NO DEDICADO'
@@ -5698,7 +5698,7 @@ Partial Class OC_OC
End If End If
'MUESTRA IVA PROVEEDOR EXTRANJERO 'MUESTRA IVA PROVEEDOR EXTRANJERO
If UsuarioActual.CveEmpresa <> 119 AndAlso GlobalDTCompProveedores(CveEmpresaActual).FiltraParametros($"CveProveedor = {DdlProveedores.SelectedValue} AND RFC = 'XEXX010101000'").Rows.Count = 1 Then If UsuarioActual.CveEmpresa <> 119 AndAlso dtt.FiltraParametros("RFC = 'XEXX010101000'").Rows.Count = 1 Then
'Alert("Proveedor extranjero") 'Alert("Proveedor extranjero")
LblLeyendaProveedorIVA.Text = "IVA 0%" LblLeyendaProveedorIVA.Text = "IVA 0%"
'Si es proveedor extranjero selecciona iva al 0% 'Si es proveedor extranjero selecciona iva al 0%