diff --git a/OC/OC.aspx.vb b/OC/OC.aspx.vb index a5b271700..ed37c0188 100644 --- a/OC/OC.aspx.vb +++ b/OC/OC.aspx.vb @@ -4061,7 +4061,6 @@ Partial Class OC_OC If DdlProveedores.SelectedValue.ToEntero > 0 Then 'Si es Proveedor Extranjero el IVA es 0% Dim drProv As DataRow = GlobalDTCompProveedores(CveEmpresaActual, CveProveedor:=DdlProveedores.SelectedValue.ToEntero).FiltroPrimero("") - If drProv IsNot Nothing Then If drProv("RFC").ToString = "XEXX010101000" Then IvaPS = 0 @@ -4081,12 +4080,9 @@ Partial Class OC_OC IvaPS = -1 End If - - CveSubProyecto = gvr.FCDropDownList("DdlSubProyectoEdit").SelectedValue.ToEntero SubProyecto = gvr.FCDropDownList("DdlSubProyectoEdit").SelectedItem.Text - CveCultivoCuadroDetalle = gvr.FCDropDownList("DdlCultivosCuadroEdit").SelectedValue.ToEntero Cuadro = "" If CveCultivoCuadroDetalle > 0 Then