ABAP by Ajay

  Report REPORT  zab_rp_concat_7_4 . DATA :   lv_str1    TYPE  string  VALUE  'ajay' ,       lv_str2    TYPE  string  VALUE  'babu' ,       lv_str3    TYPE  string  VALUE  'varikallu' ,       lv_final1  TYPE  string ,       lv_final2  TYPE  string . CONCATENATE  lv_str1 lv_str2 lv_str3  INTO  lv_final1  SEPARATED  BY  space . WRITE :   /  'Old syntax: '  ,  lv_final1  COLOR  4 . lv_final2  =  | { lv_str1 } { lv_str2 } { lv_str3 } | . WRITE :   /  'New syntax: '  ,  lv_final2  COLOR  5 . Output ****** *********** ******** Thank You ****** ******* *********

variable =|{ variable alpha = out }|     * It is used to remove leading zeros. variable =|{ variable alpha = in }|     *  It is used to Add leading zeros. Report REPORT  zab_rp_alpha . DATA :   lv_a ( 10 )  TYPE  c  VALUE  '0000012345' . DATA :   lv_b ( 10 )  TYPE  c  VALUE  '12345' . lv_a  =  |{ lv_a ALPHA  =  OUT }| . lv_b  =  |{ lv_b ALPHA  =  IN  }| . WRITE :   'Remove leading zeros(0000012345): ' ,  lv_a  COLOR  5 ,        /  'ADD leading zeros(12345): ' ,  lv_b  COLOR  6 . Output ****** *********** ******* ***** * Thank You ****** ******* *** *** *** ** ***

  * This is used to join  multiple strings into a single string. Code REPORT  zab_rp_str_concat . DATA :   str1       TYPE  string  VALUE  'Hello' ,       str2       TYPE  string  VALUE  'Welcome to' ,       str3       TYPE  string  VALUE  'ABAP' ,       str_final  TYPE  string . CONCATENATE  str1 str2 str3  INTO  str_final  SEPARATED  BY  ' ' . WRITE :  / str1. WRITE :  / str2. WRITE :  / str3. WRITE :  /  'Final string: ' , str_final COLOR 1 . Output ****** *********** Thank You ****** **********

  * This function is used to split the string into sub strings. Code REPORT  zab_rp_substring . DATA :   str1  TYPE  string  VALUE  'abcdefghi' ,       str2  TYPE  string . str2  =  substring (  val  =  str1 off  =  2  len  =  3  ) . WRITE :   /  'substring: ' ,  str2  COLOR  1 .        " cde str2  =  substring_from (  val  =  str1 sub  =  'd'  ) . WRITE :  /  'substring from: ' ,  str2  COLOR  2 .       " defghi str2  =  substring_after (  val  =  str1 sub  =  'd'  ) . WRITE :   /  'substring after: ' ,  str2  COLOR  3 .       " efghi str2  =  subst...

 * This function is used to reverse the string. Code REPORT  zab_rp_stringreverse . DATA :   lv_str1  TYPE  string  VALUE  'welcome to abap' ,       lv_str2  TYPE  string . WRITE :   /  'Before string reverse:' , lv_str1  COLOR  5 . lv_str2  =  reverse (  lv_str1  ) . WRITE :   /  'After string reverse:' , lv_str2  COLOR  6 . Output ****** *********** Thank You ****** **********

 * This function is used to repeat the string using x times. Code REPORT  zab_rp_stringrepeat . DATA :   lv_string1  TYPE  string  VALUE  'Ajay' ,       lv_string2  TYPE  string ,        times       TYPE  i  VALUE  '3' . WRITE :    /  'Before repeat' ,  lv_string1 . lv_string2  =  repeat (  val  =  lv_string1 occ  =  times  )  . WRITE:   /  'After repeat' , lv_string2 . Output ****** *********** Thank You ****** **********

         * The purpose of persistence class is to perform data base operations like insert, update, delete.          *  The persistence class name must start with CL.          *  While creating the persistence class create 2 helper class automatically. Those helper classes are CA and CB.         *CA is called as actor class or agent class and CB is called base class.

  1. Goto  SE38 . 2. Give  program name  and click on  create . 3. Give  title  and  click on save . 4. Write  code. REPORT  zab_rp_oops_pfstatus_ucomm . TABLES :   ekko , ekpo . TYPES :   BEGIN  OF  ty_ekko ,          ebeln  TYPE  ekko - ebeln ,          bukrs  TYPE  ekko - bukrs ,          bstyp  TYPE  ekko - bstyp ,          bsart  TYPE  ekko - bsart ,         END  OF  ty_ekko . TYPES :   BEGIN  OF  ty_ekpo ,          ebeln  TYPE  ekpo - ebeln ,          ebelp  TYPE  ekpo - ebelp ,         ...