omitir EstatusFacturacion

This commit is contained in:
2024-03-15 13:00:37 -07:00
parent 58b9d88e60
commit c01a85ef74
3 changed files with 7 additions and 14 deletions

View File

@@ -459,7 +459,7 @@ Public Class ClsSisEmpresas
End Function
Public Function AddEmpresa(CveEmpresa As Integer, Empresa As String, Direccion As String, NoExt As String, NoInt As String, Colonia As String, Ciudad As String, Estado As String,
RFC As String, CP As String, Telefono As String, Contacto As String, Mail As String, TipoFacturacion As String, BIUsuario As String, BIContraseña As String, ContraseñaKey As String, ArchivoKey As String,
ArchivoCer As String, ArchivoPfx As String, Banner As String, CveUsuario As Integer, FacturaProduccion As Boolean, MostrarRetIVA As Boolean, MostrarRetISR As Boolean, Regimen As String, EstatusFacturacion As Boolean,
ArchivoCer As String, ArchivoPfx As String, Banner As String, CveUsuario As Integer, FacturaProduccion As Boolean, MostrarRetIVA As Boolean, MostrarRetISR As Boolean, Regimen As String,
SendMail As String, SendMailPassword As String, SendMailServer As String, SendMailPuerto As Integer, SendMailSSL As Boolean, UsaContabilidad As Boolean, UsaBancos As Boolean, UsaVentas As Boolean, UsaCxC As Boolean,
UsaCompras As Boolean, UsaInventarios As Boolean, UsaRH As Boolean, UsaNomina As Boolean, UsaOS As Boolean, BDContPAQi As String, ServerContPAQi As String, UsrContPAQi As String, PwdContPAQi As String, Buzon_Mail As String,
Buzon_Server As String, Buzon_Puerto As Integer, Buzon_SSL As Boolean, Buzon_USR As String, Buzon_PWD As String, Buzon_Tipo As String, Soporte_Mail As String,
@@ -504,7 +504,7 @@ Public Class ClsSisEmpresas
.Add("@MostrarRetIVA", SqlDbType.Bit).Value = MostrarRetIVA
.Add("@MostrarRetISR", SqlDbType.Bit).Value = MostrarRetISR
.Add("@Regimen", SqlDbType.VarChar).Value = Regimen
.Add("@EstatusFacturacion", SqlDbType.Int).Value = EstatusFacturacion
'.Add("@EstatusFacturacion", SqlDbType.Int).Value = EstatusFacturacion
.Add("@SendMail", SqlDbType.VarChar).Value = SendMail
.Add("@SendMailPassword", SqlDbType.VarChar).Value = SendMailPassword
.Add("@SendMailServer", SqlDbType.VarChar).Value = SendMailServer
@@ -589,7 +589,7 @@ Public Class ClsSisEmpresas
Public Function UpdateEmpresa(Empresa As String, Direccion As String, NoExt As String, NoInt As String, Colonia As String, Ciudad As String, Estado As String,
RFC As String, CP As String, Telefono As String, Contacto As String, Mail As String, TipoFacturacion As String, BIUsuario As String, BIContraseña As String, ContraseñaKey As String, ArchivoKey As String,
ArchivoCer As String, ArchivoPfx As String, Banner As String, Estatus As Boolean, FacturaProduccion As Boolean, MostrarRetIVA As Boolean, MostrarRetISR As Boolean, Regimen As String, EstatusFacturacion As Boolean,
ArchivoCer As String, ArchivoPfx As String, Banner As String, Estatus As Boolean, FacturaProduccion As Boolean, MostrarRetIVA As Boolean, MostrarRetISR As Boolean, Regimen As String,
SendMail As String, SendMailPassword As String, SendMailServer As String, SendMailPuerto As Integer, SendMailSSL As Boolean, UsaContabilidad As Boolean, UsaBancos As Boolean, UsaVentas As Boolean, UsaCxC As Boolean,
UsaCompras As Boolean, UsaInventarios As Boolean, UsaRH As Boolean, UsaNomina As Boolean, UsaOS As Boolean, BDContPAQi As String, ServerContPAQi As String, UsrContPAQi As String, PwdContPAQi As String, Buzon_Mail As String,
Buzon_Server As String, Buzon_Puerto As Integer, Buzon_SSL As Boolean, Buzon_USR As String, Buzon_PWD As String, CveEmpresa As Integer, Buzon_Tipo As String, Soporte_Mail As String,
@@ -628,7 +628,6 @@ Public Class ClsSisEmpresas
.Add("@MostrarRetIVA", SqlDbType.Bit).Value = MostrarRetIVA
.Add("@MostrarRetISR", SqlDbType.Bit).Value = MostrarRetISR
.Add("@Regimen", SqlDbType.VarChar).Value = Regimen
.Add("@EstatusFacturacion", SqlDbType.Int).Value = EstatusFacturacion
.Add("@SendMail", SqlDbType.VarChar).Value = SendMail
.Add("@SendMailPassword", SqlDbType.VarChar).Value = SendMailPassword
.Add("@SendMailServer", SqlDbType.VarChar).Value = SendMailServer

View File

@@ -1036,12 +1036,7 @@
<td>Factura Producción: </td>
<td>
<asp:CheckBox ID="ChkFacturaProduccion" runat="server" /></td>
</tr>
<tr>
<td>Estatus Facturación: </td>
<td>
<asp:CheckBox ID="ChkEstatusFacturacion" runat="server" /></td>
</tr>
</tr>
<tr>
<td>Timbres:</td>
<td>

View File

@@ -252,8 +252,7 @@ Partial Class Sistemas_Empresa
ChkSendMailSSL.Checked = .SendMailSSL
ChkMostrarRetIVA.Checked = .MostrarRetIVA
ChkMostrarRetISR.Checked = .MostrarRetISR
'TxtRegimen.Text = .Regimen
ChkEstatusFacturacion.Checked = .EstatusFacturacion
'TxtRegimen.Text = .Regimen
TxtTimbres.Text = .Timbres.ToString
ChkUsaContabilidad.Checked = .UsaContabilidad
ChkUsaBancos.Checked = .UsaBancos
@@ -388,7 +387,7 @@ Partial Class Sistemas_Empresa
TxtCiudad.Text.Trim, TxtEstado.Text.Trim, TxtRFC.Text.Trim, TxtCP.Text.Trim, TxtTelefono.Text.Trim, TxtContacto.Text.Trim, TxtMail.Text.Trim,
DdlTipoFacturacion.SelectedValue, TxtBIUsuario.Text.Trim, TxtBIContraseña.Text.Trim, TxtContraseñaKey.Text.Trim, TxtArchivoKey.Text.Trim,
TxtArchivoCer.Text.Trim, TxtArchivoPfx.Text.Trim, "", UsuarioActual.CveUsuario, ChkFacturaProduccion.Checked, ChkMostrarRetIVA.Checked,
ChkMostrarRetISR.Checked, "-1", ChkEstatusFacturacion.Checked, TxtSendMail.Text.Trim, TxtSendMailPassword.Text.Trim, TxtSendMailServer.Text.Trim,
ChkMostrarRetISR.Checked, "-1", TxtSendMail.Text.Trim, TxtSendMailPassword.Text.Trim, TxtSendMailServer.Text.Trim,
TxtSendMailPort.Text.Trim.ToEntero, ChkSendMailSSL.Checked, ChkUsaContabilidad.Checked, ChkUsaBancos.Checked, ChkUsaVentas.Checked, ChkUsaCxC.Checked,
ChkUsaCompras.Checked, ChkUsaInventarios.Checked, ChkUsaRH.Checked, ChkUsaNomina.Checked, ChkUsaOS.Checked, TxtBDContPAQi.Text.Trim, TxtServerContPAQi.Text.Trim,
TxtUsrContPAQi.Text.Trim, TxtPwdContPAQi.Text.Trim, TxtBuzon_Mail.Text.Trim, TxtBuzon_Server.Text.Trim, TxtBuzon_Puerto.Text.Trim.ToEntero, ChkBuzon_SSL.Checked,
@@ -434,7 +433,7 @@ Partial Class Sistemas_Empresa
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, DdlTipoFacturacion.SelectedItem.ToString, TxtBIUsuario.Text.Trim,
TxtBIContraseña.Text.Trim, TxtContraseñaKey.Text.Trim, TxtArchivoKey.Text.Trim, TxtArchivoCer.Text.Trim, TxtArchivoPfx.Text.Trim, "", ChkEstatus.Checked,
ChkFacturaProduccion.Checked, ChkMostrarRetIVA.Checked, ChkMostrarRetISR.Checked, "", ChkEstatusFacturacion.Checked, TxtSendMail.Text.Trim,
ChkFacturaProduccion.Checked, ChkMostrarRetIVA.Checked, ChkMostrarRetISR.Checked, "", TxtSendMail.Text.Trim,
TxtSendMailPassword.Text.Trim, TxtSendMailServer.Text.Trim, TxtSendMailPort.Text.Trim.ToEntero, ChkSendMailSSL.Checked, ChkUsaContabilidad.Checked, ChkUsaBancos.Checked,
ChkUsaVentas.Checked, ChkUsaCxC.Checked, ChkUsaCompras.Checked, ChkUsaInventarios.Checked, ChkUsaRH.Checked, ChkUsaNomina.Checked, ChkUsaOS.Checked, TxtBDContPAQi.Text.Trim,
TxtServerContPAQi.Text.Trim, TxtUsrContPAQi.Text.Trim, TxtPwdContPAQi.Text.Trim, TxtBuzon_Mail.Text.Trim, TxtBuzon_Server.Text.Trim, TxtBuzon_Puerto.Text.Trim.ToEntero,