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

hi...please help!

Former Member
0 Likes
879

REPORT ZTABLEDATA .

TABLES: VBUK,VBAP,LIKP.

*DATA: BEGIN OF ITAB1 OCCURS 0,

  • VBELN TYPE VBUK-VBELN,

  • RFSTK TYPE VBUK-RFSTK,

  • RFGSK TYPE VBUK-RFGSK,

  • BESTK TYPE VBUK-BESTK,

  • LFSTK TYPE VBUK-LFSTK,

  • LFGSK TYPE VBUK-LFGSK,

  • WBSTK TYPE VBUK-WBSTK,

  • FKSTK TYPE VBUK-FKSTK,

  • FKSAK TYPE VBUK-FKSAK,

  • VBOBJ TYPE VBUK-VBOBJ,

  • END OF ITAB1.

*DATA: BEGIN OF ITAB2 OCCURS 0,

  • ERZET TYPE LIKP-ERZET,

  • ERDAT TYPE LIKP-ERDAT,

  • BZIRK TYPE LIKP-BZIRK,

  • VSTEL TYPE LIKP-VSTEL,

  • VKORG TYPE LIKP-VKORG,

  • POTIM TYPE LIKP-POTIM,

  • END OF ITAB2.

DATA: BEGIN OF ITAB3 OCCURS 0,

VBELN TYPE VBUK-VBELN,

RFSTK TYPE VBUK-RFSTK,

RFGSK TYPE VBUK-RFGSK,

BESTK TYPE VBUK-BESTK,

LFSTK TYPE VBUK-LFSTK,

LFGSK TYPE VBUK-LFGSK,

WBSTK TYPE VBUK-WBSTK,

FKSTK TYPE VBUK-FKSTK,

FKSAK TYPE VBUK-FKSAK,

VBOBJ TYPE VBUK-VBOBJ,

ERZET TYPE LIKP-ERZET,

ERDAT TYPE LIKP-ERDAT,

BZIRK TYPE LIKP-BZIRK,

VSTEL TYPE LIKP-VSTEL,

VKORG TYPE LIKP-VKORG,

POTIM TYPE LIKP-POTIM,

END OF ITAB3.

PARAMETERS: SALESORD LIKE VBUK-VBELN.

*SELECT * FROM LIKP INTO CORRESPONDING FIELDS OF TABLE itab2.

*SELECT * FROM VBUK INTO CORRESPONDING FIELDS OF TABLE itab1.

SELECT VBUK~VBELN

VBUK~RFSTK

VBUK~RFGSK

VBUK~BESTK

VBUK~LFSTK

VBUK~LFGSK

VBUK~WBSTK

VBUK~FKSTK

VBUK~FKSAK

VBUK~VBOBJ

LIKP~ERZET

LIKP~ERDAT

LIKP~BZIRK

LIKP~VSTEL

LIKP~VKORG

LIKP~POTIM

into corresponding fields of table ITAB3 FROM VBUK INNER JOIN LIKP

ON VBUKVBELN = LIKPVBELN WHERE VBELN = SALESORD.

LOOP AT ITAB3.

WRITE: / ITAB3-VBELN,

ITAB3-RFSTK,

ITAB3-RFGSK,

ITAB3-BESTK,

ITAB3-LFSTK,

ITAB3-LFGSK,

ITAB3-WBSTK,

ITAB3-FKSTK,

ITAB3-FKSAK,

ITAB3-VBOBJ,

ITAB3-ERZET,

ITAB3-ERDAT,

ITAB3-BZIRK,

ITAB3-VSTEL,

ITAB3-VKORG,

ITAB3-POTIM,

SY-ULINE.

ENDLOOP.

IF SY-SUBRC <> 0.

WRITE:/'NO DATA FOUND IN THE TABLE'.

ENDIF.

ITS GIVING ERROR PLEASE CHECK.

REPORT ZTABLEDATA .

TABLES: VBUK,VBAP,LIKP.

*DATA: BEGIN OF ITAB1 OCCURS 0,

  • VBELN TYPE VBUK-VBELN,

  • RFSTK TYPE VBUK-RFSTK,

  • RFGSK TYPE VBUK-RFGSK,

  • BESTK TYPE VBUK-BESTK,

  • LFSTK TYPE VBUK-LFSTK,

  • LFGSK TYPE VBUK-LFGSK,

  • WBSTK TYPE VBUK-WBSTK,

  • FKSTK TYPE VBUK-FKSTK,

  • FKSAK TYPE VBUK-FKSAK,

  • VBOBJ TYPE VBUK-VBOBJ,

  • END OF ITAB1.

*DATA: BEGIN OF ITAB2 OCCURS 0,

  • ERZET TYPE LIKP-ERZET,

  • ERDAT TYPE LIKP-ERDAT,

  • BZIRK TYPE LIKP-BZIRK,

  • VSTEL TYPE LIKP-VSTEL,

  • VKORG TYPE LIKP-VKORG,

  • POTIM TYPE LIKP-POTIM,

  • END OF ITAB2.

DATA: BEGIN OF ITAB3 OCCURS 0,

VBELN TYPE VBUK-VBELN,

RFSTK TYPE VBUK-RFSTK,

RFGSK TYPE VBUK-RFGSK,

BESTK TYPE VBUK-BESTK,

LFSTK TYPE VBUK-LFSTK,

LFGSK TYPE VBUK-LFGSK,

WBSTK TYPE VBUK-WBSTK,

FKSTK TYPE VBUK-FKSTK,

FKSAK TYPE VBUK-FKSAK,

VBOBJ TYPE VBUK-VBOBJ,

ERZET TYPE LIKP-ERZET,

ERDAT TYPE LIKP-ERDAT,

BZIRK TYPE LIKP-BZIRK,

VSTEL TYPE LIKP-VSTEL,

VKORG TYPE LIKP-VKORG,

POTIM TYPE LIKP-POTIM,

END OF ITAB3.

PARAMETERS: SALESORD LIKE VBUK-VBELN.

*SELECT * FROM LIKP INTO CORRESPONDING FIELDS OF TABLE itab2.

*SELECT * FROM VBUK INTO CORRESPONDING FIELDS OF TABLE itab1.

SELECT VBUK~VBELN

VBUK~RFSTK

VBUK~RFGSK

VBUK~BESTK

VBUK~LFSTK

VBUK~LFGSK

VBUK~WBSTK

VBUK~FKSTK

VBUK~FKSAK

VBUK~VBOBJ

LIKP~ERZET

LIKP~ERDAT

LIKP~BZIRK

LIKP~VSTEL

LIKP~VKORG

LIKP~POTIM

into corresponding fields of table ITAB3 FROM VBUK INNER JOIN LIKP

ON VBUKVBELN = LIKPVBELN WHERE VBELN = SALESORD.

LOOP AT ITAB3.

WRITE: / ITAB3-VBELN,

ITAB3-RFSTK,

ITAB3-RFGSK,

ITAB3-BESTK,

ITAB3-LFSTK,

ITAB3-LFGSK,

ITAB3-WBSTK,

ITAB3-FKSTK,

ITAB3-FKSAK,

ITAB3-VBOBJ,

ITAB3-ERZET,

ITAB3-ERDAT,

ITAB3-BZIRK,

ITAB3-VSTEL,

ITAB3-VKORG,

ITAB3-POTIM,

SY-ULINE.

ENDLOOP.

IF SY-SUBRC <> 0.

WRITE:/'NO DATA FOUND IN THE TABLE'.

ENDIF.

ITS GIVING ERROR PLEASE CHECK.

4 REPLIES 4
Read only

Former Member
0 Likes
802

HI,

in where condition u have to mention the table name to which the field belongs to.here it was there in two tables so,u can give any one(<b>VBUK~ or LIKP~</b>)

TABLES: VBUK,VBAP,LIKP.

*DATA: BEGIN OF ITAB1 OCCURS 0,

  • VBELN TYPE VBUK-VBELN,

  • RFSTK TYPE VBUK-RFSTK,

  • RFGSK TYPE VBUK-RFGSK,

  • BESTK TYPE VBUK-BESTK,

  • LFSTK TYPE VBUK-LFSTK,

  • LFGSK TYPE VBUK-LFGSK,

  • WBSTK TYPE VBUK-WBSTK,

  • FKSTK TYPE VBUK-FKSTK,

  • FKSAK TYPE VBUK-FKSAK,

  • VBOBJ TYPE VBUK-VBOBJ,

  • END OF ITAB1.

*DATA: BEGIN OF ITAB2 OCCURS 0,

  • ERZET TYPE LIKP-ERZET,

  • ERDAT TYPE LIKP-ERDAT,

  • BZIRK TYPE LIKP-BZIRK,

  • VSTEL TYPE LIKP-VSTEL,

  • VKORG TYPE LIKP-VKORG,

  • POTIM TYPE LIKP-POTIM,

  • END OF ITAB2.

DATA: BEGIN OF ITAB3 OCCURS 0,

VBELN TYPE VBUK-VBELN,

RFSTK TYPE VBUK-RFSTK,

RFGSK TYPE VBUK-RFGSK,

BESTK TYPE VBUK-BESTK,

LFSTK TYPE VBUK-LFSTK,

LFGSK TYPE VBUK-LFGSK,

WBSTK TYPE VBUK-WBSTK,

FKSTK TYPE VBUK-FKSTK,

FKSAK TYPE VBUK-FKSAK,

VBOBJ TYPE VBUK-VBOBJ,

ERZET TYPE LIKP-ERZET,

ERDAT TYPE LIKP-ERDAT,

BZIRK TYPE LIKP-BZIRK,

VSTEL TYPE LIKP-VSTEL,

VKORG TYPE LIKP-VKORG,

POTIM TYPE LIKP-POTIM,

END OF ITAB3.

PARAMETERS: SALESORD LIKE VBUK-VBELN.

*SELECT * FROM LIKP INTO CORRESPONDING FIELDS OF TABLE itab2.

*SELECT * FROM VBUK INTO CORRESPONDING FIELDS OF TABLE itab1.

SELECT VBUK~VBELN

VBUK~RFSTK

VBUK~RFGSK

VBUK~BESTK

VBUK~LFSTK

VBUK~LFGSK

VBUK~WBSTK

VBUK~FKSTK

VBUK~FKSAK

VBUK~VBOBJ

LIKP~ERZET

LIKP~ERDAT

LIKP~BZIRK

LIKP~VSTEL

LIKP~VKORG

LIKP~POTIM

into corresponding fields of table ITAB3 FROM VBUK INNER JOIN LIKP

ON VBUKVBELN = LIKPVBELN WHERE <b>LIKP~</b>VBELN = SALESORD.

LOOP AT ITAB3.

WRITE: / ITAB3-VBELN,

ITAB3-RFSTK,

ITAB3-RFGSK,

ITAB3-BESTK,

ITAB3-LFSTK,

ITAB3-LFGSK,

ITAB3-WBSTK,

ITAB3-FKSTK,

ITAB3-FKSAK,

ITAB3-VBOBJ,

ITAB3-ERZET,

ITAB3-ERDAT,

ITAB3-BZIRK,

ITAB3-VSTEL,

ITAB3-VKORG,

ITAB3-POTIM,

SY-ULINE.

ENDLOOP.

IF SY-SUBRC <> 0.

WRITE:/'NO DATA FOUND IN THE TABLE'.

ENDIF.

rgds,

bharat.

Read only

Former Member
0 Likes
802

Hi

into corresponding fields of table ITAB3 FROM VBUK INNER JOIN LIKP

ON VBUKVBELN = LIKPVBELN WHERE <b>VBELN = SALESORD</b>

here ur ferering to the field directly thats why it showing error

in that ur joining 2 tables

from which table u want to refer that

VBUK~VBELN = SALESORD

or

LIKP~VBELN = SALESORD

<b>Reward if usefull</b>

Read only

Former Member
0 Likes
802

Hi ,

Try This.

REPORT ZTABLEDATA .

TABLES: VBUK,VBAP,LIKP.

*DATA: BEGIN OF ITAB1 OCCURS 0,

  • VBELN TYPE VBUK-VBELN,

  • RFSTK TYPE VBUK-RFSTK,

  • RFGSK TYPE VBUK-RFGSK,

  • BESTK TYPE VBUK-BESTK,

  • LFSTK TYPE VBUK-LFSTK,

  • LFGSK TYPE VBUK-LFGSK,

  • WBSTK TYPE VBUK-WBSTK,

  • FKSTK TYPE VBUK-FKSTK,

  • FKSAK TYPE VBUK-FKSAK,

  • VBOBJ TYPE VBUK-VBOBJ,

  • END OF ITAB1.

*DATA: BEGIN OF ITAB2 OCCURS 0,

  • ERZET TYPE LIKP-ERZET,

  • ERDAT TYPE LIKP-ERDAT,

  • BZIRK TYPE LIKP-BZIRK,

  • VSTEL TYPE LIKP-VSTEL,

  • VKORG TYPE LIKP-VKORG,

  • POTIM TYPE LIKP-POTIM,

  • END OF ITAB2.

DATA: BEGIN OF ITAB3 OCCURS 0,

VBELN TYPE VBUK-VBELN,

RFSTK TYPE VBUK-RFSTK,

RFGSK TYPE VBUK-RFGSK,

BESTK TYPE VBUK-BESTK,

LFSTK TYPE VBUK-LFSTK,

LFGSK TYPE VBUK-LFGSK,

WBSTK TYPE VBUK-WBSTK,

FKSTK TYPE VBUK-FKSTK,

FKSAK TYPE VBUK-FKSAK,

VBOBJ TYPE VBUK-VBOBJ,

ERZET TYPE LIKP-ERZET,

ERDAT TYPE LIKP-ERDAT,

BZIRK TYPE LIKP-BZIRK,

VSTEL TYPE LIKP-VSTEL,

VKORG TYPE LIKP-VKORG,

POTIM TYPE LIKP-POTIM,

END OF ITAB3.

PARAMETERS: SALESORD LIKE VBUK-VBELN.

*SELECT * FROM LIKP INTO CORRESPONDING FIELDS OF TABLE itab2.

*SELECT * FROM VBUK INTO CORRESPONDING FIELDS OF TABLE itab1.

SELECT VBUK~VBELN

VBUK~RFSTK

VBUK~RFGSK

VBUK~BESTK

VBUK~LFSTK

VBUK~LFGSK

VBUK~WBSTK

VBUK~FKSTK

VBUK~FKSAK

VBUK~VBOBJ

LIKP~ERZET

LIKP~ERDAT

LIKP~BZIRK

LIKP~VSTEL

LIKP~VKORG

LIKP~POTIM

into corresponding fields of table ITAB3 FROM VBUK INNER JOIN LIKP

ON VBUKVBELN = LIKPVBELN WHERE <b>VBUK~VBELN</b> = SALESORD.

LOOP AT ITAB3.

WRITE: / ITAB3-VBELN,

ITAB3-RFSTK,

ITAB3-RFGSK,

ITAB3-BESTK,

ITAB3-LFSTK,

ITAB3-LFGSK,

ITAB3-WBSTK,

ITAB3-FKSTK,

ITAB3-FKSAK,

ITAB3-VBOBJ,

ITAB3-ERZET,

ITAB3-ERDAT,

ITAB3-BZIRK,

ITAB3-VSTEL,

ITAB3-VKORG,

ITAB3-POTIM,

SY-ULINE.

ENDLOOP.

IF SY-SUBRC <> 0.

WRITE:/'NO DATA FOUND IN THE TABLE'.

ENDIF.

Reward if useful.

Regards,

Chitra

Read only

Former Member
0 Likes
802

Hi,

In your select statement in where condition either use VBELN from VBUK or LIKP

<b>example VBUKVBELN or LIKPVBELN. Use any one.</b>

Thanks,

Sriram Ponna.