crystal report currency conversion

[PerumalSamy]

Hi, i am developing software in asp.net using vb coding and MS ACCESS database.

I created a crystal report for printing sales bill.

Now i need to convert currency into words and need to print. ex: 3,250 as "Three Thousand Two Hundred and Fifty only".

How can i write codings and make to print using crystal report.

Thanks in advance.

[dip_developer]

Hi, i am developing software in asp.net using vb coding and MS ACCESS database.

I created a crystal report for printing sales bill.

Now i need to convert currency into words and need to print. ex: 3,250 as "Three Thousand Two Hundred and Fifty only".

How can i write codings and make to print using crystal report.

Thanks in advance.

crystal report has nothing to do your conversion..... you have to convert Currency in Words through code in your application.... Then pass the string(e.g--"Three Thousand Two Hundred and Fifty only".) to crystal report as a parameter....

to convert your currency to word search google...many vb.net classes are available on NET for this conversion.....

[sudhaMurugesan]

Hi Perumal,
I used a formula field for this conversion. type the following code in it and try.

All the best.

if Split (cstr(Sum ({ExportView.Amount})),".")[2]="00" then 
 
   {ExportView.CurrencyName} + " " + ToWords (Sum ({ExportView.Amount}),0) + " Only "
 
else 
    {ExportView.CurrencyName} + " " + ToWords (Sum ({ExportView.Amount}),0) + " and " 
   + ToWords ((Round(Sum ({ExportView.Amount}),2)
   - Int(Sum ({ExportView.Amount}))) * 100, 0) + " " + {ExportView.DecimalPart} + " only "

sudha

[sudhaMurugesan]

Hi Perumal,
i used a decimal number rounded to two decimal places and so used the above code which is perplexing. if you dont want to check the paise part ur code is like this.

"Rupees " + ToWords (Sum ({ExportView.Amount}),0) + " Only "

or else you find in the below url

"http://www.eggheadcafe .com/community/aspnet/14/10016490/convert-number-to-words.aspx"

with regards,
sudha

[PerumalSamy]

Hi Sudha,
Thanks for your reply.

I implemented your coding in my crystal report. but i am getting error in part + " " + before ToWords
And also i am not aware of Exportiew.Amoun t and ExportView.Curr ency.

could you please tell me the details of those fields.

[PerumalSamy]

Thanks.

Its working fine.

TRY THIS CODE

if split(cstr({tablename.fieldname)),".")[2]="00" then
     replace(ToWords({tablename.fieldname},0)+ " only","-"," ")
else
     replace(ToWords(cdbl((tablename.fieldname})-cdbl(split(cstr({tablename.fieldname}),"."[2]/100),0) + " and " + ToWords(cdblsplit(cstr({tablename.fieldname}),"."[2]),0) + " paise only","-"," ")

[pavithrachidambaram]

Hi


I tried ur code and got error message as "The ) is missing". So, can u please tell me wat could be wrong.

Regards,
Pavithra.C

[PerumalSamy]

Hi pavithra,
Now try the following code

if split(cstr({tablename.fieldname}),".")[2]="00" then
replace(ToWords({tablename.fieldname},0)+ " only","-"," ")
else
replace(ToWords(cdbl({tablename.fieldname})-cdbl(split(cstr({tablename.fieldname}),"."[2]/100),0)) + " and " + ToWords(cdblsplit(cstr({tablename.fieldname}),"."[2]),0) + " paise only","-"," ")

[abhi0206]

if split(cstr({tablename.fieldname}),".")[2]="00" then
replace(ToWords({tablename.fieldname},0)+ " only","-"," ")
else
replace(ToWords(cdbl({tablename.fieldname})-cdbl(split(cstr({tablename.fieldname}),"."[2]/100),0)) + " and " + ToWords(cdblsplit(cstr({tablename.fieldname}),"."[2]),0) + " paise only","-"," ")

I have try your code but still there is error showing ) is missing out please sort out it's urgent

[PerumalSamy]

Hi

You try this code now

if split(cstr({tablename.fieldname}),".")[2]="00" then replace(ToWords({tablename.fieldname},0)+" only","-"," ")
else
replace(Towords((cdbl({tablename.fieldname})-cdbl(split(cstr({tablename.fieldname}),".")[2])/100),0)+" and " +ToWords(cdbl(split(cstr({tablename.fieldname}),".")[2]),0)+" paise only","-"," ")

Hope it will work.

If not you just mail me to perumalvps@gmai l.com