topic Re: Leading zero problem! in Application Development and Automation Discussions

Leading zero problem!

Former Member — Wed, 05 Dec 2007 10:19:29 GMT

Hi everybody!

My requirement is that i want a field with fixed length so that if i delete leading zero by using shift or conversion exit the length should not vary(no should not move left).

i.e if the field value is '000567' then i need the output as ' 567', zero's to be replaced by blank characters.

pls help.

Regards,

Parwez.

Re: Leading zero problem!

Former Member — Wed, 05 Dec 2007 10:21:12 GMT

HI,

SHIFT var LEFT DELETING LEADING '0'.

<b>example:</b>

data:var(5) value '00123'.

write:/ var.

SHIFT var LEFT DELETING LEADING '0'.

write:/ var.

rgds,

bharat.

Re: Leading zero problem!

Former Member — Wed, 05 Dec 2007 10:24:44 GMT

SHIFT <variable> LEFT DELETING LEADING '0'.

use this function module

<b>CONVERSION_EXIT_ALPHA_OUTPUT</b> converts any number with zeroes right into a simple integer

Example:

input = 00000000000123

output = 123

Re: Leading zero problem!

jayanthi_jayaraman — Wed, 05 Dec 2007 10:26:21 GMT

Hi,

Use translate.

data c1(6) value '000567'.

data i1 type i.

translate c1 using ' 567'.

i1 = strlen( c1 ).

write c1.

write i1.

Re: Leading zero problem!

Former Member — Wed, 05 Dec 2007 10:28:31 GMT

hi mirza,

you can use TRANSLATE, WRITE, SHIFT commands to perform required operation.........

Regards,

Kunjal

Re: Leading zero problem!

VikasB — Wed, 05 Dec 2007 10:31:02 GMT

Hi Mirza,

Use FM 'CONVERSION_EXIT_ALPHA_OUTPUT'

for eg.

CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'

EXPORTING

input = <varb>

IMPORTING

OUTPUT = <varb> .

hope this helps.

regards,

vikas.

plz reward if useful

Re: Leading zero problem!

kesavadas_thekkillath — Wed, 05 Dec 2007 10:45:27 GMT

var = '00028'.

write var using edit mask '==ALPHA'.