2008 Dec 17 6:32 AM
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
2008 Dec 17 6:46 AM
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
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
2008 Dec 17 6:36 AM
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
2008 Dec 17 6:46 AM
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
| User | Count |
|---|---|
| 6 | |
| 2 | |
| 1 | |
| 1 | |
| 1 | |
| 1 | |
| 1 | |
| 1 | |
| 1 | |
| 1 |