Функция ЯвляетсяДатой(Знач Значение) Экспорт



	Если ТипЗнч(Значение) = Тип("Дата") Тогда

		Возврат Истина;

	КонецЕсли;



	Попытка

		Р = Дата(Значение);

	Исключение

		Возврат Ложь;

	КонецПопытки;

	Возврат Истина;

КонецФункции