Difference between revisions of "RU/kb/00000104"

From Apache OpenOffice Wiki
< RU‎ | kb
Jump to: navigation, search
(section begin=title)
(-RUcode)
 
(5 intermediate revisions by 2 users not shown)
Line 1: Line 1:
<section begin=title /><noinclude>{{DISPLAYTITLE:База Знаний: </noinclude>{{OOoC|1}}. Сумма прописью<noinclude>}}</noinclude><section end=title />
+
<section begin=title /><noinclude>{{DISPLAYTITLE:База Знаний: {{OOoC|1}}. </noinclude>Сумма прописью<noinclude>}}</noinclude><section end=title />
{{SecTitle|RU/kb/module/calc/automation_calculations}}
+
{{BreadCrumbL10n|RU/kb/module/calc/automation_calculations}}
 
__NOTOC__
 
__NOTOC__
  
Line 11: Line 11:
  
 
Для этого задействуется функция
 
Для этого задействуется функция
{{RUcode|40|InfraLinux.N2Scribe.Currency2Scribe(n)}}
+
<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>
  
 
{{RUsign|Sancho|А. Е. Харламенков}}
 
{{RUsign|Sancho|А. Е. Харламенков}}
 
{{RUoooproversion|3.2.x}}
 
{{RUoooproversion|3.2.x}}
 
{{RUkbCalcBottom}}
 
{{RUkbCalcBottom}}

Latest 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)



OpenOffice.org pro 3.2.x




  1. Пользовательская функция Calc обязательно должна сохраняться в библиотеке Standard, независимо от выбора хранилища (документ, пользовательский профиль или системный профиль).


Personal tools