Android Question Number into Lakh Format

[RishiKumar2210]

I Need to Convert number 1709165749 into 170,91,65,749.00 in B4A. is this possible?

 

[Erel]

Search Results

www.b4x.com

 

[RishiKumar2210]

Search Results

www.b4x.com

I have problems in these format.

1. I need compulsory 2 digit decimal for round numbers (ex.20000 into 20,000.00)
2. I need format like this(190,91,79,610.00)

This Format(190,91,79,610.00) is not available in search results?

Plz Help me

 

[MarcoRome]

As already suggested by Erel, are you sure this doesn't solve your problem ?

[B4X] Lakh format number

Attached is a demo and code to convert numbers to Lakh format. UPDATE: Formatting using the B4XFormatter library. Ref: https://www.b4x.com/android/forum/threads/convert-number-into-lakhs-with-decimal.149419/ NumberFormatLakh(250000, 1, 2) 'Converts the specified number to a string in...

www.b4x.com

 

[RishiKumar2210]

As already suggested by Erel, are you sure this doesn't solve your problem ?

Yeah. I am Sure. this is not a valid solution for my problem.

 

[AnandGupta]

Hi @RishiKumar2210 , if you want Indian format, check below,

[B4X] Format 10,000 (Ten Thousand) to Lakh

B4J 2.80+ Sub FormatLakh(number As Double, decimals As Int) As String Dim dd As Int, ss As String Dim mm As Long = Abs(number) Dim nn As Long = mm / 1000 Dim dc As Double = (mm Mod 1000) + Abs(number) - mm Dim lakh As String = NumberFormat2(dc, 1, decimals, decimals, False)...

www.b4x.com

 

[RishiKumar2210]

Hi @RishiKumar2210 , if you want Indian format, check below,

[B4X] Format 10,000 (Ten Thousand) to Lakh

B4J 2.80+ Sub FormatLakh(number As Double, decimals As Int) As String Dim dd As Int, ss As String Dim mm As Long = Abs(number) Dim nn As Long = mm / 1000 Dim dc As Double = (mm Mod 1000) + Abs(number) - mm Dim lakh As String = NumberFormat2(dc, 1, decimals, decimals, False)...

www.b4x.com

Yeah. I already seen this But this is not sufficient for me. Because if values comes in crores like 120 or 70 crores, I need format like this(120,20,50,000.00, 70,20,50,000).

 

[emexes]

But this is not sufficient for me. Because if values comes in crores like 120 or 70 crores, I need format like this(120,20,50,000.00, 70,20,50,000).

How is the formatter to know that you'd like the first example expressed to two decimal places, and the second example to zero decimal places?

 

[AnandGupta]

Yeah. I already seen this But this is not sufficient for me. Because if values comes in crores like 120 or 70 crores, I need format like this(120,20,50,000.00, 70,20,50,000).

Since the example shows the code, so you can modify it to suit your need and if happy with it, then share it in the Forum for rest of the members.

 

[emexes]

2. I need format like this(190,91,79,610.00)

why is it not 1,90,91,79,610.00 ?

and on a related note:

I Need to Convert number 1709165749 into 170,91,65,749.00 in B4A. is this possible?

why is it not 1,70,91,65,749.00 ?

---

"In the Indian place-value system, we insert a comma after three digits then after every two-digit"

https://www.cuemath.com/questions/p...ystem-and-write-the-number-name-of-27597-219/

 

[William Lancee]

@emexes

why is it not 1,70,91,65,749.00 ?

Good question, I investigated.

At the risk of stepping out my comfort zone (apologies in advance to those who really know!),
The following seems to suggest that it is more complicated than every group of two digits after the first 3.
I presume that the 2 decimal digits are an addition for fractional amounts.

 

[William Lancee]

And applying that logic

'    Dim pattern As String = "0,00,000,00,000,00,000,00,000,00,00,000.00"
'    Dim number As Long =  170916574900
'    Log(applyPattern(pattern, number))        170,91,65,749.00

Private Sub applyPattern(pattern As String, number As Long) As String
    Dim s As String = number
    Dim result As String
    Dim index As Int = pattern.length - 1
    For i = s.Length - 1 To 0 Step -1
        Dim digit As String = s.CharAt(i)
        Dim c As String = pattern.charAt(index)
        If c <> "0" Then
            result = c & result
            index = index - 1
        End If
        result = digit & result
        index = index - 1
    Next
    Return result
End Sub

 

[William Lancee]

As inspired by @emexes, here is an improved version that accommodates
negative numbers and sub-one decimals.

'    Dim pattern As String = "1,00,000,00,000,00,000,00,000,00,00,000.00"
'    Log(applyPattern(pattern, 170916574900))    '    170,91,65,749.00
'    Log(applyPattern(pattern, -100000))            '    -1,000.00
'    Log(applyPattern(pattern, 3))                '    0.03
'    Log(applyPattern(pattern, -3))                '    -0.03

Private Sub applyPattern(pattern As String, number As Long) As String
    Dim s As String = number
    Dim prefix As String
    If s.StartsWith("-") Then
        prefix = "-"
        s = s.SubString(1)
    End If
    If s.Length < 3 Then s = (1000 + Abs(number)).As(String).substring(1)
    Dim result As String
    Dim index As Int = pattern.length - 1
    For i = s.Length - 1 To 0 Step -1
        Dim digit As String = s.CharAt(i)
        Dim c As String = pattern.charAt(index)
        If c <> "0" Then
            result = c & result
            index = index - 1
        End If
        result = digit & result
        index = index - 1
    Next
    Return prefix & result
End Sub

 

[aeric]

So the keyword here is 100 crore or 1 arab.

In the Indian numbering system 100 thousand is called a lakh and 100 lakhs is a crore. Is there another word for the quantity of 100 crore in this numbering system? - Quora

www.quora.com

Indian numbering system - Wikipedia

en.wikipedia.org

 

[William Lancee]

Thank you @aeric

So since there is name for 100 Crore and a 100 Arab, a comma is customary?
And therefore the pattern is "00,00,00,00,00,000.00"

1 Lakh = 100 Thousand
1 Crore = 100 Lakh
1 Arab = 100 Crore
1 Kharab = 100 Arab

And every group of two digits after the first 3 is correct?

 

[RishiKumar2210]

why is it not 1,90,91,79,610.00 ?

and on a related note:



why is it not 1,70,91,65,749.00 ?

---

"In the Indian place-value system, we insert a comma after three digits then after every two-digit"

https://www.cuemath.com/questions/p...ystem-and-write-the-number-name-of-27597-219/

Because If the format like this(170,91,65,749.00) It is easy to read and understand for me ( As an Indian) within a second and if the pattern like this(1,70,91,65,749.00), it seems quite difficult for understand.

 

[aeric]

And every group of two digits after the first 3 is correct?

Not sure what is the correct/common use in different parts of India.

e.g. 10 Kharab or 1 Lakh Crore or 1 Trillion (12 zeros) is?

1. 1,000,000,000,000
2. 10,00,00,00,00,000
3. 1,00,000,00,00,000

 

[RishiKumar2210]

Not sure what is the correct/common use in different parts of India.

e.g. 10 Kharab or 1 Lakh Crore or 1 Trillion (12 zeros) is?

1. 1,000,000,000,000
2. 10,00,00,00,00,000
3. 1,00,000,00,00,000

I Need 3rd Format.

 

[William Lancee]

@RishiKumar2210

Without that, I was just guessing. Never a good idea. In this case I came up with the right answer for the wrong reason.
The code in #13 will get you that answer.

In case it isn't clear, I dealt with the the 2 decimal places by multiplying the number by 100 before applying the pattern.

 

[RishiKumar2210]

@RishiKumar2210

Without that, I was just guessing. Never a good idea. In this case I came up with the right answer for the wrong reason.
The code in #13 will get you that answer.

In case it isn't clear, I dealt with the the 2 decimal places by multiplying the number by 100 before applying the pattern.

The code in #13 is not giving the enough result. It is not working for decimal numbers like(170,29,78.918.93).