3 Replies Latest reply on Jun 8, 2015 4:46 PM by philmodjunk

    Number to Text for printing bank checks 2

    starstuff

      Title

      Number to Text for printing bank checks 2

      Post

      Hi All!

       

      this question is related to this thread Number to Text for printing bank checks (link)

      from the example there, im also trying to get this format ***Eleven Thousand; Two Hundred Fifty Three  and 85/100***

      i dont know where to put PhilModJunk's code, i tried adding it below where i remove the cents and it giving me errorss

      ( Round ( numberfield ; 2 ) - Int ( numberfield ) ) * 100 & " / 100" )
       

       

       

      as suggested by TKnTexas


      "Just put 3 or 4 asterisks before and after. That will be sufficient to show no tampering."

      how and where to add the asterisks in the code? i tried adding it manually in the layout, but when testing it did not adapt to the changing words of the numbers

       

      Thanks you!

       

       

        • 1. Re: Number to Text for printing bank checks 2
          SteveMartino

          For starters, you should add your question to the previous mentioned thread so everyone trying to help doesn't have to search for/guess what code you are talking about.

          In general, with any calculation, you would just add "***" & [rest of calculation here] & "***"

          • 2. Re: Number to Text for printing bank checks 2
            starstuff

            Hi Steve!

            thanks for the help, the original thread was a month old thus i created a new thread,  next time i will post in the old thread.

            I got an answer from Floyd Hagan, Thank you Floyd!

            Choose(Int(Mod(Amount;10^12) / 10^11); ""; "One Hundred "; "Two Hundred "; "Three Hundred "; "Four Hundred "; "Five Hundred "; "Six Hundred "; "Seven Hundred "; "Eight Hundred "; "Nine Hundred ") &If(Int(Mod(Amount;10^11) / 10^10) = 1;Choose(Int(Mod(Amount;10^10) / 10^9); "Ten "; "Eleven "; "Twelve "; "Thirteen "; "Fourteen "; "Fifteen "; "Sixteen "; "Seventeen "; "Eighteen "; "Nineteen ");Choose(Int(Mod(Amount;10^11) / 10^10); ""; ""; "Twenty "; "Thirty "; "Forty "; "Fifty "; "Sixty "; "Seventy "; "Eighty "; "Ninety ") &Choose(Int(Mod(Amount;10^10) / 10^9); ""; "One "; "Two "; "Three "; "Four "; "Five "; "Six "; "Seven "; "Eight "; "Nine ")) &Case(Int(Mod(Amount;10^12)/10^9) and Int(Mod(Amount;10^9) / 10^3); "Billion; "; Int(Mod(Amount;10^12)/10^9);"Billion ";"")&Choose(Int(Mod(Amount;10^9) / 10^8); ""; "One Hundred "; "Two Hundred "; "Three Hundred "; "Four Hundred "; "Five Hundred "; "Six Hundred "; "Seven Hundred "; "Eight Hundred "; "Nine Hundred ") &If(Int(Mod(Amount;10^8) / 10^7) = 1;Choose(Int(Mod(Amount;10^7) / 10^6); "Ten "; "Eleven "; "Twelve "; "Thirteen "; "Fourteen "; "Fifteen "; "Sixteen "; "Seventeen "; "Eighteen "; "Nineteen ");Choose(Int(Mod(Amount;10^8) / 10^7); ""; ""; "Twenty "; "Thirty "; "Forty "; "Fifty "; "Sixty "; "Seventy "; "Eighty "; "Ninety ") &Choose(Int(Mod(Amount;10^7) / 10^6); ""; "One "; "Two "; "Three "; "Four "; "Five "; "Six "; "Seven "; "Eight "; "Nine ")) &Case(Int(Mod(Amount;10^9)/10^6) and Int(Mod(Amount;10^6) / 10^3); "Million; "; Int(Mod(Amount;10^9)/10^6);"Million ";"")&Choose(Int(Mod(Amount;10^6) / 10^5); ""; "One Hundred "; "Two Hundred "; "Three Hundred "; "Four Hundred "; "Five Hundred "; "Six Hundred "; "Seven Hundred "; "Eight Hundred "; "Nine Hundred ") &If(Int(Mod(Amount;10^5) / 10^4) = 1;Choose(Int(Mod(Amount;10^4) / 10^3); "Ten "; "Eleven "; "Twelve "; "Thirteen "; "Fourteen "; "Fifteen "; "Sixteen "; "Seventeen "; "Eighteen "; "Nineteen ");Choose(Int(Mod(Amount;10^5) / 10^4); ""; ""; "Twenty "; "Thirty "; "Forty "; "Fifty "; "Sixty "; "Seventy "; "Eighty "; "Ninety ") &Choose(Int(Mod(Amount;10^4) / 10^3); ""; "One "; "Two "; "Three "; "Four "; "Five "; "Six "; "Seven "; "Eight "; "Nine ")) &Case(Int(Mod(Amount;10^6)/10^3) and Int(Mod(Amount;10^3) / 10^0); "Thousand; "; Int(Mod(Amount;10^6)/10^3);"Thousand ";"")&Choose(Int(Mod(Amount;10^3) / 100); ""; "One Hundred "; "Two Hundred "; "Three Hundred "; "Four Hundred "; "Five Hundred "; "Six Hundred "; "Seven Hundred "; "Eight Hundred "; "Nine Hundred ") &If(Int(Mod(Amount;100) / 10) = 1;Choose(Int(Mod(Amount;10)); "Ten "; "Eleven "; "Twelve "; "Thirteen "; "Fourteen "; "Fifteen "; "Sixteen "; "Seventeen "; "Eighteen "; "Nineteen ");Choose(Int(Mod(Amount;100) / 10); ""; ""; "Twenty "; "Thirty "; "Forty "; "Fifty "; "Sixty "; "Seventy "; "Eighty "; "Ninety ") &Choose(Int(Mod(Amount;10)); ""; "One "; "Two "; "Three "; "Four "; "Five "; "Six "; "Seven "; "Eight "; "Nine ")) & If(Mod(Amount; 1) and Int(Amount);" and ";"") &( Round ( Amount ; 2 ) - Int ( Amount ) ) * 100 & " / 100" &"******************************************************************************"

            • 3. Re: Number to Text for printing bank checks 2
              philmodjunk

              A post one month old will still bump the thread back up to the top of Recent Items when you post a new comment to it.  3 months or more, on the other hand....