How the OnOpenLister event determines that the list load is complete

Script enters Dead loop

Function OnOpenLister(OpenListerData)
	Do
		If OpenListerData.After Then
			DOpus.Output "Ok"
		Else
			DOpus.Output "Loading"	
		End If
		
	Loop Until Not OpenListerData.After
End Function

The event is triggered either one or two times. The first time, after will be false. If you return true from that, then it'll be called again and the second time after will be true.

Function OnOpenLister(OpenListerData)
	If OpenListerData.After Then
		DOpus.Output "Ok"
	Else
		DOpus.Output "Loading"
		OnOpenLister = True
	End If
End Function