CONCATENATE ls_table-tabname '-' ls_table-fieldname INTO l_string. ls_comp-name = ls_table-fieldname. *读取字段类型 CALL METHOD cl_abap_datadescr=>describe_by_name EXPORTING p_name = l_string RECEIVING p_descr_ref = lr_type EXCEPTIONS type_not_found = 1 OTHERS = 2. IF sy-subrc ...
= cl_abap_elemdescr=>describe_by_name( 'F_COUNT' ). comp_tab = struct_type->get_components( ). * We remove the unnecessary fields LOOP AT comp_tab INTO comp_fld. IF comp_fld-name <> p_selfl1 AND comp_fld-name <> p_selfl2 AND comp_fld-name <> p_selfl3 AND comp_fld-name ...
= cl_abap_typedescr=>describe_by_name('spfli'). l Get type object from a data object通过数据对象获取 DATA: datatypeTYPEREFTOcl_abap_datadescr, field(5)TYPEc. datatype ?= cl_abap_typedescr=>describe_by_data(field). l Get elementary types直接获取基本类型对象 DATA: elemtypeTYPEREFTOcl_...
5、_table-fieldnameINTOl_string.ls_comp-name=ls_table-fieldname.*读取字段类型CALLMETHODcl_abap_datadescr=>describe_by_nameEXPORTINGp_name=l_stringRECEIVINGp_descr_ref=lr_typeEXCEPTIONStype_not_found=1OTHERS=2.IFsy-subrc<>0.MESSAGEIDsy-msgidTYPEsy-msgtyNUMBERsy-msgnoWITHsy-msgv1sy-msgv2sy-...
=cl_abap_typedescr=>describe_by_data(p_data=p_data).lw_comp-name=iv_name.lw_comp-as_include=iv_as_include.lw_comp-suffix=iv_suffix.append lw_comptot_comp.endmethod.*<SIGNATURE>---+*| Static Public Method ZCL_DYNAMIC_OBJ=>ADD_COMP_BY_DATA_REF*+---...
CL_ABAP_TYPEDESCR=>DESCRIBE_BY_NAME( 'LIKP' ). LT_IDETAILS[] = LR_REF_TABLE_DES->COMPONENTS[]. "循环判断结构每个字段 LOOP AT LT_IDETAILS. ASSIGN COMPONENT LT_IDETAILS-NAME OF STRUCTURE is_likp TO 《 L_FIELD》 . IF SY-SUBRC = 0 AND IS NOT INITIAL. ...
eo_field_catalog?=cl_abap_typedescr=>describe_by_name('ZFPM_STR').ENDMETHOD. Create FPM application Create Application 创建Application如下 Create Application Configuration 选中Application后右击创建configuration,在跳出的页面中输入configuration id,点击New按钮,填入描述与package信息 ...
4 Answers Sorted by: 2 You could prepare a type descriptor of the interface (once):DATA: lr_t100_descr TYPE REF TO cl_abap_intfdescr. lr_t100_descr ?= cl_abap_typedescr=>describe_by_name( 'IF_T100_MESSAGE' ). and then examine each exception as it comes your way:...
=cl_abap_typedescr=>DESCRIBE_BY_NAME(p_ttbl).go_table_type_s=cl_abap_tabledescr=>CREATE(P_LINE_TYPE=go_struct_type_s*P_TABLE_KIND=TABLEKIND_STD*P_UNIQUE=ABAP_FALSE*P_KEY=*P_KEY_KIND=KEYDEFKIND_DEFAULT).*catchCX_SY_TABLE_CREATION." Exception when Creating a Table Typego_table_type_...
=cl_abap_typedescr=>describe_by_data(gt_mara).LOOPATcl_descr->componentsASSIGNING<fs_comp>.WRITE:/<fs_comp>-name,"字段名称<fs_comp>-type_kind,"字段类型<fs_comp>-length,"字段长度<fs_comp>-decimals."字段小数位APPEND<fs_comp>-nameTOgt_field.ENDLOOP....