Требования к оформлению деловой корреспонденции

äîëëàð ÑØÀ¶
äîëëàðà ÑØÀ¶ äîëëàðîâ ÑØÀD '
¶ öåíò¶öåíòà¶öåíòîâD ' ¶'ô[1]à % Î÷èñòêà ñòðîêè ïðåîáðàçóåìîãî òåêñòàà? Îïðåäåëåíèå ïîëîæåíèÿ òî÷êè ðàçäåëåíèÿ öåëîé è äðîáíîé ÷àñòåé:¬   ¶.¬†¬   ¶,¬†
¬   ¶=¬†
'   ¬œ¶[1]00'ø[1]   ¬
' dÿÿð   ¬
¬[1]$ú ¶[1]00¬[1]$Ü[1]'ø[1]kÿÿ¸ àA Ôîðìèðîâàíèå öåëîé ÷àñòè 12-ðàçðÿäíîé ñóììû ñ ëèäèðóþùèìè íóëÿìèà@ è ïðîâåðêà ïåðåïîëíåíèÿ äèàïàçîíà ïðåîáðàçîâàíèÿ ÷èñëà â òåêñò:¶

0000000000000   ¬  ¬
$ú ¬

$& [1]'ò[1] ò[1]$( ´àÿ¡”mB

œ¶CCóììà âûõîäèò çà ãðàíèöû äîïóñòèìîãî äèàïàçîíà (0-999999999999.99).'8 zÿÿx kÿÿp ¶
000000000000   ¬  ¬
$ú ¬
$& [1]'ò[1]àG Ïðèñâîåíèå ïåðåìåííûì Ðð(1)...Ðð(14) çíà÷åíèé ñîîòâåòñòâóþùèõ ðàçðÿäîâà ïðåîáðàçóåìîé ñóììû:ÿ L[1]þ¬¬
’à$
 äëÿ ðóáëåé ò[1] L[1]¬$ú $(  L[1]+ ÿ L[1]þÈÿ L[1]þ¬

¬
’à$
 äëÿ öåíòîâ ø[1] L[1]¬
¬$ú $(  L[1]+ ÿ L[1]þÈàU Ôîðìèðîâàíèå ïðåîáðàçóåìîé òåêñòîâîé ñòðîêè ïî òðèàäàì ðàçðÿäîâ îò ñòàðøèõ ê ìëàäøèìA@* ¬    Ñ A@, · œ¬      Ñ A@.  ô[1]  $
¶ 'ô[1]dÿÿH¬[1]'  ô[1]  $
¶ 'ô[1]kÿÿà7 Âûäåëåíèå ïðîïèñíîé áóêâîé íà÷àëà ïðåîáðàçóåìîé ñòðîêè ô[1]$2 ¬¬$ú $0  ô[1]$2 ¬[1]$ú[1]'ô[1]à7 Ïðîâåðêà óñëîâèÿ îá óêàçàíèè êîïååê â òåêñòîâîé ñòðîêå :  ø[1]¶[1]00 œ ô[1]¶ 'ô[1]dÿÿ0¬
Ñ A@.  ô[1]¶  ø[1]¶   $ 'ô[1]kÿÿè­à: Îêîí÷àòåëüíàÿ çàïèñü òåêñòîâîé ñòðîêè ïðåîáðàçóåìîé ñóììû ô[1]'8 iÿÿ˜­–0 ¦ ìÿà= Ñóììà åâðî ïðîïèñüþ  â äèàïàçîíå îò 0 äî 999 ìëðä. ñ öåíòàìèà% ñîçäàíà 21.02.02 (Íèêîëàé Äîìàð¸íîê)¦ áÿàR åñëè ïàðàìåòð ñÖåíòàìè = ËÎÆÜ,  òî òåêñò "00 öåíòîâ" íå äîáàâëÿåòñÿ ê ðåçóëüòàòó.A@$ à
/ Îáúÿâëåíèå ìàññèâà èñõîäíûõ òåêñòîâûõ çíà÷åíèé¶ åâðî¶ åâðî¶ åâðîD ' ¶ öåíò¶öåíòà¶öåíòîâD ' ¶'ô[1]à % Î÷èñòêà ñòðîêè ïðåîáðàçóåìîãî òåêñòàà? Îïðåäåëåíèå ïîëîæåíèÿ òî÷êè ðàçäåëåíèÿ öåëîé è äðîáíîé ÷àñòåé:¬   ¶.¬†¬   ¶,¬†
¬   ¶=¬†
'   ¬œ¶[1]00'ø[1]   ¬
' dÿÿ      ¬
¬[1]$ú ¶[1]00¬[1]$Ü[1]'ø[1]kÿÿèàA Ôîðìèðîâàíèå öåëîé ÷àñòè 12-ðàçðÿäíîé ñóììû ñ ëèäèðóþùèìè íóëÿìèà@ è ïðîâåðêà ïåðåïîëíåíèÿ äèàïàçîíà ïðåîáðàçîâàíèÿ ÷èñëà â òåêñò:¶

0000000000000   ¬  ¬
$ú ¬

$& [1]'ò[1] ò[1]$( ´àÿ¡”mB

œ¶CCóììà âûõîäèò çà ãðàíèöû äîïóñòèìîãî äèàïàçîíà (0-999999999999.99).'< zÿÿ¨kÿÿ ¶
000000000000   ¬  ¬
$ú ¬
$& [1]'ò[1]àG Ïðèñâîåíèå ïåðåìåííûì Ðð(1)...Ðð(14) çíà÷åíèé ñîîòâåòñòâóþùèõ ðàçðÿäîâà ïðåîáðàçóåìîé ñóììû:ÿ L[1]þ¬¬
’à$
 äëÿ ðóáëåé ò[1] L[1]¬$ú $(  L[1]+ ÿ L[1]þÈÿ L[1]þ¬

¬
’à$
 äëÿ öåíòîâ ø[1] L[1]¬
¬$ú $(  L[1]+ ÿ L[1]þÈàU Ôîðìèðîâàíèå ïðåîáðàçóåìîé òåêñòîâîé ñòðîêè ïî òðèàäàì ðàçðÿäîâ îò ñòàðøèõ ê ìëàäøèìA@* ¬    Ñ A@, · œ¬      Ñ A@.  ô[1]  $ ¶ 'ô[1]dÿÿx¬[1]'  ô[1]  $ ¶ 'ô[1]kÿÿHà7 Âûäåëåíèå ïðîïèñíîé áóêâîé íà÷àëà ïðåîáðàçóåìîé ñòðîêè ô[1]$2 ¬¬$ú $0  ô[1]$2 ¬[1]$ú[1]'ô[1]à7 Ïðîâåðêà óñëîâèÿ îá óêàçàíèè êîïååê â òåêñòîâîé ñòðîêå :  ø[1]¶[1]00 œ ô[1]¶ 'ô[1]dÿÿ`¬
Ñ A@.  ô[1]¶  ø[1]¶   $ 'ô[1]kÿÿà: Îêîí÷àòåëüíàÿ çàïèñü òåêñòîâîé ñòðîêè ïðåîáðàçóåìîé ñóììû ô[1]'< iÿÿÈ– ° àF Ïðîöåäóðà ãðóïïèðîâêè èñõîäíûõ ýëåìåíòîâ ôîðìèðóåìîé òåêñòîâîé ñòðîêèබîäèí ¶ äâà ¶ òpè ¶÷åòûpå ¶ïÿòü ¶øåñòü ¶ñåìü ¶âîñåìü ¶äåâÿòü D

'ú[1]¶¶îäíà ¶ äâå ¶ òpè ¶÷åòûpå ¶ïÿòü ¶øåñòü ¶ñåìü ¶âîñåìü ¶äåâÿòü D

'ü[1]¶äåñÿòü ¶
îäèííàäöàòü ¶
äâåíàäöàòü ¶
òðèíàäöàòü ¶

÷åòûðíàäöàòü ¶
ïÿòíàäöàòü ¶ øåñòíàäöàòü ¶
ñåìíàäöàòü ¶

âîñåìíàäöàòü ¶

äåâÿòíàäöàòü D

'þ[1]¶¶äåñÿòü ¶  äâàäöàòü ¶     òpèäöàòü ¶ñîðîê ¶

ïÿòüäåñÿò ¶
øåñòüäåñÿò ¶

ñåìüäåñÿò ¶
âîñåìüäåñÿò ¶

äåâÿíîñòî D

' ¶¶ ñòî ¶äâåñòè ¶òpèñòà ¶

÷åòûðåñòà ¶ïÿòüñîò ¶    øåñòüñîò ¶ñåìüñîò ¶

âîñåìüñîò ¶

äåâÿòüñîò D

'[1] ¶òûñÿ÷à¶òûñÿ÷è¶òûñÿ÷D ' ¶ìèëëèîí¶ìèëëèîíච     ìèëëèîíîâD ' ¶ìèëëèàðä¶ ìèëëèàðäà¶

ìèëëèàðäîâD ' oÿÿ0– ð à- Ôîðìèðîâàíèå òåêñòà ñòàðøèõ 9 ðàçðÿäîâ ñóììû¬Ñ A@, · œ¬Ñ A@.  ô[1]  $ ¶
'ô[1]kÿÿ˜¬ Ñ A@, · œ¬ Ñ A@.  ô[1]  $ ¶
'ô[1]kÿÿ@¬Ñ A@, · œ¬Ñ A@.  ô[1]  $ ¶
'ô[1]kÿÿèoÿÿà– 0à7 Ïðîöåäóðà ïðåîáðàçîâàíèÿ â òåêñò ãðóïïû (òðèàäû) ÷èñåë ò[1]¬
¬ $ú $( ¬œ ô[1]¬
$ $[1] 'ô[1]à, òåêñòîâàÿ çàïèñü ñîòåí¬[1]
$ ¬œ ô[1]¬
$ $þ[1]'ô[1]à,# òåêñòîâàÿ çàïèñü ÷èñåë îò 11 äî 19dÿÿÀ¦  ô[1]¬[1]
$ $  ¬¬
$ $ü[1]¬
$ $ú[1]$> 'ô[1]¦ Äÿàp òåñòîâàÿ çàïèñü äåñÿòêîâ îò 10 äî 90 è åäèíèö ìóæñêîãî ðîäà        ñ îïðåäåëåíèåì ðàçðÿäîâ òûñÿ÷ â æåíñêîì ðîäåkÿÿз ' dÿÿÀ·' kÿÿ°oÿÿ¨– àCÏðîöåäóðà ñêëîíåíèÿ ïî ïàäåæàì â åäèíñòâåííîì è ìíîæåñòâåííîì ÷èñëåà%åäèíèö èçìåðåíèÿ ïî ãðóïïàì (òðèàäàì)¬[1]
$ ¬œà ‑ ïðîâåðêà íà ÷èñëà îò 10 äî 19¬[1]' à % ìèëëèàðäîâ, ìèëëèîíîâ, òûñÿ÷, ðóáëåédÿÿ ¬
$ êà  ïðîâåðêà íà ÷èñëà îò 1 äî 9¬KT¬' à % (1) ìèëëèàðä, ìèëëèîí, òûñÿ÷à, ðóáëü¬[1]¬ LT¬' à + (2,3,4) ìèëëèàðäà, ìèëëèîíà, òûñÿ÷è, ðóáëÿSÿÿÐ
¬[1]' à . (0,5..9) ìèëëèàðäîâ, ìèëëèîíîâ, òûñÿ÷, ðóáëåénÿÿˆ
kÿÿ€
oÿÿx
ÿÿÿÿp
ÿÿÿÿ?·Attribute VB_Name = "Module2"

Dim Öåëàÿ×àñòü, Òåêñò, êîï, öíò AHs S€ng Tå@äèíÌ,
Æ, äåñÿò1
êè, ñîò‚í
òûñÿ÷
_

ìèëëè îíû, [1]      àðÂä

ðóáë‑d åé6äîëëàÂðöåíò7 åâ¹ñêëî€íà, Øà㊀Variant ‹ãðóïïàÅÑ ÒÜBoole an Ðð(1 To 14), òî÷êàÐàç[1]äInteger

Function ÁåëÐóá(Ñóìì5Op

al ñÊîï€OàìèAˆ/)

' ‚ áåëîðóññêèõ håé ïðîïèñüþ[1] €`  â äèàïàçîíå îò 0 äî 999 ìëðä8. ñ²ƒ/)ñîçäàíà 21.02 (Íèêîëàé Äî€ìàð¸íîê‚=åñëè ïàð àìåòð‰Q=  ËÎÆÜ, =òî„ òä "00Âåê" €!äîáàâëÿåòñÿ ê ðåçóë@üòàòó.DÑòðîéÌàò ' Îáúÿâëåíèå ìàññèâà èñ@õîäíûõÃîBâ@[1]çíà÷Àé

Страницы: 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11