Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- *&---------------------------------------------------------------------*
- *& Report ZLAB2_5627
- *&
- *&---------------------------------------------------------------------*
- *&
- *&
- *&---------------------------------------------------------------------*
- REPORT ZLAB2_5627 LINE-SIZE 255 NO STANDARD PAGE HEADING.
- *WRITE: 50 'TANATIP' ,170 'IAMJUNCHAI'.
- *WRITE: 15(10) 'ABCDEFGHIJKLMNOPQRSTUVWXYZ','MAX'.
- *NEW-LINE.
- *WRITE 'HELLO WORLD'.
- *WRITE /'HELLO WORLD'.
- *WRITE: /'FIRST','DATA1'.
- *WRITE: /'SECOND','DATA2'.
- *WRITE: /(20)'THIRD LINE','DATA3'.
- *WRITE: /35'FOURTH LINE','DATA4'.
- *CONSTANTS COLNO1 TYPE I VALUE 5.
- *CONSTANTS COLNO2 TYPE I VALUE 80.
- *WRITE: AT COLNO1 'HELLO', AT COLNO2 'WORLD1'.
- *SKIP 5.
- *WRITE: AT /COLNO1 'TEST1', AT COLNO2 'WORLD2'.
- *WRITE: AT /COLNO1 'TEST2', AT COLNO2 'WORLD3'.
- *WRITE: AT /COLNO1 'TEST3', AT COLNO2 'WORLD4'.
- *CONSTANTS COLNO40 TYPE I VALUE 40.
- *CONSTANTS COLNO60 TYPE I VALUE 60.
- *SKIP 19.
- *WRITE AT COLNO40 'TANATIP'.
- *SKIP 39.
- *WRITE AT COLNO60 'IAMJUNCHAI'.
- *SKIP TO LINE 2.
- *WRITE: AT /COLNO1 'TEST4', AT COLNO2 'WORLD5'.
- *WRITE: AT /COLNO1 'TEST5', AT COLNO2 'WORLD6'.
- *CONSTANTS COLNO1 TYPE I VALUE 2.
- *CONSTANTS COLNO2 TYPE I VALUE 24.
- *WRITE: AT COLNO1 'HELLO', AT COLNO2 'WORLD1'.
- *ULINE /1(60).
- *WRITE /1(60) SY-ULINE.
- *WRITE: / SY-VLINE,22 SY-VLINE.
- *WRITE: AT COLNO1 'HELLO', AT COLNO2 'WORLD2'.
- *WRITE: 'DATE :',SY-DATUM.
- *WRITE: /'TIME :',SY-UZEIT.
- *WRITE: /'USER :',SY-UNAME.
- *WRITE: /'REPORT: ',SY-REPID.
- *WRITE /1(60) SY-ULINE.
- *FORMAT COLOR 1.
- *WRITE: / SY-VLINE,AT COLNO1(22)'TEST' CENTERED,22 SY-VLINE,AT COLNO2(35)'WORLD', 60 SY-VLINE.
- *WRITE /1(60) SY-ULINE.
- *FORMAT COLOR OFF.
- *FORMAT COLOR 5.
- *WRITE: / SY-VLINE,AT COLNO1(20)'TEST2',22 SY-VLINE,AT COLNO2(35) 'WORLD2',60 SY-VLINE.
- *FORMAT COLOR OFF.
- *FORMAT COLOR 6.
- *WRITE: / SY-VLINE,AT COLNO1(20)'TEST3',22 SY-VLINE,AT COLNO2(35) 'WORLD3',60 SY-VLINE.
- *FORMAT COLOR OFF.
- *FORMAT COLOR 3.
- *WRITE: / SY-VLINE,AT COLNO1(20)'TEST4',22 SY-VLINE,AT COLNO2(35) 'WORLD4',60 SY-VLINE.
- *WRITE /1(60) SY-ULINE.
- *FORMAT COLOR OFF.
- CONSTANTS COLNO1 TYPE I VALUE 2.
- CONSTANTS COLNO2 TYPE I VALUE 28.
- CONSTANTS COLNO3 TYPE I VALUE 60.
- WRITE: AT COLNO1 'DATE :',SY-DATUM.
- WRITE: AT COLNO2 'Customers Listing'.
- WRITE: AT COLNO3 'TIME :',SY-UZEIT.
- FORMAT COLOR 1.
- WRITE /1(72) SY-ULINE.
- WRITE: / SY-VLINE,AT COLNO1(16) 'Customers ID', 18 SY-VLINE, AT COLNO2(24)'Name' CENTERED,52 SY-VLINE,AT COLNO3(10)'CITY', 72 SY-VLINE.
- WRITE /1(72) SY-ULINE.
- FORMAT COLOR OFF.
- WRITE: / SY-VLINE,AT COLNO1(16) '5510405627', 18 SY-VLINE, AT COLNO2(24)'Tanatip I.' CENTERED,52 SY-VLINE,AT COLNO3(10)'Bangkok', 72 SY-VLINE.
- WRITE: / SY-VLINE,AT COLNO1(16) '5510450096', 18 SY-VLINE, AT COLNO2(24)'Nattadecha L.' CENTERED,52 SY-VLINE,AT COLNO3(10)'Nonthaburi', 72 SY-VLINE.
- WRITE: / SY-VLINE,AT COLNO1(16) '5510450169', 18 SY-VLINE, AT COLNO2(24)'Nattanon L.' CENTERED,52 SY-VLINE,AT COLNO3(10)'Bangkok', 72 SY-VLINE.
- WRITE /1(72) SY-ULINE.
Advertisement
Add Comment
Please, Sign In to add comment