Parameter : p_text1(80) type c value 06-DEC-06 : Sites Converted From 005 To 001,
P_text2(80) type c value As Country Has Move Off EST "RED" List.
Using below logic
AT SELECTION-SCREEN.
TRANSLATE P_TEXT1+1(69) TO LOWER CASE.
TRANSLATE P_TEXT2+1(69) TO LOWER CASE.
TRANSLATE P_TEXT3+1(69) TO LOWER CASE.
DATA : CTR TYPE I.
DATA : L TYPE I.
DATA : POS TYPE I.
DATA : POSB TYPE I.
L = STRLEN( P_TEXT1 ).
DO L TIMES.
POS = SY-INDEX.
POSB = SY-INDEX - 1.
CHECK POS >= 2.
IF NOT P_TEXT1POS(1) IS INITIAL AND P_TEXT1POSB(1) IS INITIAL.
TRANSLATE P_TEXT1+POS(1) TO UPPER CASE.
ELSEIF NOT P_TEXT2POS(1) IS INITIAL AND P_TEXT2POSB(1) IS INITIAL.
TRANSLATE P_TEXT2+POS(1) TO UPPER CASE.
ELSEIF NOT P_TEXT3POS(1) IS INITIAL AND P_TEXT3POSB(1) IS INITIAL.
TRANSLATE P_TEXT3+POS(1) TO UPPER CASE.
ENDIF.
ENDDO.
when i ran this report with following text 06-DEC-06 : SITES CONVERTED FROM 005 TO 001 it has to give output like 06-Ded-06 : Sites Converted From 005 To 001
and when i ran this reoirt with text AS COUNTRY HAS MOVE OFF EST "RED" LIST it has to give As Country Has Move EST "RED" List
any body can send me the sample cod eplz..
thanks
maheedhar.t