GRID full screen using container

[Former Member]

Hi,

I want to display the grid in full screen using container(OOPs) please let me know if any one knows how to do.

regards,

vijay

[Former Member]

Hi,

Check this program..........

&----

---

*& Report ZTEST

*&

&----

---

*&

*&

&----

---

REPORT ZTEST.

• Object variable for ALV grid

DATA: oref1 TYPE REF TO cl_gui_alv_grid.

DATA:

t_spfli TYPE STANDARD TABLE OF spfli WITH HEADER LINE.

• Field catalog table for ALV grid

DATA: fieldcat TYPE lvc_t_fcat. " Workarea for field catalog table

DATA: w_field TYPE lvc_s_fcat.

START-OF-SELECTION.

select *

from spfli

into table t_spfli[].

append lines of t_spfli[] TO t_spfli[].

append lines of t_spfli[] TO t_spfli[].

perform prepare_fieldcatlog.

call screen '0100'.

&----

---

*& Module STATUS_0100 OUTPUT

&----

---

• text

----

---

MODULE STATUS_0100 OUTPUT.

SET PF-STATUS 'TEST'.

• SET TITLEBAR 'xxx'.

CREATE OBJECT OREF1

EXPORTING

I_PARENT = CL_GUI_CUSTOM_CONTAINER=>screen0

EXCEPTIONS

ERROR_CNTL_CREATE = 1

ERROR_CNTL_INIT = 2

ERROR_CNTL_LINK = 3

ERROR_DP_CREATE = 4

others = 5.

IF SY-SUBRC <> 0.

• MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO

• WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

ENDIF.

CALL METHOD OREF1->SET_TABLE_FOR_FIRST_DISPLAY

• EXPORTING

• IS_LAYOUT =

CHANGING

IT_OUTTAB = t_spfli[]

IT_FIELDCATALOG = fieldcat

• IT_SORT =

• IT_FILTER =

EXCEPTIONS

INVALID_PARAMETER_COMBINATION = 1

PROGRAM_ERROR = 2

TOO_MANY_LINES = 3

others = 4.

IF SY-SUBRC <> 0.

• MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO

• WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

ENDIF.

ENDMODULE. " STATUS_0100 OUTPUT

&----

---

*& Module USER_COMMAND_0100 INPUT

&----

---

• text

----

---

MODULE USER_COMMAND_0100 INPUT.

if sy-ucomm eq 'BACK' OR sy-ucomm eq 'EXIT'.

leave program.

endif.

ENDMODULE. " USER_COMMAND_0100 INPUT

&----

---

*& Form prepare_fieldcatlog

&----

---

• text

----

---

• --> p1 text

• <-- p2 text

----

---

FORM prepare_fieldcatlog .

w_field-col_pos = '1'.

w_field-fieldname = 'CARRID'.

w_field-tabname = 'T_SPFLI'.

w_field-ref_field = 'CARRID'.

w_field-ref_table = 'SPFLI'.

append w_field TO fieldcat.

clear w_field.

w_field-col_pos = '2'.

w_field-fieldname = 'CONNID'.

w_field-tabname = 'T_SPFLI'.

w_field-ref_field = 'CONNID'.

w_field-ref_table = 'SPFLI'.

append w_field TO fieldcat.

clear w_field.

w_field-col_pos = '2'.

w_field-fieldname = 'CONNID'.

w_field-tabname = 'T_SPFLI'.

w_field-ref_field = 'CONNID'.

w_field-ref_table = 'SPFLI'.

append w_field TO fieldcat.

clear w_field.

w_field-col_pos = '2'.

w_field-fieldname = 'CONNID'.

w_field-tabname = 'T_SPFLI'.

w_field-ref_field = 'CONNID'.

w_field-ref_table = 'SPFLI'.

append w_field TO fieldcat.

clear w_field.

w_field-col_pos = '2'.

w_field-fieldname = 'CONNID'.

w_field-tabname = 'T_SPFLI'.

w_field-ref_field = 'CONNID'.

w_field-ref_table = 'SPFLI'.

append w_field TO fieldcat.

clear w_field.

w_field-col_pos = '2'.

w_field-fieldname = 'CONNID'.

w_field-tabname = 'T_SPFLI'.

w_field-ref_field = 'CONNID'.

w_field-ref_table = 'SPFLI'.

append w_field TO fieldcat.

clear w_field.

w_field-col_pos = '2'.

w_field-fieldname = 'CONNID'.

w_field-tabname = 'T_SPFLI'.

w_field-ref_field = 'CONNID'.

w_field-ref_table = 'SPFLI'.

append w_field TO fieldcat.

clear w_field.

w_field-col_pos = '2'.

w_field-fieldname = 'CONNID'.

w_field-tabname = 'T_SPFLI'.

w_field-ref_field = 'CONNID'.

w_field-ref_table = 'SPFLI'.

append w_field TO fieldcat.

clear w_field.

w_field-col_pos = '2'.

w_field-fieldname = 'CONNID'.

w_field-tabname = 'T_SPFLI'.

w_field-ref_field = 'CONNID'.

w_field-ref_table = 'SPFLI'.

append w_field TO fieldcat.

clear w_field.

w_field-col_pos = '2'.

w_field-fieldname = 'CONNID'.

w_field-tabname = 'T_SPFLI'.

w_field-ref_field = 'CONNID'.

w_field-ref_table = 'SPFLI'.

append w_field TO fieldcat.

clear w_field.

w_field-col_pos = '3'.

w_field-fieldname = 'COUNTRYFR'.

w_field-tabname = 'T_SPFLI'.

w_field-ref_field = 'COUNTRYFR'.

w_field-ref_table = 'SPFLI'.

append w_field TO fieldcat.

clear w_field.

w_field-col_pos = '4'.

w_field-fieldname = 'CITYFROM'.

w_field-tabname = 'T_SPFLI'.

w_field-ref_field = 'CITYFROM'.

w_field-ref_table = 'SPFLI'.

append w_field TO fieldcat.

clear w_field.

w_field-col_pos = '4'.

w_field-fieldname = 'CITYFROM'.

w_field-tabname = 'T_SPFLI'.

w_field-ref_field = 'CITYFROM'.

w_field-ref_table = 'SPFLI'.

append w_field TO fieldcat.

clear w_field.

w_field-col_pos = '4'.

w_field-fieldname = 'CITYFROM'.

w_field-tabname = 'T_SPFLI'.

w_field-ref_field = 'CITYFROM'.

w_field-ref_table = 'SPFLI'.

append w_field TO fieldcat.

clear w_field.

w_field-col_pos = '4'.

w_field-fieldname = 'CITYFROM'.

w_field-tabname = 'T_SPFLI'.

w_field-ref_field = 'CITYFROM'.

w_field-ref_table = 'SPFLI'.

append w_field TO fieldcat.

clear w_field.

w_field-col_pos = '4'.

w_field-fieldname = 'CITYFROM'.

w_field-tabname = 'T_SPFLI'.

w_field-ref_field = 'CITYFROM'.

w_field-ref_table = 'SPFLI'.

append w_field TO fieldcat.

clear w_field.

w_field-col_pos = '4'.

w_field-fieldname = 'CITYFROM'.

w_field-tabname = 'T_SPFLI'.

w_field-ref_field = 'CITYFROM'.

w_field-ref_table = 'SPFLI'.

append w_field TO fieldcat.

clear w_field.

w_field-col_pos = '4'.

w_field-fieldname = 'CITYFROM'.

w_field-tabname = 'T_SPFLI'.

w_field-ref_field = 'CITYFROM'.

w_field-ref_table = 'SPFLI'.

append w_field TO fieldcat.

clear w_field.

w_field-col_pos = '4'.

w_field-fieldname = 'CITYFROM'.

w_field-tabname = 'T_SPFLI'.

w_field-ref_field = 'CITYFROM'.

w_field-ref_table = 'SPFLI'.

append w_field TO fieldcat.

clear w_field.

w_field-col_pos = '4'.

w_field-fieldname = 'CITYFROM'.

w_field-tabname = 'T_SPFLI'.

w_field-ref_field = 'CITYFROM'.

w_field-ref_table = 'SPFLI'.

append w_field TO fieldcat.

clear w_field.

w_field-col_pos = '5'.

w_field-fieldname = 'AIRPFROM'.

w_field-tabname = 'T_SPFLI'.

w_field-ref_field = 'AIRPFROM'.

w_field-ref_table = 'SPFLI'.

append w_field TO fieldcat.

clear w_field.

w_field-col_pos = '6'.

w_field-fieldname = 'COUNTRYTO'.

w_field-tabname = 'T_SPFLI'.

w_field-ref_field = 'COUNTRYTO'.

w_field-ref_table = 'SPFLI'.

append w_field TO fieldcat.

clear w_field.

w_field-col_pos = '7'.

w_field-fieldname = 'CITYTO'.

w_field-tabname = 'T_SPFLI'.

w_field-ref_field = 'CITYTO'.

w_field-ref_table = 'SPFLI'.

append w_field TO fieldcat.

clear w_field.

w_field-col_pos = '8'.

w_field-fieldname = 'AIRPTO'.

w_field-tabname = 'T_SPFLI'.

w_field-ref_field = 'AIRPTO'.

w_field-ref_table = 'SPFLI'.

append w_field TO fieldcat.

clear w_field.

w_field-col_pos = '8'.

w_field-fieldname = 'AIRPTO'.

w_field-tabname = 'T_SPFLI'.

w_field-ref_field = 'AIRPTO'.

w_field-ref_table = 'SPFLI'.

append w_field TO fieldcat.

clear w_field.

w_field-col_pos = '8'.

w_field-fieldname = 'AIRPTO'.

w_field-tabname = 'T_SPFLI'.

w_field-ref_field = 'AIRPTO'.

w_field-ref_table = 'SPFLI'.

append w_field TO fieldcat.

clear w_field.

w_field-col_pos = '8'.

w_field-fieldname = 'AIRPTO'.

w_field-tabname = 'T_SPFLI'.

w_field-ref_field = 'AIRPTO'.

w_field-ref_table = 'SPFLI'.

append w_field TO fieldcat.

clear w_field.

w_field-col_pos = '8'.

w_field-fieldname = 'AIRPTO'.

w_field-tabname = 'T_SPFLI'.

w_field-ref_field = 'AIRPTO'.

w_field-ref_table = 'SPFLI'.

append w_field TO fieldcat.

clear w_field.

w_field-col_pos = '9'.

w_field-fieldname = 'FLTIME'.

w_field-tabname = 'T_SPFLI'.

w_field-ref_field = 'FLTIME'.

w_field-ref_table = 'SPFLI'.

append w_field TO fieldcat.

clear w_field.

w_field-col_pos = '10'.

w_field-fieldname = 'DEPTIME'.

w_field-tabname = 'T_SPFLI'.

w_field-ref_field = 'DEPTIME'.

w_field-ref_table = 'SPFLI'.

append w_field TO fieldcat.

clear w_field.

w_field-col_pos = '11'.

w_field-fieldname = 'ARRTIME'.

w_field-tabname = 'T_SPFLI'.

w_field-ref_field = 'ARRTIME'.

w_field-ref_table = 'SPFLI'.

append w_field TO fieldcat.

clear w_field.

w_field-col_pos = '12'.

w_field-fieldname = 'DISTANCE'.

w_field-tabname = 'T_SPFLI'.

w_field-ref_field = 'DISTANCE'.

w_field-ref_table = 'SPFLI'.

append w_field TO fieldcat.

clear w_field.

w_field-col_pos = '13'.

w_field-fieldname = 'DISTID'.

w_field-tabname = 'T_SPFLI'.

w_field-ref_field = 'DISTID'.

w_field-ref_table = 'SPFLI'.

append w_field TO fieldcat.

clear w_field.

w_field-col_pos = '14'.

w_field-fieldname = 'FLTYPE'.

w_field-tabname = 'T_SPFLI'.

w_field-ref_field = 'FLTYPE'.

w_field-ref_table = 'SPFLI'.

append w_field TO fieldcat.

clear w_field.

w_field-col_pos = '15'.

w_field-fieldname = 'PERIOD'.

w_field-tabname = 'T_SPFLI'.

w_field-ref_field = 'PERIOD'.

w_field-ref_table = 'SPFLI'.

append w_field TO fieldcat.

clear w_field.

ENDFORM. " prepare_fieldcatlog

[SuhaSaha]

Hello Vijay,

There are numerous threads already posted in SDN regarding this. You can take time to search it.

Else check all reports starting with BCALV* in SE38. They will definitely help your cause.

BR,

Suhas