Private Sub InsertAtImpl(Index As Int, Pnl As B4XView, ItemSize As Int, Value As Object, InitialSize As Int)
Dim InitialPosition As Float
Dim FinalPosition As Float
InitialPosition = GetScrollViewOffset
.........<Original code Here>.......
FinalPosition = InitialPosition + p.Height + IncludeDividierHeight
SetScrollViewOffset(FinalPosition)
Log("New Position: " & GetScrollViewOffset)
End Sub