HR函数学习02——分配组织单位
REPORT ZLYHR01. "创建组织单元 成功
DATA:LS_OBJ TYPE OBJEC,
LV_STU TYPE GDSTR-SVECT,
LV_TIT TYPE CHAR20,
LV_SUBTYP TYPE SUBTYP,
LS_P1000 TYPE P1000,
LT_P1000 TYPE TABLE OF P1000.
DATA:LT_HRI1001 TYPE TABLE OF HRI1001,
LS_HRI1001 TYPE HRI1001. LS_OBJ-OTYPE = 'O'."对象类型
LS_OBJ-PLVAR = ''."计划版本 "创建组织单元
CALL FUNCTION 'RH_OBJECT_CREATE'
EXPORTING
* LANGU = SY-LANGU
PLVAR = LS_OBJ-PLVAR
OTYPE = LS_OBJ-OTYPE
* EXT_NUMBER = '00000000'
SHORT = '测试组织单1元'
STEXT = '测试组织单1元'
* BEGDA = SY-DATUM
* ENDDA = '99991231'
* OSTAT = '1'
* VTASK = 'D'
* GUID =
* KEEP_LUPD = ' '
IMPORTING
OBJID = LS_OBJ-OBJID
EXCEPTIONS
TEXT_REQUIRED =
INVALID_OTYPE =
INVALID_DATE =
ERROR_DURING_INSERT =
ERROR_EXT_NUMBER =
UNDEFINED = .
IF SY-SUBRC = .
CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
EXPORTING
WAIT = 'X'. LS_HRI1001-PLVAR = ''.
LS_HRI1001-OTYPE = 'O'.
LS_HRI1001-OBJID = LS_OBJ-OBJID.
LS_HRI1001-INFTY = 'A002'.
LS_HRI1001-RSIGN = 'A'.
LS_HRI1001-RELAT = ''.
LS_HRI1001-ISTAT = ''.
LS_HRI1001-BEGDA = SY-DATUM.
LS_HRI1001-ENDDA = ''.
LS_HRI1001-SCLAS = 'O'.
LS_HRI1001-SOBID = ''.
CONCATENATE 'O' '' INTO LS_HRI1001-VARYF."上级节点
APPEND LS_HRI1001 TO LT_HRI1001.
"创建组织单元与上级组织单元的关系
CALL FUNCTION 'RH_RELATION_WRITE'
* EXPORTING
* VTASK = 'D'
* KEEP_LUPD = ' '
TABLES
RELATION = LT_HRI1001
* ERR_RELATION =
EXCEPTIONS
NO_AUTHORITY =
RELATION_NOT_ALLOWED =
OBJECT_NOT_FOUND =
WRONG_DATE_FORMAT =
TIME_NOT_VALID =
ERROR_DURING_INSERT =
UNDEFINED = .
IF SY-SUBRC = .
CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
EXPORTING
WAIT = 'X'.
WRITE LS_OBJ-OBJID.
ELSE.
CALL FUNCTION 'BAPI_TRANSACTION_ROLLBACK'.
WRITE: 'FAILD RELA' , LS_OBJ-OBJID.
ENDIF. ELSE.
CALL FUNCTION 'BAPI_TRANSACTION_ROLLBACK'.
ENDIF.
HR函数学习02——分配组织单位的更多相关文章
- HR函数学习01——创建组织单位
创建组织单位: RH_OBJECT_CREATE REPORT ZLYHR01. DATA:LS_OBJ TYPE OBJEC, LV_STU TYPE GDSTR-SVECT, LV_TIT TYP ...
- HR函数学习03——维护信息类型1008
REPORT ZLYHR01. DATA:TP1008 TYPE TABLE OF P1008, SP1008 TYPE P1008. SP1008-PLVAR = '. SP1008-OTYPE = ...
- SAP CRM 为用户创建业务合作伙伴并分配到组织单位
想要在SAP CRM的前台完成一些操作,需要登录的用户在系统中存在对应的业务合作伙伴才可以,某些情况下,还需要被分配到正确的公司.部门.职位.下面是相关的操作步骤. 本文假定读者已经拥有一个开发帐号. ...
- JVM学习02:GC垃圾回收和内存分配
JVM学习02:GC垃圾回收和内存分配 写在前面:本系列分享主要参考资料是 周志明老师的<深入理解Java虚拟机>第二版. GC垃圾回收和内存分配知识要点Xmind梳理 案例分析1-(G ...
- Python学习02 列表 List
Python学习02 列表 List Python列表 List Python中的列表(List)用逗号分隔,方括号包围(comma-separated values (items) between ...
- 番外篇--Moddule Zero 版本管理与组织单位管理
Moddule Zero 版本管理 2.2.1 简介 大多数SaaS(多租户)应用都会有多个版本(包),这些版本的功能点也会各不相同.因此,他们能够为他们的租户(客户)提供不同的价格和功能点选项. 关 ...
- Linux内核的ioctl函数学习
Linux内核的ioctl函数学习 来源:Linux公社 作者:Linux 我这里说的ioctl函数是在驱动程序里的,因为我不知道还有没有别的场合用到了ioctl, 所以就规定了我们讨论的范围.为什 ...
- Python3中的字符串函数学习总结
这篇文章主要介绍了Python3中的字符串函数学习总结,本文讲解了格式化类方法.查找 & 替换类方法.拆分 & 组合类方法等内容,需要的朋友可以参考下. Sequence Types ...
- Drools 函数学习
Drools 函数学习 函数是定义在规则文件当中一代码块,作用是将在规则文件当中若干个规则都会用到的业务操作封装起来,实现业务代码的复用,减少规则编写的工作量.函数的编写位置可以是规则文件当中 pac ...
随机推荐
- Java jdbc 连接oracle
import java.sql.Connection; import java.sql.Driver; import java.sql.DriverManager; import java.sql.S ...
- AngularJS Best Practices: pretty urls
By default, AngularJS will route URLs with a hashtag. For example: http://example.com/ http://exampl ...
- PSVR开发者需要了解的9件事
1 首先需要了解下PSVR的具体硬件参数:整个产品都包括哪些: 2 如何创造更好的 VR 内容 三种准备:设计.内容.技术 针对PSVR设计:体验范围.跟踪限制.社交屏幕 VR应用和内容:模拟.沟通. ...
- winform 窗体移动API、窗体阴影API
//窗体移动API [DllImport("user32.dll")] public static extern bool ReleaseCapture(); [DllImport ...
- poj 1888 Crossword Answers 模拟题
Crossword Answers Time Limit: 1000MS Memory Limit: 30000K Total Submissions: 869 Accepted: 405 D ...
- 夺命雷公狗-----React---9--map数据的遍历
比如我们要实现的是这种效果: 用这种方法来写,她只能写死在哪,没啥意思,所以我们定义一个数据,然后来测试下map方法对她遍历出来的数据 <!DOCTYPE html> <html l ...
- 13. 星际争霸之php设计模式--正面模式
题记==============================================================================本php设计模式专辑来源于博客(jymo ...
- 【过程改进】 windows下jenkins常见问题填坑
没有什么高深的东西,1 2天的时间大多数人都能自己摸索出来,这里将自己遇到过的问题分享出来避免其他同学再一次挖坑. 目录 1. 主从节点 2. Nuget自动包还原 3. powershell部署 4 ...
- SQL Server 利用批量(batchsize)提交加快数据生成/导入
在最小化日志操作解析,应用的文章中有朋友反映生成测试数据较慢.在此跟大家分享一个简单的应用,在生成数据过程中采用批量提交的方式以加快数据导入. 此应用不光生成测试数据上,在BCP导入数据中,复制初始化 ...
- XAF去掉View页面的编辑器
如图,去掉该编辑器功能. 1.detailView protected override void OnActivated() { base.OnActivat ...