topic Re: Remove the Zeros in Application Development and Automation Discussions

Remove the Zeros

Former Member — Thu, 10 Jul 2008 11:37:30 GMT

Hi Guy's,

Please help me how to delete the zeros '124000000'. I want only 124. how to do this one.

Thanks and Regards,

Sai

Re: Remove the Zeros

RaymondGiuseppi — Thu, 10 Jul 2008 11:39:40 GMT

Use SHIFT and CONDENSE for a character string

* string = '124000000'
SHIFT string RIGHT DELETING TRAILING '0'. 
* string = '      124'
CONDENSE string. 
* string = '124      '

Be also a little more precise on your need.

Regards

Re: Remove the Zeros

former_member195383 — Thu, 10 Jul 2008 11:39:43 GMT

SHIFT wf_c RIGHT DELETING TRAILING '0'.

wf_c contains the value .....

Edited by: Rudra Prasanna Mohapatra on Jul 10, 2008 1:39 PM

Re: Remove the Zeros

Former Member — Thu, 10 Jul 2008 11:39:52 GMT

use ..

data : v_value(20) value '124000000'.

replace all ocurrences of '0' in v_value with ''.

condense v_value.

Re: Remove the Zeros

Former Member — Thu, 10 Jul 2008 11:43:15 GMT

Hey

use this fm

CONVERSION_EXIT_ALPHA_INPUT Conversion exit ALPHA, external->internal

CONVERSION_EXIT_ALPHA_OUTPUT Conversion exit ALPHA, internal->external

Regards

Divya

Re: Remove the Zeros

suredarreddy_pulimamidi — Thu, 10 Jul 2008 11:43:37 GMT

Hi,

Decalre one local variable with the length 3 char and move to the variable to local variable.

warm regards,

Surendar Reddy.

Re: Remove the Zeros

Former Member — Thu, 10 Jul 2008 11:43:50 GMT

hiiii

use following code

DATA : a(15) TYPE c,

a = '2400000000'.

REPLACE ALL OCCURRENCES OF '0' IN a WITH space.
write : a.

regards

twinkal

Re: Remove the Zeros

Former Member — Thu, 10 Jul 2008 11:44:46 GMT

Hi,

Check this :

DATA:
  w_test TYPE string VALUE `0000386787740000`.
  SHIFT w_test RIGHT DELETING TRAILING '0'.
  write: w_test.

Regards

Adil

Re: Remove the Zeros

Former Member — Thu, 10 Jul 2008 11:45:09 GMT

Hi,

check below code.

data:

w_no type i value '12400000',

w_check type i,

w_final type i.

w_final = w_no.

do.

w_check = w_final mod 10.

if w_check = 0.

w_final = w_final div 10.

else.

exit.

endif.

enddo.

write w_final.

Re: Remove the Zeros

Former Member — Thu, 10 Jul 2008 11:46:58 GMT

REPORT  ZTEST_ZERO.

data: in(9) type c.

in = 124000000.


SHIFT in RIGHT DELETING TRAILING '0'.

write in.

Re: Remove the Zeros

Former Member — Thu, 10 Jul 2008 11:51:41 GMT

Hi,

string = '124000000'.
SHIFT string RIGHT DELETING TRAILING '0'.

Regards,

Rajitha.