Доброе утро помогите разобраться с функцией вывода дня недели прописью.
Загружаю из ексель в 1с документ файл.В нем день недели указан цифрой,а мне надо получить в документе 1с день недели прописью.Вот строка кода

Строка.ДеньПосещения =Формат(СокрЛП(Лист.Cells(ПоСтрокам,4).Value),"ДФ=ддд");

Пытался использовать функцию формат(ТекущаяДата(),"ДФ=ддд").Трассировка показала что эта функция не сработала и день недели остался числом.

насколько помню - нет в 8.2 такого, отменили

у меня 8.1 УПП 1.2

Сообщить(формат(ТекущаяДата(),"ДФ=ддд"))
Пн

что я не так делаю?

нпихрена не понял. у тебя на входе что - строка, дата, число, или что?

СокрЛП(Лист.Cells(ПоСтрокам,4).Value) - дак это не дата по факту, вот и всё. строка

да число у него на входе. и надо функцию типа ДеньНеделиПрописью(1) которая вернет Понедельник

у меня строка ексель содержащая номер дня недели строка и получить я должен строку

за 10 минут что здесь спрашиваеш 8 строк кода условия бы уже раза 4 накрапал...

а блин, работает
Формат(ТекущаяДата(), "ДФ=дддд")

Функция ДеньНеделиПрописью(ДН)
ДниНедели = Новый Массив;
ДниНедели.Добавить("пн");
ДниНедели.Добавить("вт");
ДниНедели.Добавить("ср");
ДниНедели.Добавить("чт");
ДниНедели.Добавить("пт");
ДниНедели.Добавить("сб");
ДниНедели.Добавить("вс");
Возврат ДниНедели[ДН-1];
КонецФункции

(10) 28 апреля в високосный год - какой день?)

а, задача то простая, день недели указывается. неинтересно

(11) не тупи. там цифры от 1 до 7

(10)читер!

(8) за 2 мин

(0) я так полагаю это документ "Рейсы", я уже обрадовался думал не будет в понедельник амадеуса и проблем с рейсами)

(10)+100500 пока читал ветку, не понял ПРОБЛЕМ автора

представлениеПериода

(17) это уже как утренний коффе - у него всегда одна и таже проблема, просто условное оформление разное

потому что задачи разные

большое спасибо (10) добавил вашу функцию в строку кода
Строка.ДеньПосещения =ДеньНеделиПрописью(СокрЛП(Лист.Cells(ПоСтрокам,4).Value));
заработало

уточняем задачу и избавляемся от г-кода

Исходная: у господина амадеуса есть порядковые дни недели в эксель, т.е.

1 день - понедельник
...
7 день - воскресенье

Необходимо: по порядковому номеру дня недели выводить
его символьное представление "понедельник"..."воскресенье
"

решение:

находим недельный период дат в которых неделя начинается с
1-го числа, например  

май 2006 начинался с понедельника, т.е.

1 мая 2006 понедельник
...
7 мая 2006 воскресение

Собственно код для господина амадеуса без г-технологий

   //ПорядковыйНомерДняНедели = СокрЛП(Лист.Cells(ПоСтрокам,4).Value;
   ПорядковыйНомерДняНедели = 1;
   Строка.ДеньПосещения = Формат(Дата(2006, 5, ПорядковыйНомерДняНедели), "ДФ="" дддд """); // "понедельник"
   Строка.ДеньПосещения = Формат(Дата(2006, 5, ПорядковыйНомерДняНедели), "ДФ="" ддд """);  // "Пн"


во сути код в одну строку уложить можно

(так, просто, ради прикола)

Сообщить(Формат(Дата("13.05.2012 10:12:23") + СокрЛП(Лист.Cells(ПоСтрокам,4).Value),"ДФ=дддд"));

(23) Что-то как-то никакой реакции на г-код :( А если так :)

Сообщить(ТРег(Формат(Дата(СокрЛП(Лист.Cells(ПоСтрокам,4).Value) + ".10.2012 00:00:00"),"ДФ=дддд")));

согласен что мой код не катит, поэтому  и спрашивал знатоков 1С как вывести день недели прописью

(22) думаешь вызывать 2 функции оптимальнее моего копрокода?

Вариант

Сред("пнвтсрчтптсбвс",НомерДняНедели-1,2)

пардон

Сред("пнвтсрчтптсбвс",(НомерДняНедели-1)*2,2)

В принципе я использовал код (10), а потом вызвал эту функцию в этой части кода
Строка.ДеньПосещения =Перечисления.ДниПосещения[ДеньНеделиПрописью(СокрЛП(Лист.Cells(ПоСтрокам,4).Value))];

Вывел дни недели так как они идут в ексель файле

(26) во-первых, можно использовать только Формат() без Дата() см. (24)

я привел пример с Дата() для наглядности, чтобы прочно осела мысль, что нам нужна дата, которая начинается с понедельника(1) и потом ее в (24)

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

сомневаюсь, что она будет быстрее формат, но г добавит точно, при всем уважении

(28) Опять, простите, поторопился.

Два финальных варианта на выбор:

Сред("пнвтсрчтптсбвс",(НомерДняНедели-1)*2+1,2)
//или
Сред("**пнвтсрчтптсбвс",НомерДняНедели*2+1,2)
[*1c]

или даже

Сред("*пнвтсрчтптсбвс",НомерДняНедели*2,2)

(30) т.е предлагаете использовать такой вариант
Сообщить(ТРег(Формат(СокрЛП(Лист.Cells(ПоСтрокам,4).Value),"ДФ=дддд"""""));

(31) по крайней мере это избавляет от создания массива и сокращает код до строчки, правда вычисление представления из строки будет с той же скростью, что по индексу массива, т.к.
в обоих случаях это указатель на строку символов, согласно с++ на котором пашет платформа

(34) Да, в том варианте мне не нравится постоянное пересоздание массива.

согласен, криво сделал. создание массива нужно вынести из функции.
но мой код быстрее формата. на 100к итерациях 0.633138 против 0.872828

вариант (32) самый быстрый. 0.365601

(37) быстрее потому что указатель на строку создается без создания переменной массива

вот только если понадобится выводить день недели полностью то будет облом.

   мнстр = "пн
   |вт
   |ср
   |чт
   |пт
   |сб
   |вс";
   ДеньПосещения = СтрПолучитьСтроку(мнстр,ПорядковыйНомерДняНедели);

0.27

(39) не-а, взять максимальное представление и в более коротких в конце добить пробелы, затем тот же принцип

(40) мой последний код лишен этих недостатков ;)

(41) СтрПолучитьСтроку() я открыл для себя этот метод, он был всегда?

хоть какая-то польза от господина амадеуса)

(42) вроде давно уже 1с с многострочкой работает.

Линейку всем выдали?

небольшое уточнение я преобразую день недели из числа в строку используя этот код
Строка.ДеньПосещения =Перечисления.ДниПосещения[ДеньНеделиПрописью(СокрЛП(Лист.Cells(ПоСтрокам,4).Value))];

Но у нас в конфигурации день недели должен также попасть в регистр сведений закрепление за клиентом.Добавит ли этот код день недели в регистр?