SAPS4供应商主数据导入Word下载.docx
- 文档编号:22878435
- 上传时间:2023-02-05
- 格式:DOCX
- 页数:38
- 大小:33.35KB
SAPS4供应商主数据导入Word下载.docx
《SAPS4供应商主数据导入Word下载.docx》由会员分享,可在线阅读,更多相关《SAPS4供应商主数据导入Word下载.docx(38页珍藏版)》请在冰豆网上搜索。
name3
but000-name_org3,
名称3
name4
名称4
sort1
but000-bu_sort1,
搜索项
sort2
but000-bu_sort2,
搜索项2
stras
lfa1-stras,
街道
***
pstlz
lfa1-pstlz,
邮政编码
ort01
lfa1-ort01,
城市
land1
lfa1-land1,
国家
regio
lfa1-regio,
地区
langu
laiso,
语言
remark
ad_remark2,
联系人
tel
lfa1-telf1,
电话
phone
lfa1-telf2,
手机
telfx
lfa1-telfx,
传真
ad_smtpadr,
电子邮件
remark1
联系人2
tel1
电话2
phone1
手机2
telfx1
传真2
email1
电子邮件2
found_dat
string,
建立日期
bpext
but000-bpext,
旧供应商编码
***************************************************************************************
bpkind
but000-bpkind,
业务伙伴类型
banks
bus_ei_struc_bankdetail-bank_ctry,
银行国家代码
bankk
bus_ei_struc_bankdetail-bank_key,
银行代码
bankn
bus_ei_struc_bankdetail-bank_acct,
银行帐户号码
bu_koinh
bus_ei_struc_bankdetail-accountholder,
帐户持有人姓名
type1
but0id-type,
供应商身份识别号类型
taxtype
bus_ei_struc_tax-taxtype,
税号类别
idnumber
but0id-idnumber,
供应商身份识别号
taxnumxl
bus_ei_struc_tax-taxnumxl,
业务伙伴税号
institute
but0id-institute,
法人
entry_date
输入日期
valid_date_from
有效起始日期
valid_date_to
有效结束日期
ltext
ltext,
供应商主营业务
konzs
lfa1-konzs,
零星供应商
akont
lfb1-akont,
统驭科目
zuawa
lfb1-zuawa,
排序码
zterm
lfb1-zterm,
付款条件
reprf
lfb1-reprf,
检查重复发票
zterm1
lfm1-zterm,
waers
lfm1-waers,
订单货币
webre
lfm1-webre,
基于收货的发票校验
sign,
check,
memo(200),
消息文本
END
ty_upload_data.
DATA:
gv_fullpath
string,
gv_path
gv_name
string.
gs_alv_data
ty_upload_data,
gt_alv_data
TABLE
FIELD-SYMBOLS:
<
fs_data>
报表定义
gs_layout
lvc_s_layo,
gt_fieldcat
lvc_t_fcat,
gs_fieldcat
LIKE
LINE
gt_fieldcat,
gt_events
slis_t_event,
gs_events
gt_events,
gt_excluding
slis_t_extab,
gs_excluding
slis_extab,
gt_sort
lvc_t_sort,
gs_sort
lvc_s_sort,
gt_exclude
gs_exclude
slis_extab.
CONSTANTS
c_parvw1
parvw
VALUE
'
PI'
c_parvw2
OA'
c_parvw3
VN'
.
DATA
ls_data
cvis_ei_extern,
lt_data
cvis_ei_extern_t,
lt_return
bapiretm,
ls_return
bapireti,
ls_msg
bapiretc.
ls_partner
bus_ei_extern,
ls_vendor
vmds_ei_extern.
*
根据伙伴GUID取出供应商编号
lt_partnerguid_list
bu_partner_guid_t,
ls_partnerguid_list
lt_partnerguid_list.
lt_vendor_list
cvis_vend_link_t,
ls_vendor_list
cvi_vend_link.
ls_header
vmds_ei_header,
ls_central_data
vmds_ei_central_data,
ls_company_data
vmds_ei_vmd_company,
ls_purchasing_data
vmds_ei_vmd_purchasing.
lt_roles
bus_ei_bupa_roles_t,
ls_roles
bus_ei_bupa_roles,
lt_ident_numbers
bus_ei_bupa_identification_t,
ls_ident_numbers
bus_ei_bupa_identification,
lt_taxnumber
bus_ei_bupa_taxnumber_t,
ls_taxnumber
bus_ei_bupa_taxnumber,
lt_addresses
bus_ei_bupa_address_t,
ls_addresses
bus_ei_bupa_address,
lt_phone
bus_ei_bupa_telephone_t,
ls_phone
bus_ei_bupa_telephone,
lt_fax
bus_ei_bupa_fax_t,
ls_fax
bus_ei_bupa_fax,
lt_smtp
bus_ei_bupa_smtp_t,
ls_smtp
bus_ei_bupa_smtp,
ls_central
vmds_ei_vmd_central,
lt_company
vmds_ei_company_t,
ls_company
vmds_ei_company,
lt_purchasing
vmds_ei_purchasing_t,
ls_purchasing
vmds_ei_purchasing,
lt_functions
vmds_ei_functions_t,
ls_functions
vmds_ei_functions,
lt_texts
cvis_ei_text_t,
ls_texts
cvis_ei_text,
lt_tab
tline_tab,
ls_tab
tline,
ls_remarks
bus_ei_bupa_comrem,
lt_remarks
bus_ei_bupa_comrem_t.
lv_partner_guid
bu_partner_guid.
lv_bpartnerguid
bu_partner_guid_bapi.
lv_msg
SELECTION-SCREEN
BLOCK
b1
WITH
FRAME
TITLE
TEXT-001.
PARAMETERS:
p_path
string
MODIF
ID
m1.
导入文件
p_up
RADIOBUTTON
GROUP
grp1
DEFAULT
X'
USER-COMMAND
comm.
上传文件
p_down
.
下载模板
b1.
AT
ON
VALUE-REQUEST
FOR
p_path.
PERFORM
frm_browser_file.
选择屏幕获取本地excel
*-----------------------------------------------------------------------
控制选择画面
文件选择框的显隐
OUTPUT.
LOOP
SCREEN.
IF
screen-group1
=
M1'
OR
M2'
*下载/日志隐藏
screen-active
0.
ENDIF.
*上传文件显示
AND
MODIFY
ENDLOOP.
START-OF-SELECTION.
frm_get_fullpath
CHANGING
gv_name.
路径为空则退出
IS
INITIAL.
MESSAGE
用户取消操作'
S'
RETURN.
frm_down
USING
gv_fullpath.
ENDIF
INITIAL
请选择导入文件'
DISPLAY
W'
STOP.
NOT
frm_upload_data.
将本地excel文件上传到程序
frm_display.
报表展示导入结果
Form
FRM_BROWSER_FILE
text
*----------------------------------------------------------------------*
FORM
frm_browser_file
lv_rc
i,
lv_user
lt_file
filetable,
ls_file
file_table.
CALL
METHOD
cl_gui_frontend_services=>
file_open_dialog
EXPORTING
window_title
选择文件'
file_filter
Excel
Files(*.xls;
*.xlsx)|*.xls;
*.xlsx|All
Files(*.*)|*.*'
CHANGING
file_table
lt_file
rc
lv_rc
user_action
lv_user
EXCEPTIONS
file_open_dialog_failed
1
cntl_error
2
error_no_gui
3
not_supported_by_gui
4
OTHERS
5.
sy-subrc
>
sy-msgid
sy-msgty
NUMBER
sy-msgno
sy-msgv1
sy-msgv2
sy-msgv3
sy-msgv4.
ELSE.
CHECK
9.
READ
INTO
INDEX
1.
ls_file-filename.
ENDFORM.
FRM_UPLOAD_DATA
frm_upload_data
truxs_t_text_data,
ls_path
rlgrap-filename.
gt_upload
zalsmex_tabline
OCCURS
0
HEADER
LINE.
gt_upload>
zalsmex_tabline,
fs1>
l_column
i.
FUNCTION
ZALSM_EXCEL_TO_INTERNAL_TABLE'
filename
ls_path
i_begin_col
i_begin_row
5
i_end_col
44
i_end_row
9999
TABLES
intern
gt_upload
inconsistent_parameters
upload_ole
3.
ASSIGNING
MOVE
-col
TO
l_column.
ASSIGN
COMPONENT
STRUCTURE
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- SAPS4 供应商 数据 导入