*you can give the amount to conversation ROUTEN from enquiry for ARBIC
words
*
SUBROUTINE CONV.CUR.AMT
0002
0003 $INCLUDE GLOBUS.BP I_COMMON
0004 $INCLUDE GLOBUS.BP I_EQUATE
0005 $INCLUDE GLOBUS.BP I_F.LD.LOANS.AND.DEPOSITS
0006 $INCLUDE GLOBUS.BP I_F.CURRENCY
0007 $INCLUDE GLOBUS.BP I_ENQUIRY.COMMON
0008
0009 XX = O.DATA
0010 *CUR = R.NEW(LD.CURRENCY)
0011 CUR = "EGP"
0012 CALL DBR('CURRENCY':@FM:EB.CUR.CCY.NAME,CUR,CURR)
0013
0014 NET.AMOUNT = O.DATA
0015 IN.AMOUNT = O.DATA
0016 CALL WORDS.ARABIC(IN.AMOUNT,OUT.AMOUNT,78,NO.OF.LINES,ER.MSG)
0017 AMT.P = OUT.AMOUNT:" ":CURR:" IS NOT "
0018 O.DATA = AMT.P
0019
0020 RETURN
0021 END
*and u can used call function { CALL AMT.WORD.ENG(O.DATA) } to English
word and ex. for eng*.
0002 SUBROUTINE CNVA.AMT.ENG
0003
0004 $INCLUDE GLOBUS.BP I_COMMON
0005 $INCLUDE GLOBUS.BP I_EQUATE
0006 $INCLUDE GLOBUS.BP I_ENQUIRY.COMMON
0007 $INCLUDE I_F.SCB.RETIREMENTS
0008
0009 CALL AMT.WORD.ENG(O.DATA)
0010 RETURN
0011 END
*you can mix it as your needs *
Regards,
Mohammed Sabry
IT-Developer
Suez Canal Bank Egypt
On Fri, Nov 19, 2010 at 8:11 PM, Jim Idle <[email protected]> wrote:
> PLEASE remember that there is a very good search engine for the group at:
>
>
>
> http://jbase.markmail.org/search/?q=numbers%20words
>
>
>
> Jim
>
>
>
> *From:* [email protected] [mailto:[email protected]] *On Behalf
> Of *Williams
> *Sent:* Thursday, November 18, 2010 4:17 AM
> *To:* jBaseGroup
> *Subject:* T24: CONVERTER
>
>
>
> Can anyone help me please?
>
>
>
> I need a routine/function to convert numbers to word in an Enquiry. I will
> welcome any suggestion that would make this possible
>
>
>
> Regards
>
>
>
>
> *Williams*
>
>
>
> --
> Please read the posting guidelines at:
> http://groups.google.com/group/jBASE/web/Posting%20Guidelines
>
> IMPORTANT: Type T24: at the start of the subject line for questions
> specific to Globus/T24
>
> To post, send email to [email protected]
> To unsubscribe, send email to [email protected]
> For more options, visit this group at
> http://groups.google.com/group/jBASE?hl=en
>
> --
> Please read the posting guidelines at:
> http://groups.google.com/group/jBASE/web/Posting%20Guidelines
>
> IMPORTANT: Type T24: at the start of the subject line for questions
> specific to Globus/T24
>
> To post, send email to [email protected]
> To unsubscribe, send email to [email protected]
> For more options, visit this group at
> http://groups.google.com/group/jBASE?hl=en
>
--
Please read the posting guidelines at:
http://groups.google.com/group/jBASE/web/Posting%20Guidelines
IMPORTANT: Type T24: at the start of the subject line for questions specific to
Globus/T24
To post, send email to [email protected]
To unsubscribe, send email to [email protected]
For more options, visit this group at http://groups.google.com/group/jBASE?hl=en
