-- activar cambiar datos de usocfdi, en Anticipos no timbrados
This commit is contained in:
@@ -2820,24 +2820,16 @@ Partial Class Ventas
|
|||||||
CargaRelacionadasPendientes()
|
CargaRelacionadasPendientes()
|
||||||
End If
|
End If
|
||||||
|
|
||||||
'DdlSucursal.Enabled = False
|
|
||||||
DdlSubProyectoDatos.Enabled = False
|
DdlSubProyectoDatos.Enabled = False
|
||||||
BtnEmitirImprimir.Visible = False
|
BtnEmitirImprimir.Visible = False
|
||||||
BtnCrearApartirDe.Visible = True
|
BtnCrearApartirDe.Visible = True
|
||||||
If UsuarioActual.Empresa.Funcionalidad(531) = "1" Then
|
If UsuarioActual.Empresa.Funcionalidad(531) = "1" Then BtnCrearApartirDe.Visible = False
|
||||||
BtnCrearApartirDe.Visible = False
|
|
||||||
End If
|
|
||||||
If UsuarioActual.TienePermisoProceso(302) AndAlso DdlTipoComprobante.SelectedValue = "Ing" Then BtnEditar.Visible = True
|
|
||||||
|
|
||||||
If UsuarioActual.TienePermisoProceso(302) AndAlso DdlTipoComprobante.SelectedValue = "Egs" AndAlso LblSeTimbro.Text = "No" Then
|
If UsuarioActual.TienePermisoProceso(302) AndAlso DdlTipoComprobante.SelectedValue.Contiene("Ing", "Ant", "Egs") AndAlso LblSeTimbro.Text = "No" Then BtnEditar.Visible = True
|
||||||
BtnEditar.Visible = True
|
|
||||||
End If
|
|
||||||
'DdlEstatus.Enabled = True
|
|
||||||
|
|
||||||
DivFechaAnticipoCliente.Visible = True
|
DivFechaAnticipoCliente.Visible = True
|
||||||
TxtFechaAnticipoCliente.Text = Now.ToShortDateString
|
TxtFechaAnticipoCliente.Text = Now.ToShortDateString
|
||||||
|
|
||||||
|
|
||||||
ImgAddObs.Visible = True
|
ImgAddObs.Visible = True
|
||||||
CargaEventoBitacora()
|
CargaEventoBitacora()
|
||||||
|
|
||||||
|
|||||||
Reference in New Issue
Block a user