Quantcast
Channel: SCN: Message List
Viewing all articles
Browse latest Browse all 10022

Re: restrict records at runtime

$
0
0

Hello faizur,

 

Please try implementing the below code per your requirement.

 

TABLES: bseg.

DATA : lt_bseg TYPE STANDARD TABLE OF bseg,

        lv_cursor TYPE cursor,

        lv_pack_size(5) TYPE c VALUE '2000',

        lv_lines TYPE i,

        lv_count TYPE i.

 

OPEN CURSOR lv_cursor FOR SELECT *

                             FROM bseg

                            WHERE bukrs = 'XXXX' AND

                                          belnr  = 'XXXXXXXXXX'  AND

                                          gjahr = 'XXXX'.

 

WHILE NOT lv_cursor IS INITIAL.

   IF NOT lv_cursor IS INITIAL.

     FETCH NEXT CURSOR lv_cursor INTO TABLE lt_bseg PACKAGE SIZE lv_pack_size.

     IF sy-subrc EQ 0.

       DESCRIBE TABLE lt_bseg LINES lv_lines.

       ADD lv_lines TO lv_count.

     ELSE.

       CLOSE CURSOR lv_cursor.

     ENDIF.

     IF lv_lines GT '2000'.

     MESSAGE e000(XXX) WITH 'Fetch Records are more than 2000'.

     ENDIF.

   ENDIF.

ENDWHILE.

 

 

Thanks,

Kishor.


Viewing all articles
Browse latest Browse all 10022

Trending Articles



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