abap 上传excel数字去除千分符_abap EXCEL上载数据

这篇博客介绍了如何在ABAP中使用函数调用从Excel文件加载数据,去除数字的千分符,并将数据存储到自定义透明表中,之后通过ALV进行数据展示。程序包括文件选择、数据转换、数据库更新和ALV显示的完整过程。
摘要由CSDN通过智能技术生成

如何在程序中将外部Excel数据上载到数据库并AlV展示,实例

俩个主要的函数

function : 获取excel文件路径

————————————————————————————————————————

call function 'GUI_FILE_LOAD_DIALOG'

exporting

WINDOW_TITLE = '打开文件'

DEFAULT_EXTENSION = ''

* DEFAULT_FILE_NAME =

* WITH_ENCODING =

* FILE_FILTER =

INITIAL_DIRECTORY = 'D:\'

importing

* FILENAME =

* PATH =

FULLPATH = P_FILE

* USER_ACTION =

* FILE_ENCODING =

————————————————————————————————————————

————————————————————————————————————————————-

form UPLOAD_DATA .

type-pools: TRUXS.

data: LT_TXT type TRUXS_T_TEXT_DATA,

LC_DATAFILE type LOCALFILE.

LC_DATAFILE = P_FILE. 文件名赋值

call function 'TEXT_CONVERT_XLS_TO_SAP'

exporting

* I_FIELD_SEPERATOR =

I_LINE_HEADER = 'X'

I_TAB_RAW_DATA = LT_TXT

I_FILENAME = LC_DATAFILE *传入文件

tables

I_TAB_CONVERTED_DATA = GT_SUBJECT *数据传入内表

exceptions

CONVERSION_FAILED = 1

others = 2

.

if SY-SUBRC <> 0.

* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO

* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

endif.

endform. " UPLOAD_DATA

————————————————————————————————————--——

可能有些同学像我一样是在自己的ecc6上测试自学的,

没有业务环境,那现在我们可以先自己模拟一些数据,测试一些,搞懂简单的过程,我的excel数据是

a4c26d1e5885305701be709a3d33442f.png

那你相应的要建立透明表,去数据字典

a4c26d1e5885305701be709a3d33442f.png

data

element 和domain自己定义就可以了,

下面是整个程序

——————————————————————————————————————————

*&---------------------------------------------------------------------*

*& Report ZSUB006_JIAN

*&

*&---------------------------------------------------------------------*

*&<

  • 0
    点赞
  • 2
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值