ABAP code help... 2 :-)

[Former Member]

Hi,

I'm changing an old report with write sentences... I would like to do "write" value data type CURR in format -99999999999,99, now i have vaules displayed in format 999.999.999,99-

How Can I change this?

example:

TYPES: BEGIN OF line,

gross LIKE bseg-dmbtr, "Brutto versteuerter Betrag

netto LIKE bseg-dmbtr, "nicht versteuerter Betrag N0

END OF line.

......

WRITE: /153 itab-gross, itab-netto.

Thanks + points granted

Saso

[former_member624107]

Hi use no grouping...

write field NO-GROUPING.

or u can use replace statement...

hop this will help u

reward if useful..

[Former Member]

hi ,

following code may solve half of your problem...

DATA : text type char18.
text = itab-gross.      "field with value 999.999.999,99 
REPLACE ALL OCCURRENCES OF   '.' IN  text
  WITH ' '.
CONDENSE text.
WRITE :/153 text.

Message was edited by:

Sudhakar G

[Former Member]

Try using the statement after write

WRITE: /153 itab-gross CURRENCY w

Effect

Correct format for currency specified in the field w.

Treats the contents as a currency amount. The currency specified in w determines how many decimal places this amount should have.

The contents of w are used as a currency key for the table TCURX; if there is no entry for w, the system assumes that the currency amount has 2 decimal places.

Else u can try <b>SET COUNTRY</b> command and den use write stmts

Hope dis helps

Reward if it does

[Former Member]

Thanks a lot!!

[Former Member]

I want to reward points, but i don't have this option on this question???

[Former Member]

Hi,

DATA : text(18) value '999.999.999,99'.

REPLACE ALL OCCURRENCES OF '.' IN text

WITH ' '.

CONDENSE text.

WRITE 😕 text.

Try this,

KC

[Former Member]

the best solution is NO-GROUPING,

thanks