январь » Поиск

Результаты по ключевому слову: январь

Пример построения отчета Налогооблагаемая база

Многие, кто еще не касался СКД или касался поверхностно, высказывают - СКД сырая приблуда, на которой можно рисовать простенькие отчеты, типа вывода на печать справочника номенклатуры!
Так вот, на самом деле СКД очень мощный и гибкий инструмент, позволяющий на несколько минут создать хороший и многофункциональный отчет!
Этим примером я хочу Вам это показать!

Цель:
Необходимо для проверки сдаваемой отчетности создать в ЗУПе отчет, выводящий по Организации Налогооблагаемые базы: ОБЩАЯ, БАЗА ПФР, БАЗА ФОМС, БАЗА ФСС, БАЗА ФСС от НС, БАЗА не облагаемая и Скидка.
В отчете Нужна разбивка по месяцам, Видам Дохода, Видам расчета входящих в выше указанный Вид дохода,
Сумму представленную по Виду расчета, необходимо развернуть по ФизЛицу с указанием документа начисления!

Создание:
И так начнем:
1. Создаем отчет и Открываем Схему Компоновки Данных
title

2. В Наборах Данных -> Добавляем Набор данных - Запрос
title

Создаем не сложный запрос, собирающий доходы с регистра накопления СтраховыеВзносыСведенияОДоходах и по условиям распределяющий суммы в разные базы:

Код 1C v 8.х

 

ВЫБРАТЬ

	СтраховыеВзносыСведенияОДоходах.Организация КАК Организация,

	НАЧАЛОПЕРИОДА(СтраховыеВзносыСведенияОДоходах.Период, МЕСЯЦ) КАК Месяц,

	СтраховыеВзносыСведенияОДоходах.ВидДохода КАК ВидДохода,

	СтраховыеВзносыСведенияОДоходах.ВидРасчета КАК ВидРасчета,

	СтраховыеВзносыСведенияОДоходах.Результат КАК ОБЩАЯ,

	ВЫБОР

		КОГДА СтраховыеВзносыСведенияОДоходах.ВидДохода.ВходитВБазуФСС

			ТОГДА СтраховыеВзносыСведенияОДоходах.Результат

		ИНАЧЕ 0

	КОНЕЦ КАК БАЗА_ФСС,

	ВЫБОР

		КОГДА СтраховыеВзносыСведенияОДоходах.ВидДохода.ВходитВБазуФОМС

			ТОГДА СтраховыеВзносыСведенияОДоходах.Результат

		ИНАЧЕ 0

	КОНЕЦ КАК БАЗА_ФОМС,

	ВЫБОР

		КОГДА СтраховыеВзносыСведенияОДоходах.ВидДохода.ВходитВБазуПФР

			ТОГДА СтраховыеВзносыСведенияОДоходах.Результат

		ИНАЧЕ 0

	КОНЕЦ КАК БАЗА_ПФР,

	ВЫБОР

		КОГДА СтраховыеВзносыСведенияОДоходах.ВидРасчета.КодДоходаФСС_НС <> &НеОблагается

				ИЛИ СтраховыеВзносыСведенияОДоходах.ВидРасчета.КодДоходаФСС_НС ЕСТЬ NULL 

			ТОГДА СтраховыеВзносыСведенияОДоходах.Результат

		ИНАЧЕ 0

	КОНЕЦ КАК БАЗА_ФСС_от_НС,

	ВЫБОР

		КОГДА СтраховыеВзносыСведенияОДоходах.ВидРасчета.КодДоходаФСС_НС = &НеОблагается		

			ТОГДА СтраховыеВзносыСведенияОДоходах.Результат

		ИНАЧЕ 0

	КОНЕЦ КАК БАЗА_Не_Облагаемая,

	СтраховыеВзносыСведенияОДоходах.Скидка КАК Скидка,

	СтраховыеВзносыСведенияОДоходах.Регистратор,

	СтраховыеВзносыСведенияОДоходах.ФизЛицо,

	СтраховыеВзносыСведенияОДоходах.ВидРасчета.КодДоходаФСС_НС

ИЗ

	РегистрНакопления.СтраховыеВзносыСведенияОДоходах КАК СтраховыеВзносыСведенияОДоходах

Закладка - Набор данных:
title

3. Так как у нас только один набор данных, закладку Связи Наборов Данных пропускаем.
Вычисляемые поля, тоже нам не нужны - пропускаем.
4. Для расчета итогов по группировкам на закладке Ресурсы добавляем:
title

5. В запросе я использовал Параметры, теперь на Закладке Параметры их нужно указать:
title

6. Закладки Макет и Вложенные Запросы пропускаем, переходим на Закладку Настройки
В верхней части формы необходимо указать выводимые данные отчета - воспользуемся Конструктором Настроек..
Далее комментировать не буду, смотрите по картинкам:
title

После нажатия на ОК получаем:
title

7. При формировании отчет будет выводить группировку месяц как дату 01.01.2010, сделаем же ее вида Январь 2010
Для этого в нижней части перейдем на Закладку Условное оформление и добавим строку:
title

В колонке область выберем Месяц, а в колонке Оформление зададим формат вывода:
title

Все, сохраняем, запускаем, формируем, получаем:
title

Вот так, за 5 минут был создан удобный отчет (Скачать его можете здесь)!
Автор: Мигачев Евгений

Категория: Схема Компоновки Данных

Как в запросе одно строковое поле разделить на два ( ПОДСТРОКА )?

Задача состояла в том, что нужно было из реквизита документа Сответствие выделить две строки и сделать сортировку по ним. Соответствие счета, такого вида: 779000/004599. Как разбить это значение на два?

У функции ПОДСТРОКА три параметра. В качестве первого указывается исходная строка, из которой требуется выделить часть символов — подстроку. Понятно, что тип значения этого параметра — это Строка. Внимание, это очень важное замечание, если использовать тип первого параметра не строку, функция не будет работать, запрос будет выдавать ошибку! Второй параметр определяет позицию символа в исходной строке, с которого начинается выделение части строки, а третий — это длина выделяемой подстроки. Тип значения для второго и третьего параметров — число.

Перейдём к практике:

Код 1C v 8.х

 ВЫБРАТЬ

	Типовой.Регистратор КАК Название,

	ПОДСТРОКА(Типовой.Регистратор.Соотв.Наименование, 1, 6) КАК СчетЗатрат,

	ПОДСТРОКА(Типовой.Регистратор.Соотв.Наименование, 8, 11) КАК Отдел,

	СУММА(ВЫБОР

			КОГДА МЕСЯЦ(Типовой.Период) = 3

				ТОГДА ВЫРАЗИТЬ(Типовой.Сумма КАК ЧИСЛО(15, 2))

			ИНАЧЕ 0

		КОНЕЦ) КАК Март

ИЗ

	РегистрБухгалтерии.Типовой КАК Типовой

ГДЕ

	Типовой.СчетКт = &СчетКт

	И Типовой.Период МЕЖДУ &ПериодНач И &ПериодКон



СГРУППИРОВАТЬ ПО

	ПОДСТРОКА(Типовой.Регистратор.Соотв.Наименование, 1, 6),

	ПОДСТРОКА(Типовой.Регистратор.Соотв.Наименование, 8, 11),

	Типовой.Регистратор



УПОРЯДОЧИТЬ ПО

	Отдел,

	СчетЗатрат

Результат этого запроса следующий:
Название СчетЗатрат Отдел Март
Платежное поручение исходящее 00000000319 от 01.03.2010 14:42:54 779000 004599 9 000
Платежное поручение исходящее 00000000320 от 02.03.2010 12:07:34 779000 004599 4 721,6
Платежное поручение исходящее 00000000203 от 01.03.2010 12:28:52 786500 004599 987 614,51
Платежное поручение исходящее 00000000227 от 03.03.2010 14:16:00 786500 004599 400 000
Платежное поручение исходящее 00000000238 от 05.03.2010 12:37:57 732000 004600 5 400
Платежное поручение исходящее 00000000197 от 01.03.2010 11:53:11 732500 004600 12 100
Платежное поручение исходящее 00000000198 от 01.03.2010 11:55:39 732500 004600 12 100
Платежное поручение исходящее 00000000279 от 26.03.2010 0:00:00 734100 004600 19 609
Платежное поручение исходящее 00000000287 от 29.03.2010 14:15:36 734100 004600 55 300
Платежное поручение исходящее 00000000291 от 30.03.2010 11:01:10 734100 004600 18 090
Платежное поручение исходящее 00000000268 от 18.03.2010 10:34:25 738000 004600 10 050
Платежное поручение исходящее 00000000276 от 18.03.2010 12:20:20 750400 004600 13 060,98
Платежное поручение исходящее 00000000281 от 29.03.2010 12:33:46 750400 004600 555 645,41
Платежное поручение исходящее 00000000234 от 04.03.2010 12:21:55 754450 004600 24 120
Платежное поручение исходящее 00000000290 от 30.03.2010 10:44:39 754450 004600 100 000
Платежное поручение исходящее 00000000240 от 09.03.2010 10:53:24 786300 004600 20 800
Платежное поручение исходящее 00000000269 от 18.03.2010 10:58:04 786300 004600 61 012
Платежное поручение исходящее 00000000289 от 30.03.2010 9:27:14 786300 004600 6 000
Платежное поручение исходящее 00000000223 от 03.03.2010 12:13:38 786500 004600 36 000
Платежное поручение исходящее 00000000228 от 04.03.2010 9:52:35 786500 004600 378 138,85
Платежное поручение исходящее 00000000229 от 04.03.2010 9:57:50 786503 004600 126 117,75
Платежное поручение исходящее 00000000200 от 01.03.2010 11:58:06 754422 004762 63 000
Платежное поручение исходящее 00000000286 от 29.03.2010 14:10:18 764422 004762 10 000
Платежное поручение исходящее 00000000267 от 17.03.2010 0:00:00 764423 004762 464 370
Платежное поручение исходящее 00000000261 от 15.03.2010 11:16:28 764522 004762 81 357

Итак, если мы берём строку 779000/004599, то ПОДСТРОКА(Типовой.Регистратор.Соотв.Наименование, 1, 6) будет выделять строку "779000". А ПОДСТРОКА(Типовой.Регистратор.Соотв.Наименование, 8, 11) будет выводить "004599".

В этом же запросе, используется выражение:

Код 1C v 8.х

 СУММА(ВЫБОР

	КОГДА МЕСЯЦ(Типовой.Период) = 3

		ТОГДА ВЫРАЗИТЬ(Типовой.Сумма КАК ЧИСЛО(15, 2))

	ИНАЧЕ 0

КОНЕЦ) КАК Март

В этой же задаче необходимо было добавить новые колонки с названиями месяцев и с суммами по ним. Как раз это выражение решает эту задачу. Если Вам нужно использовать другие месяца, например январь, то заменим выражение:

Код 1C v 8.х

 СУММА(ВЫБОР

	КОГДА МЕСЯЦ(Типовой.Период) = 1

		ТОГДА ВЫРАЗИТЬ(Типовой.Сумма КАК ЧИСЛО(15, 2))

	ИНАЧЕ 0

КОНЕЦ) КАК Январь

Приведу пример текста запроса, в котором с помощью цикла формируются поля месяцев (выделено жирным), начиная с марта по февраль.

Код 1C v 8.х

 

ТекстЗапроса = "

 |ВЫБРАТЬ

 |Типовой.Регистратор КАК Название,

 |ПОДСТРОКА(Типовой.Регистратор.Соотв.Наименование, 1, 6) КАК СчетЗатрат,

 |ПОДСТРОКА(Типовой.Регистратор.Соотв.Наименование, 8, 11) КАК Отдел,";

 

 Для Сч = 1 По 12 Цикл

 	Если Сч < 11 Тогда

 		Мес = Сч + 2;

 	Иначе

 		Мес = Сч - 10;

 	КонецЕсли;

 	ТекстЗапроса = ТекстЗапроса + "

 	|СУММА(ВЫБОР

 	|	КОГДА МЕСЯЦ(Типовой.Период) = " + Мес + "

 	|		ТОГДА ВЫРАЗИТЬ(Типовой.Сумма КАК ЧИСЛО(15, 2))

 	|	ИНАЧЕ 0

 	|КОНЕЦ) КАК Поле" + Мес + ?(Сч=12,"",",");

 КонецЦикла;

 ТекстЗапроса = ТекстЗапроса + "

 |ИЗ

 |	РегистрБухгалтерии." + ИмяРегистраБухгалтерии + ".ДвиженияССубконто(

 |		&НачПериода,

 |		&КонПериода,";

 

 СтрокаОграниченийПоРеквизитам = " (Активность = ИСТИНА) И (Счет В ИЕРАРХИИ (&СчетАнализа))";

 

 ТекстЗапроса = ТекстЗапроса + СтрокаОграниченийПоРеквизитам + "

 |	) КАК Типовой

 |";

 

 ТекстЗапроса = ТекстЗапроса + "

 |ГДЕ

 |	Типовой.СчетКт = &СчетАнализа

 |	И Типовой.Период МЕЖДУ &НачПериода И &КонПериода

 |СГРУППИРОВАТЬ ПО

 |	ПОДСТРОКА(Типовой.Регистратор.Соотв.Наименование, 1, 6),

 |	ПОДСТРОКА(Типовой.Регистратор.Соотв.Наименование, 8, 11),

 |	Типовой.Регистратор

 |УПОРЯДОЧИТЬ ПО

 |	Отдел,

 |	СчетЗатрат";

Категория: Запросы

Как вывести текущий, следующий и предшествующий периоды журнала Зарплата

Код 1C v 7.x

 жз = СоздатьОбъект("ЖурналРасчетов.Зарплата");

пер = жз.ТекущийПериод();

Сообщить("Текущий период:" + Символ Табуляции + пер);

пер = пер.ПрибавитьПериод(1);

Сообщить("Период после:" + СимволТабуляции + пер);

пер = пер.ПрибавитьПериод(-2);

Сообщить("Период до:" + СимволТабуляции + пер);

или

Код 1C v 7.x

 жз = СоздатьОбъект("ЖурналРасчетов.Зарплата");

жз.ВыбратьЗаписи(); // Позиционируемся на первом расчете ЖЗ

пер = жз.ПериодРегистрации; // или жз.ПериодДействия;

Сообщить("Период регистрации:" + СимволТабуляции + пер);

пер = пер.ПрибавитьПериод(1);

Сообщить("Период после:" + СимволТабуляции + пер);

пер = пер.ПрибавитьПериод(-2);

Сообщить("Период до:" + СимволТабуляции + пер);

В обоих случаях результат будет:
Текущий период: Декабрь 2009 г.
Период после: Январь 2010 г.
Период до: Ноябрь 2009 г.

Категория: Журналы расчетов

Загрузка данных из таблицы значений в регистр сведений

В документе есть табличная часть вида
№ Инвентарная группа Январь Февраль Март Апрель ... и т.д.
1 Бумага 150 175 130 140 ...
1 Кантовары 50 15 30 27 ...
1 Хозтовары 10 29 37 60 ...

Нужно выгрузить табличную часть документа в Таблицу значений и загрузить в регистр сведений

Период Дата Подразделение Инвентарная группа Количество
01.01.2010 01.01.2010 Хоз. Отдел Бумага 150
01.01.2010 02.01.2010 Хоз. Отдел Бумага 175
01.01.2010 03.01.2010 Хоз. Отдел Бумага 130
...........................
01.01.2010 01.01.2010 Хоз. Отдел Кантовары 50
01.01.2010 02.01.2010 Хоз. Отдел Кантовары 15
01.01.2010 03.01.2010 Хоз. Отдел Кантовары 30
.....
и т.д

вот примерный код:

Код 1C v 8.х

  ТЗ = Новый ТаблицаЗначений;

    ТЗ = СписокИнвентарныхГрупп.Выгрузить();

    СчетчикКолонок = 2;

    СчетчикСтрок = 0;

    Пока СчетчикСтрок < СписокИнвентарныхГрупп.Количество()Цикл 

        Пока СчетчикКолонок<=13 Цикл 

            НаборДанных = РегистрыСведений.ЛимитыИнвентаря.СоздатьНаборЗаписей();

            НаборДанных.Отбор.ИнвентарнаяГруппа.Установить(ТЗ[СчетчикСтрок][1]);

            НаборДанных.Отбор.Подразделение.Установить(ПОдразделение);

            НаборДанных.Отбор.Дата.Установить(ДобавитьМесяц(НачалоГода(Период),СчетчикКолонок-2));

            НаборДанных.Прочитать();

            Если НаборДанных.Количество() = 0 Тогда

                Запись = НаборДанных.Добавить();

            Иначе

                Запись = НаборДанных[0];

            КонецЕсли;    

            Запись.Подразделение = Подразделение;

            Запись.ИнвентарнаяГруппа = ТЗ[СчетчикСтрок][1];

            Запись.Дата = ДобавитьМесяц(НачалоГода(Период),СчетчикКолонок-2); 

            Запись.Количество = ТЗ[СчетчикСтрок][СчетчикКолонок+1];    

            Запись.Период = Период;

            НаборДанных.Записать();

            СчетчикКолонок = СчетчикКолонок+1;

        КонецЦикла;

        СчетчикСтрок = СчетчикСтрок+1;

        СчетчикКолонок = 2;

    КонецЦикла;

Категория: Регистры сведений

Вхождение вида расчета в группу

Посчитаем все начисления текущего сотрудника за январь:

Код 1C v 7.x

 //   1-й вариант:

ВсегоНачислено = 0;

ЖЗ.ВыбратьЗаписиПоОбъекту (ТекСотр, ДатаНач, ДатаКон);

Пока ЖЗ.ПолучитьЗапись()=1 Цикл

 Если ЖЗ.ВидРасч.ВходитВГруппу(ГруппаРасчетов.ВсеНачисления)=1 Тогда

   ВсегоНачислено = ВсегоНачислено + ЖЗ.Результат;

 КонецЕсли;

КонецЦикла;



//   2-й вариант:

ВсегоНачислено = 0;

ЖЗ.ВыбратьЗаписиПоОбъекту (ТекСотр, ДатаНач, ДатаКон);

Пока ЖЗ.ПолучитьЗапись()=1 Цикл

 Если ГруппаРасчетов.ВсеНачисления.СодержитВидРасчета(ЖЗ.ВидРасч)=1 Тогда

   ВсегоНачислено = ВсегоНачислено + ЖЗ.Результат;

 КонецЕсли;

КонецЦикла;

Категория: Виды расчетов

Методы работы с периодом журнала расчетов

Код 1C v 7.x

 НачалоПериода = ЖЗ.НачалоТекущегоПериода();

КонецПериода = ЖЗ.КонецТекущегоПериода();

ПериодСтрокой = ЖЗ.ОписательПериода(НачМес); //например "Январь 2002 г"

Категория: Журналы расчетов

Расчет начислений по сотруднику, подразделени, документу

Код 1C v 7.x

 //   Посчитаем все начисления текущего сотрудника за январь:

ВсегоНачислено = 0;

ЖЗ.ВыбратьЗаписиПоОбъекту (ТекСотр, ДатаНач, ДатаКон);

Пока ЖЗ.ПолучитьЗапись()=1 Цикл

 Если ЖЗ.ВидРасч.ВходитВГруппу(ГруппаРасчетов.ВсеНачисления)=1 Тогда

   ВсегоНачислено = ВсегоНачислено + ЖЗ.Результат;

 КонецЕсли;

КонецЦикла;



//   Теперь рассчитаем все записи текущего сотрудника, введеные в текущем месяце:

ЖЗ.ВыбратьПериодПоОбъекту (ТекСотр, ДатаНач);

Пока ЖЗ.ПолучитьЗапись()=1 Цикл

   ЖЗ.Рассчитать();

КонецЦикла;



///   Рассчитаем все записи по документу, независимо от того, в каком расчетном периоде записи порождались:

ЖЗ.ВыбратьЗаписиПоДокументу (ВыбрДокумент);

Пока ЖЗ.ПолучитьЗапись()=1 Цикл

   ЖЗ.Рассчитать();

КонецЦикла;



//   Рассчитаем все записи по указанному подразделению. В журнале расчетов указана графа отбора "Подразделение".

ТекПер = ЖЗ.ТекущийПериод();

ЖЗ.ВыбратьПоЗначению ("Подразделение",ВыбрПодразделение, ТекПер, ТекПер);

Пока ЖЗ.ПолучитьЗапись()=1 Цикл

   ЖЗ.Рассчитать();

КонецЦикла;

Категория: Журналы расчетов

Перебор записей журнала расчетов

Например, организуем перебор записей с периодом действия в январе.

Код 1C v 7.x

 ЖЗ = СоздатьОбъект("ЖурналРасчетов.Зарплата");

ДатаНач = '01.01.2002';

ДатаКон = '31.01.2002';

ЖЗ.ВыбратьЗаписи(ДатаНач, ДатаКон);

Пока ЖЗ.ПолучитьЗапись()=1 Цикл

   //   <действия с тек. записью>

КонецЦикла;

А теперь организуем перебор записей, введенных в январе.

Код 1C v 7.x

 ЖЗ = СоздатьОбъект("ЖурналРасчетов.Зарплата");

ДатаНач = '01.01.2002';

ЖЗ. ВыбратьПериод(ДатаНач);

Пока ЖЗ.ПолучитьЗапись()=1 Цикл

   //   <действия с тек. записью>

КонецЦикла;

Отличие методов ВыбратьЗаписи и ВыбратьПериод проявляется, если запись введена в другом месяце, но период ее действия лежит в январе. Например, в феврале сотруднику выдают премию за январь. Тогда запись будет введена в феврале (период регистрации), но период ее действия - январь. В первый цикл она попадет, а во второй нет.

Категория: Журналы расчетов

Функция ПредставлениеПериода() аналог 7-ной функции ПериодСтр()

Функция позволяет формировать описание периода, заданного датами начала и окончания на одном из языков, поддерживаемых платформой. Например, в результате выполнения следующего кода:

Код 1C v 8.2 УП

 ТекДата = ТекущаяДата();

НачПериода = НачалоМесяца(ТекДата);

КонПериода = КонецМесяца(ТекДата);



Сообщение = Новый СообщениеПользователю;

Сообщение.Текст = ПредставлениеПериода(НачПериода, КонПериода, "L=en_US");

// или

Сообщение.Текст = ПредставлениеПериода(НачПериода, КонПериода, "L=ru_RU");

Сообщение.Сообщить();

будет получено представление периода на английском или русском языках!

Функция глобального контекста ПредставлениеПериода() позволяет получить строковое представление периода, заданного датами начала и окончания.

Например:

Код 1C v 8.х

 ПредставлениеПериода('20050101000000', '20050101235959')   // 	1 января 2005 г.

ПредставлениеПериода('20050101000000', '20050131235959')   // 	Январь 2005 г.

ПредставлениеПериода('20050101000000', '20050228235959')   //   Январь 2005 г. - Февраль 2005 г.

Кроме стандартных периодов эта функция позволяет получать представления так называемых финансовых периодов: первых девяти месяцев года и первого полугодия. Для этого используется форматная строка с указанием признака ФП:

Код 1C v 8.х

 ПредставлениеПериода('20050101000000', '20050630235959', "ФП = Истина")   // 	1 полугодие 2005 г.

ПредставлениеПериода('20050101000000', '20050930235959', "ФП = Истина")   //	9 месяцев 2005 г.

Кроме этого форматная строка позволяет получать представление периода на языке, отличном от используемого по-умолчанию:

Код 1C v 8.х

 ПредставлениеПериода('20050101000000', '20050331235959', "L = en_US")   //   1 quarter of 2005          -   Английский

ПредставлениеПериода('20050101000000', '20050331235959', "L = bg_BG")   //   1-во тримесечие на 2005 г. -   Болгарский

ПредставлениеПериода('20050101000000', '20050331235959', "L = de_DE")   //   1. Quartal 2005            -   Немецкий

Категория: Работа с Датами (Временем)

Программа пишет "нет рабочих дней за январь. Необходимо заполнить график" Какой?

При начислении зарплаты за январь или расчете. Программа пишет "нет рабочих дней за январь. Необходимо заполнить график" Какой?

Ответ: В Графике работы сотрудника в поле календарь нажать кнопку рассчитать.

Категория: 1С Зарплата и Управление Персоналом 2.5

Формат, функция форматирования значений

Код 1C v 8.х

 

//Функция формирует удобное для чтения представление значений.



// Примеры форматирования чисел

ЗначФормат = Формат(123456.789, "ЧЦ=10; ЧДЦ=2");      // ЗначФормат = "123 456,79"

ЗначФормат = Формат(123456.789, "ЧГ=0; ЧДЦ=2");      // ЗначФормат = "123456,79"

ЗначФормат = Формат(123456.789, "ЧРД='-'");           // ЗначФормат = "123 456-789"

ЗначФормат = Формат(-123456.789, "ЧО=0");             // ЗначФормат = "(123 456,789)";

ЗначФормат = Формат(13, "ЧЦ=5; ЧВН=; ЧГ=0");      // ЗначФормат = "00013";



//В 8 версии для вывовода чисел прописью используется ЧислоПрописью

ЧислоПрописью(Сумма, "L=ru_RU", Валюта.ПараметрыПрописиНаРусском)  

ЧислоПрописью(1457.25,"L=en_US","dollar, dollars, cent, cents, 2"); // One thousand four hundreds fifty seven dollars 25 cents. 

ЧислоПрописью(Сумма,"Рубль,рубля,рублей,м,копейка,копейки,копеек,ж,2");



//Пример представления Числа в виде Даты

ЗначФормат = Формат(25021949, "ЧЦ=8; ЧРГ=.; ЧВН=; ЧГ=4,2,0");      // ЗначФормат = "25.02.1949"



// Примеры форматирования дат

ЗначФормат = Формат('20020820153309', "ДФ=""дд ММММ гггг 'г.' ЧЧ:мм:сс""");     // ЗначФормат = "20 августа 2002 г. 15:33:09"

ЗначФормат = Формат('20020820153309', "ДФ=""дд/ММ-гггг""");                     // ЗначФормат = "20/08-2002"

ЗначФормат = Формат('20020820153309', "ДФ='q ""кв."" yyyy'"); 		            // ЗначФормат = "3 кв. 2002";

ЗначФормат = Формат('20020820153309', "ДФ='""Итого"" q ""квартал""'") ;	   // ЗначФормат = "Итого 3 квартал";

ЗначФормат = Формат('20020820153309', "ДФ='ММММ гггг'");  		            // ЗначФормат = "Август 2002 г.";

ЗначФормат = Формат('20020820153309', "ДЛФ=ДД");                                // ЗначФормат = "20 августа 2002 г.";

ЗначФормат = Формат('20020820153309', "ДЛФ=Д");                                 // ЗначФормат = "20.08.2002";

ЗначФормат = Формат('20020820153309', "ДЛФ=В");                                 // ЗначФормат = "15:33:09";



ЗначФормат = Формат('20020820153309', "ДФ=HHmmssyyyyMMdd");                                 // ЗначФормат = "15330920020820";

ЗначФормат = Формат('20020820153309', "ДФ=HH:mm:ss yyyy MM dd");                                 // Время 24 часа  - ЗначФормат = "15:33:09 2002 08 20";

ЗначФормат = Формат('20020820153309', "ДФ=hh:mm:ss yyyy MM dd");                                 // Время 12 часов - ЗначФормат = "03:33:09 2002 08 20";



Формат(Дата(2009, 1, 1), "ДЛФ=DD") + ", " + ОпределитьДеньНедели(ДеньНедели(Дата(2009, 1, 1)));   // 1 января 2009 г., Четверг (Смотрите в "Работаем с Датами" Функция Определить день недели)

Формат(Дата(2009, 1, 1), "ДФ=ММММ") + ", " + Формат(Дата(2009, 1, 1), "ДФ=yyyy") + " г.";         // Январь, 2009 г.

Формат(НачалоНедели(Дата(2009, 1, 1)), "ДФ='dd MMMM yyyy'") + " г. - " + Формат(КонецНедели(Дата(2009, 1, 1)), "ДФ='dd MMMM yyyy'") + " г."; // 29 декабря 2008 г. - 04 января 2009 г.



// ДЕКАДУ нельзя вывести через формат, но можно так:

Строка(Цел(День(Дата('20020820153309')) / 10) + 1)+" декада"  = 2 декада



// Примеры форматирования логических выражений

ЗначФормат = Формат(Истина, "БЛ=Отсутствует; БИ=Доступен");                     // ЗначФормат = "Доступен";

ЗначФормат = Формат(Ложь, "БЛ=Нет; БИ=Да");                     				// ЗначФормат = "Нет";

Код 1C v 7.x

 

// Символы, определяющие тип форматируемых данных: 

// Ч — число (Англоязычный синоним: N)  

ЗначФормат = Формат(123.15, "Ч(0)10.2") // 0000123.15

Долг = Строка(Формат(Долг(), "Ч12.2")) + " " + Валюта.Сокр_назв;



// Возможен вывод денежных величин и просто целых чисел прописью. В этом случае форматная строка должна иметь вид "ЧПДС".

// Наличие буквы "П" (в английском варианте для аналогичной цели используется буква "S") определяет сам факт вывода числа прописью. 

// Символ "Д" (в английском варианте — "M") обозначает вывод денежной величины и является необязательным. 

// Символ "С" (в английском варианте — "H") также необязателен и означает вывод с копейками.

ИтогоСуммаПрописью  = Формат(Итог("Сумма"), "ЧПДС");

КоличествоНаименованийПрописью = Формат(КоличествоСтрок(), "ЧП");



// С — строка (Англоязычный синоним: S) 

// "Сn", где n — положительное целое число определяющее ширину поля, в котором будет размещаться строка. 

// В случае, если ширина поля превосходит длину строки сформатированная строка будет дополнена справа пробелами, если же ширина поля меньше длины строки — строка будет усечена справа.





// Д — дата (Англоязычный синоним: D)

ДатаДокумента = Формат(Док.ДатаДок,"Д ДД.ММ.ГГ");  //12.03.08

ДатаДокумента = Формат("01.01.1999", "Д(0)ДДММММГГГГ"); // 01 Января 1999 г.



//Для форматирования даты используется форматная строка вида "Д<ПодстрокаФормата>", где <Подстрока Формата> представляет собой строку, определяющую вид сформатированного представления даты:

//DDMMYY (ДДММГГ)  дата в виде ДД.ММ.ГГ 

//DDMMYYYY (ДДММГГГГ)  дата в виде ДД.ММ.ГГГГ 

//DDMMMMYYYY (ДДММММГГГГ)  дата в виде ДД месяц прописью ГГГГ 

//(0)DDMMMMYYYY ((0)ДДММММГГГГ) этот формат представляет собой вариант предыдущего формата с тем отличием, что число месяца всегда выводится двумя цифрами, т. е. для чисел меньших 10 спереди будет добавлен 0. Например: Формат('01.01.1999', ' 'Д(0)ДДММММГГГГ' ') = 01 Января 1999 г. 

//MMMMYYYY (ММММГГГГ) дата в виде месяц прописью ГГГГ 

//MMMMYY (ММММГГ) дата в виде месяц прописью ГГ 

//ММММ (ММММ) дата в виде месяц прописью 

//QQQQYYYY (ККККГГГГ) дата в виде N квартала ГГГГ 

//QQQQYY (ККККГГ) дата в виде N квартала ГГ 

//QQQQ дата в виде N квартала 

//YYYYMMDD (ГГГГММДД) дата в виде ГГГГММДД, то есть дата '10.11.1998' будет представлена как строка "19981110" 

//WWWW (HHHH) выводит наименование дня недели, соответствующее указанной дате. Наименования дней недели берутся из файла прописи.

Категория: Встроенные Функции

Функция месяц прописью

Код 1C v 8.х

 // пример от glory01

А = Формат('20020820153309', "ДФ=ММММ")

// А = "Август"

А = Формат(ТекущаяДата(), "ДФ=ММММ")

// А = "Март"

Код 1C v 7.x

  Функция МесяцПрописью(НомерМесяца) Экспорт

    НомерМесяца=Число(НомерМесяца);

	Если НомерМесяца = 1 Тогда

		Возврат "Январь";

	ИначеЕсли НомерМесяца = 2 Тогда

		Возврат "Февраль";

	ИначеЕсли НомерМесяца = 3 Тогда

		Возврат "Март";

	ИначеЕсли НомерМесяца = 4 Тогда

		Возврат "Апрель";

	ИначеЕсли НомерМесяца = 5 Тогда

		Возврат "Май";

	ИначеЕсли НомерМесяца = 6 Тогда

		Возврат "Июнь";

	ИначеЕсли НомерМесяца = 7 Тогда

		Возврат "Июль";

	ИначеЕсли НомерМесяца = 8 Тогда

		Возврат "Август";

	ИначеЕсли НомерМесяца = 9 Тогда

		Возврат "Сентябрь";

	ИначеЕсли НомерМесяца = 10 Тогда

		Возврат "Октябрь";

	ИначеЕсли НомерМесяца = 11 Тогда

		Возврат "Ноябрь";

	ИначеЕсли НомерМесяца = 12 Тогда

		Возврат "Декабрь";

	Иначе

		Возврат "";

	КонецЕсли;

конецфункции

Категория: Работа с Датами (Временем)