Текст = ""; 

Подсказка = "Введите текст напоминания";

Если ВвестиСтроку(Текст,Подсказка, 0, истина) Тогда 

	// запомнить текст напоминания

КонецЕсли;  

   

 

НК = "";

Если ВвестиСтроку(НК, "Введите код продукции", 40, 1, 9) = 1 Тогда	

	Koд = HK;	

Иначе	

	Код = "";

КонецЕсли;