Application Development and Automation Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 
Read only

Interactive Report

Former Member
0 Likes
276

I am trying to develop a interactive report.

TABLES: KNA1,

VBAK,

VBAP.

SELECT * FROM KNA1 ORDER BY KUNNR.

WRITE:/10 KNA1-KUNNR,

25 KNA1-NAME1,

65 KNA1-LAND1.

HIDE KNA1-KUNNR.

ENDSELECT.

AT LINE-SELECTION.

CASE SY-LSIND.

WHEN 1.

SELECT * FROM VBAK WHERE KUNNR = KNA1-KUNNR.

WRITE:/10 VBAK-VBELN,

25 VBAK-ERDAT,

65 VBAK-NETWR.

HIDE VBAK-VBELN.

ENDSELECT.

WHEN 2.

SELECT * FROM VBAP WHERE VBELN = VBAK-VBELN.

WRITE:/10 VBAP-POSNR,

25 VBAP-ARKTX,

65 VBAP-WERKS.

ENDSELECT.

ENDCASE.

Now If the customer does not have any orders I want to display "No orders available" in the next screen. How can I achieve that.

1 REPLY 1
Read only

Clemenss
Active Contributor
0 Likes
242

Hi Verikat,

just check the SY-SUBRC returned by your select statement.


AT LINE-SELECTION.
  CASE SY-LSIND.
    WHEN 1.
      SELECT * FROM VBAK WHERE KUNNR = KNA1-KUNNR.
      WRITE:/10 VBAK-VBELN,
      25 VBAK-ERDAT,
      65 VBAK-NETWR.
      HIDE VBAK-VBELN.
      ENDSELECT.
      IF sy-subrc <> 0.
        WRITE:/10 'No orders available',
      ENDIF.
* ....

Regards,

Clemens