Example

Dim lsxECLPSObj as new lsxECLPS("A")
Dim autECLScreenDescObj as new lsxECLScreenDesc() 
 
autECLScreenDesObj.AddCursorPos 23, 1
 
if (lsxECLPSObj.WaitWhileScreen(autECLScreenDesObj, 10000)) then
     MessageBox( "Wait condition met" )
else
     MessageBox( "Timeout Occurred" )
end if