This commit is contained in:
2021-11-17 20:42:39 -07:00
parent 03c70147ef
commit d06af6b35f

View File

@@ -1726,7 +1726,7 @@ Partial Class General_SaldosIniciales
Exit For
End If
Dim SubP As String = Row("SubProyecto").ToString
Dim SubP As String = Row("SubProyecto").ToString.Trim
If SubP <> "" OrElse SubP <> "-" Then
DataTemp = SubProTemp.FiltraParametros(String.Format("SubProyecto = '{0}'", SubP))
CveSubProyecto = DataTemp.FiltroPrimeroValor("CveSubProyecto", "").ToEntero
@@ -1771,6 +1771,7 @@ Partial Class General_SaldosIniciales
Catch ex As Exception
Alert(ex.Message)
ObjConta.RollBack()
End Try