DATA: gt_dfies TYPE TABLE OF dfies,
gs_dfies TYPE dfies.
***********判断传入值是否超过长度
CLEAR gt_dfies.
CALL FUNCTION 'DDIF_FIELDINFO_GET'
EXPORTING
tabname = ls_data-query_table “表
fieldname = ls_fields-fieldname ”表字段
langu = sy-langu
TABLES
dfies_tab = gt_dfies
EXCEPTIONS
not_found = 1
internal_error = 2
OTHERS = 3.
IF sy-subrc <> 0.
* Implement suitable error handling here
ENDIF.
READ TABLE gt_dfies INTO gs_dfies INDEX 1.
IF sy-subrc = 0.
IF gs_dfies-decimals <> '000000'."判断小数位是否有值
lv_hlen = lv_hlen + gs_dfies-decimals + 1.
ENDIF.
lv_hlen = lv_hlen + gs_dfies-leng.
ENDIF.
获取表字段长度
©著作权归作者所有,转载或内容合作请联系作者
- 文/潘晓璐 我一进店门，熙熙楼的掌柜王于贵愁眉苦脸地迎上来，“玉大人，你说我怎么就摊上这事。” “怎么了？”我有些...
- 文/花漫 我一把揭开白布。 她就那样静静地躺着，像睡着了一般。 火红的嫁衣衬着肌肤如雪。 梳的纹丝不乱的头发上，一...
- 文/苍兰香墨 我猛地睁开眼，长吁一口气：“原来是场噩梦啊……” “哼！你这毒妇竟也来了？” 一声冷哼从身侧响起，我...
