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

Re: If Inte_ta is not intial not working

$
0
0

HI,

Thanks for your reply.

There is no data .

Please have a look on below atttached image.

For your reference i am pasting my total code here.

So many times i seen the below code. but i dont know..what is the mistake.

 

 

 

TYPES: BEGIN OF BKPF_TYPE,

        DOC_TYP TYPE BKPF-BLART,

        DOC_NUM TYPE BKPF-BELNR,

        DOC_DT  TYPE BKPF-BLDAT,

        POS_DT  TYPE BKPF-BUDAT,

        END OF BKPF_TYPE.

 

 

DATA: IT_BKPF TYPE TABLE OF BKPF_TYPE,

       WA_BKPF TYPE BKPF_TYPE.

 

 

TYPES: BEGIN OF BSEG_TYPE,

        DOC_NUM TYPE BSEG-BELNR,

        SPL_GL  TYPE BSEG-UMSKZ,

        POS_KEY TYPE BSEG-BSCHL,

        DB_CIN  TYPE BSEG-SHKZG,

        AMOUNT TYPE  BSEG-DMBTR,

        V_CODE TYPE BSEG-LIFNR,

        ZFBDT TYPE BSEG-ZFBDT,

        END OF BSEG_TYPE.

 

DATA:

       IT_BSEG TYPE TABLE OF BSEG_TYPE ,

       WA_BSEG TYPE BSEG_TYPE.

 

DATA:

       IT_BSEG1 TYPE TABLE OF BSEG_TYPE WITH HEADER LINE,

       WA_BSEG1 TYPE BSEG_TYPE.

 

TYPES: BEGIN OF FINAL_TYPE,

        SNO    TYPE I,

        DOC_TYP TYPE BKPF-BLART,

        DOC_NUM TYPE BKPF-BELNR,

        DOC_DT  TYPE BKPF-BLDAT,

        POS_DT  TYPE BKPF-BUDAT,

        DOC_NUM1 TYPE BSEG-BELNR,

        SPL_GL  TYPE BSEG-UMSKZ,

        POS_KEY TYPE BSEG-BSCHL,

        DB_CIN  TYPE BSEG-SHKZG,

        AMOUNT TYPE  BSEG-DMBTR,

        V_CODE TYPE BSEG-LIFNR,

        ZFBDT TYPE BSEG-ZFBDT,

   END OF FINAL_TYPE.

 

DATA: IT_FINAL TYPE TABLE OF FINAL_TYPE,

       WA_FINAL TYPE FINAL_TYPE.

 

DATA: IT_FIELD_CAT TYPE SLIS_T_FIELDCAT_ALV,

       WA_FIELD_CAT TYPE SLIS_FIELDCAT_ALV,

       LAY TYPE SLIS_LAYOUT_ALV.

 

DATA : SORT TYPE SLIS_T_SORTINFO_ALV WITH HEADER LINE.

 

PARAMETERS S_GJAHR LIKE BSEG-GJAHR.

 

START-OF-SELECTION.

SELECT  BELNR

         UMSKZ

         BSCHL

         SHKZG

         DMBTR

         LIFNR

         ZFBDT INTO TABLE IT_BSEG FROM BSEG WHERE  KOART EQ 'K' AND GJAHR = S_GJAHR.

 

 

IF IT_BSEG  IS NOT INITIAL.

SELECT BLART

        BELNR

        BLDAT

        BUDAT INTO TABLE IT_BKPF FROM BKPF

        FOR ALL ENTRIES IN IT_BSEG

        WHERE BELNR EQ IT_BSEG-DOC_NUM.

ENDIF.


Viewing all articles
Browse latest Browse all 8635

Trending Articles



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