Определение и вывод на экран заранее подготовленных вопросов.
BEGIN CALLOUT A
for i=1 to oAuth.GetNumberOfPredefinedQuestions
END CALLOUT A
BEGIN CALLOUT B
	Response.Write «» & 
oAuth.DisplayPredefinedQuestion(i) & «»
	Response.Write «


»
	Response.Write «

»
next
END CALLOUT B