Amount In words for AP INVOICE CRYSTAL REPORT

[former_member487237]

Hi experts,

I'm using SBO 9.0 PL 8 and Crystal report 2008 and localization INDIA.

I've created AP invoice Crystal report.everything is working fine but the amount in words convertion field not giving exactly.

All BP currencies are USD only.

For example, if invoice amount is USD $1000.75

The amount in words should show $ one thousand and seventy five cents only.

But it is showing as in Indian currency.

If 1 USD = 60 INR then the amount in words is showing like $ sixty thousand fourth five and zero cents only.

Can you tell me what is the formula/condition I need to write in formula field?

I've tested in so many scenarios but there is no result.and I checked all the previous threads which are related to this scenario.

So kindly avoid to refer the old threads.

Waiting for the reply.

Thanks & Regards,

Saikrishna.

[former_member184146]

Hi Sai,

          can you post the formula here , and i will advice you to post this question on SAP Crystal Report Application for quick answer.

Regards,

Manish

[former_member487237]

Hi Manish,

Check this query

numbervar RmVal:=0;

numbervar Amt:=0;

numbervar pAmt:=0;

stringvar InWords :="";

Amt := ({OPCH.DocTotal});

if Amt > 10000000 then

RmVal := truncate(Amt/10000000);

if RmVal = 1 then

InWords := InWords + " " + propercase(towords(RmVal,0)) + " Crore"

else if RmVal > 1 then

InWords := InWords + " " + propercase(towords(RmVal,0)) + " Crores";

Amt := Amt - Rmval * 10000000;

if Amt > 100000 then

RmVal := truncate(Amt/100000);

if RmVal = 1 then

InWords := InWords + " " + propercase(towords(RmVal,0)) + " Lakh"

else if RmVal > 1 then

InWords := InWords + " " + propercase(towords(RmVal,0)) + " Lakhs";

Amt := Amt - Rmval * 100000;

InWords := InWords + " " + propercase(towords(truncate(Amt),0));

pAmt := (Amt - truncate(Amt)) * 100;

if pAmt > 0 and {OPCH.Doccur}="INR" then

InWords := InWords + " And " + propercase(towords(pAmt,0)) + " USD Only"

else if {OPCH.Doccur}="USD" then

InWords := "$. " + propercase(towords(Amt,0)) + " And " + propercase(towords(pAmt,0)) + " Cent Only"

else if {OPCH.Doccur}="INR" then

InWords := "Rs. " + InWords + " Only"

else if {OPCH.Doccur} ="USD" then

InWords := "$. " + InWords + " Only";

propercase(Inwords)

Regards,

Saikrishna.

[former_member487237]

Hi all,

Any update please???

Regards,

Saikrishna