form frm_set_fieldcat_02 using pv_table_name
pv_col_pos
pv_edit
pv_checkbox
pv_fieldname
pv_titlename.
clear: gt_fieldcat_02.
gv_nn_02 = gv_nn_02 + 1.
gt_fieldcat_02-col_pos = gv_nn_02.
gt_fieldcat_02-tabname = pv_table_name.
gt_fieldcat_02-fix_column = pv_col_pos.
gt_fieldcat_02-edit = pv_edit. "'X':可编辑
gt_fieldcat_02-checkbox = pv_checkbox. "作为复选框输出
"gt_fieldcat_02-no_zero = pv_no_zero. "'X':不输出前导零
"gt_fieldcat_02-no_out = pv_no_out.
gt_fieldcat_02-fieldname = pv_fieldname.
gt_fieldcat_02-scrtext_l = pv_titlename.
gt_fieldcat_02-scrtext_m = pv_titlename.
gt_fieldcat_02-scrtext_s = pv_titlename.
"gt_fieldcat_02-outputlen = pv_outputlen. "列的字符宽度 输出的长度
"gt_fieldcat_02-do_sum = pv_do_sum. "'X':合计
"gt_fieldcat_02-key = pv_key. "关键字段,前面变蓝色
"gt_fieldcat_02-key_sel = pv_key_sel. "关键字段,前面变蓝色
"gt_fieldcat_02-icon = pv_icon. "此列作为图标输出
"gt_fieldcat_02-symbol = pv_symbol. "输出作为符号
"gt_fieldcat_02-lzero = pv_lzero. "'X':输出前导零
"gt_fieldcat_02-no_sign = pv_no_sign. "'X':不输出符号
"gt_fieldcat_02-emphasize = pv_emphasize. "带有颜色的高亮列 列的颜色
"gt_fieldcat_02-round = pv_round. "四舍五入至小数位数下 n 位
"gt_fieldcat_02-just = pv_just. "'','R', 'L', 'C'. 对齐方式
"gt_fieldcat_02-decimals_o = pv_decimals_o "输出小数位的编号
"gt_fieldcat_02-DATATYPE = 'CURR'. "如果该字段指定为货币类型,则可以控制金额类字段小数点前移。
"gt_fieldcat_02-datatype = pv_datatype. "
"gt_fieldcat_02-inttype = pv_inttype. "如果DATATYPE和INTTYPE参数配合,按照本示例,可以控制数字型字段小数点前移。
"gt_fieldcat_02-INTLEN = pv_INTLEN.
"gt_fieldcat_02-ref_field = pv_ref_field.
"gt_fieldcat_02-ref_table = pv_ref_table.
"gt_fieldcat_02-txt_field = pv_txt_field.
append gt_fieldcat_02 to gt_fieldcat_02.
endform.