Difference between revisions of "RU/kb/00000104"

From Wiki
Jump to navigationJump to search
(oooproversion)
 
(12 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 />
[[RU/kb/automation_calculations|База Знаний: {{OOoC|1}}. Автоматизация расчётов]]
+
{{BreadCrumbL10n|RU/kb/module/calc/automation_calculations}}
 
__NOTOC__
 
__NOTOC__
  
Line 11: Line 11:
  
 
Для этого задействуется функция
 
Для этого задействуется функция
{{RU/code|40|InfraLinux.N2Scribe.Currency2Scribe(n)}}
+
<source lang="oobas">
 +
InfraLinux.N2Scribe.Currency2Scribe(n)
 +
</source>
  
  
{{RUsign|Sancho|А. Е. Харламенков}}
+
Пример создания пользовательской функции Calc<ref>Пользовательская функция Calc обязательно должна сохраняться в библиотеке Standard, независимо от выбора хранилища (документ, пользовательский профиль или системный профиль).</ref>:
{{RUoooproversion|3.2.x}}
+
 
{{KbCalcBottom}}
+
<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}}

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, независимо от выбора хранилища (документ, пользовательский профиль или системный профиль).


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