счет = Документы.СчетНаОплатуПокупателю.СоздатьДокумент();
	
	счет.ВалютаДокумента = 
		Справочники.Валюты.НайтиПоКоду( 810 );
		       
	счет.Дата =  Дата( 2009 ,  1 ,  1 );
	
	счет.Контрагент = Справочники.Контрагенты.НайтиПоРеквизиту("ИНН", "INN");
	счет.Номер = "Номер";
	счет.СуммаДокумента =  555 . 00 ;
	счет.СуммаВключаетНДС = "Истина";   
	счет.УчитыватьНДС = "Истина";
	счет.Организация = 
		Справочники.Организации.НайтиПоКоду("000000002");
	счет.Комментарий = "Коммент";
	
	счет.Записать();