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

-- activó iva para importación a empresas citrícolas

Browse Source
This commit is contained in:
rrene
2023-02-08 08:32:02 -07:00
parent 60ecea1eef
commit 4174dd86b1
1 changed files with 4 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
Compras/Compras.aspx.vb
View File

@@ -1667,17 +1667,14 @@ Partial Class Compras_Compras
'RegistraScript("ScrollVentanaAddProducto();") 'RegistraScript("ScrollVentanaAddProducto();")
If UsuarioActual.Empresa.Funcionalidad(558) = "1" Then If UsuarioActual.Empresa.Funcionalidad(558) = "1" OrElse UsuarioActual.Empresa.Funcionalidad(267) = "1" Then 'cuando es llantera. y citrícola
divImportacion.Visible = True divImportacion.Visible = True
chkImportacion.Attributes.Add("onclick", "ChkImportacion(this);") chkImportacion.Attributes.Add("onclick", "ChkImportacion(this);")
End If End If
MostrarOcultarColumnaIEPS() MostrarOcultarColumnaIEPS()
End Sub End Sub
#Region "C A R G A S" #Region "C A R G A S"
@@ -3198,13 +3195,12 @@ Partial Class Compras_Compras
End If End If
'Tiene Importacion 'Tiene Importacion
If UsuarioActual.Empresa.Funcionalidad(558) = "1" Then
If dr("EsImportacion").ToString = "True" Then If dr("EsImportacion").ToString = "True" Then
chkImportacion.Checked = True chkImportacion.Checked = True
Else Else
chkImportacion.Checked = False chkImportacion.Checked = False
End If End If
End If
CargaComplementosPago() CargaComplementosPago()
CargaGvBitacora() CargaGvBitacora()
InventarioMov() InventarioMov()
@@ -12280,6 +12276,7 @@ Partial Class Compras_Compras
End Select End Select
romCreditosTabla.Visible = False romCreditosTabla.Visible = False
Case "4" Case "4"
EsContado = False
CargaCreditosDisponibles() CargaCreditosDisponibles()
Exit Select Exit Select
End Select End Select