report zalv_sample_03.
*---type pools
type-pools: slis.
*---internal tables
data: begin
of it_flight occurs
0,carrid like sflight-carrid,
connid like sflight-connid,
fldate like sflight-fldate,
seatsmax like sflight-seatsmax,
seatsocc like sflight-seatsocc,
endof it_flight,
*--internal tables for alv
it_fieldcat type slis_t_fieldcat_alv,
wa_fcat like
line
of it_fieldcat,
layout type slis_layout_alv,
it_sort type slis_t_sortinfo_alv,
wa_sort like
line
of it_sort.
*---start-of-selection .
start-of-selection.
call
function
'reuse_alv_fieldcatalog_merge'
exporting
i_program_name = sy-repid
i_internal_tabname = 'it_flight'
i_inclname = sy-repid
changing
ct_fieldcat = it_fieldcat
exceptions
inconsistent_inte***ce = 1
program_error = 2.
*----get data
select carrid
connid
fldate
seatsmax
seatsocc
from sflight
into corresponding fields
oftable it_flight
upto
20function
'reuse_alv_list_display'
exporting
i_callback_program = sy-repid
is_layout = layout
it_fieldcat = it_fieldcat
it_sort = it_sort
tables
t_outtab = it_flight
exceptions
program_error = 1.
Cxgrid獲取分組小計值
最近有個專案用到比較複雜的統計,開始接觸dev,dev下有個強大的 那就是cxgrid了。專案上用到對分組 小計後的值獲取。研究了半天,如下 var i,j integer asummary tcxdatasummary begin inherited j 0 for i 0 to cxgrid1d...
藍橋杯 運動員分組 數學小計算
有n個人參加100公尺短跑比賽。跑道為8條。程式的任務是按照盡量使每組的人數相差最少的原則分組。例如 n 8時,分成1組即可。n 9時,分成2組 一組5人,一組4人。n 25時,分4組 7 6 6 6。請程式設計計算分組數字。要求從標準輸入獲得乙個正整數 1 100之間,不必考慮輸入錯誤的情況 表示...
AS 發展小計
2000 2003 actionscript 1.0,和 flash 5.0 一起發布 變成可文字編輯 以前是從對話方塊和下拉列表中選擇,當然,那個時候不叫as 新增 switch 語句和strict equality 操作 2003 2006 actionscript 2.0 和 flash mx...