Difference between revisions of "RU/kb/00000104"
From Wiki
Jump to navigationJump to search (Корректировка кода) |
(-RUcode) |
||
| Line 11: | Line 11: | ||
Для этого задействуется функция | Для этого задействуется функция | ||
| − | + | <source lang="oobas"> | |
| + | InfraLinux.N2Scribe.Currency2Scribe(n) | ||
| + | </source> | ||
Пример создания пользовательской функции Calc<ref>Пользовательская функция Calc обязательно должна сохраняться в библиотеке Standard, независимо от выбора хранилища (документ, пользовательский профиль или системный профиль).</ref>: | Пример создания пользовательской функции Calc<ref>Пользовательская функция Calc обязательно должна сохраняться в библиотеке Standard, независимо от выбора хранилища (документ, пользовательский профиль или системный профиль).</ref>: | ||
| − | <source lang=" | + | <source lang="oobas"> |
Function CalcCurr2Scribe(curr_value as Currency) as String | Function CalcCurr2Scribe(curr_value as Currency) as String | ||
If (Not GlobalScope.BasicLibraries.isLibraryLoaded("InfraLinux")) Then GlobalScope.BasicLibraries.LoadLibrary("InfraLinux") | If (Not GlobalScope.BasicLibraries.isLibraryLoaded("InfraLinux")) Then GlobalScope.BasicLibraries.LoadLibrary("InfraLinux") | ||
| Line 24: | Line 26: | ||
После сохранения макроса, в Calc становится доступной функция: | После сохранения макроса, в Calc становится доступной функция: | ||
| − | + | <source lang="oobas"> | |
| + | =CalcCurr2Scribe(123,45) | ||
| + | </source> | ||
{{RUsign|Sancho|А. Е. Харламенков}} | {{RUsign|Sancho|А. Е. Харламенков}} | ||
{{RUoooproversion|3.2.x}} | {{RUoooproversion|3.2.x}} | ||
{{RUkbCalcBottom}} | {{RUkbCalcBottom}} | ||
Revision as of 08:44, 30 April 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)Template:RUsign Template:RUoooproversion
- ↑ Пользовательская функция Calc обязательно должна сохраняться в библиотеке Standard, независимо от выбора хранилища (документ, пользовательский профиль или системный профиль).
