SAP开发笔记HR_INFOTYPE_OPERATION

validitybegin-validitybegindate record-infotyperecordvaluestobeupdated,insertedetc(willbestructureofinfortyoeyouareupdating) recordnumber-sequencenunberfrominfotyperecordyouareupdating Operation-describeswhatoperationistobeperformed COP=Copy DEL=Delete DIS=Display EDQ=Lock/unlock INS=Create LIS9=Delimit MOD=Change INSS=CreateforActionsisnotconvertedtoChange nocommit-commityes('X')/no('') dialog_mode-dialogmodeornot,defaultis'0'ExamplecodingforMODoperationCONSTANTS:changeTYPEpspar-actioVALUE'MOD'."ThiscodeisrequredandlockstherecordreadyformodificationCALLFUNCTION'HR_EMPLOYEE_ENQUEUE'EXPORTINGnumber=p_pernr."loopatp0071intop_p0071. "addedtoputcodeincontextvaliditybegin=p_record-begda.validityend =p_record-endda.p_record-endda=pn-begda-1.CALLFUNCTION'HR_INFOTYPE_OPERATION'EXPORTINGinfty    ='0071'subtype   =p_record-subtyobjectid   =P_record-objpsnumber    =p_record-pernr  "employeenumbervalidityend =validityendvaliditybegin=validitybeginrecord    =p_recordrecordnumber =p_record-SEQNRoperation  =changenocommit   =nocommitdialog_mode ='0'IMPORTINGreturn    =return_structkey     =personaldatakeyEXCEPTIONSOTHERS    =0."endloop."unlockrecordaftermodificationCALLFUNCTION'HR_EMPLOYEE_DEQUEUE'EXPORTINGnumber=p_pernr.ExamplecodingforINSoperationCONSTANTS:insertTYPEpspar-actioVALUE'INS'."ThiscodeisrequredandlockstherecordreadyformodificationCALLFUNCTION'HR_EMPLOYEE_ENQUEUE'EXPORTINGnumber=p_pernr.validitybegin=p_record-begda.validityend =p_record-endda.p_record-pernr=p_pernrp_record-begda= pn-begda.p_record-endda= validityend.p_record-subty=p_SUBTY. "subtypeofnewentryp_record-SCREF=p_SUBTY. "subtypeofnewentry"pluspopulateanyotherfieldsyouneedtoupdateCALLFUNCTION'HR_INFOTYPE_OPERATION'EXPORTINGinfty    ='0071'subtype   =p_record-subtynumber    =p_record-pernr  "employeenumbervalidityend =validityendvaliditybegin=validitybeginrecord    =p_recordoperation  =insertnocommit   =nocommitdialog_mode ='0'IMPORTINGreturn    =return_structkey     =personaldatakeyEXCEPTIONSOTHERS    =0."unlockrecordaftermodificationCALLFUNCTION'HR_EMPLOYEE_DEQUEUE'EXPORTINGnumber=p_pernr.INSoperationexamplecodingforinfotype0105AlsoseeBAPI_EMPLCOMM_CREATEforupdatinginfotype0105CALLFUNCTION'HR_EMPLOYEE_ENQUEUE'EXPORTINGnumber=p_pernr.p_record-subty  =p_subtype."subtypeofnewentryp_record-pernr  = p_pernr.p_record-SEQNR  ='000'.validityend   ='99991231'.validitybegin  =sy-datum.p_record-begda  =sy-datum.p_record-endda  ='99991231'.p_record-usrid  ='TESTUSR'.CALLFUNCTION'HR_INFOTYPE_OPERATION'EXPORTINGinfty    ='0105'subtype   =p_record-subtyobjectid   =P_record-objpsnumber    =p_record-pernr  "employeenumbervalidityend =validityendvaliditybegin=validitybeginrecord    =p_recordoperation  ='INS'nocommit   =nocommitdialog_mode ='0'IMPORTINGreturn    =return_structkey     =personaldatakeyEXCEPTIONSOTHERS    =0.ifsy-subrceq0.*   successendif.CALLFUNCTION'HR_EMPLOYEE_DEQUEUE'EXPORTINGnumber=p_pernr.