TR-FS00会计科目创建GL_ACCT_MASTER_SAVE
https://blog.csdn.net/z_x_xing_/article/details/90514715
GL_ACCT_MASTER_SAVE 创建总账科目
前台事务代码:FS00
函数功能描述
创建、修改、删除总账科目,且可测试运行
DATA: LS_ACCOUNT_COA TYPE GLACCOUNT_COA,
LS_ACCOUNT_COA_KEYY TYPE GLACCOUNT_COA_KEY,
LS_ACCOUNT_COA_DATA TYPE GLACCOUNT_COA_DATA,
LS_ACCOUNT_COA_INFO TYPE GLACCOUNT_COA_INFO,
LT_ACCOUNT_NAMES TYPE GLACCOUNT_NAME_TABLE,
LS_ACCOUNT_NAMES TYPE GLACCOUNT_NAME,
LS_ACCOUNT_NAMES_KEYY TYPE GLACCOUNT_NAME_KEY,
LS_ACCOUNT_NAMES_DATA TYPE GLACCOUNT_NAME_DATA,
LT_ACCOUNT_CCODES TYPE GLACCOUNT_CCODE_TABLE,
LS_ACCOUNT_CCODES TYPE GLACCOUNT_CCODE,
LS_ACCOUNT_CCODES_KEYY TYPE GLACCOUNT_CCODE_KEY,
LS_ACCOUNT_CCODES_DATA TYPE GLACCOUNT_CCODE_DATA,
LS_ACCOUNT_CCODES_INFO TYPE GLACCOUNT_CCODE_INFO,
LT_RETURN TYPE TABLE OF BAPIRET2 WITH HEADER LINE.
*--------------------------------------------------------------------*
LS_ACCOUNT_COA_KEYY-KTOPL = P_KTOPL."帐目表
LS_ACCOUNT_COA_KEYY-SAKNR = P_SAKNR."总账科目
LS_ACCOUNT_COA_DATA-KTOKS = P_KTOKS."总帐科目组
LS_ACCOUNT_COA_DATA-GVTYP = 'X'. "损益报表科目类型
LS_ACCOUNT_COA_INFO-ERDAT = SY-DATUM."记录创建日期
LS_ACCOUNT_COA_INFO-ERNAM = SY-UNAME."创建对象的人员名称
LS_ACCOUNT_COA_INFO-SAKAN = P_SAKNR. "总账科目
LS_ACCOUNT_COA-ACTION = 'I'."数据记录活动:I/插入;U/修改;D/删除
LS_ACCOUNT_COA-KEYY = LS_ACCOUNT_COA_KEYY.
LS_ACCOUNT_COA-DATA = LS_ACCOUNT_COA_DATA.
LS_ACCOUNT_COA-INFO = LS_ACCOUNT_COA_INFO.
*--------------------------------------------------------------------*
LS_ACCOUNT_NAMES_KEYY-KTOPL = P_KTOPL. "帐目表
LS_ACCOUNT_NAMES_KEYY-SAKNR = P_SAKNR. "总账科目
LS_ACCOUNT_NAMES_KEYY-SPRAS = SY-LANGU. "语言代码
LS_ACCOUNT_NAMES_DATA-TXT20 = P_SAKNR && '测试'. "总帐科目名称
LS_ACCOUNT_NAMES_DATA-TXT50 = P_SAKNR && '测试长文本'."总账科目长文本
LS_ACCOUNT_NAMES-ACTION = 'I'. "数据记录活动:I/插入;U/修改;D/删除
LS_ACCOUNT_NAMES-KEYY = LS_ACCOUNT_NAMES_KEYY.
LS_ACCOUNT_NAMES-DATA = LS_ACCOUNT_NAMES_DATA.
APPEND LS_ACCOUNT_NAMES TO LT_ACCOUNT_NAMES.
*--------------------------------------------------------------------*
LS_ACCOUNT_CCODES_KEYY-BUKRS = '1000'. "公司代码
LS_ACCOUNT_CCODES_KEYY-SAKNR = P_SAKNR."总账科目
LS_ACCOUNT_CCODES_DATA-WAERS = 'CNY'. "货币
LS_ACCOUNT_CCODES_DATA-FSTAG = '1000'."字段状态组
LS_ACCOUNT_CCODES_INFO-ERDAT = SY-DATUM."记录创建日期
LS_ACCOUNT_CCODES_INFO-ERNAM = SY-UNAME."创建对象的人员名称
LS_ACCOUNT_CCODES-ACTION = 'I'. "数据记录活动:I/插入;U/修改;D/删除
LS_ACCOUNT_CCODES-KEYY = LS_ACCOUNT_CCODES_KEYY.
LS_ACCOUNT_CCODES-DATA = LS_ACCOUNT_CCODES_DATA.
LS_ACCOUNT_CCODES-INFO = LS_ACCOUNT_CCODES_INFO.
APPEND LS_ACCOUNT_CCODES TO LT_ACCOUNT_CCODES.
CALL FUNCTION 'GL_ACCT_MASTER_SAVE'
EXPORTING
TESTMODE = ''
NO_SAVE_AT_WARNING = 'X'
* NO_AUTHORITY_CHECK =
* STORE_DATA_ONLY =
TABLES
ACCOUNT_NAMES = LT_ACCOUNT_NAMES
* ACCOUNT_KEYWORDS =
ACCOUNT_CCODES = LT_ACCOUNT_CCODES
RETURN = LT_RETURN
CHANGING
ACCOUNT_COA = LS_ACCOUNT_COA.
READ TABLE LT_RETURN WITH KEY TYPE = 'E'.
IF SY-SUBRC = 0.
MESSAGE E000(ZFI) WITH LT_RETURN-MESSAGE.
ELSE.
CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
EXPORTING
WAIT = 'X'.
ENDIF.
原文:https://blog.csdn.net/z_x_xing_/article/details/90514715
TR-FS00会计科目创建GL_ACCT_MASTER_SAVE的更多相关文章
- QT 初阶 第二章 创建对话框(查找对话框实例)
最终效果图: 该对话框由三个文件组成:finddialog.h .finddialog.cpp. main.cpp 代码+注释 /*--finddialog.h--*/ #ifndef FINDDIA ...
- 示例-创建表格&使用表格对象
@charset "utf-8";/* CSS Document */table{ border:#249bdb 1px solid; width:500px; border-co ...
- JS,Jquery,ExtJs不同脚本动态创建DOM对象
好久不来写东西了,这段时间太慢了,闲了下来看了几篇文章,觉得很好,同时也许咱们大家都能遇到,所以就把它记录下来... 简单使用JavaScript.JQuery.ExtJs进行DOM对象创建的测试,主 ...
- js在table指定tr行上或底下添加tr行
js在table指定tr行上或下面添加tr行 function onAddTR(trIndex) { var tb = document.getElementB ...
- Thead基础及两种创建方式
今天本人给大家讲解一下多线程,如有不对的或者讲的不好的可以多多提出,我会进行相应的更改,先提前感谢提出意见的各位了!!! 说说多线程本人自己对它理解的定义:因计算机的CPU支持能够在同一时间执行多于一 ...
- MVC使用ajax异步刷新时怎样输出从后台中传过来的JSON数据
前言 这几天在学习MVC使用AJAX异步刷,因为是新手.所以在js中传参数到后台以及后台返回数据到前台怎么接受,怎么前台遍历出JSON数据都开始不知道,相信新手在使用时跟我一样会遇到,这里我就和大家分 ...
- MVC学习系列8--分页和排序
分页和排序,应该是软件开发中,需要必知必会的技能了,对于分页,网上很多教程,当然,别人终究是别人的,只有自己理解,会了,并且吸收之后,再用自己的语言,传授出来,这才是硬道理.好了,废话说多了.现在我们 ...
- php : DOM 操作 XML
DOM 操作 XML 基本用法 XML文件: person.XML <?xml version="1.0" encoding="utf-8" ?> ...
- jquery 源码解析 节点遍历
jquery遍历,用于根据其相对于其他元素的关系来查找或选取html元素,以某项选择开始,并沿着这个选择移动,知道移动被称为对dom进行遍历 ☑ <div> 元素是 <ul> ...
随机推荐
- 对有序特征进行离散化(继承Spark的机器学习Estimator类)
采用信息增益或基尼指数寻找最优离散化点 package org.apache.spark.ml.feature import org.apache.spark.sql.SparkSession imp ...
- Influxdb修改数据保留策略
retention policy: 存储策略,用于设置数据保留的时间,每个数据库刚开始会自动创建一个默认的存储策略 autogen,数据保留时间为永久,之后用户可以自己设置,例如保留最近2小时的数据. ...
- ES6深入浅出-12 ES6新增的API(下)-1.录屏
String.includes es5里面判断字符串是否存在的方法 search searcg的厉害之处是可以使用正则 match正则的方式 repeat -1遍,就不合法 startsWith 判断 ...
- 软件定义网络基础---SDN的主流构架
一:基于不同标准的主流构架 二: ONF定义的SDN基本构架 (一) 四个平面.两大接口 三:四个平面 (一)数据平面 数据平面是由若干网元(Netword Element)构成,每个网元包括一个或多 ...
- AnyCAD三维控件(转)
在WinForm中可以方便的集成AnyCAD.Net三维控件,只需要以下几部即可完成. 一.添加DLL程序集 AnyCAD.Foundation.Net.dll AnyCAD.Presentation ...
- .Net MVC 下载网站的文件
目录 前言 C#文件的下载 ajax 返回文件路径,使用window.open打开 前言 上传文件我使用的是Bootstrap的插件FileInput,这个抽时间看看写个博客 现在下载我遇到坑了,而这 ...
- LODOP带空格和不带空格的字体对齐
有时候需要用到字体上下对齐,有些需要的文字较多,较少的文字需要加部分空格才能向上面的文字对齐.本文实际测试了一下字体对齐需要的空格.代码是在editplus里写的,该编辑软件里的字体首选项设置的是Co ...
- 内存运行PE文件
内存中运行文件 拿exe并在HxD或010中打开 - cntrl+a copy as C 粘贴到encrypt.cpp 编译并运行encrypt.cpp - 创建shellcode.txt 从shel ...
- Charles 抓包配置
本文参考:charles 抓包配置 proxy setting (代理设置) 设置的主界面如下: 动态端口 启用动态端口选项来监听动态端口,每次查询启动时选择.这样可以避免与计算机上可能运行的其他网络 ...
- 【HTML5校企公益课】第二天
1.上午讲昨天的作业. <!DOCTYPE html> <html> <head> <meta charset="UTF-8"> & ...