ДанныеПериода.Вставить(Сч, Новый Структура("НачалоПериода, КонецПериода", ТекущийМесяц, Мин(КонецМесяца(ТекущийМесяц), КонецДня(КонецПериода)))) ;
ТекущийМесяц = КонецМесяца(ТекущийМесяц) + 1 ;
КонецЦикла ;
КонецЕсли ;
Я не хочу быть самым богатым человеком на кладбище. Засыпать с чувством, что за день я сделал какую-нибудь потрясающую вещь — вот что меня интересует. Стив Джобс