使用hr信息类型操作更新信息类型it0021

2020-08-15 22:47发布

         点击此处--->   EasySAP.com群内免费提供SAP练习系统(在群公告中)

加入QQ群:457200227(SAP S4 HANA技术交流) 群内免费提供SAP练习系统(在群公告中)


大家好。

我想使用带有文本文件的标准功能模块HR_INFOTYPE_OPERATION更新IT0021。

任何帮助将不胜感激。

谢谢。

         点击此处--->   EasySAP.com群内免费提供SAP练习系统(在群公告中)

加入QQ群:457200227(SAP S4 HANA技术交流) 群内免费提供SAP练习系统(在群公告中)


大家好。

我想使用带有文本文件的标准功能模块HR_INFOTYPE_OPERATION更新IT0021。

任何帮助将不胜感激。

谢谢。

付费偷看设置
发送
3条回答
歪着头看世界
1楼-- · 2020-08-15 23:25

您好 Nawshath Ahmath

您是指信息类型文本吗?

如果是这样,我建议使用CL_HRPA_TEXT_CLUSTER类。
但是 您仍然需要在"自定义"中为信息类型进行设置

也许会帮助您解决问题。

请注意
安迪

lukcy2020
2楼-- · 2020-08-15 23:29

您的问题是什么?

南山jay
3楼-- · 2020-08-15 23:13

HR_infotype_operation无法正常工作。 我添加下面的代码。 但是仍然无法更新

请提供帮助。

报告ZBDC_SCN1。
信息类型:0021,0412。
*-类型声明
类型:TY_pa0021的开始,
PERNR类型PERNR-PERNR,"人员编号
SUBTY类型 SUBTY,"子类型
ENAME TYPE ENAME,"员工名称
DESGN TYPE DESGN","名称 STRAS TYPE STRAS","街道和门牌号码
LOCAT TYPE LOCAT","第二条地址线
ORT01 TYPE ORT01," TY_pa0021的城市
结尾,

数据:TY_pa0021的T_FILE类型标准表,
WA_FILE TY_pa0021。TYPE_TABLE数据:fs_return TYPE bapireturn1,"用于保存消息的结构
G_FILE TYPE IBIPPARMS-PATH。选择画面以块标题TEXT-003在块B3处开始。
parameters:P_FILE1类型STRING修改ID M2。 ""类似于rlgrap文件名的修改ID M2。
B3的选择屏幕结束。

在P_File1的值请求上处于选择屏幕。

调用函数'F4_FILENAME'< br>导出
PROGRAM_NAME = SYST-CPROG
DYNPRO_NUMBER = SYST-DYNNR
FIELD_NAME ='P_File1'
IMPORTING
FILE_NAME = G_File。
P_File1 = G_File。


开始选择。

* ---从桌面获取文本文件

调用功能'GUI_UPLOAD'
导出
FILENAME = P_File1
FILETYPE ='ASC'
HAS_FIELD_SEPARATOR ='X'
* HEADER_LENGTH = 0
* READ_BY_LINE ='X'
* DAT_MODE =''
*代码页=''
* IGNORE_CERR = ABAP_TRUE
*替换='#'
* CHECK_BOM =''
* VIRUS_SCAN_PROFILE =
* NO_AUTH_CHECK =''
* ISDOWNLOAD =''
*导入
*文件长度 =
*标题=

DATA_TAB = T_FILE
*更改
* ISSCANPERFORMED =''
例外情况
FILE_OPEN_ERROR = 1
FILE_READ_ERROR = 2
NO_BATCH = 3
GUI_REFUSE_FILETRANSFER = 4
INVALI D_TYPE = 5
NO_AUTHORITY = 6
UNKNOWN_ERROR = 7
BAD_DATA_FORMAT = 8
HEADER_NOT_ALLOWED = 9
SEPARATOR_NOT_ALLOWED = 10
HEADER_TOO_LONG = 11
UNKNOWN_DP_D = = 13
DP_OUT_OF_MEMORY = 14
DISK_FULL = 15
DP_TIMEOUT = 16
其他= 17

如果SY-SUBRC <> 0.
消息ID SY-MSGID类型SY -MSGTY编号SY-MSGNO
与SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4。
ENDIF。

在T_FILe处循环进入WA_FILE。 >导出
编号= P0021-PERNR
导入
返回= FS_RETURN

如果FS_RETURN-id网元空间。
写:/'入队失败'。
退出。
ENDIF。
* ----------------------------------------- ------------------------------------- *
" CALL HR_INFOTYPE_OPERATION FM
*- -------------------------------------------------- --------------------------- *

通话功能'HR_INFOTYPE_OPERATION'
导出
INFTY ='0021 '
编号= P0021-PERNR
子类型= P0021-S UBTY
*对象ID =
* LOCKINDICATOR =
* VALENDITYEND =
* VALIDITYBEGIN =
* RECORDNUMBER =
RECORD = P0021
OPERATION ='MOD'
* TCLAS ='A'
DIALOG_MODE ='1'
* NOCOMMIT =
* VIEW_IDENTIFIER =
* SECONDARY_RECORD = RETURN = FS_RETURN。
" KEY = KEY1。< br>
如果FS_RETURN-id等于SPACE。
将WA_FILE附加到T_FILE。
ENDIF。
呼叫功能'BAPI_EMPLOYEE_DEQUEUE'
导出
号码= P0021-PERNR
导入< br> RETURN = FS_RETURN。

ENDLOOP。

一周热门 更多>