Skip to Content

Archived discussions are read-only. Learn more about SAP Q&A

table control

hi,

I am having table control without displaying the data.but when i click the display i want to display the records..but i doesn't display...i dont know why...i paste my code...c please.....

TABLES:EKKO.

DATA:OKCODE LIKE SY-UCOMM.

DATA:BEGIN OF ITAB OCCURS 0,

EBELN LIKE EKKO-EBELN,

BUKRS LIKE EKKO-BUKRS,

BSART LIKE EKKO-BSART,

BSTYP LIKE EKKO-BSTYP,

BSAKZ LIKE EKKO-BSAKZ,

END OF ITAB.

CONTROLS:TAB TYPE TABLEVIEW USING SCREEN 9119.

INCLUDE ZTABLETOP . " global Data

  • INCLUDE ZTABLEO01 . " PBO-Modules *

  • INCLUDE ZTABLEI01 . " PAI-Modules *

  • INCLUDE ZTABLEF01 . " FORM-Routines *

&----


*& Module STATUS_9119 OUTPUT

&----


  • text

----


module STATUS_9119 output.

SET PF-STATUS '9119'.

  • SET TITLEBAR 'xxx'.

endmodule. " STATUS_9119 OUTPUT

&----


*& Module USER_COMMAND_9119 INPUT

&----


  • text

----


module USER_COMMAND_9119 input.

CASE OKCODE.

WHEN 'DISPLAY'.

IF ITAB IS INITIAL.

SELECT EBELN BUKRS BSART BSTYP BSAKZ FROM EKKO INTO TABLE ITAB UP TO 10

ROWS.

ENDIF.

CLEAR OKCODE.

WHEN 'CANCEL'.

LEAVE PROGRAM.

ENDCASE.

endmodule. " USER_COMMAND_9119 INPUT

&----


*& Module DISPLAY OUTPUT

&----


  • text

----


module DISPLAY output.

*ITAB-EBELN = EKKO-EBELN.

*ITAB-BUKRS = EKKO-BUKRS.

*ITAB-BSART = EKKO-BSART.

*ITAB-BSTYP = EKKO-BSTYP.

*ITAB-BSAKZ = EKKO-BSAKZ.

*MOVE EKKO-EBELN TO ITAB-EBELN.

*MOVE EKKO-BUKRS TO ITAB-BUKRS.

*MOVE EKKO-BSART TO ITAB-BSART.

*MOVE EKKO-BSTYP TO ITAB-BSTYP.

*MOVE EKKO-BSAKZ TO ITAB-BSAKZ.

*APPEND ITAB.

endmodule. " DISPLAY OUTPUT

&----


*& Module OUT INPUT

&----


  • text

----


module OUT input.

*MOVE ITAB-EBELN TO EKKO-EBELN.

*MOVE ITAB-BUKRS TO EKKO-BUKRS.

*MOVE ITAB-BSART TO EKKO-BSART.

*MOVE ITAB-BSTYP TO EKKO-EBELN.

*MOVE ITAB-BSAKZ TO EKKO-BSAKZ.

*

*MOVE EKKO-EBELN TO ITAB-EBELN.

*MOVE EKKO-BUKRS TO ITAB-BUKRS.

*MOVE EKKO-BSART TO ITAB-BSART.

*MOVE EKKO-BSTYP TO ITAB-BSTYP.

*MOVE EKKO-BSAKZ TO ITAB-BSAKZ.

*APPEND ITAB.

endmodule. " OUT INPUT

Tags:
Former Member
Not what you were looking for? View more on this topic or Ask a question