-- estatus facturación para afuera

Sistemas/DefinicionEmpresa.aspx.vb

@@ -460,7 +460,6 @@ Partial Class Sistemas_DefinicionEmpresa
                     ChkMostrarRetIVA.Checked = .MostrarRetIVA
                     ChkMostrarRetISR.Checked = .MostrarRetISR
                     'TxtRegimen.Text = .Regimen
-                    EstatusFacturacion = .EstatusFacturacion
                     'TxtTimbres.Text = .Timbres.ToString
                     UsaContabilidad = .UsaContabilidad
                     UsaBancos = .UsaBancos
@@ -780,7 +779,7 @@ Partial Class Sistemas_DefinicionEmpresa
             If ObjEmpresas.UpdateEmpresa(TxtEmpresa.Text.Trim, TxtDireccion.Text.Trim, TxtNoExt.Text.Trim, TxtNoInt.Text.Trim, TxtColonia.Text.Trim, TxtCiudad.Text.Trim, TxtEstado.Text.Trim, TxtRFC.Text.Trim,
                                          TxtCP.Text.Trim, TxtTelefono.Text.Trim, TxtContacto.Text.Trim, TxtMail.Text.Trim, "CFDi", "-1",
                                          "-1", TxtContraseñaKey.Text.Trim, TxtArchivoKey.Text.Trim, TxtArchivoCer.Text.Trim, TxtArchivoPfx.Text.Trim, "", Estatus,
-                                         FacturaProduccion, ChkMostrarRetIVA.Checked, ChkMostrarRetISR.Checked, "", EstatusFacturacion, TxtSendMail.Text.Trim,
+                                         FacturaProduccion, ChkMostrarRetIVA.Checked, ChkMostrarRetISR.Checked, "", TxtSendMail.Text.Trim,
                                          TxtSendMailPassword.Text.Trim, TxtSendMailServer.Text.Trim, TxtSendMailPort.Text.Trim.ToEntero, ChkSendMailSSL.Checked, UsaContabilidad, UsaBancos,
                                         UsaVentas, UsaCxC, UsaCompras, UsaInventarios, UsaRH, UsaNomina, UsaOS, "-1",
                                          "-1", "-1", "-1", TxtBuzon_Mail.Text.Trim, TxtBuzon_Server.Text.Trim, TxtBuzon_Puerto.Text.Trim.ToEntero,