Ну вы можете в самом начале скрипта объявить переменную:
StartFlag=false;

затем в OnRead проверить:
if StartFlag==false then
--код запроса
StartFlag=true;
end;