Дата на англоязычном языке

[_max_]

Добрый день уважаемые! Я только учусь программировать 1с 7.7. У меня такой вопрос как можно преобразовать дату в таблице в формате апрель 2013г на april 2013г. Подскажите пожайлуста, желательно с пояснениями...

[dimalf]

Добрый день!

1. Конфигуратор. Сервис - Параметры. Закладка Синтаксис-Помощник. Поставьте галочку "Использовать оба языка".

2. Попробуйте программно. Если Месяц = "апрель" Тогда
                        Месяц = "april";
                       КонецЕсли;

[_max_]

Функция АнглДата(Дат)
Мес=ДатаМесяц(Дат);
Англ="";
Если Мес=1 Тогда
Англ="January"
ИначеЕсли Мес=2 Тогда
Англ="February"
ИначеЕсли Мес=3 Тогда
   Анг =" March" ;
ИначеЕсли Мес=4 Тогда
   Анг =" April" ;
ИначеЕсли Мес=5 Тогда
   Анг =" May" ;
ИначеЕсли Мес=6 Тогда
   Анг =" June" ;
ИначеЕсли Мес=7 Тогда
   Анг =" July" ;   
ИначеЕсли Мес=8 Тогда
   Анг =" August" ;
ИначеЕсли Мес=9 Тогда
   Анг =" September" ;
ИначеЕсли Мес=10 Тогда
   Анг =" October" ;   
ИначеЕсли Мес=11 Тогда
   Анг =" November" ;   
ИначеЕсли Мес=12 Тогда
   Анг =" December" ;      
КонецЕсли;
Возврат (Англ+" "+ДатаГод(Дат));
КонецФункции
Типо того получается, а как теперь добавить в таблицу чтобы там там дата выводилась?

[Dethmontt]

Код Выделить Развернуть

ДатаАнгл = Формат(Дат,"Л=en; ДЛФ=DD");

Добавлено: 08 авг 2013, 00:05

Правой кнопкой мыши - конструктор форматной строки!

[_max_]

Код Выделить Развернуть

ДатаАнгл = Формат(Дат,"Л=en; ДЛФ=DD");

Добавлено: 08 авг 2013, 00:05

Правой кнопкой мыши - конструктор форматной строки!

Я так понимаю это доступно только в 1С 8, а у меня 1С 7.7

[mixqn]

Я так понимаю это доступно только в 1С 8, а у меня 1С 7.7

тогда почему тема в разделе "Конфигурирование, программирование в "1С - Предприятие 8""?
переношу...

[_max_]

Что нету не у кого вариантов? А Пропись(КаталогИБ() + "Months.spl"); такой метод кто может объяснить! Как его задействовать правильно...
Months.spl:
{"Speller",
{"Money",
{"Рубль","Рубля","Рублей","Копейка","Копейки","Копеек","M"}},
{"Numbers",
{"Один","Два","Три","Четыре","Пять","Шесть","Семь","Восемь","Девять","Одна","Две",
"Десять","Одиннадцать","Двенадцать","Тринадцать","Четырнадцать","Пятнадцать","Шестнадцать","Семнадцать","Восемнадцать","Девятнадцать",
"Двадцать","Тридцать","Сорок","Пятьдесят","Шестьдесят","Семьдесят","Восемьдесят","Девяносто",
"Сто","Двести","Триста","Четыреста","Пятьсот","Шестьсот","Семьсот","Восемьсот","Девятьсот",
"Тысяча","Тысячи","Тысяч",
"Миллион","Миллиона","Миллионов",
"Миллиард","Миллиарда","Миллиардов",
"Триллион","Триллиона","Триллионов",
"Ноль"}},
{"Date",
{"January","February","March","April","May","June","July","August","September","October","November","December",
"Января","Февраля","Марта","Апреля","Мая","Июня","Июля","Августа","Сентября","Октября","Ноября","Декабря",
"г.","Квартал"}},
{"DateRange",
{"Полугодие","Месяцев"}},
{"WeekDay",
{"Понедельник","Вторник","Среда","Четверг","Пятница","Суббота","Воскресенье"}}
}
-----------------------------------------------------------------------------------------

Добавлено: 08 авг 2013, 09:43

Вроде разобрался

Пропись("Months.spl");
Таб.ДобавитьСекцию("Дата");
Пропись("");

Правда может и коряво но зато работает!