SAP对EXCEL的操作

时间:2019-05-12 03:32:16下载本文作者:会员上传
简介:写写帮文库小编为你整理了多篇相关的《SAP对EXCEL的操作》,但愿对你工作学习有帮助,当然你在写写帮文库还可以找到更多《SAP对EXCEL的操作》。

第一篇:SAP对EXCEL的操作

我们在sap上限初期经常会将EXCEL数据倒入到SAP,sap也为此封装了许多的函数,但是这些函数都有单元文本长度限制。具体介绍如下:

1、'TEXT_CONVERT_XLS_TO_SAP'单元格文本不能超过256个字符 CALL FUNCTION 'TEXT_CONVERT_XLS_TO_SAP' EXPORTING i_line_header = 'X' i_tab_raw_data = lt_raw i_filename = p_file TABLES i_tab_converted_data = it_data EXCEPTIONS conversion_failed = 1 OTHERS = 2.2、'ALSM_EXCEL_TO_INTERNAL_TABLE'单元格文本不能超过50个字符 data: gt_upload type alsmex_tabline occurs 0 with header line.call function 'ALSM_EXCEL_TO_INTERNAL_TABLE' exporting filename = p_file i_begin_col = '1' i_begin_row = '1' i_end_col = '9' i_end_row = '50000' tables intern = gt_upload.3、自编程序倒入EXCEL,单元格文本长度可以自定义,代码如下(实现的功能和'ALSM_EXCEL_TO_INTERNAL_TABLE类似): REPORT RSDEMO01 NO STANDARD PAGE HEADING.* this report demonstrates how to send some ABAP data to an * EXCEL sheet using OLE automation.TYPE-POOLS: ole2.**TYPE UPLOAD TABLE TYPES: BEGIN OF ZLSMEX_TABLINE, row TYPE KCD_EX_ROW_N, COL TYPE KCD_EX_COL_N, VALUE(500), END OF ZLSMEX_TABLINE.DATA gt_upload type TABLE OF ZLSMEX_TABLINE WITH HEADER LINE.* value of excel-cell TYPES: ty_d_itabvalue TYPE ZLSMEX_TABLINE-value, * internal table containing the excel data ty_t_itab TYPE ZLSMEX_TABLINE OCCURS 0, * line type of sender table BEGIN OF ty_s_senderline, line(4096)TYPE c, END OF ty_s_senderline, * sender table ty_t_sender TYPE ty_s_senderline OCCURS 0.CONSTANTS: gc_esc VALUE '“'.* handles for OLE objects DATA: H_EXCEL TYPE OLE2_OBJECT, ” Excel object workbooks TYPE OLE2_OBJECT, “ list of workbooks workbook TYPE OLE2_OBJECT, ” workbook worksheet TYPE ole2_object, H_CELL TYPE OLE2_OBJECT, “ cell H_F TYPE OLE2_OBJECT.” font DATA H TYPE I.*--------* * Type Declaration *--------* TYPE-POOLS: slis, truxs.PARAMETERS: p_file LIKE rlgrap-filename OBLIGATORY.DEFINE m_message.case sy-subrc.when 0.when 1.message id sy-msgid type sy-msgty number sy-msgno with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.when others.raise upload_ole.endcase.END-OF-DEFINITION.*&-------* *& Form SEPARATED_TO_INTERN_CONVERT *&-------* * text *--------* *--> p1 text * <--p2 text *--------* FORM separated_to_intern_convert TABLES i_tab TYPE ty_t_sender i_intern TYPE ty_t_itab USING i_separator TYPE c.DATA: l_sic_tabix LIKE sy-tabix, l_sic_col TYPE kcd_ex_col.DATA: l_fdpos LIKE sy-fdpos.REFRESH i_intern.LOOP AT i_tab.l_sic_tabix = sy-tabix.l_sic_col = 0.WHILE i_tab CA i_separator.l_fdpos = sy-fdpos.l_sic_col = l_sic_col + 1.PERFORM line_to_cell_separat TABLES i_intern USING i_tab l_sic_tabix l_sic_col i_separator l_fdpos.ENDWHILE.IF i_tab <> space.CLEAR i_intern.i_intern-row = l_sic_tabix.i_intern-col = l_sic_col + 1.i_intern-value = i_tab.APPEND i_intern.ENDIF.ENDLOOP.ENDFORM.“ SEPARATED_TO_INTERN_CONVERT *-------* FORM line_to_cell_separat TABLES i_intern TYPE ty_t_itab USING i_line i_row LIKE sy-tabix ch_cell_col TYPE kcd_ex_col i_separator TYPE c i_fdpos LIKE sy-fdpos.DATA: l_string TYPE ty_s_senderline.DATA l_sic_int TYPE i.CLEAR i_intern.l_sic_int = i_fdpos.i_intern-row = i_row.l_string = i_line.i_intern-col = ch_cell_col.* csv Dateien mit separator in Zelle:-->;”abc;cd“;IF(i_separator = ';' OR i_separator = ',')AND l_string(1)= gc_esc.PERFORM line_to_cell_esc_sep USING l_string l_sic_int i_separator i_intern-value.ELSE.IF l_sic_int > 0.i_intern-value = i_line(l_sic_int).ENDIF.ENDIF.IF l_sic_int > 0.APPEND i_intern.ENDIF.l_sic_int = l_sic_int + 1.i_line = i_line+l_sic_int.ENDFORM.”line_to_cell_separat *-------* FORM line_to_cell_esc_sep USING i_string i_sic_int TYPE i i_separator TYPE c i_intern_value TYPE ty_d_itabvalue.DATA: l_int TYPE i, l_cell_end(2).FIELD-SYMBOLS: .l_cell_end = gc_esc.l_cell_end+1 = i_separator.IF i_string CS gc_esc.i_string = i_string+1.IF i_string CS l_cell_end.l_int = sy-fdpos.ASSIGN i_string(l_int)TO .i_intern_value = .l_int = l_int + 2.i_sic_int = l_int.i_string = i_string+l_int.ELSEIF i_string CS gc_esc.* letzte Celle l_int = sy-fdpos.ASSIGN i_string(l_int)TO .i_intern_value = .l_int = l_int + 1.i_sic_int = l_int.i_string = i_string+l_int.l_int = strlen(i_string).IF l_int > 0.MESSAGE x001(kx).ENDIF.ELSE.MESSAGE x001(kx).“was ist mit csv-Format ENDIF.ENDIF.ENDFORM.”line_to_cell_esc_sep *&-------* *& Form read_excel *&-------* * text *--------* *--> p1 text * <--p2 text *--------* FORM zalsm_excel_to_internal_table TABLES INTERN LIKE gt_upload[] USING VALUE(FILENAME)LIKE RLGRAP-FILENAME VALUE(I_BEGIN_COL)TYPE I VALUE(I_BEGIN_ROW)TYPE I VALUE(I_END_COL)TYPE I VALUE(I_END_ROW)TYPE I.DATA: excel_tab TYPE ty_t_sender.DATA: ld_separator TYPE c.DATA: application TYPE ole2_object, workbook TYPE ole2_object, range TYPE ole2_object, worksheet TYPE ole2_object.DATA: h_cell TYPE ole2_object, h_cell1 TYPE ole2_object.DATA: ld_rc TYPE i.* Rückgabewert der Methode “clipboard_export ” * Makro für Fehlerbehandlung der Methods * check parameters IF i_begin_row > i_end_row.RAISE inconsistent_parameters.ENDIF.IF i_begin_col > i_end_col.RAISE inconsistent_parameters.ENDIF.* Get TAB-sign for separation of fields CLASS cl_abap_char_utilities DEFINITION LOAD.ld_separator = cl_abap_char_utilities=>horizontal_tab.* open file in Excel IF application-header = space OR application-handle =-1.CREATE OBJECT application 'Excel.Application'.m_message.ENDIF.CALL METHOD OF application 'Workbooks' = workbook.m_message.CALL METHOD OF workbook 'Open' EXPORTING #1 = filename.m_message.* set property of application 'Visible' = 1.* m_message.GET PROPERTY OF application 'ACTIVESHEET' = worksheet.m_message.* mark whole spread sheet CALL METHOD OF worksheet 'Cells' = h_cell EXPORTING #1 = i_begin_row #2 = i_begin_col.m_message.CALL METHOD OF worksheet 'Cells' = h_cell1 EXPORTING #1 = i_end_row #2 = i_end_col.m_message.CALL METHOD OF worksheet 'RANGE' = range EXPORTING #1 = h_cell #2 = h_cell1.m_message.CALL METHOD OF range 'SELECT'.m_message.* copy marked area(whole spread sheet)into Clippboard CALL METHOD OF range 'COPY'.m_message.* read clipboard into ABAP CALL METHOD cl_gui_frontend_services=>clipboard_import IMPORTING data = excel_tab EXCEPTIONS cntl_error = 1 * ERROR_NO_GUI = 2 * NOT_SUPPORTED_BY_GUI = 3 OTHERS = 4.IF sy-subrc <> 0.MESSAGE a037(alsmex).ENDIF.PERFORM separated_to_intern_convert TABLES excel_tab intern USING ld_separator.* clear clipboard REFRESH excel_tab.CALL METHOD cl_gui_frontend_services=>clipboard_export IMPORTING data = excel_tab CHANGING rc = ld_rc EXCEPTIONS cntl_error = 1 * ERROR_NO_GUI = 2 * NOT_SUPPORTED_BY_GUI = 3 OTHERS = 4.* quit Excel and free ABAP Object-unfortunately, this does not kill * the Excel process CALL METHOD OF application 'QUIT'.m_message.* >>>>> Begin of change note 575877 * to kill the Excel process it's necessary to free all used objects FREE OBJECT h_cell.m_message.FREE OBJECT h_cell1.m_message.FREE OBJECT range.m_message.FREE OBJECT worksheet.m_message.FREE OBJECT workbook.m_message.FREE OBJECT application.m_message.* <<<<< End of change note 575877 ENDForm."zalsm_excel_to_internal_table *&-------* *& Event START-OF-SELECTION *&-------* AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_file.CALL FUNCTION 'KD_GET_FILENAME_ON_F4' EXPORTING mask = ',Microsoft Excel Files,*.xls' static = 'X' CHANGING file_name = p_file.*&-------* *& Event START-OF-SELECTION *&-------* START-OF-SELECTION.PERFORM ZALSM_EXCEL_TO_INTERNAL_TABLE TABLES gt_upload USING p_file 1 1 9 5000.LOOP AT GT_UPLOAD.WRITE GT_UPLOAD-VALUE.ENDLOOP.

第二篇:SAP 操作代码 T-CODE

T-code:

MM:

MM01创建供应商主数据 ME11维护货源清单 ME51N-创建采购申请 ME5A批准采购申请(批准组:YH)ME57 – 分配并处理采购申请 MB21显示预留清单 ME21N-创建采购订单

ME28采购订单发送确认 ME2L创建采购协议 MD03库存需求清单(MD05寄售结算

MELB创建询价单 ME47价格比较清单 MI31打印盘点凭证

MI22显示实际盘点凭证清单 MI03根据盘点凭证输入库存计数 MI20库存差额总览记帐 MI02显示物料凭证

ME2O显示物料凭证 MMBE查询库存价值余额清单 MCBR查询每一天的库存 MB58查询预留和发货情况MB51 MB5S物料凭证查询(可以按移动类型查询)ME2L信息结构S911 采购信息查询(采购数量价值、收货数量价值、发票数量价值)

MCBA显示物料改变 MMSC其它收货 MB1A转储 MB31采购收货)MBST商品清单

ME31L-创建计划协议 ME38消息输出

MB04显示现有的仓库物料库存 MB90显示生产订单 PP:

co01 新增生产工单 co02 修改生产工单 co03 显示生产工单

md01 MRP md04 stock/requirements list me51 查看库存

Material Mangement: MM01创建供应商主数据 ME11维护货源清单

ME51N-创建采购申请 ME5A批准采购申请(批准组:YH)ME57 – 分配并处理采购申请 MB21显示预留清单 ME21N-创建采购订单

ME28采购订单发送确认 ME2L创建采购协议 MD03库存需求清单(MD05寄售结算

MELB创建询价单 ME47价格比较清单 MI31打印盘点凭证

MI22显示实际盘点凭证清单 MI03根据盘点凭证输入库存计数 MI20库存差额总览记帐 MI02显示物料凭证

ME2O显示物料凭证 MMBE查询库存价值余额清单 MCBR查询每一天的库存 MB58查询预留和发货情况MB51 MB5S物料凭证查询(可以按移动类型查询)

ME2L信息结构S911 采购信息查询(采购数量价值、收货数量价值、发票数量价值)

MCBA显示物料改变

MMSC其它收货 MB1A转储

MB31采购收货)MBST商品清单

ME31L-创建计划协议 ME38消息输出

MB04显示现有的仓库物料库存

MB90显示生产订单

IW13显示维修订单 VA01-创建销售订单

VL01NWM 库存比较 IM-WM

LX24 Display of hazardous mat.numbers 显示危险物料数据 LX25 Inventory Status 库存状态

LX26 Inventory in WM via cycle counting 通过周期盘点的仓库管理中的库存 LX27 Stock levels by shelf life exp.date 根据货架寿命有效日期的库存水平LX28 Relevant TO item for ext.system 与外部系统有关的转储单项目 LX29 Fixed bin supervision 固定仓位管理

LX30 Overview of WM messages ext.system 传给外部系统的仓库管理消息总览

LX31 Analysis of print control tables 打印控制表分析

LX32 Archived transfer orders 归档的转储订单

LX33 Archived transfer requirements 归档的转储需求 LX34 Archived posting change notices 归档的记帐修改单 LX35 Archived system inventory records 归档的系统库存记录 LX36 Archived inventory histories 归档的库存历史 LX37 Linked objects 连接的对象

LX38 Check Report Customizing Strategy K 检查报表系统定制策略 K LX39 Evaluation Reference No.for 2-S.Pck 两步领货的评估参考号 LX40 Material Situation Prod.Storage Bin 物料位置产品仓位

LX41 Bin Status Report WM/PP Interface 储位状态报表 WW/PP 接口 LX42 Evaluation PP Order from WM View 从WM视图中评估PP订单 LX43 Consistency Check for Control Cycles 控制循环的一致性检查

MCL9 WM: Material Plcmt/Removal:Selection WM: 物料入库/出库:选择 MCLD WM: Material flow选择 MCLH WM: Movement types选择 OL01 Display / change LDK34(bins)显示/修改 LDK34(仓位)OL02 Display / change RLPLA(bins)显示/修改 RLPLA(仓位)OL03 Display / change LDK33(stock)显示/修改 LDK33(库存)OL04 Display / change RLBES(stock)显示/修改 RLBES(库存)

OL05 Display / change LDK30(mat.whse)显示/修改 LDK30(物料库)OL06 Display / change LDK31(mat.type)显示/修改 LDK31(物料类型)

OL07 Data transfer stor.bins LDK34->RLPLA 仓储位LDK34->RLPLA 数据转储

OL08 Data transfer stor.bins RLPLA->B.I.仓储位RLPLA->B.I.数据转储

OL09 Data transfer stor.bins LDK34->LAGP 仓储位LDK34->LAGP 数据转储 OL10 Test storage bin data transfer 测试仓位数据传送

OL11 Data transfer stock LDK33->RLBES 库存LDK33->RLBES 数据转储 OL12 Data transfer stock RLBES-> B.I.库存RLBES->B.I.数据转储 OL13 Data tranfer stock LDK33->LQUA 库存IDK330->LQUA 数据转储 OL14 Test stock data transfer 测试库存数据传送

OL15 Data transfer material whse no.view 物料仓库号视图数据转储

OL16 Test mat.master data transfer(MLGN)测试物料主数据传递(MLGN)OL17 Data transfer material storage type 物料仓储类型数据转储

OL18 Test mat.master data transfer(MLGT)测试物料主数据传递(MLGT)OLVS C SD Menu for Master Data 设置 SD 物料主数据菜单 VM01 Create Hazardous Material 创建危险品 VM02 Change Hazardous Material 改变危险品 VM03 Display Hazardous Material 显示危险品

第三篇:SAP工程项目管理模块基本操作步骤

一、自动创建项目 1.事务代码:ZCJ20N 将需要新建的项目信息输入完毕后,点执行键后,将项目定义(项目编码)记录,更改需要修改的相关描述,存盘后退出至初始界面。二、二.项目概算编制与下达 1.概算编制的事务代码:CJ30(1)输入命令后,点左上角“最初预算”,进入概算编制的界面。

(2)在菜单栏选“设置”,点选“显示选项”后,在表格菜单中选择“说明”后点“继续”,将预WBS要素由编码形式改成中文说明形式。

(3)编制初始概算内容:在概算栏将金额输入完毕后,点击保存。2.概算下达的事务代码:CJ32(1)输入命令后,点左上角“下达”,进入概算下达的界面。

(2)点击表格左下角“全选”图标,将概算表格全部选中后,点选菜单栏中“编辑”,选择“复制视图”,在“复制视图”表格菜单中选择“11(当前预算)”,输入概算的下达比例后点击“√”后,点击保存。三、三、项目下达

(1)输入命令(CJ20N)后,点击项目定义,更改用户状态。(2)在界面顶层菜单栏中“编辑”,选择“状态”后,选“下达”。

执行各项事务代码,在初始界面输入命令不需要加“/N”,在其它界面输入命令需加“/N”。各项操作必须按照步骤进行,如不按步骤进行,在最后几项操作(如创建服务采购订单)时,会出现错误。同时注意,在各项操作过程中,避免同时开多个窗口操作,防止数据不能保存及下达。

四、工程物资采购的申请与审批

1.创建工程物资的采购申请(材料和设备)

(1)点选所需采购物资的WBS层次下的活动,例如在线路工程、通讯

工程及变电工程中选择绿色的小横条即材料或设备采购后,点选右侧菜单中“物料桶”后,进入材料或设备采购的菜单界面,输入物料号,及数量。

(2)在材料采购菜单界面下出现物料之后,点选“物料”(注:需补充完整物料采购的相关数据),如采购组(100),采购组织(9000或9100),如无采购金额也必须输入。(3)检查上述数据输入无误后,点“保存”。

(4)再次进入项目构造器界面后。点选各项材料,查看并记录各个物料的采购申请号。2.审批工程物资的采购申请

事务代码:ME54N(单独审批)/ME55(集中审批)单独审批工程物资采购申请

(1)在界面中左上角点选其它购买要求,在弹出表格中输入“采购申请”(500000****)后,点“√”。

(2)点左右下角的审批标志,点击后,图标变为白色小箭头,在左下角提示说审批代码生效。

集中审批工程物资采购申请

(1)执行事物代码ME55后,在菜单界面左上角的小闹钟点选“执行”。

(2)输入审批代码01、工厂代码及网络代码(项目构造器中网络表头的七位数字的代码)后,点选左上角“执行”键。

(3)在审批界面中,点选“全选”后,“保存”退出。

五、工程服务采购申请的创建及审批和订单的创建及确认,发票预制 1.创建工程服务的采购申请(外包合同)

(1)进入项目,点选网络表头,点击绿色的小横条(作业总览),选择外部处理,在服务小框内打钩,输入所需外包服务的说明,更改采购组织和WBS元素,点击回车。在维护合同的界面输入服务编号、数量、总价格,回车后按返回,点击存盘。

(2)在对应的WBS层次下,例如变电工程-安装下出现XX外包服务的外部活动(小绿横条)之后,点选“活动”(注:检查服务采购的相关数据是否完整),如采购组(105),采购组织(9200),点击“保存”。

(4)再次进入项目构造器界面后。点选各个活动,查看并记录各项外部活动的采购申请号。2.审批工程服务的采购申请

事务代码:ME54N(单独审批)/ME55(集中审批)单独审批工程服务的采购申请

(1)在界面中左上角点选其它购买要求,在弹出表格中输入“采购申请”(500000****)后,点“√”。

(2)点左右下角的审批标志,点击后,图标变为白色小箭头,在左下角提示说审批代码生效。

集中审批工程服务的采购申请

(1)执行事物代码ME55后,在菜单界面左上角的小闹钟点选择“执行”。

(2)输入审批代码02、工厂代码及网络代码(项目构造器中网络表头的七位数字的代码)后,点选左上角“执行”键。

(3)在审批界面中,点选“全选”后,“保存”退出。3.创建工程服务的采购订单 事务代码:ME21N(1)在创建服务采购订单的界面中,查找“采购申请”处于(表格中部)中,输入“服务采购申请号”(根据不同供应商分别输入不同的服务采购申请号创建不同的服务采购订单,同一个供应商下可输入多个服务采购申请号创建同一个服务采购订单)后,“回车”。

(2)在表格上“供应商”空格中,输入“供应商”编号,或是在弹出框进行选择,点击“保存”。4.进行服务采购订单的进度确认 事务代码:ML81N(1)在界面中左上角点选其它采购订单,在弹出表格中输入“采购订单号”(500000****)后,点“√”。

(2)在采购订单位条目单中点选所选项目后,点鼠标右键后,选择“创建”-“计划服务”后,在“计划服务”表格中输入确认的比例数字,点“√”。

(3)在短文本中,输入相应描述(如本项目前期支付30%)后,点左上角“接收”(绿色小旗)图标后,点击保存,记录界面左下角出现的凭证号。5.发票预制 事务代码:MIR7(1)进入界面后输入发票日期,在采购订单/计划协议右边框中输入 已做服务确认的服务采购订单号(500000****)后,按回车键。

(2)将界面右上角出现的余额数字填入左方的金额框中,按回车键或点击支付款项,输入基线日期。(3)点击模拟,在出现的界面下方余额为零的情况下,点击另存为已完成,记录下左下方出现的凭证号。六、六、工程进度的确认及显示 事务代码:CJ20N(1)进入项目界面,点击需要确认的内部活动后,在界面顶层中菜单栏“编辑”-“活动”-“确认”。

(2)在出现表格菜单中,输入相应内容后,点“√”或是返回图标,点击保存。(3)在项目结构概览中查看工作处理完成的状况。

第四篇:SAP ABAP OLE操作EXCEL小结

ABAP直接操作EXCEL实现数据处理。这里是用OLE实现操作EXCEL的。现在还有 DOI操作EXCEL等方法。以后用到再做介绍。此处不是直接生成EXCEL文件,而是从 服务器已经上传的EXCEL模板中下载模板然后打开修改实现数据保存。也可以直接创建 新的EXCEL文件往里面传递数据并设置格式。这里不做介绍。

1.采用模板文件实现。上传EXCEL模板 T-code:SMW0

注意选择的是binary data(对于EXCEL模版上传)如果是HTML上传,对于存于www.xiexiebang.comtl_error = 1 error_no_gui = 2 not_supported_by_gui = 3 OTHERS = 4.IF lc_fullpath = ''.MESSAGE '不能打开excel' TYPE 'E'.ENDIF.IF sy-subrc = 0.p_dest = lc_fullpath.* concatenate p_objid '.XLS' into ls_objnam.CONDENSE ls_objnam NO-GAPS.SELECT SINGLE relid objid FROM wwwdata INTO CORRESPONDING FIELDS OF lo_objdata WHERE srtf2 = 0 AND relid = 'MI' AND objid = p_objid.“先尝试取一下,接着检查是否取到制定模版问件 *检查表wwwdata中是否存在所指定的模板文件

IF sy-subrc NE 0 OR lo_objdata-objid EQ space.“如果不存在,则给出错误提示

CONCATENATE '模板文件' ls_objnam '不存在' INTO ls_errtxt.MESSAGE ls_errtxt TYPE 'I'.ENDIF.ls_destination = p_dest.”保存路径

*如果存在,调用DOWNLOAD_WEB_OBJECT 函数下载模板到路径下

CALL FUNCTION 'DOWNLOAD_WEB_OBJECT' EXPORTING key = lo_objdata destination = ls_destination IMPORTING rc = li_rc.IF li_rc NE 0.CONCATENATE '模板文件:' ls_objnam '下载失败' INTO ls_errtxt.MESSAGE ls_errtxt TYPE 'E'.ENDIF.fname = ls_destination.ENDIF.ENDFORM.“fm_excel

3.下载完模板后,打开模板文件,填入数据 DATA: EXCEL TYPE ole2_object, WORKBOOK TYPE ole2_object, SHEET TYPE ole2_object.CREATE OBJECT excel 'EXCEL.APPLICATION'.”Create EXCEL OBJECT IF sy-subrc NE 0.EXIT.ENDIF.SET PROPERTY OF excel 'Visible' = 0.“1/0 是否显示EXCEL CALL METHOD OF excel 'Workbooks' = workbook.CALL METHOD OF workbook 'Open' EXPORTING #1 = fname..”打开上面下载路径下的excel文件

CALL METHOD OF excel 'Sheets' = sheet EXPORTING #1 = 1.CALL METHOD OF sheet 'Select'.CALL METHOD OF sheet 'ACTIVATE'.“sheet 激活 DATA SHEETNAME TYPE STRING.SHEETNAME = 'TESTTESTTEST'.SET PROPERTY OF sheet 'NAME' = sheetname.“设定sheet名称 *此处假设内表itab 中已经存在需要写入excel中的数据 *并且假如从模板的第7行开始插入数据 DATA ITAB LIKE STANDARD TABLE OF SFLIGHT.DATA WA LIKE SFLIGHT.DATA: TAB TYPE I,BOD(5)TYPE C.SELECT * INTO TABLE ITAB FROM SFLIGHT UP TO 8 ROWS.LOOP AT itab INTO wa.tab = sy-tabix + 6.*在excel中插入一行

PERFORM excel_row_insert USING sheet tab 1.*填充所插入行的每个单元格的数据

PERFORM fill_range USING tab 1 wa-t01.PERFORM fill_range USING tab 2 wa-t02.PERFORM fill_range USING tab 3 wa-t03.PERFORM fill_range USING tab 4 wa-t04.PERFORM fill_range USING tab 5 wa-t05.PERFORM fill_range USING tab 6 wa-t06.ENDLOOP.*设置EXCEL中所插入的数据行边框线格式为黑色有边框

bod = tab.CONDENSE bod NO-GAPS.CONCATENATE 'A6:F' bod INTO bod.PERFORM borderrange USING excel bod.PERFORM sub_excel_save.“保存excel数据

*&-------* *& Form sub_excel_save *&-------* * text *--------* FORM sub_excel_save.GET PROPERTY OF excel 'ActiveSheet' = sheet.“获取活动SHEET FREE OBJECT sheet.FREE OBJECT workbook.GET PROPERTY OF excel 'ActiveWorkbook' = workbook.CALL METHOD OF workbook 'SAVE'.SET PROPERTY OF excel 'Visible' = 1.”是否显示EXCEL 此处显示不退出 * SET PROPERTY OF excel 'Visible' = 1.* CALL METHOD OF workbook 'CLOSE'.* CALL METHOD OF excel 'QUIT'.注释部分为不显示直接退出 FREE OBJECT sheet.FREE OBJECT workbook.FREE OBJECT excel.ENDFORM.“save_book

*&-------* *& 向excel中的指定行插入N行

*&-------* FORM excel_row_insert USING lcobj_sheet lc_row lc_count.DATA lc_range TYPE ole2_object.DATA h_borders TYPE ole2_object.DO lc_count TIMES.CALL METHOD OF lcobj_sheet 'Rows' = lc_range EXPORTING #1 = 6.CALL METHOD OF lc_range 'Copy'.“COPY第6行插入一个新行

CALL METHOD OF lcobj_sheet 'Rows' = lc_range EXPORTING #1 = lc_row.CALL METHOD OF lc_range 'Insert'.CALL METHOD OF lc_range 'ClearContents'.”是否需要清空Cell ENDDO.ENDFORM.“excel_row_insert *&-------* *& Form fill_range *&-------* * text 填充EXCEL 单元格

*--------* *-->VALUE(F_ROW)text *-->VALUE(F_COL)text *-->VALUE(F_VALUE)text *--------* FORM fill_range USING value(f_row)value(f_col)value(f_value).DATA: row TYPE i, col TYPE i.row = f_row.col = f_col.CALL METHOD OF excel 'CELLS' = cell EXPORTING #1 = row #2 = col.SET PROPERTY OF cell 'VALUE' = f_value.ENDFORM.”fill_range *&-------* *& Form borderrange *&-------* * text:设置EXCEL中所插入的数据行边框线格式 *--------* *-->LCOBJ_EXCEL text *-->RANGE text *--------* FORM borderrange USING lcobj_excel range.DATA: lc_cell TYPE ole2_object , lc_borders TYPE ole2_object.CALL METHOD OF lcobj_excel 'RANGE' = lc_cell EXPORTING #1 = range.DO 4 TIMES.CALL METHOD OF lc_cell 'BORDERS' = lc_borders EXPORTING #1 = sy-index.SET PROPERTY OF lc_borders 'LineStyle' = '1'.SET PROPERTY OF lc_borders 'WEIGHT' = 2.“4=max SET PROPERTY OF lc_borders 'ColorIndex' = '1'.ENDDO.FREE OBJECT lc_borders.FREE OBJECT lc_cell.ENDFORM.”borderrange

暂时只用到了这么多,还有ABAP设置EXCEL字体,对齐方式等功能。什么时候用到了再 做研究。希望对大家有所帮助。

第五篇:SAP软件操作管理规定(试行)

SAP软件操作管理规定(试行)

第一章

第一条

根据《大连华锐股份有限公司会计核算办法(暂行)》等有关规定,为适应SAP软件特点、理顺业务,满足核算和管理要求,制定本规定。

第二章

会计凭证录入

第二条

会计人员输入会计凭证要按照《SAP软件操作手册(试行)》的规定进行,做到信息齐全、内容完整,包括填制凭证日期、记账日期等所有字段信息,系统自动生成的凭证亦应补充其所缺内容。

第三条

在“参照”字段输入本单位稽核人姓名,操作方式为执行修改已预制或已过账的凭证,在该字段输入稽核人的姓名。

第四条

在“凭证抬头文本”(短文本)字段输入凭证类型和附件张数,其中,S代表收款记账凭证、F代表付款记账凭证、Z代表转账记账凭证,凭证类型与附件张之间插入“#”。举例说明如下:

(1)如转账记账凭证附件张数为2张,则输入“Z#2”;(2)如收款记账凭证附件张数为3张,则输入S#3;(3)如付款记账凭证附件张为4张,则输入F#4;

(4)如为系统自动生成的凭证,则需修改补充,即执行修改凭证将该字段补充完整。第五条

在“分配”字段,根据核算需要,输入合同号或同时输入外部单位等。举例说明如下:

(1)“银行存款”科目如果需要输入结算单据编号,则在该字段输入结算单据编号;

(2)“应收票据”、“应付票据”科目如果需要核算合同号,则在该字段输入合同号,如果需要按票据号核销,在该字段输入票据号;

(3)“应收账款”、“预付账款”、“应付账款”、“预收账款”科目该字段输入合同号,其中“应收账款”和“预收账款”科目合同号为必输项;(对于即要挂合同又要按采购或库管核销的,应该是前面是合同号,中间是#,最后是采购或库管,所以建议#应该是必须输入的)

(4)“物资采购”科目如果直接核算供应商,该字段输入采购员,如果直接核算采购员,则该字段输入供应商编号;

(5)“原材料”科目如果核算具体的原材料类别,该字段输入原材料的类别名称;

(6)如内部应收账款——财务部,合同号为“DHR04-WP01002”外部客户为宣化钢铁集团有限责任公司,SAP编号为200345,则在“分配”字段输入“DHR04-WP01002#200345”。(举例子最好按心合同号举例,建议合同号最好用新合同号)

第六条 在“文本”字段输入摘要,摘要应简明扼要,内容完整,表述清楚。

第七条

主营业务收入、主营业务成本所对应的合同号须均为系统中的新合同号,以保证主营业务收入与主营业务成本的对应。第八条

会计人员应当按照岗位分工输入凭证,其中下列业务明确如下:

一、材料采购发票凭证必须在收到发票的当天录入到SAP软件中,如果发票在税务局认证时没通过,则冲销该凭证,不得在发票认证后输入材料采购发票凭证,如有一进一出的材料采购,材料出库单必须及时转给成本会计人员,由成本会计人员做材料出库凭证,保证生产成本原材料数据录入的及时性;

二、借方为成本要素,贷方为“现金”的凭证,必须由成本会计人员在业务发生的当天录入;借方为成本要素,贷方为“银行存款”类凭证,必须由成本会计人员在银行对账单提供的当天录入。

三、借方为成本要素,贷方科目为“应付账款”或“其他应付款”的凭证,由成本会计人员录入,供应商编号由主管应付账款的会计人员或相关业务人员提供,录入凭证时贷方必须做应付科目,如果涉及到往来款转账的业务,由往来会计作凭证。(成本要素的面积太大,这里应该是生产成本科目,还有一种费用报销,好像没有提及,费用会计和成本会计不是一个吧)

四、材料出库凭证由成本会计人员输入,借方为成本要素,贷方为“原材料(12110401)”。

五、估价入库凭证,借方为成本要素,贷方为“原材料”的凭证由成本会计录入,借方为“原材料”,贷方为“应付账款-暂估”的凭证,由负责应付账款的会计人员录入。

六、“主营业务收入”凭证由负责应收账款的会计人员录入,采用系统 内的新合同号,在“主营业务收入”中同时输入数量,合同号及数量由成本会计人员提供。合同号收入与成本一致,由专人管理。主营业务收入中输入的合同号要与主营业务成本中输入的合同号保持一致。负责应收账款的会计人员要与成本会计人员沟通,由成本会计人员负责审核。

第三章

主数据维护

第九条

各单位统一使用会计科目表“G001”。会计科目分为一般总账、往来账项、存货、固定资产、损益、货币资金、生产成本、税金共八类。其中,应收账款及预收账款在按客户核算的同时还按合同号核算,两项均为必输项;应付账款和预付账款在按供应商核算的同时还按合同号或工号进行核算,其中合同或工号为可输项;物资采购将采购员维护为供应商,按采购员进行核算;内部应收账款按内外部客户同时进行核算,均为必输项;内部应付账款按内外部供应商同时核算,其中外部供应商为可输项。其余科目按照系统配置进行核算。

第十条

会计科目主数据由计财部统一进行维护。各单位如需增加、修改或删除会计科目的,向计财部提出书面申请,计财部统一进行维护。同时计财部定期检查各会计科目使用情况,并结合业务需要主动维护会计科目包括增加、删除、冻结等。

第十一条

SAP软件中将往来单位区分客户和供应商。客户包括一般客户、一般员工、华锐关联客户、集团关联客户和一次性客户共五类;供应商包括一般供应商、华锐关联供应商、华锐内部供应商、集团公司内部供应商、其他供应商、采购人员共六类。第十二条 每一个会计人员都有显示客户和供应商主数据的权限,并根据实际工作需要及时判断需要增加客户及供应商、或对已有客户及供应商进行修改、冻结、做待删除标记,将书面申请提交本单位财务主管,由财务主管审核签字后报计财部,由计财部统一进行维护并反馈给相关单位。(相关的表格,以及反馈时间,说的比较模糊,可操作性不强)

第十三条 各单位应加强客户及供应商信息管理,及时传递客户及供应商信息,会计人员要随时整理客户及供应商主数据,在接到合同等相关信息后两天内向计财部提出维护申请,不得在输入会计凭证当时提出维护申请。

第十四条 成本会计主数据包括成本要素、成本中心、利润中心、统计指标、内部订单、成本控制订单、订单组、循环。

第十五条 成本要素、成本中心、利润中心、统计指标由计财部统一维护。每一个会计人员都有显示这些成本会计主数据的权限。各单位成本会计人员根据实际工作需要判断需要增加成本会计主数据或对已有的成本会计主数据进行修改或删除,将书面申请提交本单位财务主管,由财务主管审核签字后报计财部,由计财部统一进行维护并反馈给相关单位。

第十六条 内部订单、成本控制订单、订单组、循环成本会计主数据由各单位成本会计人员根据实际情况结合本单位业务维护,编号规则必须按照信息部统一规则,主数据建好后,各主数据创建单位应将主数据情况、用途反馈给计财部备案;

第十七条 成本费用分摊,各单位必须按现行业务流程对生产订单进行分摊成本及费用,并保证同步运行期间分摊结果与浪潮软件数据一致,创建的循环规则应提交计财部。循环规则一经建立不得擅自改变,如发生特殊业务必须修改循环,各单位应上报书面申请,报计财部审批后方可改变循环。

第四章 期末结账

第十六条

各单位结账前必须保证所有会计凭证均录入系统,并过账。检查相应的初级成本要素、次级成本要素、成本中心、利润中心、内部订单(合同)、CO生产订单(工号)等主数据,必须维护并检查相应的配置,如财务报表版本、成本要素组、成本中心组、利润中心组、CO生产订单组、成本费用分摊及循环规则以及相关的系统后台配置,其中月末结转在制品凭证必须由系统自动生成,不得手工制单。

第六章

附则

第十七条

SAP软件的具体操作按《SAP软件操作手册》的规定进行。第十八条

本规定自2004年5月1日起试行。附件:《SAP操作软件手册》

相关名词解释

一、成本会计人员是指业务涉及成本对象(如:成本中心、利润中心、内部订单、生产控制订单)的会计人员。

二 成本要素分为初级成本要素和次级成本要素两大类。初级成本要素源于会计科目表,每一个初级成本要素对应一个总账损益类账户,核算直接成本费用,所有损益类账户的财务数据都要通过初级成本要素对应到成本中心;次级成本要素是会计科目表中所没有的,只会在成本会计中使用,一般用于费用分摊和作业的结转,次级成本要素只在成本会计内部起作用而不影响财务会计过账。

三 成本中心是企业内的最小职责单位,是每一笔费用的具体接收者。创建成本中心主数据时必须将每个成本中心分配给标准层次结构的某个节点,标准层次结构反映了成本中心与成本中心、成本中心与成本中心组、成本中心组与成本中心组之间的关系。标准层次结构中的每个节点代表一个成本中心组,当然除了标准层次结构中的成本中心组之外,还可根据业务需求在标准层次之外自己定义需要的成本中心组。

四 内部订单用于计划、收集、监视和结算在各单位内部进行的特定操作或任务。内部订单可用于不同的目的,分为两类:实际定单和统计性定单,实际定单用于成本计算;统计性定单, 用于内部归集管理某项目的成本,属于统计性核算,月末无须结转成本。

五 统计指标,是用来定义一些适用于成本中心、利润中心、内部定单或过程的计量值。

六 循环是费用从发送方(辅助成本中心)分配到接收方(成本中心或订单)的分配规则,即按什么标准分配费用,如按机器工时、实动工还是或产品重量来分配费用。

七 费用分摊是成本费用从辅助成本中心分配到对该成本费用实际负责的成本中心的过程。

下载SAP对EXCEL的操作word格式文档
下载SAP对EXCEL的操作.doc
将本文档下载到自己电脑,方便修改和收藏,请勿使用迅雷等下载。
点此处下载文档

文档为doc格式


声明:本文内容由互联网用户自发贡献自行上传,本网站不拥有所有权,未作人工编辑处理,也不承担相关法律责任。如果您发现有涉嫌版权的内容,欢迎发送邮件至:645879355@qq.com 进行举报,并提供相关证据,工作人员会在5个工作日内联系你,一经查实,本站将立刻删除涉嫌侵权内容。

相关范文推荐

    SAP是什么意思

    大家好,我是赛跑网第七期的星星,跟大家分享下我在赛跑网的学习经历。 本人11年毕业,之前在一家软件公司从事软件测试工作。工作比较清闲的,但没什么好的发展前途,曾一度对未来感......

    SAP总结

    一、SAP ERP是什么?发展史?优势? ERP:是企业资源计划 它是成立于1972年总部位于德国沃尔多夫市的全球最大的企业管理和协同化电子商务解决方案供应商、全球第三大独立软件供应商......

    sap 心得

    写这篇新得主要表达下这个月SAP学习的感受和见解。 SAP是近几年来ERP软件的倡导者。随着全球市场的发展和完善,各公司必须运用动态战略对瞬息万变的挑战作出反应。迅速适应客......

    SAP公司简介

    SAP公司简介SAP公司成立于1972年,总部位于德国沃尔多夫市,是全球最大的企业管理和协同化商务解决方案供应商。目前,在全球有 120多个国家的超过172,000家用户正在运行SAP软件。......

    SAP一句话入门

    SAP一句话入门:SD PP MM FICO HR SAP一句话入门:Sales and Distribution SD是Sales and Distribution的简称。在SAP系统中,销售与分销模块处在供应链下游,关注从客户订单到向客......

    SAP听课心得体会

    SAP听课心得体会 SAP Overview Training——SAP及现代企业管理方案 SAP是实现ERP概念的软件工具,System,Application and Product,在全球很多地区,在500强大部分企业都在使用......

    SAP开题报告

    毕业设计(论文)开题报告学生姓名: 韩波 学 号: p2203080416 所在学院: 南京工业大学 专 业: 工业工程设计(论文)题目:sap项目实施设计 指导教师: 谢庆红 2012 年 03 月 21 日开题......

    sap实施过程

    sap 项目实施过程了解 三、项目实施过程说明 SAP为独立实施的项目提供了面向过程的、清晰的、准确的实施路标。这个路标起到了项目向导的作用,用来确定步骤,明确转折点,并且通......