Write the syntax for declaring table control in dialog programming?

[Former Member]

1) Write the syntax for declaring table control in dialog programming?

2) Write the syntax to call a selection screen in a modal dialog box?

[mahaboob_pathan]

hi,

check this code for table control.

DIALOG PROGRAMMING

TABLE CONTROL

IN SE51

PROCESS BEFORE OUTPUT.

• MODULE STATUS_0100.

LOOP AT ITVBAK WITH CONTROL TABCTRL. ## TABLE CONTROL NAME

ENDLOOP.

PROCESS AFTER INPUT.

MODULE USER_COMMAND_0100.

LOOP AT ITVBAK.

ENDLOOP.

IN PAI FLOW LOGIC

PROGRAM YMODULE_PR4 .

TABLES : KNA1, VBAK.

DATA : BEGIN OF ITVBAK OCCURS 0,

VBELN LIKE VBAK-VBELN,

ERDAT LIKE VBAK-ERDAT,

ERNAM LIKE VBAK-ERNAM,

NETWR LIKE VBAK-NETWR,

END OF ITVBAK.

CONTROLS : TABCTRL TYPE TABLEVIEW USING SCREEN '0100'.

1. TO ACTIVATE SCROLL BAR

&----

---

*& Module USER_COMMAND_0100 INPUT

&----

---

• text

----

---

MODULE USER_COMMAND_0100 INPUT.

CASE SY-UCOMM.

WHEN 'EXIT'.

LEAVE PROGRAM.

WHEN SPACE.

SELECT VBELN ERDAT ERNAM NETWR

FROM VBAK

INTO TABLE ITVBAK

WHERE KUNNR = KNA1-KUNNR.

TABCTRL-LINES = SY-DBCNT.

ENDCASE.

ENDMODULE. " USER_COMMAND_0100 INPUT

&----

---

*& Module STATUS_0100 OUTPUT

&----

---

• text

----

---

MODULE STATUS_0100 OUTPUT.

• SET PF-STATUS 'xxxxxxxx'.

• SET TITLEBAR 'xxx'.

ENDMODULE. " STATUS_0100 OUTPUT

[Former Member]

controls:

<tbctrl-name> type tableview using screen <screen-no>.

CALL SELECTION-SCREEN <screen-no>

STARTING AT col1 lin1

ENDING AT col2 lin2.