GoldenLine
Zaloguj się
Mirek Gawinkowski

Mirek Gawinkowski Siedlce informatyk
wdrożeniowiec,
wdrażanie
oprogramowan...

Temat: Jak zamienić liczbę na słownie w CR XI?

Czy ktoś zna jakieś rozwiązanie?
Link do wypowiedziLink
Remigiusz R.

Remigiusz R. Kierownik działu IT

Temat: Jak zamienić liczbę na słownie w CR XI?

Możesz to zrobić za pomocą funkcji ToWords() np. ToWords(7) da wynik siedem :) Jeżeli potrzebujesz tego do któregoś z systemów Comarch to tam masz też gotową funkcję cdn.Slownie lub coś takiego.
Pozdrawiam
Link do wypowiedziLink
Aneta S.

Aneta S. Crystal Reports i
okolice

Temat: Jak zamienić liczbę na słownie w CR XI?

Witam,

pewien czas temu ten temat był poruszany na forum MyCrystal:

http://mycrystal.pl/index.php?link=12&grupa=1&id=117

Pozdrawiam
Aneta Sidorowicz

http://plcrug.pl
Link do wypowiedziLink
Marcin S.

Marcin S. Programista, trener
i konsultant w
zakresie .NET/.NET
Cor...

Temat: Jak zamienić liczbę na słownie w CR XI?

Napisałem funkcję do zamiany liczby na słownie złotych.
Jest do pobrania: http://sulmar.blogspot.com/2007/10/sownie-zotych.html
Link do wypowiedziLink
Tomasz Drzazga

Tomasz Drzazga Informatyk, Infolex
Duszniki-Zdrój

Temat: Jak zamienić liczbę na słownie w CR XI?

A jak zamienić na słownie, ale na język angielski? Mam crystal reports po polsku i funkcja ToWords() zamienia mi na język polski. Czy w crystalu jest funkcja analogiczna tylko zamieniająca na język angielski>
Link do wypowiedziLink
Mirek Gawinkowski

Mirek Gawinkowski Siedlce informatyk
wdrożeniowiec,
wdrażanie
oprogramowan...

Temat: Jak zamienić liczbę na słownie w CR XI?

Ja się poddałem ze zamianami bibliotek itd.
Zrobiłem jak poniżej i wykorzystują to również w wersji rosyjsko- języcznej
-----------------------------------------------------------
Local StringVar Kwota;
Local StringVar Grosze;

Kwota := CStr(Int({DOKUMENT_HANDLOWY.WARTOSC_NETTO}),0);
Grosze := CStr(({DOKUMENT_HANDLOWY.WARTOSC_NETTO} - Int({DOKUMENT_HANDLOWY.WARTOSC_NETTO}))*100,0);

Kwota := Replace(Kwota, '0', '*ZERO');
Kwota := Replace(Kwota, '1', '*ONE');
Kwota := Replace(Kwota, '2', '*TWO');
Kwota := Replace(Kwota, '3', '*THREE');
Kwota := Replace(Kwota, '4', '*FOUR');
Kwota := Replace(Kwota, '5', '*FIFE');
Kwota := Replace(Kwota, '6', '*SIX');
Kwota := Replace(Kwota, '7', '*SEVEN');
Kwota := Replace(Kwota, '8', '*EIGHT');
Kwota := Replace(Kwota, '9', '*NINE');

Kwota + '* ' + Grosze + '/100'

-------------------------------------------------

Tomasz Drzazga:
A jak zamienić na słownie, ale na język angielski? Mam crystal reports po polsku i funkcja ToWords() zamienia mi na język polski. Czy w crystalu jest funkcja analogiczna tylko zamieniająca na język angielski>Mirek Gawinkowski edytował(a) ten post dnia 14.05.10 o godzinie 11:07
Link do wypowiedziLink

konto usunięte

Temat: Jak zamienić liczbę na słownie w CR XI?

Napisz funkcje na bazie
Link do wypowiedziLink
Tomasz Drzazga

Tomasz Drzazga Informatyk, Infolex
Duszniki-Zdrój

Temat: Jak zamienić liczbę na słownie w CR XI?

Dzięki za pomoc. Myślałem, że jest jakaś funkcja w crystalu, która zamienia na język angielski. Napisać funkcję na bazie nie będzie takie proste, ale spróbuję.
Link do wypowiedziLink
Marcin S.

Marcin S. Programista, trener
i konsultant w
zakresie .NET/.NET
Cor...

Temat: Jak zamienić liczbę na słownie w CR XI?

CR 2008 posiada wbudowaną funkcję ToWords, która umożliwia konwersję liczby na język polski.

Sposób jej użycia opisałem na moim blogu:
http://sulmar.blogspot.com/2010/09/sownie-zotych.html
Link do wypowiedziLink
Marcin S.

Marcin S. Programista, trener
i konsultant w
zakresie .NET/.NET
Cor...

Temat: Jak zamienić liczbę na słownie w CR XI?

Od wersji CR 2008 funkcja ToWords() tłumaczy liczbę na tekst zależnie od wybranego języka wyświetlania raportu (View|Preffered Viewing Locale).

Możemy wybrać nie tylko język angielski lub polski, ale również niemiecki, francuski, japoński itp.

Nie należy tej opcji pomylić z wyborem wersji językowej środowiska do projektowania (View|Product Locale). Te opcje są od siebie niezależne.
Link do wypowiedziLink
Marcin S.

Marcin S. Programista, trener
i konsultant w
zakresie .NET/.NET
Cor...

Temat: Jak zamienić liczbę na słownie w CR XI?

Jeśli ktoś chce sformatować standardowy zapis funkcji ToWords XXXX i XX / 100 do zapisu XXXX zł i XX / 100 gr to może użyć następującej formuły:
replace(replace(ToWords({tabela.pole}), " i ", ' zł i '), " / 100", " / 100 gr")
Link do wypowiedziLink
Marek C.

Marek C. Epicor 9 - droga
przez ... na
Ostrołękę

Temat: Jak zamienić liczbę na słownie w CR XI?

Witaj,

mam Crystal Reports XI Release 2. W którym miejscu zmienić "View|Preffered Viewing Locale" bo za cholerę nie potrafię tego namierzyć.

Mam ten sam problem "Toword" zwraca mi słownie po polsku a ja chciałbym aby zwracało po angielsku.

Póki co poradziłem sobie wstawiając funkcję którą wrzucił jeden z piszących w tym temacie, ale zapewne istnieje bardziej eleganckie rozwiązanie :-) Proszę o pomoc
Link do wypowiedziLink
Marcin S.

Marcin S. Programista, trener
i konsultant w
zakresie .NET/.NET
Cor...

Temat: Jak zamienić liczbę na słownie w CR XI?

Ta opcja dostępna jest dopiero od cr2008.
Link do wypowiedziLink
« Wróć do tematów
Odpowiedz

Podobne tematy





Wyślij zaproszenie do
Anuluj