Quantcast
Channel: SCN : All Content - Web Dynpro ABAP
Viewing all articles
Browse latest Browse all 3667

classical report to ALV Report

$
0
0

I have developed simple report, i want to convert this into webdynpro alv, could you throw some ideas, how to develop in webdynpro alv

 

Below is my code and screen shot of my report

 

Thanks

Vijaya

 

2.jpg

TYPES : BEGIN OF ty_str,

         remit TYPE char11,

         sno(2) TYPE n,

         ddo TYPE char50,

         voucher_no(4) TYPE n,

         voucher_date TYPE sy-datum,

         amount TYPE wrbtr,

         END OF ty_str.

 

DATA : it TYPE TABLE OF ty_str,

        wa TYPE ty_str.

 

DATA lv_count TYPE i.

 

 

CLEAR wa.

wa-remit = '8782-103-03'.

wa-sno = '01'.

wa-ddo = 'AAA'.

wa-voucher_no = '0001'.

wa-voucher_date = '20140630'.

wa-amount = '379557'.

APPEND wa TO it.

 

 

CLEAR wa.

wa-remit = '8782-103-03'.

wa-sno = '02'.

wa-ddo = 'BBB'.

wa-voucher_no = '0002'.

wa-voucher_date = '20140630'.

wa-amount = '8209'.

APPEND wa TO it.

 

 

CLEAR wa.

wa-remit = '8443-800-03'.

wa-sno = '01'.

wa-ddo = 'ABC'.

wa-voucher_no = '0001'.

wa-voucher_date = '20140612'.

wa-amount = '198315'.

APPEND wa TO it.

 

CLEAR wa.

wa-remit = '8443-800-03'.

wa-sno = '02'.

wa-ddo = 'BBC'.

wa-voucher_no = '0001'.

wa-voucher_date = '20140612'.

wa-amount = '105922'.

APPEND wa TO it.

 

 

CLEAR wa.

wa-remit = '8443-800-03'.

wa-sno = '03'.

wa-ddo = 'CCC'.

wa-voucher_no = '0007'.

wa-voucher_date = '20140612'.

wa-amount = '2042278'.

APPEND wa TO it.

 

 

CLEAR wa.

wa-remit = '8443-800-03'.

wa-sno = '04'.

wa-ddo = 'DDD'.

wa-voucher_no = '0008'.

wa-voucher_date = '20140612'.

wa-amount = '418735'.

APPEND wa TO it.

 

 

CLEAR wa.

wa-remit = '8443-800-03'.

wa-sno = '05'.

wa-ddo = 'EEE'.

wa-voucher_no = '0012'.

wa-voucher_date = '20140612'.

wa-amount = '1020066'.

APPEND wa TO it.

 

 

CLEAR wa.

wa-remit = '8443-800-03'.

wa-sno = '05'.

wa-ddo = 'FFF'.

wa-voucher_no = '0012'.

wa-voucher_date = '20140612'.

wa-amount = '1020066'.

APPEND wa TO it.

 

SORT it BY remit DESCENDING.

 

 

 

LOOP AT it INTO wa.

   lv_count = lv_count + 1.

 

   AT NEW remit.

     WRITE :/ 'Remittance', wa-remit.

   ENDAT.

 

   WRITE : / wa-sno, wa-ddo, wa-voucher_no, wa-voucher_date, wa-amount.

 

   AT END OF remit.

     SUM.

     WRITE: / 'No of rows', lv_count.

     WRITE : /65  'Total', wa-amount.

     CLEAR lv_count.

   ENDAT.

 

ENDLOOP.


Viewing all articles
Browse latest Browse all 3667

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>