Difference between revisions of "RU/kb/00000105"
From Wiki
Jump to navigationJump to search (Корректировка кода) |
|||
| (4 intermediate revisions by 2 users not shown) | |||
| Line 11: | Line 11: | ||
Для этого задействуются функции | Для этого задействуются функции | ||
| − | + | <source lang="oobas"> | |
| + | InfraLinux.N2Scribe.Long2Scribe(n) | ||
| + | </source> | ||
* преобразует действительное число к виду: **** **** ***** | * преобразует действительное число к виду: **** **** ***** | ||
| − | + | <source lang="oobas"> | |
| + | InfraLinux.N2Scribe.Number2Scribe(n) | ||
| + | </source> | ||
* преобразует действительное число к виду: **** **** целых **** **** сотых | * преобразует действительное число к виду: **** **** целых **** **** сотых | ||
| Line 21: | Line 25: | ||
Пример создания пользовательской функции Calc<ref>Пользовательская функция Calc обязательно должна сохраняться в библиотеке Standard, независимо от выбора хранилища (документ, пользовательский профиль или системный профиль).</ref>: | Пример создания пользовательской функции Calc<ref>Пользовательская функция Calc обязательно должна сохраняться в библиотеке Standard, независимо от выбора хранилища (документ, пользовательский профиль или системный профиль).</ref>: | ||
| − | <source lang=" | + | <source lang="oobas"> |
Function CalcNum2Scribe(num_value as Single) as String | Function CalcNum2Scribe(num_value as Single) 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 30: | Line 34: | ||
После сохранения макроса, в Calc становится доступной функция: | После сохранения макроса, в Calc становится доступной функция: | ||
| − | + | <source lang="oobas"> | |
| + | =CalcNum2Scribe(123567657,4556) | ||
| + | </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.Long2Scribe(n)- преобразует действительное число к виду: **** **** *****
InfraLinux.N2Scribe.Number2Scribe(n)- преобразует действительное число к виду: **** **** целых **** **** сотых
Пример создания пользовательской функции Calc[1]:
Function CalcNum2Scribe(num_value as Single) as String
If (Not GlobalScope.BasicLibraries.isLibraryLoaded("InfraLinux")) Then GlobalScope.BasicLibraries.LoadLibrary("InfraLinux")
CalcNum2Scribe = Number2Scribe(num_value)
End FunctionПосле сохранения макроса, в Calc становится доступной функция:
=CalcNum2Scribe(123567657,4556)
OpenOffice.org pro 3.2.x
- ↑ Пользовательская функция Calc обязательно должна сохраняться в библиотеке Standard, независимо от выбора хранилища (документ, пользовательский профиль или системный профиль).
