How to Add a Leading Zero and Comma for a Numeric Value with a Four Display Decimal Value

Purpose of Document

I have a numeric value with four decimal places that I need to display with a leading zero when the value is less then 1 and if the value is greater then 1000, I need to add an appropriate comma (or period) separator.

The standard business function to convert a Math Numeric to String may not support more than two Display Decimals.

If the value is less than 1, the result does not include a leading zero in the report (for example, for some organizations it is required to put a leading zero in front of a decimal).

If the value is greater than 1000 I need to include a separator (Comma or Period).

How can I implement this?

Supposing that,

Input parameter: Unit Price with 4 Display Decimals

Output parameter: String 20 characters in length

Size of Input	Example	Implementation
0	Set output 0.0000	Hardcode it
0< mnInput <1	Set Leading Zero 0.1230	1. Multiply input value by 10000 2. Convert it to String 3. lpad with 0 (to handle value .0123, 0012 or 0001) 4. Concatenation (or concat()) 0 and DECT(DecimalFormat - Decimal Format Character) and string value Example: mnNum_temp = [mnInputNumber]10000 / store temp value into mnNum_temp / Convert Math_Numeric To String / B8000094 - ConvertMath_NumericToString / mnNum_Temp -> BF mnMathNumeric01 szString_temp <- BF szString szString_temp = lpad([szString_temp],"0",4) / fill in zero till it for characters / szOutputString = concat('0',concat('.',[szString_temp])) / concat 3 components (0 + DECT + String value) */
>=1	Set output 1,234,567.8900 (Comma Separator)	A. Decimal Notation 1234567 Floor input value and return Convert it into String (B8000094 - ConvertMath_NumericToString: Convert Math_Numeric To String) Divide it by 3 characters to put Comma (e.g., 1 and 234 and 567) Concatenation with comma B. Decimal Fraction 8900 1. Multiple 10000 then get the last 4 digit for Decimal Fraction 2. Convert it to String 3. lpad with 0 for 4 digits string C. Concatenation Decimal Notation and DECT (DecimalFormat - Decimal Format Character) and Decimal Fraction

Size of Input

Example

Implementation

Set output 0.0000

Hardcode it

0< mnInput <1

Set Leading Zero 0.1230

1. Multiply input value by 10000
2. Convert it to String
3. lpad with 0 (to handle value .0123, 0012 or 0001)
4. Concatenation (or concat()) 0 and DECT(DecimalFormat - Decimal Format Character) and string value

Example:
mnNum_temp = [mnInputNumber]*10000 /* store temp value into mnNum_temp */
Convert Math_Numeric To String /* B8000094 - ConvertMath_NumericToString */
mnNum_Temp -> BF mnMathNumeric01
szString_temp <- BF szString
szString_temp = lpad([szString_temp],"0",4) /* fill in zero till it for characters */
szOutputString = concat('0',concat('.',[szString_temp])) /* concat 3 components (0 + DECT + String value) */

>=1

Set output 1,234,567.8900 (Comma Separator)

A. Decimal Notation 1234567

Floor input value and return

Convert it into String (B8000094 - ConvertMath_NumericToString: Convert Math_Numeric To String)

Divide it by 3 characters to put Comma (e.g., 1 and 234 and 567)

Concatenation with comma

B. Decimal Fraction 8900

1. Multiple 10000 then get the last 4 digit for Decimal Fraction
2. Convert it to String
3. lpad with 0 for 4 digits string

C. Concatenation Decimal Notation and DECT (DecimalFormat - Decimal Format Character) and Decimal Fraction

NOTE:

In case you need this repeatedly create NER (Named Event Rule) to call
f the separator should be a period, rather then a comma, change the example from a comma to a period.
If this functionality needs to be implemented in multiple places or in multiple reports, then creating a NER business function can be good option.
In Option 3,

Decimal Notation can be returned by floor() (e.g., floor(1234567.8900) = 1234567
Decimal Fraction can be computed by minus away floored value = 1234567.8900 - 1234567 = 0.8900
To concatenate 1234567 with comma (e.g., 1,234,567)

Get the length of Decimal Notation (e.g., length(1234567) = 7)
Divide it by 3 (e.g., 7/3 = 2 + 1/3 so this value needs 2 comma). Concatenation can be performed either manual coding or while loop if the value is greater than 1 (that is bigger than 1000)
The last 3 digits can be computed substr(InputString, (total length - 3), 3) = substr(1234567, 4,3) = 567 (.. then concat comma in front)
2nd last 3 digits can be substr(InputString, {(total length - 3)-3}, 3) = substr(1234567, 1, 3) = 234 (.. then concat comma in front of string)
Balance can be returned substr(InputString, 0, {(total length -3)-3}) = substr(1234567, 0, 1) = 1
So this can be handled either with an IF condition or in a WHILE loop