topic Remove zero after decimal point in Application Development and Automation Discussions

Remove zero after decimal point

Former Member — Tue, 23 Feb 2016 02:07:18 GMT

Hi all sap master.

i want to ask how to remove zero after decimal point in abap code?

I have code like this

DATA: numb(13) TYPE c VALUE '12123.010'.

SHIFT numb RIGHT DELETING TRAILING '0'.

WRITE: numb.

But its not work.

Any clue?

Thank and regard

Re: Remove zero after decimal point

Former Member — Tue, 23 Feb 2016 02:29:22 GMT

How about this?

DATA: l_field1 TYPE string,

l_field2 TYPE string.

DATA: numb(13) TYPE c VALUE '12123.010'.

SPLIT numb AT '.' INTO l_field1 l_field2.

REPLACE ALL OCCURRENCES OF '0' IN l_field2 WITH space.

CONDENSE l_field2.

CONCATENATE l_field1 l_field2 INTO l_field1 SEPARATED BY '.'.

WRITE l_field1.

Re: Remove zero after decimal point

Former Member — Tue, 23 Feb 2016 03:33:46 GMT

i dont want remove all zero after decimal point.

The result from your eg the output like this 12123.1

This mean the amount different.

If i want output like this 12.123,01?

Any clue?

Thanks and regard

Re: Remove zero after decimal point

Former Member — Tue, 23 Feb 2016 04:06:24 GMT

Then do this instead:

(Remove replace all occurence and replace with shift)

DATA: l_field1 TYPE string,

l_field2 TYPE string.

DATA: numb(13) TYPE c VALUE '12123.010'.

SPLIT numb AT '.' INTO l_field1 l_field2.

SHIFT l_field2 RIGHT DELETING TRAILING '0'.

CONDENSE l_field2.

CONCATENATE l_field1 l_field2 INTO l_field1 SEPARATED BY '.'.

WRITE l_field1.

Re: Remove zero after decimal point

rosenberg_eitan — Tue, 23 Feb 2016 06:10:32 GMT

Hi,

Try this please:

FORM test_06 .

DATA: numb TYPE p DECIMALS 2 VALUE '12123.010' . " Data: numb of type Packed Number

DATA: buffer TYPE c LENGTH 20 . " Data: buffer of type Character

WRITE numb TO buffer LEFT-JUSTIFIED NO-GROUPING DECIMALS 0 .

ENDFORM . "test_06

Regards.

Re: Remove zero after decimal point

ThangaPrakash — Tue, 23 Feb 2016 06:13:05 GMT

Do you want to convert decimal notation format from 12,123.010(,.) to 12.123,01(.,) and remove trailing 0 after the decimals?

If yes, in addition to Elzkie's code above, add additional TRANSLATE statement as below.

DATA: l_field1 TYPE string,

l_field2 TYPE string.

DATA: numb(13) TYPE c VALUE '12,123.010'.

SPLIT numb AT '.' INTO l_field1 l_field2.

SHIFT l_field2 RIGHT DELETING TRAILING '0'.

CONDENSE l_field2.

CONCATENATE l_field1 l_field2 INTO l_field1 SEPARATED BY '.'.

TRANSLATE l_field1 USING ',..,'.

WRITE l_field1.

Regards,

Thanga

Re: Remove zero after decimal point

Former Member — Tue, 23 Feb 2016 07:20:04 GMT

Hi thanga

yes i want.

Like i want. Thank you so much

Re: Remove zero after decimal point

Velu — Wed, 24 Feb 2016 06:30:01 GMT

Hello,

Try the below piece of code and it should work in your case.

DATA: v_var1(13) TYPE c.

v_var1 = '12,123.010'.

REPLACE ALL OCCURRENCES OF '.' IN v_var1 WITH '-'.

REPLACE ALL OCCURRENCES OF ',' IN v_var1 WITH '.'.

REPLACE ALL OCCURRENCES OF '-' IN v_var1 WITH ','.

SHIFT v_var1 RIGHT DELETING TRAILING '0'.

WRITE: v_var1.

If it you declare the variable as a Quantity data type, then you can change the below setting to achieve the same.

System->User Profile->Own data