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

redireccionar a la póliza segun el tipo de contabilidad

Browse Source
This commit is contained in:
rrene
2022-04-27 14:00:50 -07:00
parent 7f2e786df3
commit b8ded4ee93
1 changed files with 7 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
Contabilidad/PopUpAuxiliar.aspx.vb
View File

@@ -198,7 +198,13 @@ Partial Class PopUpAuxiliar
e.Row.Cells(4).HorizontalAlign = HorizontalAlign.Left e.Row.Cells(4).HorizontalAlign = HorizontalAlign.Left
If e.Row.FCLiteral("LtlContabilizado").Text = "Si" Then If e.Row.FCLiteral("LtlContabilizado").Text = "Si" Then
Dim Liga As String = String.Format("<a class=""Texto"" href=""/Contabilidad/RegPoliza.aspx?IdPoliza={0}"">", e.Row.DBCampo("IdPoliza")) Dim Liga As String
If UsuarioActual.Empresa.TipoContabilidad = 1 Then
Liga = String.Format("<a class=""Texto"" href=""/Contabilidad/RegPrePolizaS.aspx?CvePrePoliza={0}"">", e.Row.DBCampo("CvePrePoliza"))
Else
Liga = String.Format("<a class=""Texto"" href=""/Contabilidad/RegPoliza.aspx?IdPoliza={0}"">", e.Row.DBCampo("IdPoliza"))
End If
e.Row.FCLiteral("LtlPoliza").Text = String.Format("{0}{1}</a>", Liga, e.Row.DBCampo("Poliza")) e.Row.FCLiteral("LtlPoliza").Text = String.Format("{0}{1}</a>", Liga, e.Row.DBCampo("Poliza"))
End If End If