人力资源知识_hr上传个人照片到信息类型_第1页
人力资源知识_hr上传个人照片到信息类型_第2页
人力资源知识_hr上传个人照片到信息类型_第3页
人力资源知识_hr上传个人照片到信息类型_第4页
人力资源知识_hr上传个人照片到信息类型_第5页
已阅读5页,还剩3页未读 继续免费阅读

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

HR上传个人照片到信息类型T-CODE SPRO选择EDIT DOCUMENT TYPES复制或者新建一个文档类别为JPG的复制或者创建PREL是T-CODE OAAD查看如果要在前台右边直接显示照片 则要用特定的文档对象(下图)下面这个程序 适合前台和后台操作REPORT ZYAOWEI_007.*PARAMETERS: P_UNXDIR LIKE RLGRAP-FILENAME DEFAULT /kaoqin/INPUT/.jpg.PARAMETERS: P_UNXDIR LIKE RLGRAP-FILENAME DEFAULT /usr/sap/HRD/DVEBMGS00/data/.JPG.DATA : BEGIN OF INFILE_DATA OCCURS 0, IN_LINE(80) type c,END OF INFILE_DATA.DATA : begin of inrec,raw(1024) type x,end of inrec.DATA : begin of itab occurs 0,raw(1024) type x,end of itab.Data: WS_FILENAME TYPE STRING,WS_OBJID LIKE SAPB-SAPOBJID,WS_FILELENGTH TYPE I,WS_FLENGTH LIKE SAPB-LENGTH.*START-OF-SELECTION.open dataset P_UNXDIR for input in binary mode.do.* Read file one record at a time in binary mode.clear inrec.read dataset P_UNXDIR into inrec maximum length 1024 actual length ws_filelength.* Determine accumulated file length as each record read in.ws_flength = ws_flength + ws_filelength.* Last record of file will cause sy-subrc to not be 0 and will be* less in length than record size.if ws_flength 0.move inrec to itab.append itab.endif.* end loop at end of file.if sy-subrc ne 0.exit. end of file must have been reachedendif.enddo.close dataset WS_FILENAME.* Add picture file to content server for specific associate.CALL FUNCTION ARCHIV_CREATE_TABLEEXPORTING ar_object = HRICOLFOTOobject_id = 2sap_object = PRELflength = WS_FLENGTHTABLES binarchivobject = ITAB.IF SY-SUBRC = 0.WRITE : / WS_OBJID+0(8), - picture loaded: , WS_FILENAME, - length: , WS_FLENGTH.else. WRITE : / WS_OBJID+0(8), - Unable to load pic: , WS_FILENAME, - length: , WS_FLENGTH.ENDIF.clear INFILE_DATA-IN_LINE.下面这个程序 只适合前台SELECTION-SCREEN BEGIN OF BLOCK radio1 WITH FRAME TITLE text-001.PARAMETERS:P_FILE TYPE LOCALFILE.SELECTION-SCREEN END OF BLOCK radio1.END-OF-SELECTION.DATA: archiv_id LIKE toav0-archiv_id, arc_doc_id LIKE toav0-arc_doc_id, ftype LIKE TOADV-DOC_TYPE.DATA:RETURN TYPE TOADT OCCURS 0 WITH HEADER LINE.CALL FUNCTION ARCHIV_CREATE_DIALOG_META EXPORTING* ARCHIV_ID = ar_object = HRICOLFOTO* DEL_DATE = * NOTE = object_id = 2 sap_object = PREL* FILE = XueqiangSharedDocs36.JPGFILE = 192.168.118.159tichenginput.JPG* COMMIT_FLAG = IMPORTING ARCHIV = archiv_id ARCHIV_DOC_ID = arc_doc_id DOCUMENTCLASS = ftype TABLES OUTDOCTAB = RETURN* CHANGING* INFILETAB = EXCEPTIONS ERROR_ARCHIV = 1 ERROR_COMMUNICATIONTABLE = 2 ERROR_CONNECTIONTABLE = 3 ERROR_KERNEL = 4 ERROR_PARAMETER = 5 ERROR_SCANQUEUE = 6 CANCELED_BY_USER = 7 OTHERS = 8 .IF sy-subrc 0. MESSAGE FAILED TYPE I.* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO* WITH SY-MSG

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论