Cacher is the code snippet organizer for pro developers

*********************************************************
* Substring
DATA: email(25) TYPE C VALUE 'john_stewart@university.com',
		domain(10) TYPE C.
		
domain = email+13(10).
WRITE: / domain.

*format : var = var+<digitsintostring>(length)

* ie

domain = email+13(9).           "universit"
WRITE: / domain.
domain = email+12(9).			"@universi"
WRITE: / domain.

********************************************************************
* Calculate string length
length1 = STRLEN( str1 ) .
WRITE: / 'Length of str1', length1.
length1 = STRLEN( str2 ) .
WRITE: / 'Length of str1', length1.
length1 = STRLEN( str3 ) .
WRITE: / 'Length of str1', length1.
length1 = STRLEN( str4 ) .
WRITE: / 'Length of str1', length1.
length1 = STRLEN( str5 ) .
WRITE: / 'Length of str1', length1.

*******************************************************
* SPLIT STATEMENT
DATA:  ip1(15) TYPE C,
       ip2(15) TYPE C,
       ip3(15) TYPE C,
       split_string(15) TYPE C VALUE '90-90-90-90'.

SPLIT split_string at '-' INTO ip1 ip2 ip3.

WRITE: / ip1,
       / ip2,
       / ip3.

********************************************************
* SHIFT STATEMENT 
DATA: first_name(11) TYPE C VALUE '123JAMES456'.
WRITE: / first_name.
SHIFT first_name BY 3 PLACES LEFT.
WRITE: / first_name.
SHIFT first_name BY 3 PLACES RIGHT.
WRITE: / first_name.

*********************************************************************
* REPLACE STRING
DATA: stri1(20) TYPE C VALUE 'Panagos',
      stri2(20) TYPE C VALUE 'Den',
      stri3(20) TYPE C VALUE '192,193',
      stri4(20) TYPE C VALUE '100,101,102,103'.

WRITE: / stri1,
       / stri2,
       / stri3.

* Replace one char, first occurrence
REPLACE ',' WITH ':' INTO stri3.

WRITE: / stri1,
       / stri2,
       / stri3.

* Replace one string, first occurrence
REPLACE 'en' WITH 'ALALA' INTO stri2.

WRITE: / stri1,
       / stri2,
       / stri3.

* Replace multiple occurrences of string. 
REPLACE ALL OCCURRENCES OF ',' IN:
    stri3 with '##',
    stri4 with ':o:'.

WRITE: / stri1,
       / stri2,
       / stri3,
       / stri4.

*********************************************************
* OVERLAY TEXT 
DATA: csv_text(25) TYPE C VALUE 'John and Paul',
      comma_text(25) TYPE C VALUE '    ,   ,    .',
      var5(25) TYPE C.

WRITE: / csv_text,
       / comma_text.

OVERLAY csv_text WITH comma_text.
WRITE sy-subrc.

WRITE: / csv_text.

*********************************************************************
* CONDENSE STRING
CONDENSE str5.
length2 = STRLEN( str5 ).
WRITE: /'Condensed string: ', str5, / 'Length: ', length2.
CONDENSE str5 NO-GAPS.
length2 = STRLEN( str5 ).
WRITE: /'Condensed string: ', str5, / 'Length: ', length2.

* CONCATENATE STRINGS
DATA: str1(20) TYPE C VALUE 'Hello',
      str2(20) TYPE C VALUE 'World',
      str3(20) TYPE C,
      str4 TYPE C,
      str5(30) TYPE C,
      length1 TYPE I,
      length2 TYPE I,
      length3 TYPE I,
      cond1 TYPE C,
      cond2 TYPE C.

WRITE: / 'String 1: ', str1,
       / 'String 2: ', str2.

* Concatenate into two values
CONCATENATE str1 str2 INTO str3.
WRITE: / 'String3: ', str3.

* Concatenated into variable with no defined size
CONCATENATE str1 str2 INTO str4.
WRITE: / 'String4: ', str4.

* Concatenated with defined separator
CONCATENATE str1 str2 INTO str5 SEPARATED BY ' '.
WRITE: / 'String5: ', str5.

* Concatenated with defined separator and more than one parameter.
CONCATENATE str1 str2 str3 INTO str5 SEPARATED BY ' '.
WRITE: / 'String6: ', str5.

1. abapconcat.abap          : Concatenate strings
2. abapstringlength.abap    : Calculate string length
3. abapcondense.abap        : Condense string (remove spaces etc)
4. abapreplace.abap         : Find/Replace in string
5. abapsplit.abap           : Split string / Parse string from delimiter
6. abapshift.abap           : Shift string left or right
7. abapoverlay.abap         : Overlay a string with another.
8. abapsubstring.abap       : Substring a string