SAP - Write Statemets Additions.

Hello SAP Viewers,

This blog is completely helpful to revise/learn basics of SAP ABAP WRITE statement additions.

I have almost covered all the WRITE statement additions at one place and output too.

* Declarations of data types.
* Data Type(DT) Declaration.                              "{}->Optional
DATA :
      lv_reg_no      TYPE i,                                     "No-default INTEGER value.
      lv_count       TYPE i VALUE '009001',          "Default INTEGER value.
      lv_percentage  TYPE p DECIMALS 3,          "PACKED {Decimal <n>} DT
      lv_exact_val   TYPE f,                                    "FLOAT DT
*...
      lv_fname       TYPE c LENGTH 20,               "CHAR {LENGTH<n>} DT
      lv_lname(10)   TYPE c,                                   "CHAR<N> DT
*...
      lv_uname(50)   TYPE c VALUE
                   '     Raju kiran    ragu   username.',     "Default CHAR value
      lv_pincode(8)  TYPE n VALUE '500001',      "NUMERIC CHAR DT
      lv_date        TYPE d VALUE '20170502',       "DATE DT
      lv_time        TYPE t VALUE '142532',           "TIME DT
      lv_comments    TYPE
                     string VALUE
                     'Welcome to SAP ABAP Declaration',   "STRING DT
*...
      lc_pos         TYPE i VALUE 1,
      lc_len         TYPE i VALUE 25.                     "Constants Declaration
*...


START-OF-SELECTION.
*  Assign Values
  lv_reg_no         = 20.                                           "Numeric Value
  lv_percentage     = '200.5679'.                            "CEIL - 200.568
  lv_exact_val      = '-10.3'.                                    "FLOAT DT value (-n to n)accepted
  lv_fname          = 'SAP'.                                      "CHAR 20constant spaces declared
*                                                                            "Blank spaces would be omitted.
  lv_lname          = 'ABAP'.                                   "CHAR 10
  lv_comments       = 'String dynamic checks'.      "VARCHAR/STRING dynamic space allocation

END-OF-SELECTION.
* Complete WRITE statement additions.
* Outputs.

**..
*  1. Underline for specified/complete text ULINE {<len>}.
  ULINE /1(25).                                                       "Similarly VLINE(<LEN>).
  ULINE AT /lc_pos(lc_len).                                   "Used constants
**..

**..
* 2. Without Chain Operator.
  WRITE / '2. Without Chain Operator'.
  WRITE / 'Hello'.
  WRITE / 'How Are Your?'.
**..

**..
* 3. New Rows (similar as ENTER key in Keyboard)
  SKIP 2.                                                                  "SKIP{<N>}
*  SKIP 3.                                                                "SKIP(3) 3 - New Lines.
*  SKIP TO LINE 6.                                                "Jumps to Line 6.
**..
**..
*  4. With Chain Operator.
  WRITE / : '4. With Chain Operator'.
  WRITE / : 'Hello',
            'How are you? '.
**..
  SKIP 2.
**..
* 5. UNDER.
  WRITE / : '5. UNDER','How are you?'.
  WRITE / : 'Yes i am fine.' UNDER 'How are you?'.    "UNDER{<FIELD/VARIABLE>}
**..

  SKIP 2.
**..
* 6. CONDENCE.
  WRITE / : '6.CONDENCE'.
  WRITE   : / lv_uname,'*'.                                           "* Detect Space Length
* Removing leading and closing blank spaces completely and
* convert sequence of blank spaces into a single blank space.
  CONDENSE lv_uname.
  WRITE   : / lv_uname,'*'.
**..

**..
  SKIP 2.
* 7.  CONDENSE with NO-GAPS
  WRITE / : '7.CONDENCE with NO-GAPS'.
  WRITE   : / lv_uname,'*'.                                            "* Detect Space Length
  CONDENSE lv_uname NO-GAPS.
  WRITE   : / lv_uname,'*'.
**..

  SKIP 2.
**..
* 8. NO-GAP.
  WRITE / : '8. NO-GAP'.
  WRITE : / 'A','*'.
  WRITE : / 'A' NO-GAP,'*'.
**..

  SKIP 2.
**..
* 9. Colors
  WRITE / : '9. COLORS'.
  WRITE / : 'This is color coding - COLOR HEADING'  COLOR COL_HEADING.
  WRITE / : 'This is color coding - COLOR NEGATIVE' COLOR COL_NEGATIVE.
  WRITE / : 'This is color coding - COLOR 5'        COLOR 5.
  WRITE / : 'This is color coding - COLOR NEGATIVE INVERSE ON'
                                                    COLOR COL_NEGATIVE INVERSE ON.
  WRITE / : 'This is color coding - COLOR NEGATIVE INTENSIFIED OFF'
                                                    COLOR COL_NEGATIVE INTENSIFIED OFF.
  WRITE / : 'This is color coding - COLOR GROUP INTENSIFIED ON INVERSE ON'
                                                    COLOR COL_GROUP INTENSIFIED ON INVERSE ON.
  WRITE / : 'This is color coding - COLOR INVERSE ON HOTSPOT ON'
                                                    COLOR 6 INVERSE ON HOTSPOT ON.
  WRITE / : lv_fname INPUT ON.                              "INPUT box with value
**..

  SKIP 2.
**..
* 10. SYMBOL
  WRITE / : '10. SYMBOL'.
  WRITE / : sym_note.
  WRITE / : sym_note AS SYMBOL.                          "Include <SYMBOL>
**..

  SKIP 2.
**..
* 11. ICON
  WRITE : / '11. ICONS'.
  WRITE : / icon_graphics.                                           "Include <ICON>
  WRITE : / icon_graphics AS ICON HOTSPOT ON.
**..

  SKIP 2.
**..
* 12. LINES
  WRITE : / '12. AS LINE'.
  WRITE : / line_bottom_right_corner.
  WRITE : / 'Hello',line_bottom_left_corner AS LINE.     "Include <LINE>
**..

  SKIP 2.
**..
* 13. NO-SIGN
  WRITE : / '13. NO-SIGN'.
  WRITE : / lv_exact_val.
  WRITE : / lv_exact_val NO-SIGN.                                 "Numeric DT Additions
**..

  SKIP 2.
**..
* 14. NO-ZERO
  WRITE : / '14. NO-ZERO'.
  WRITE : / lv_count NO-ZERO.
**..

  SKIP 2.
**..
* 15.Right/Left/Centered Justified
  WRITE : / '15. Right/Left/Centered Justified'.
  WRITE : / lv_uname CENTERED.
  WRITE : / lv_uname LEFT-JUSTIFIED.                        "Default.
  WRITE : / lv_uname RIGHT-JUSTIFIED.
**..

  SKIP 2.
**..
* 16. CHECKBOX
  WRITE : / '16. CHECKBOX'.
  WRITE : /   lv_lname AS CHECKBOX,
            7 lv_lname COLOR 5.
**..

  SKIP 2.
**..
* 17. EDIT MASK
  WRITE : / '17. EDIT MASK'.
  WRITE : / sy-datum USING EDIT MASK '__-__-____'.        "DATE FORMAT
**..

  SKIP 2.
**..
* 18. DATE FORMAT
  WRITE : / sy-datum.
  WRITE : / sy-datum DDMMYY.                                     "DATE FORMATS
**..

  SKIP 2.
**..
* 19. EXPONENT
  write : / '19. EXPONENT'.
  lv_exact_val = sqrt( 2 ).
  WRITE : / lv_exact_val.
  WRITE : / lv_exact_val EXPONENT 0.
**..

  SKIP 2.
**..
* 20. NO GROUPING
  write : / '20. NO GROUPING'.
  WRITE : / lv_exact_val NO-GROUPING DECIMALS 3.          "Valid only in P and D DT
**..

  SKIP 2.
**..
* 21. CURRENCY
  write : / '21. CURRENCY'.
  WRITE : / lv_exact_val CURRENCY 'EURO'.
**..

  SKIP 2.
**..
* ROUND SCALE
  WRITE : / 'ROUND SCALE'.
  WRITE : / lv_percentage ROUND 4.
**..

  SKIP 2.
**..
**..
TOP-OF-PAGE.
  WRITE / : 'This is TOP OF PAGE.'.
*
END-OF-PAGE.
  WRITE / : 'This is END OF PAGE.'.
*
*  NEW-PAGE.
*  WRITE / : 'This is NEW PAGE'.
*
*  NEW-LINE.
*  WRITE / : 'This is NEW LINE.'.
**..

Thanks.