topic Re: Select Single * in Application Development and Automation Discussions

Select Single *

Former Member — Fri, 03 Mar 2006 05:45:12 GMT

Hello All,


Slect single * from t881 where rldnr = p_rldnr.
if t881-tab ne 'ZZXG1A'. (This can be ZZXG1T)
i need to change the 'T' to 'A'.
so ZZXG1AT becomes ZZXG1A.

rldnr = ledger

p_rldnr is the parameter used enters.

Regards,

- Sravan

Re: Select Single *

Former Member — Fri, 03 Mar 2006 05:48:10 GMT

Hi sravan,

1. Simple.

2. use like this.

REPORT abc.

DATA : m(30) TYPE c.

m = 'ZZXG1A'.

REPLACE 'A' IN m WITH 'T'.

break-point.

regards,

amit m.

Re: Select Single *

Former Member — Fri, 03 Mar 2006 05:48:52 GMT

Hi Sravan,

Can you please complete your question...

Slect single * from t881 where rldnr = p_rldnr.

if t881-tab ne 'ZZXG1A'. (This can be ZZXG1T)

t881-tab+5(1) = 'T'.

MODIFY t881 TRANSPORTING tab.

Re: Select Single *

Former Member — Fri, 03 Mar 2006 05:51:45 GMT

REPORT  YCHATEST                                .

tables:t881.

parameters : p_rldnr like t881-rldnr.

Select single * from t881 where rldnr = p_rldnr.

if t881-tab ne 'ZZXG1A'.
replace 'T' with 'A' into t881-tab.
write : t881-tab.
endif.

Message was edited by: Sekhar

Re: Select Single *

Former Member — Fri, 03 Mar 2006 05:51:55 GMT

Slect single * from t881 where rldnr = p_rldnr.
if t881-tab not in 'ZZXG1A'.
t881-tab = 'ZZXG1T'.
endif.

Re: Select Single *

hymavathi_oruganti — Fri, 03 Mar 2006 05:52:03 GMT

u can use

1.REPLACE statement as well

or else

2.u can do like this no.

if t881-tab ne 'ZZXG1A'.

t881-tab = 'ZZXG1T'.

Re: Select Single *

Former Member — Fri, 03 Mar 2006 05:52:47 GMT

HI sravan

Select single * from t881 where rldnr = p_rldnr.

dat = t881-tab.

replace 'A' in dat with 'T'.

if dat ne 'ZZXG1T'.

regards

kishore

Re: Select Single *

Former Member — Fri, 03 Mar 2006 05:58:23 GMT

Hi,

Use:

Select single * from t881 where rldnr = p_rldnr.

if t881-tab ne 'ZZXG1A'.

t881-tab = 'ZZXG1AT'.

endif.

Lokesh

Re: Select Single *

Former Member — Fri, 03 Mar 2006 05:58:56 GMT

Hi Sravan,

You can use either of the following:

a) TRANSLATE : This command will change your 'T' to 'A' if its ZZXG1T. If its not, it will leave it as it is.


SELECT SINGLE * FROM T881 WHERE RLDNR = P_RLDNR.
DATA: WA_CHANGE(2) VALUE 'TA'.
TRANSLATE T881-TAB USING WA_CHANGE.

b) RELPACE : This too will perform the same function.

REPLACE 'T' WITH 'A' INTO T881-TAB.

The only difference between the two is that TRANSALTE replaces all occurances of a character with the one succeeding it in WA_CHANGE, while REPLACE will replace only the 1st occurance of the character.

Hope this helps,

Regards,

Madhur

NB: Please do award points if found helpful.

Message was edited by: Madhur Chopra

Re: Select Single *

Former Member — Fri, 03 Mar 2006 06:06:34 GMT

Hi All,

Thanks for your postings.

Replace works fine but, the Table always not turns to be ZZXG1T, it could be ZZXG1X.

That is the reason only the last character has to be modified to 'A'.

regards,

- Sravan

Re: Select Single *

Former Member — Fri, 03 Mar 2006 06:08:12 GMT

Hi,

Use...

Select single * from t881 where rldnr = p_rldnr.

if t881-tab ne 'ZZXG1A'.

*This converts the last character from A to T

t881-tab+5(1) = 'T'.

MODIFY t881 TRANSPORTING tab.

endif.

Re: Select Single *

Former Member — Fri, 03 Mar 2006 06:10:32 GMT

REPORT  YCHATEST                                .

tables:t881.

data : len type i,
       length type i.
parameters : p_rldnr like t881-rldnr.

Select single * from t881 where rldnr = p_rldnr.

len = strlen( t881-tab ).
length = len - 1.

if t881-tab ne 'ZZXG1A'.
replace t881-tab+length(len) with 'A' into t881-tab.
write : t881-tab.
endif.

Re: Select Single *

Former Member — Fri, 03 Mar 2006 06:11:06 GMT

Hi sravan

HI sravan

try like this

Select single * from t881 where rldnr = p_rldnr.

dat = t881-tab.

dat1 = dat+5(1).

replace dat1 in dat with 'A'

it is working for me correctly

data: dat(10) type c, dat1 type c.

dat = 'ZZXG1A'.

dat1 = dat+5(1).

replace dat1 in dat with 'X'.

write dat.

OR you can try this

replace dat1 with 'X' into dat.

if dat ne '....'

regards

kishore

Message was edited by: Harikishore Sreenivasulu

Re: Select Single *

Former Member — Fri, 03 Mar 2006 06:23:25 GMT

Hi Harikishore,

I receive the message 'in Dat' is not expected.

Regards,

- Sravan

Re: Select Single *

Former Member — Fri, 03 Mar 2006 06:26:01 GMT

Hi Sravan,

Please check my previous post , it will replace last character with A irrespective of the length

Re: Select Single *

Former Member — Fri, 03 Mar 2006 08:28:42 GMT

Hi Sekar,

I implemented the code provided and i receive the message "Offset specification '+LENGTH' is not Numeric"

replace t881-tab+length(len) with 'A' into t881-tab.

Re: Select Single *

Former Member — Fri, 03 Mar 2006 08:36:38 GMT

Did you define length and len as Integer data types.

DATA length TYPE i.

DATA len TYPE i.

Re: Select Single *

Former Member — Fri, 03 Mar 2006 08:38:59 GMT

Hi,

Yes, i have done that.

Regards,

- Sravan

Re: Select Single *

Former Member — Fri, 03 Mar 2006 08:48:46 GMT

Hi Sravan,

I have even tested it. It works fine for me.

Can you please post your code...

DATA str(12) VALUE '12335'.
DATA len TYPE i VALUE 0.
DATA len1 TYPE i VALUE 1.
REPLACE str+len(len1) WITH 'A' INTO str.

Re: Select Single *

Former Member — Fri, 03 Mar 2006 09:03:25 GMT

Hi,


data: len type i,
      length type i.
*t881-tab is defined as Character type C of 10
SELECT single * from t881 where rldnr = p_rldnr.
* The output of the above could be ZZXG1T OR ZZEMEA1T
if t881-tab ne 'ZZXG1A'.
len = strlen( t881-tab ).
length = len - 1.
-->replace t881-tab+length(len) with 'A' into t881-tab.
endif.

The message occurs at the arrow pointed.

Regards,

- Sravan