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

option strict on

Browse Source
This commit is contained in:
rrene
2023-08-23 10:21:50 -07:00
parent 1ab4b815cd
commit bf1317817c
11 changed files with 107 additions and 118 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
Contabilidad/RegPrePoliza.aspx.vb
View File

@@ -215,9 +215,9 @@ Partial Class ContabilidadC_RegPrePoliza
If Not Page.IsPostBack Then
Tick = DateTime.Now.Ticks.ToString()
'If UsuarioActual.Empresa.TipoContabilizacion = 1 OrElse UsuarioActual.Empresa.TipoContabilidad = 1 OrElse UsuarioActual.CveEmpresa = 119 Then
' Response.Redirect(Request.Url.PathAndQuery.Replace("RegPrePoliza", "RegPrePolizaS"))
'End If
If UsuarioActual.Empresa.TipoContabilizacion = 1 OrElse UsuarioActual.Empresa.TipoContabilidad = 1 OrElse UsuarioActual.CveEmpresa = 119 Then
Response.Redirect(Request.Url.PathAndQuery.Replace("RegPrePoliza", "RegPrePolizaS"))
End If
CveMoneda = 1
ViewState("CvePrePoliza") = 0
@@ -245,7 +245,6 @@ Partial Class ContabilidadC_RegPrePoliza
Conta.Dispose()
End If
If IfNull(Request("Tipo"), "").ToString() = "NOMPROV" Then
DivTipoGasto.Visible = True
ThTipoGasto.Visible = True