powered by simpleCommunicator - 2.0.51     © 2025 Programmizd 02
Форумы / [игнор отключен] [закрыт для гостей] / Сумма прописью на другом языке?
15 сообщений из 15, страница 1 из 1
Сумма прописью на другом языке?
    #39039520
Ukraina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Приветствую, Форумчане!
Необходимо использовать сумму прописью на туркменском языке. Как я понял, в стандарты 1с не входит этот язык.

Как можно создать некую функцию, которая будет выдавать результат суммы прописью на туркменском языке?
...
Рейтинг: 0 / 0
Сумма прописью на другом языке?
    #39039527
Программист 1с
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
В описании к функции сумма прописью все написано. Как создать данный файл и формат. По-моему там просто через запятую перечисляем.
...
Рейтинг: 0 / 0
Сумма прописью на другом языке?
    #39039534
Ukraina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Программист 1сВ описании к функции сумма прописью все написано. Как создать данный файл и формат. По-моему там просто через запятую перечисляем.

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

On bäş müň iki ýüz kyrk sekiz manat 00 teňňe

На ВБА код довольно простой:

Код: sql
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
Function TurkmenProp$(c#)
Dim st$, tg$, ed, des, razr, i&, m$
If c > 999999999999# Or c < 0 Then Exit Function

ed = Array("", "bir ", "iki ", ChrW(252) & ChrW(231) & " ", "d" & ChrW(246) & "rt ", "b" & ChrW(228) & ChrW(351) & " ", "alty" & " ", ChrW(253) & "edi ", "sekiz ", "dokuz ")
des = Array("", "on ", ChrW(253) & "igrimi ", "otuz ", "kyrk ", "elli ", "altmy" & ChrW(351) & " ", ChrW(253) & "etmi" & ChrW(351) & " ", "segsen ", "togsan ")
razr = Array("milliard ", "million ", "m" & ChrW(252) & ChrW(328) & " ", "")

st = Left(Format(c, "000000000000.00"), 12)
tg = Right(Format(c, " 0.00"), 2)

If CDbl(st) = 0 Then m = "nol "
For i = 1 To Len(st) Step 3
    If Mid(st, i, 3) <> "000" Then
        m = m & IIf(Mid(st, i, 1) = "0", "", ed(CInt(Mid(st, i, 1))) & ChrW(253) & ChrW(252) & "z ")
        m = m & des(CInt(Mid(st, i + 1, 1))) & ed(CInt(Mid(st, i + 2, 1))) & razr((i - 1) \ 3)
    End If
Next i
TurkmenProp = UCase(Left(m, 1)) & Mid(m, 2) & "manat " & tg & " te" & ChrW(328) & ChrW(328) & "e"
End Function



Мож подскажите как можно его конвертнуть в язык 1с?
...
Рейтинг: 0 / 0
Сумма прописью на другом языке?
    #39039537
Программист 1с
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ЧислоПрописью(СуммаДокумента,, "Рубль, рублей, рубля, м, копейка, копейки, копеек, ж, 2");
...
Рейтинг: 0 / 0
Сумма прописью на другом языке?
    #39039538
Программист 1с
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Сорри - предыдущее не читайте.

// Пример форматной строки для вывода числа прописью на русском
// языке, с выводом целой и дробной части прописью и выводом
// предмета исчисления.
ФормСтрока = "Л = ru_RU; ДП = Истина";
ПарПредмета="доллар,доллара,долларов,м,цент,цента,центов,м,2";
ПрописьЧисла = ЧислоПрописью(2341.56, ФормСтрока, ПарПредмета);
// Результат вычисления: "Две тысячи триста сорок один доллар пятьдесят шесть центов"

https://helpf.pro/faq/view/126.html
...
Рейтинг: 0 / 0
Сумма прописью на другом языке?
    #39039546
Ukraina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Программист 1сСорри - предыдущее не читайте.

// Пример форматной строки для вывода числа прописью на русском
// языке, с выводом целой и дробной части прописью и выводом
// предмета исчисления.
ФормСтрока = "Л = ru_RU; ДП = Истина";
ПарПредмета="доллар,доллара,долларов,м,цент,цента,центов,м,2";
ПрописьЧисла = ЧислоПрописью(2341.56, ФормСтрока, ПарПредмета);
// Результат вычисления: "Две тысячи триста сорок один доллар пятьдесят шесть центов"

https://helpf.pro/faq/view/126.html

Я это понял, но суть вопроса есть такова: как получить сумму прописью на ТУРКМЕНСКОМ языке, а не нарусском...

On bäş müň iki ýüz kyrk sekiz manat 00 teňňe

Используя Ваш метод, я смогу добиться только

Пятьдесят три manat 34 teňňe

Но такое число в банке не примут
...
Рейтинг: 0 / 0
Сумма прописью на другом языке?
    #39039582
trew
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ukraina,

Справка в программе 1с

Глобальный контекст.ЧислоПрописью (Global context.NumberInWords)
Глобальный контекст (Global context)
ЧислоПрописью (NumberInWords)
Синтаксис:

ЧислоПрописью(<Число>, <ФорматнаяСтрока>, <ПараметрыПредметаИсчисления>)
Параметры:

<Число> (обязательный)

Тип: Число.
Число, которое необходимо преобразовать в строку прописью.
<ФорматнаяСтрока> (необязательный)

Тип: Строка.
Форматная строка представляет собой строковое значение, включающее параметры форматирования. Параметры форматирования перечисляются через символ ";" (точка с запятой). Если параметр не указывается, используется значение параметра по умолчанию.
Каждый параметр задается именем параметра, символом "=" (равно) и значением параметра. Значение параметра может указываться в одинарных или двойных кавычках. Это необходимо, если значение параметра содержит символы, используемые в синтаксисе форматной строки.
Л (L) - Код локализации. По умолчанию используется код локализации, установленный в операционной системе. Примеры кодов локализации: ru_RU - Русский (Россия); en_US - Английский (США).
НП (SN) - Включать/не включать название предмета исчисления (Булево), по умолчанию - Истина.
НД (FN) - Включать/не включать название десятичных частей предмета исчисления (Булево), по умолчанию - Истина.
ДП (FS) - Дробную часть выводить прописью/числом (Булево), по умолчанию - Ложь.
<ПараметрыПредметаИсчисления> (необязательный)

Тип: Строка.
Представляет собой строковое значение, определяющее параметры предмета исчисления. Параметры предмета исчисления перечисляются через "," (запятая). Формат строки зависит от кода локализации.
Для русского и белорусского языков (ru_RU, be_BY)
"рубль, рубля, рублей, м, копейка, копейки, копеек, ж, 2", где:
"рубль, рубля, рублей, м" – предмет исчисления:
рубль – единственное число именительный падеж,
рубля – единственное число родительный падеж,
рублей – множественное число родительный падеж,
м – мужской род (ж – женский род, с - средний род);
"копейка, копейки, копеек, ж" – дробная часть, аналогично предмету исчисления (может отсутствовать);
"2" – количество разрядов дробной части (может отсутствовать, по умолчанию равно 2).
Для украинского языка (uk_UA)
"гривна, гривны, гривен, м, копейка, копейки, копеек, ж, 2", где:
"гривна, гривны, гривен, м" – предмет исчисления:
"гривна – единственное число именительный падеж,
гривны – единственное число родительный падеж,
гривен – множественное число родительный падеж,
м – мужской род (ж – женский род, с - средний род);
"копейка, копейки, копеек, ж" – дробная часть, аналогично предмету исчисления (может отсутствовать);
"2" – количество разрядов дробной части (может отсутствовать, по умолчанию равно 2).
Для польского языка (pl_PL)
"złoty, złote, złotych, m, grosz, grosze, groszy, m, 2" где:
"złoty, złote, złotych, m " - предмет исчисления (m - мужской род, ż - женский род, ń - средний род, mo – личностный мужской род)
złoty - единственное число именительный падеж
złote - единственное число винительный падеж
złotych - множественное число винительный падеж
m - мужской род (ż - женский род, ń - средний род, mo – личностный мужской род)
"grosz, grosze, groszy, m " - дробная часть (может отсутствовать) (аналогично целой части)
2 - количество разрядов дробной части (может отсутствовать, по-умолчанию равно 2)
Пример:
Пропись = ЧислоПрописью(1832, “L=pl_PL;SN=true;FN=true;FS=true”, “złoty, złote, złotych, m, grosz, grosze, groszy, m, 2”);
Для английского, финского и казахского языков (en_US, fi_FI, kk_KZ)
"dollar, dollars, cent, cents, 2", где:
"dollar, dollars" – предмет исчисления в единственном и множественном числе;
"cent, cents" – дробная часть в единственном и множественном числе (может отсутствовать);
"2" – количество разрядов дробной части (может отсутствовать, по умолчанию равно 2).
Для немецкого языка (de_DE)
"EURO, EURO, М, Cent, Cent, M, 2", где:
"EURO, EURO, М" – предмет исчисления:
EURO, EURO – предмет исчисления в единственном и множественном числе;
М – мужской род (F – женский род, N - средний род);
"Cent, Cent, M" – дробная часть, аналогично предмету исчисления (может отсутствовать);
"2" – количество разрядов дробной части (может отсутствовать, по умолчанию равно 2).
Для латышского языка (lv_LV)
"lats, lati, latu, V, santīms, santīmi, santīmu, V, 2, J, J", где:
"lats, lati, latu, v" – предмет исчисления:
lats – для чисел заканчивающихся на 1, кроме 11
lati – для чисел заканчивающихся на 2-9 и 11
latu – множественное число (родительный падеж) используется после числительных 0, 10, 20,..., 90, 100, 200, ..., 1000, ..., 100000,
v – мужской род (s – женский род);
"santīms, santīmi, santīmu, V" – дробная часть, аналогично предмету исчисления (может отсутствовать);
"2" – количество разрядов дробной части (может отсутствовать, по умолчанию равно 2);
"J" - число 100 выводится как "Одна сотня" для предмета исчисления (N - как "Сто"),
может отсутствовать, по умолчанию равно "J";
"J" - число 100 выводится как "Одна сотня" для дробной части (N - как "Сто"),
может отсутствовать, по умолчанию равно "J".
Для литовского языка (lt_LT)
"litas, litai, litų, М, centas, centai, centų, М, 2", где:
"litas, litai, litų, М" – предмет исчисления:
litas - единственное число целой части,
litai - множественное число целой части от 2 до 9,
litų - множественное число целой части прочие,
m - род целой части (f - женский род),
"centas, centai, centų, М" – дробная часть, аналогично предмету исчисления (может отсутствовать);
"2" - количество разрядов дробной части (может отсутствовать, по умолчанию равно 2).
Для эстонского языка (et_EE)
"kroon, krooni, sent, senti, 2", где:
"kroon, krooni" – – предмет исчисления в единственном и множественном числе;
"sent, senti" – дробная часть в единственном и множественном числе (может отсутствовать);
2 – количество разрядов дробной части (может отсутствовать, по умолчанию равно 2).
Для болгарского языка (bg_BG)
"лев, лева, м, стотинка, стотинки, ж, 2", где:
"лев, лева, м" – предмет исчисления:
лев - единственное число целой части,
лева - множественное число целой части,
м - род целой части,
"стотинка, стотинки, ж" - дробная часть:
стотинка - единственное число дробной части,
стотинки - множественное число дробной части,
ж - род дробной части,
"2" - количество разрядов дробной части.
Для румынского языка (ro_RO)
"leu, lei, M, ban, bani, W, 2"
"leu, lei, M" – предмет исчисления:
leu - единственное число целой части,
lei - множественное число целой части,
M - род целой части,
"ban, bani, W" - дробная часть:
ban - единственное число дробной части,
bani - множественное число дробной части,
W - род дробной части,
"2" - количество разрядов дробной части.
Для грузинского языка (ka_GE)
"ლარი, თეთრი, 2"
ლარი - целая часть
თეთრი - дробная часть
"2" - количество разрядов дробной части.
Для вьетнамского языка (vi_VN)
"dong, xu, 2"
dong, - целая часть
xu, - дробная часть
2 - количество разрядов дробной части.
Для турецкого языка (tr_TR)
"TL,Kr,2,Separate", где:
TL - целая часть;
Kr - дробная часть (может отсутствовать);
2 - количество разрядов дробной части (может отсутсвовать, значение по-умолчанию - 2);
"Separate" - признак написания прописи раздельно, "Solid" - слитно (может отсутствовать, по умолчанию слитно).

Значение по умолчанию: Пустая строка
Возвращаемое значение:

Тип: Строка.
Представление числа прописью.
Описание:

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

Доступность:

Тонкий клиент, веб-клиент, сервер, толстый клиент, внешнее соединение.
Примечание:

Если задан режим совместимости НеИспользовать, то по умолчанию использует код локализации, заданный для сеанса (параметром VL), аналогично форматированию числа и даты.
Пример:

// Пример форматной строки для вывода числа прописью на русском
// языке, с выводом целой и дробной части прописью и выводом
// предмета исчисления.
ФормСтрока = "Л = ru_RU; ДП = Истина";
ПарПредмета="доллар,доллара,долларов,м,цент,цента,центов,м,2";
ПрописьЧисла = ЧислоПрописью(2341.56, ФормСтрока, ПарПредмета);

// Результат вычисления:
// "Две тысячи триста сорок один доллар пятьдесят шесть центов"
...
Рейтинг: 0 / 0
Сумма прописью на другом языке?
    #39039626
Ukraina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Люди, я тоже это понял, но туркменской локализации вроде нету... Я не нашел, хотя возможно не там ищу...

ru_RU - Русский (Россия); en_US - Английский (США).

Это то понятно, но нету, например tm_TM...
...
Рейтинг: 0 / 0
Сумма прописью на другом языке?
    #39039634
trew
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ukraina,

В ОС (региональные установки) какой язык установлен?
...
Рейтинг: 0 / 0
Сумма прописью на другом языке?
    #39039639
slavik1c
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
пиши свою функцию, разбирай число, формируй строку
...
Рейтинг: 0 / 0
Сумма прописью на другом языке?
    #39039640
Ukraina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
trewUkraina,

В ОС (региональные установки) какой язык установлен?

Русский, везде...
...
Рейтинг: 0 / 0
Сумма прописью на другом языке?
    #39039644
trew
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
UkrainatrewUkraina,

В ОС (региональные установки) какой язык установлен?

Русский, везде...

18089894
...
Рейтинг: 0 / 0
Сумма прописью на другом языке?
    #39039703
Ukraina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
trewUkrainaпропущено...


Русский, везде...

18089894

af Африкаанс
af_NA (af_NA) Африкаанс (Намибия)
af_ZA Африкаанс (Южная Африка)
am Амхарский
am_ET Амхарский (Эфиопия)
ar Арабский
ar_AE Арабский (Объединенные Арабские Эмираты)
ar_BH Арабский (Бахрейн)
ar_DZ Арабский (Алжир)
ar_EG Арабский (Египет)
ar_IQ Арабский (Ирак)
ar_JO Арабский (Иордания)
ar_KW Арабский (Кувейт)
ar_LB Арабский (Ливан)
ar_LY Арабский (Ливия)
ar_MA Арабский (Марокко)
ar_OM Арабский (Оман)
ar_QA Арабский (Катар)
ar_SA Арабский (Саудовская Аравия)
ar_SD Арабский (Судан)
ar_SY Арабский (Сирия)
ar_TN Арабский (Тунис)
ar_YE Арабский (Йемен)
as Ассамский
as_IN Ассамский (Индия)
az Азербайджанский
az_AZ Азербайджанский (Азербайджан)
az_Cyrl Азербайджанский (Кириллица)
az_Cyrl_AZ Азербайджанский (Кириллица, Азербайджан)
az_Latn Азербайджанский (Латиница)
az_Latn_AZ Азербайджанский (Латиница, Азербайджан)
be Белорусский
be_BY Белорусский (Беларусь)
bg Болгарский
bg_BG Болгарский (Болгария)
bn Бенгальский
bn_IN Бенгальский (Индия)
ca Каталанский
ca_ES Каталанский (Испания)
cs Чешский
cs_CZ Чешский (Чешская Республика)
cy Валлийский
cy_GB Валлийский (Великобритания)
da Датский
da_DK Датский (Дания)
de Немецкий
de_AT Немецкий (Австрия)
de_BE Немецкий (Бельгия)
de_CH Немецкий (Швейцария)
de_DE Немецкий (Германия)
de_LI (de_LI) Немецкий (Лихтенштейн)
de_LU Немецкий (Люксембург)
el Греческий
el_CY (el_CY) Греческий (Кипр)
el_GR Греческий (Греция)
en Английский
en_AU Английский (Австралия)
en_BE Английский (Бельгия)
en_BW Английский (Ботсвана)
en_BZ (en_BZ) Английский (Белиз)
en_CA Английский (Канада)
en_GB Английский (Великобритания)
en_HK Английский (Гонконг, (Область с Особым Административным Управлением, Китай))
en_IE Английский (Ирландия)
en_IN Английский (Индия)
en_JM (en_JM) Английский (Ямайка)
en_MH (en_MH) Английский (Маршалловы Острова)
en_MT Английский (Мальта)
en_NA (en_NA) Английский (Намибия)
en_NZ Английский (Новая Зеландия)
en_PH Английский (Филиппины)
en_PK Английский (Пакистан)
en_SG Английский (Сингапур)
en_TT (en_TT) Английский (Тринидад и Тобаго)
en_US Английский (Соединенные Штаты Америки)
en_VI Английский (Американские Виргинские Острова)
en_ZA Английский (Южная Африка)
en_ZW Английский (Зимбабве)
es Испанский
es_AR Испанский (Аргентина)
es_BO Испанский (Боливия)
es_CL Испанский (Чили)
es_CO Испанский (Колумбия)
es_CR Испанский (Коста-Рика)
es_DO Испанский (Доминиканская Республика )
es_EC Испанский (Эквадор)
es_ES Испанский (Испания)
es_GT Испанский (Гватемала)
es_HN Испанский (Гондурас)
es_MX Испанский (Мексика)
es_NI Испанский (Никарагуа)
es_PA Испанский (Панама)
es_PE Испанский (Перу)
es_PR Испанский (Пуэрто-Рико)
es_PY Испанский (Парагвай)
es_SV Испанский (Сальвадор)
es_US Испанский (Соединенные Штаты Америки)
es_UY Испанский (Уругвай)
es_VE Испанский (Венесуэлла)
et Эстонский
et_EE Эстонский (Эстония)
eu Баскский
eu_ES Баскский (Испания)
fa Персидский
fa_AF Персидский (Афганистан)
fa_IR Персидский (Иран)
fi Финский
fi_FI Финский (Финляндия)
fo Фарерский
fo_FO Фарерский (Фарерские острова)
fr Французский
fr_BE Французский (Бельгия)
fr_CA Французский (Канада)
fr_CH Французский (Швейцария)
fr_FR Французский (Франция)
fr_LU Французский (Люксембург)
fr_MC (fr_MC) Французский (Монако)
fr_SN (fr_SN) Французский (Сенегал)
ga Ирландский
ga_IE Ирландский (Ирландия)
gl Галисийский
gl_ES, Галисийский (Испания)
gu Гуярати
gu_IN Гуярати (Индия)
he Иврит
he_IL Иврит (Израиль)
hi Хинди
hi_IN Хинди (Индия)
hr Хорватский
hr_HR Хорватский (Хорватия)
hu Венгерский
hu_HU Венгерский (Венгрия)
hy Армянский
hy_AM Армянский (Армения)
hy_AM_REVISED Армянский (Армения, REVISED)
id Индонезийский
id_ID Индонезийский (Индонезия)
is Исландский
is_IS Исландский (Исландия)
it Итальянский
it_CH, Итальянский (Швейцария)
it_IT Итальянский (Италия)
ja Японский
ja_JP Японский (Япония)
ka Грузинский
ka_GE Грузинский (Грузия)
kk Казахский
kk_KZ Казахский (Казахстан)
kl Гренландский
kl_GL Гренландский (Гренландия)
kn Каннада
kn_IN Каннада (Индия)
ko Корейский
ko_KR Корейский (Южная Корея)
kok Конкани
kok_IN Конкани (Индия)
lt Литовский
lt_LT Литовский (Литва)
lv Латышский
lv_LV Латышский (Латвия)
mk Македонский
mk_MK Македонский (Македония)
ml Малаялам
ml_IN Малаялам (Индия)
mr Маратийский
mr_IN Маратийский (Индия)
ms Малайский
ms_BN Малайский (Бруней)
ms_MY Малайский (Малайзия)
mt Мальтийский
mt_MT Мальтийский (Мальта)
nb Норвежский букмол
nb_NO Норвежский букмол (Норвегия)
nl Голландский
nl_BE Голландский (Бельгия)
nl_NL Голландский (Нидерланды)
nn Норвежский нюнорск
nn_NO Норвежский нюнорск (Норвегия)
om Оромо (Афан)
om_ET Оромо (Афан) (Эфиопия)
om_KE Оромо (Афан) (Кения)
or Ория
or_IN Ория (Индия)
pa Панджабский
pa_IN Панджабский (Индия)
pl Польский
pl_PL Польский (Польша)
ps Пашто (Пушто)
ps_AF Пашто (Пушто) (Афганистан)
pt Португальский
pt_BR Португальский (Бразилия)
pt_PT Португальский (Португалия)
ro Румынский
ro_RO Румынский (Румыния)
ru Русский
ru_RU Русский (Россия)
ru_UA Русский (Украина)
sk Словацкий
sk_SK Словацкий (Словакия)
sl Словенский
sl_SI Словенский (Словения)
so Сомали
so_DJ Сомали (Джибути)
so_ET Сомали (Эфиопия)
so_KE Сомали (Кения)
so_SO Сомали (Сомали)
sq Албанский
sq_AL Албанский (Албания)
sr Сербский
sr_BA (sr_BA) Сербский (Босния и Герцеговина)
sr_CS Сербский (Сербия и Черногория)
sr_Cyrl Сербский (Кириллица)
sr_Cyrl_BA (sr_Cyrl_BA) Сербский (Кириллица, Босния и Герцеговина)
sr_Cyrl_CS Сербский (Кириллица, Сербия и Черногория)
sr_Cyrl_ME (sr_Cyrl_ME) Сербский (Кириллица, Черногория)
sr_Cyrl_RS (sr_Cyrl_RS) Сербский (Кириллица, Сербия)
sr_Latn Сербский (Латиница)
sr_Latn_BA (sr_Latn_BA) Сербский (Латиница, Босния и Герцеговина)
sr_Latn_CS Сербский (Латиница, Сербия и Черногория)
sr_Latn_ME (sr_Latn_ME) Сербский (Латиница, Черногория)
sr_Latn_RS (sr_Latn_RS) Сербский (Латиница, Сербия)
sr_ME (sr_ME) Сербский (Черногория)
sr_RS (sr_RS) Сербский (Сербия)
sv Шведский
sv_FI Шведский (Финляндия)
sv_SE Шведский (Швеция)
sw Суахили
sw_KE Суахили (Суахили)
sw_TZ Суахили (Танзания)
ta Тамильский
ta_IN Тамильский (Индия)
te Телугу
te_IN Телугу (Индия)
th Тайский
th_TH Тайский (Таиланд)
ti Тигриниа
ti_ER Тигриниа (Эритрея)
ti_ET Тигриниа (Эфиопия)
tr Турецкий
tr_TR Турецкий (Турция)
uk Украинский
uk_UA Украинский (Украина)
ur Урду
ur_PK Урду (Пакистан)
uz Узбекский
uz_Cyrl Узбекский (Кириллица)
uz_Cyrl_UZ Узбекский (Кириллица, Узбекистан)
uz_Latn Узбекский (Латиница)
uz_Latn_UZ Узбекский (Латиница, Узбекистан)
uz_UZ Узбекский (Узбекистан)
vi Вьетнамский
vi_VN Вьетнамский (Вьетнам)
zh Китайский
zh_CN Китайский (Китай)
zh_Hans Китайский (Hans)
zh_Hans_CN Китайский (Hans, Китай)
zh_Hans_SG Китайский (Hans, Сингапур)
zh_Hant Китайский (Hant)
zh_Hant_HK Китайский (Hant, Гонконг (Область с Особым Административным Управлением, Китай))
zh_Hant_MO Китайский (Hant, Макао (Область с Особым Административным Управлением, Китай))
zh_Hant_TW Китайский (Hant, Тайвань)
zh_HK Китайский (Гонконг (Область с Особым Административным Управлением, Китай))
zh_MO Китайский (Макао (Область с Особым Административным Управлением, Китай))
zh_SG Китайский (Сингапур)
zh_TW Китайский (Тайвань)


Если в этом списке найдете туркменскую локализацию, то тогда соглашусь с вашими ответами...

Вот изобрел велосипед и создал код на базе кода ВБА. Прошу просмотрите на предмет подводных камней. А также, куда этот код вставить, чтобы к нему обращаться из разных документов:

Код: sql
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
39.
40.
41.
42.
43.
44.
45.
46.
Ед = Новый Массив(10);
Ед[0] = "";
Ед[1] = "bir ";
Ед[2] = "iki ";
Ед[3] = "&#252;&#231; ";
Ед[4] = "d&#246;rt ";
Ед[5] = "b&#228;&#351; ";
Ед[6] = "alty ";
Ед[7] = "&#253;edi ";
Ед[8] = "sekiz ";
Ед[9] = "dokuz ";

Дес = Новый Массив(10);
Дес[0] = "";
Дес[1] = "on ";
Дес[2] = "&#253;igrimi ";
Дес[3] = "otuz ";
Дес[4] = "kyrk ";
Дес[5] = "elli ";
Дес[6] = "altmy&#351; ";
Дес[7] = "&#253;etmi&#351; ";
Дес[8] = "segsen ";
Дес[9] = "togsan ";

Разр = Новый Массив(4);
Разр[0]= "milliard ";
Разр[1]= "million ";
Разр[2]= "m&#252;&#328; ";
Разр[3]= "";

м="";
ст = Формат(Цел(Сумма), "ЧГ=0; ЧЦ=12; ЧВН=");
тг = ?((Сумма - Цел(Сумма))*100=0,"00", Формат((Сумма - Цел(Сумма))*100,"ЧГ=0; ЧЦ=2; ЧВН="));

Для цик = 1 По СтрДлина(ст) Цикл 
	Если Сред(ст,цик,3) <> "000"  Тогда
		 м = "" + м + ?(Сред(ст,цик,1)="0", "", Ед[Число(Сред(ст,цик,1))] + "&#253;&#252;z ");
		 м = "" + м + Дес[Число(Сред(ст,цик+1,1))] + Ед[Число(Сред(ст,цик+2,1))] + Разр[Цел((цик - 1)/3)];  
	КонецЕсли; 
	цик = цик + 2; 
КонецЦикла;


м = ВРег(Лев(м, 1)) + Сред(м, 2);

Возврат м + "manat " + тг + " te&#328;&#328;e";

...
Рейтинг: 0 / 0
Сумма прописью на другом языке?
    #39039801
Vladimir779
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ukraina,
держи, вот уже 8-ой год пользуюсь, сам разработывал
=======================================================================

// ФУНКЦИЯ СУММА ПРОПИСЬЮ НА ТУРКМЕНСКОМ
Функция СуммаПрописьюТуркм(Число) Экспорт

Строка = "'"+Формат(Число, "ЧЦ=14; ЧВН=; ЧГ=0; ЧДЦ=2");

Результат =
Сред(Строка, 2,1)+","+Сред(Строка, 3,1)+",,"+Сред(Строка, 4,1)+",,,,,,"+
Сред(Строка, 5,1)+","+Сред(Строка, 6,1)+",,"+Сред(Строка, 7,1)+",,,,,"+
Сред(Строка, 8,1)+","+Сред(Строка, 9,1)+",,"+Сред(Строка,10,1)+",,,,"+
Сред(Строка,11,1)+","+Сред(Строка,12,1)+",,"+Сред(Строка,13,1)+",,,"+
"."+Сред(Строка,15,1)+Сред(Строка,16,1)+"x";

// t(v) - munler; m(Z) - milionlar; M(W) - miliadlar;
Результат = СтрЗаменить( Результат, ",,,,,,", "BW");
Результат = СтрЗаменить( Результат, ",,,,,", "BZ");
Результат = СтрЗаменить( Результат, ",,,,", "Bv");

// e(B) - birlikler; d(H) - onluklar; c(Y) - yuzler;
Результат = СтрЗаменить( Результат, ",,,", "B");
Результат = СтрЗаменить( Результат, ",,", "H");
Результат = СтрЗаменить( Результат, ",", "Y");

//
Результат = СтрЗаменить( Результат, "0Y0H0Bv", "");
Результат = СтрЗаменить( Результат, "0Y0H0BZ", "");
Результат = СтрЗаменить( Результат, "0Y0H0BW", "");

//
Результат = СтрЗаменить( Результат, "0Y", "");
Результат = СтрЗаменить( Результат, "1Y", "bir ýüz ");
Результат = СтрЗаменить( Результат, "2Y", "iki ýüz ");
Результат = СтрЗаменить( Результат, "3Y", "üç ýüz ");
Результат = СтрЗаменить( Результат, "4Y", "dört ýüz ");
Результат = СтрЗаменить( Результат, "5Y", "bäş ýüz ");
Результат = СтрЗаменить( Результат, "6Y", "alty ýüz ");
Результат = СтрЗаменить( Результат, "7Y", "yedi ýüz ");
Результат = СтрЗаменить( Результат, "8Y", "sekiz ýüz ");
Результат = СтрЗаменить( Результат, "9Y", "dokuz ýüz ");
//
Результат = СтрЗаменить( Результат, "1H0B", "on ");
Результат = СтрЗаменить( Результат, "1H1B", "on bir ");
Результат = СтрЗаменить( Результат, "1H2B", "on iki ");
Результат = СтрЗаменить( Результат, "1H3B", "on üç ");
Результат = СтрЗаменить( Результат, "1H4B", "on dört ");
Результат = СтрЗаменить( Результат, "1H5B", "on bäş ");
Результат = СтрЗаменить( Результат, "1H6B", "on alty ");
Результат = СтрЗаменить( Результат, "1H7B", "on ýedi ");
Результат = СтрЗаменить( Результат, "1H8B", "on sekiz ");
Результат = СтрЗаменить( Результат, "1H9B", "on dokuz ");
//
Результат = СтрЗаменить( Результат, "0H", "");
Результат = СтрЗаменить( Результат, "2H", "ýigrimi ");
Результат = СтрЗаменить( Результат, "3H", "otuz ");
Результат = СтрЗаменить( Результат, "4H", "kyrk ");
Результат = СтрЗаменить( Результат, "5H", "elli ");
Результат = СтрЗаменить( Результат, "6H", "altmyş ");
Результат = СтрЗаменить( Результат, "7H", "ýetmiş ");
Результат = СтрЗаменить( Результат, "8H", "segsen ");
Результат = СтрЗаменить( Результат, "9H", "togsan ");
//
Результат = СтрЗаменить( Результат, "0B", "");
Результат = СтрЗаменить( Результат, "5B", "bäş ");
Результат = СтрЗаменить( Результат, "6B", "alty ");
Результат = СтрЗаменить( Результат, "7B", "ýedi ");
Результат = СтрЗаменить( Результат, "8B", "sekiz ");
Результат = СтрЗаменить( Результат, "9B", "dokuz ");
//
Результат = СтрЗаменить( Результат, "1B.", "bir manat ");
Результат = СтрЗаменить( Результат, "2B.", "iki manat ");
Результат = СтрЗаменить( Результат, "3B.", "üç manat ");
Результат = СтрЗаменить( Результат, "4B.", "dört manat ");
Результат = СтрЗаменить( Результат, "1Bv", "bir müň ");
Результат = СтрЗаменить( Результат, "2Bv", "iki müň ");
Результат = СтрЗаменить( Результат, "3Bv", "üç müň ");
Результат = СтрЗаменить( Результат, "4Bv", "dört müň ");
Результат = СтрЗаменить( Результат, "1BZ", "bir million ");
Результат = СтрЗаменить( Результат, "2BZ", "iki million ");
Результат = СтрЗаменить( Результат, "3BZ", "üç million ");
Результат = СтрЗаменить( Результат, "4BZ", "dört million ");
Результат = СтрЗаменить( Результат, "1BW", "bir milliard ");
Результат = СтрЗаменить( Результат, "2BW", "iki milliard ");
Результат = СтрЗаменить( Результат, "3BW", "üç milliard ");
Результат = СтрЗаменить( Результат, "4BW", "dort milliard ");
//
Результат = СтрЗаменить( Результат, "11x", "11 teňňe");
Результат = СтрЗаменить( Результат, "12x", "12 teňňe");
Результат = СтрЗаменить( Результат, "13x", "13 teňňe");
Результат = СтрЗаменить( Результат, "14x", "14 teňňe");
Результат = СтрЗаменить( Результат, "1x", "1 teňňe");
Результат = СтрЗаменить( Результат, "2x", "2 teňňe");
Результат = СтрЗаменить( Результат, "3x", "3 teňňe");
Результат = СтрЗаменить( Результат, "4x", "4 teňňe");
//
Результат = СтрЗаменить( Результат, ".", "manat ");
Результат = СтрЗаменить( Результат, "v", "müň ");
Результат = СтрЗаменить( Результат, "Z", "million ");
Результат = СтрЗаменить( Результат, "W", "milliard ");
Результат = СтрЗаменить( Результат, "x", " teňňe ");

Возврат(ВРег(Лев(Результат,1))+Сред(Результат,2,1000));

КонецФункции //СуммаПрописьюТуркм(Число)

=======================================================================
...
Рейтинг: 0 / 0
Сумма прописью на другом языке?
    #39039804
Vladimir779
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ukraina,

составлена из функции написанной на Oracle и адаптировано по 1С

Тынц!
...
Рейтинг: 0 / 0
15 сообщений из 15, страница 1 из 1
Форумы / [игнор отключен] [закрыт для гостей] / Сумма прописью на другом языке?
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]