创建HR的employee资料的API

来源：互联网发布：淘宝店铺介绍是什么编辑：程序博客网时间：2024/06/08 00:21

/* Formatted on 2014-9-22 10:46:16 (QP5 v5.115.810.9015) */
DECLARE
   L_E_EMPLOYEE_NUMBER VARCHAR2(20) :='2164007';    --编号最好是员工入职时的编号
   L_E_LAST_NAME VARCHAR2(20) := '王TEST100';                          --姓名
   L_E_FIRST_NAME VARCHAR2(20) := '';                                     --姓
   L_E_MIDDLE_NAMES VARCHAR2(20) := '';                               --中间名
   L_E_SEX        VARCHAR2(1) := 'M';                                   --性别
   L_PERSON_TYPE_ID NUMBER := 6;                                    --人员类型
   L_E_PERSON_ID NUMBER;
   L_E_ASSIGNMENT_ID NUMBER;
   L_E_PER_OBJECT_VERSION_NUMBER NUMBER;
   L_E_ASG_OBJECT_VERSION_NUMBER NUMBER;
   L_E_PER_EFFECTIVE_START_DATE DATE;
   L_E_PER_EFFECTIVE_END_DATE DATE;
   L_E_FULL_NAME VARCHAR2(200);
   L_E_PER_COMMENT_ID NUMBER;
   L_E_ASSIGNMENT_SEQUENCE NUMBER;
   L_E_ASSIGNMENT_NUMBER VARCHAR2(200);
   L_E_NAME_COMBINATION_WARNING BOOLEAN;
   L_E_ASSIGN_PAYROLL_WARNING BOOLEAN;
   L_E_ORIG_HIRE_WARNING BOOLEAN;
   L_HR_PERSON_ID VARCHAR2(30) := 'H353222';             --hr 系统员工唯一标识身份证号
   L_EMAIL_ADDRESS VARCHAR2(30) := 'JARWANG@SINA.COM';                 --email
   --自定义属性
   L_ATTRIBUTE3   VARCHAR2(60) := '';                               --部门属性
   L_ATTRIBUTE8   VARCHAR2(60) := '';                                 --身份证
BEGIN
   HR_EMPLOYEE_API.CREATE_EMPLOYEE(
      P_VALIDATE => FALSE
     ,--default：false
      P_BUSINESS_GROUP_ID => 0
     ,--0,
      --p_hire_date => sysdate,
      P_HIRE_DATE => TO_DATE('2003-01-01', 'YYYY-MM-DD')
     ,                                                          --最迟起始日期
      P_EMPLOYEE_NUMBER => L_E_EMPLOYEE_NUMBER
     ,                                                                  --编号
      P_EXPENSE_CHECK_SEND_TO_ADDRES => 'O'
     ,                                                          --办公室收件人
      P_LAST_NAME => L_E_LAST_NAME
     ,                                                                  --姓氏
      P_FIRST_NAME => L_E_FIRST_NAME
     ,                                                              --二级机构
      P_MIDDLE_NAMES => L_E_MIDDLE_NAMES
     ,                                                          --同名区别编号
      P_SEX       => L_E_SEX
     ,                                                                  --性别
      P_PERSON_TYPE_ID => 6
     ,                                                              --人员类型
      P_PERSON_ID => L_E_PERSON_ID
     ,P_ASSIGNMENT_ID => L_E_ASSIGNMENT_ID
     ,P_PER_OBJECT_VERSION_NUMBER => L_E_PER_OBJECT_VERSION_NUMBER
     ,P_ASG_OBJECT_VERSION_NUMBER => L_E_ASG_OBJECT_VERSION_NUMBER
     ,P_PER_EFFECTIVE_START_DATE => L_E_PER_EFFECTIVE_START_DATE
     ,P_PER_EFFECTIVE_END_DATE => L_E_PER_EFFECTIVE_END_DATE
     ,P_FULL_NAME => L_E_FULL_NAME
     ,P_PER_COMMENT_ID => L_E_PER_COMMENT_ID
     ,P_ASSIGNMENT_SEQUENCE => L_E_ASSIGNMENT_SEQUENCE
     ,P_ASSIGNMENT_NUMBER => L_E_ASSIGNMENT_NUMBER
     ,P_NAME_COMBINATION_WARNING => L_E_NAME_COMBINATION_WARNING
     ,P_ASSIGN_PAYROLL_WARNING => L_E_ASSIGN_PAYROLL_WARNING
     ,P_ORIG_HIRE_WARNING => L_E_ORIG_HIRE_WARNING
     ,P_NATIONAL_IDENTIFIER => L_HR_PERSON_ID
     ,                                                   --hr 系统员工唯一标识
      P_EMAIL_ADDRESS => L_EMAIL_ADDRESS
     ,                                                                 --email
      --p_date_of_birth => ins.DATE_OF_BIRTH, --出生日期
      P_DATE_OF_BIRTH => ''
     ,                                                              --出生日期
      --p_attribute1 => ins.hr_company_name, --hr 一级机构
      --p_attribute2 => ins.hr_branch_name, --hr 二级机构
      P_ATTRIBUTE3 => L_ATTRIBUTE3
     ,                                                              --部门属性
      P_ATTRIBUTE8 => L_ATTRIBUTE8
   );                                                                 --身份证
   COMMIT;
END;

---检查是否创建成功
select * from PER_PEOPLE_f
where LAST_NAME ='王TEST100'

0 0