Difference between revisions of "RU/kb/00000104"
From Wiki
Jump to navigationJump to search (RUcode) |
|||
(10 intermediate revisions by 3 users not shown) | |||
Line 1: | Line 1: | ||
− | {{DISPLAYTITLE:База Знаний: {{OOoC|1}}. Сумма прописью}} | + | <section begin=title /><noinclude>{{DISPLAYTITLE:База Знаний: {{OOoC|1}}. </noinclude>Сумма прописью<noinclude>}}</noinclude><section end=title /> |
− | + | {{BreadCrumbL10n|RU/kb/module/calc/automation_calculations}} | |
__NOTOC__ | __NOTOC__ | ||
Line 11: | Line 11: | ||
Для этого задействуется функция | Для этого задействуется функция | ||
− | + | <source lang="oobas"> | |
+ | InfraLinux.N2Scribe.Currency2Scribe(n) | ||
+ | </source> | ||
− | {{ | + | Пример создания пользовательской функции Calc<ref>Пользовательская функция Calc обязательно должна сохраняться в библиотеке Standard, независимо от выбора хранилища (документ, пользовательский профиль или системный профиль).</ref>: |
− | {{ | + | |
+ | <source lang="oobas"> | ||
+ | Function CalcCurr2Scribe(curr_value as Currency) as String | ||
+ | If (Not GlobalScope.BasicLibraries.isLibraryLoaded("InfraLinux")) Then GlobalScope.BasicLibraries.LoadLibrary("InfraLinux") | ||
+ | CalcCurr2Scribe = Currency2Scribe(curr_value) | ||
+ | End Function | ||
+ | </source> | ||
+ | |||
+ | После сохранения макроса, в Calc становится доступной функция: | ||
+ | <source lang="oobas"> | ||
+ | =CalcCurr2Scribe(123,45) | ||
+ | </source> | ||
+ | |||
+ | {{Sign|Sancho|А. Е. Харламенков}} | ||
+ | {{OOoProVersion|3.2.x}} | ||
{{RUkbCalcBottom}} | {{RUkbCalcBottom}} |
Latest revision as of 20:03, 18 September 2011
Возможность автоматического создания суммы прописью реализована в OpenOffice.org pro начиная с версии 3.2.
Обеспечивается корректное формирование и суммы прописью в рублях и просто — цифры прописью (можно использовать для вывода количества) для всего диапазона значений стандартного бухгалтерского калькулятора в 14 разрядов. Данная функция избавлена от распространённой ошибки накопления погрешности с увеличением разряда числа.
Для этого задействуется функция
InfraLinux.N2Scribe.Currency2Scribe(n)
Пример создания пользовательской функции Calc[1]:
Function CalcCurr2Scribe(curr_value as Currency) as String
If (Not GlobalScope.BasicLibraries.isLibraryLoaded("InfraLinux")) Then GlobalScope.BasicLibraries.LoadLibrary("InfraLinux")
CalcCurr2Scribe = Currency2Scribe(curr_value)
End Function
После сохранения макроса, в Calc становится доступной функция:
=CalcCurr2Scribe(123,45)
OpenOffice.org pro 3.2.x
- ↑ Пользовательская функция Calc обязательно должна сохраняться в библиотеке Standard, независимо от выбора хранилища (документ, пользовательский профиль или системный профиль).