Entry Screen

Question

Hi All
I want to design a screen to fill some fields of a customize table and
check the data is it there or not?
also i want to display the content of the table in the same screen
moreover, i need to connect this screen with a customize transaction
i want to know the procedure and if some one has an example of same scenarios  it will be good.
Thanks,,

Answer 1

Mr.  Valter Oliveira         
I am confusing because it is first time i am using Table Control , Can you See my code an check why the Data not going to ZTable.
REPORT  ZTESTING2.
CALL SCREEN 9003.
                             Tables                                     *
TABLES:ZTAG_ITEM_LS.
                             CONTROLS                                    *
CONTROLS : TABLE_CONTROL5 TYPE TABLEVIEW USING SCREEN 9003.
                             INT Tables and Structure                                   *
TYPES : BEGIN OF FS_TC,
  ITEM_CODE TYPE ZTAG_ITEM_LS-ITEM_CODE,
  DESCRIPTION TYPE ZTAG_ITEM_LS-DESCRIPTION,
  END OF FS_TC.
DATA: INT_TAB TYPE TABLE OF FS_TC WITH HEADER LINE.
DATA: WA TYPE ZTAG_ITEM_LS.
                             DATA                                   *
DATA: WF_FILL TYPE i,
  WF_TEMP TYPE i VALUE 0,
    WF_LINES TYPE i.
DATA:OK_CODE LIKE SY-UCOMM.
*&      Module  fill_table_control  OUTPUT
      text
module fill_table_control output.
SELECT ITEM_CODE  DESCRIPTION
FROM ZTAG_ITEM_LS
INTO TABLE INT_TAB.
READ TABLE INT_TAB INDEX TABLE_CONTROL5-current_line.
endmodule.                 " fill_table_control  OUTPUT
*&      Module  read_table_control  INPUT
      text
module read_table_control input.
DESCRIBE TABLE INT_TAB LINES WF_FILL.
WF_LINES = sy-loopc.
IF WF_FILL < TABLE_CONTROL5-CURRENT_LINE.
READ TABLE INT_TAB INDEX TABLE_CONTROL5-CURRENT_LINE.
APPEND INT_TAB.
*INSERT ZTAG_ITEM_LS FROM INT_TAB.
CLEAR INT_TAB.
ELSE.
MODIFY INT_TAB INDEX TABLE_CONTROL5-CURRENT_LINE.
ENDIF.
endmodule.                 " read_table_control  INPUT
*&      Module  USER_COMMAND_0001  INPUT
      text
module USER_COMMAND_0001 INPUT .
SET PF-STATUS '9003'.
*SET PF-STATUS 'TEST'.
CASE OK_CODE.
WHEN 'SAVE_B'.
  loop at INT_TAB INTO WA .
  UPDATE ZTAG_ITEM_LS FROM WA  .
    ENDLOOP.
WHEN 'BACK'.
  LEAVE PROGRAM.
    ENDCASE.
endmodule.                 " USER_COMMAND_0001  INPUT
THIS IS THE SCREEN LOGIC
PROCESS BEFORE OUTPUT.
*&SPWIZARD: PBO FLOW LOGIC FOR TABLECONTROL 'TABLE_CONTROL5'
  MODULE TABLE_CONTROL5_CHANGE_TC_ATTR.
*&SPWIZARD: MODULE TABLE_CONTROL5_CHANGE_COL_ATTR.
  LOOP AT   INT_TAB INTO WA
       WITH CONTROL TABLE_CONTROL5
       CURSOR TABLE_CONTROL5-CURRENT_LINE.
*&SPWIZARD:   MODULE TABLE_CONTROL5_CHANGE_FIELD_ATTR
  ENDLOOP.
MODULE STATUS_9003.
PROCESS AFTER INPUT.
*&SPWIZARD: PAI FLOW LOGIC FOR TABLECONTROL 'TABLE_CONTROL5'
  LOOP AT INT_TAB.
    CHAIN.
      FIELD INT_TAB-ITEM_CODE.
      FIELD INT_TAB-DESCRIPTION.
  MODULE TABLE_CONTROL5_MODIFY ON CHAIN-REQUEST.
    endchain.
  ENDLOOP.
*&SPWIZARD: MODULE TABLE_CONTROL5_CHANGE_TC_ATTR.
*&SPWIZARD: MODULE TABLE_CONTROL5_CHANGE_COL_ATTR.
MODULE USER_COMMAND_9003.
Can you check it Please and tell me also the Back Button not appear when  i run the report.