Difference between revisions of "RU/kb/00000104"

From Wiki
Jump to navigationJump to search
m (sub -> function)
 
(6 intermediate revisions by 3 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 />
 
{{BreadCrumbL10n|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>:
 
Пример создания пользовательской функции Calc<ref>Пользовательская функция Calc обязательно должна сохраняться в библиотеке Standard, независимо от выбора хранилища (документ, пользовательский профиль или системный профиль).</ref>:
  
<source lang="vb">
+
<source lang="oobas">
 
Function CalcCurr2Scribe(curr_value as Currency) as String
 
Function CalcCurr2Scribe(curr_value as Currency) as String
   GlobalScope.BasicLibraries.LoadLibrary("InfraLinux")
+
   If (Not GlobalScope.BasicLibraries.isLibraryLoaded("InfraLinux")) Then GlobalScope.BasicLibraries.LoadLibrary("InfraLinux")
 
 
 
   CalcCurr2Scribe = Currency2Scribe(curr_value)
 
   CalcCurr2Scribe = Currency2Scribe(curr_value)
 
End Function
 
End Function
Line 25: Line 26:
  
 
После сохранения макроса, в Calc становится доступной функция:
 
После сохранения макроса, в Calc становится доступной функция:
{{RUcode|40|{{=}}CalcCurr2Scribe(123,45)}}
+
<source lang="oobas">
 +
=CalcCurr2Scribe(123,45)
 +
</source>
  
{{RUsign|Sancho|А. Е. Харламенков}}
+
{{Sign|Sancho|А. Е. Харламенков}}
{{RUoooproversion|3.2.x}}
+
{{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






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


К началу страницы