HR*创建人员要素链接

HRMS（Human Resource Management System）

--人员

  per_people_f

--人员分配

  per_all_assignments_f

--要素

 1 DECLARE
 2   l_element_name                VARCHAR2(240);
 3   l_element_id                  NUMBER;
 4   l_period_name                 VARCHAR2(240);
 5   l_period_date                 DATE;
 6   x_element_type_id             NUMBER;
 7   x_effective_start_date        DATE;
 8   x_effective_end_date          DATE;
 9   x_object_version_number       NUMBER;
10   x_comment_id                  NUMBER;
11   x_processing_priority_warning BOOLEAN;
12 BEGIN
13   fnd_global.apps_initialize(user_id      => 1510,
14                              resp_id      => 23991,
15                              resp_appl_id => 800);
16 
17   l_element_name := 'BS交通补贴12';
18   l_period_name  := '9 2016 日历月份';
19 
20   BEGIN
21     SELECT ptp.end_date
22       INTO l_period_date
23       FROM per_time_periods ptp
24      WHERE ptp.period_name = l_period_name;
25   EXCEPTION
26     WHEN OTHERS THEN
27       l_period_date := NULL;
28   END;
29 
30   BEGIN
31     SELECT petf.element_type_id
32       INTO l_element_id
33       FROM pay_element_types_f petf
34      WHERE petf.element_name = l_element_name
35        AND l_period_date BETWEEN effective_start_date AND effective_end_date;
36   EXCEPTION
37     WHEN OTHERS THEN
38       l_element_id := NULL;
39   END;
40 
41   dbms_output.put_line('l_period_date:=' || l_period_date);
42   dbms_output.put_line('l_element_id:=' || l_element_id);
43 
44   IF (l_element_id IS NULL) THEN
45     dbms_output.put_line('Create');
46   
47     pay_element_types_api.create_element_type(p_validate                     => FALSE,
48                                               p_effective_date               => l_period_date,
49                                               p_classification_id            => 118,
50                                               p_element_name                 => l_element_name,
51                                               p_input_currency_code          => 'CNY',
52                                               p_output_currency_code         => 'CNY',
53                                               p_multiple_entries_allowed_fla => 'Y',
54                                               p_processing_type              => 'N',
55                                               p_business_group_id            => 81,
56                                               p_element_type_id              => x_element_type_id,
57                                               p_effective_start_date         => x_effective_start_date,
58                                               p_effective_end_date           => x_effective_end_date,
59                                               p_object_version_number        => x_object_version_number,
60                                               p_comment_id                   => x_comment_id,
61                                               p_processing_priority_warning  => x_processing_priority_warning);
62     -- ELSE
63     --   pay_element_types_api.update_element_type();
64   END IF;
65 
66   IF x_processing_priority_warning THEN
67     dbms_output.put_line('x_processing_priority_warning');
68   END IF;
69 
70   dbms_output.put_line('x_element_type_id:=' || x_element_type_id);
71   dbms_output.put_line('x_effective_start_date:=' || x_effective_start_date);
72   dbms_output.put_line('x_effective_end_date:=' || x_effective_end_date);
73   dbms_output.put_line('x_element_type_id:=' || x_object_version_number);
74   dbms_output.put_line('x_comment_id:=' || x_comment_id);
75 EXCEPTION
76   WHEN OTHERS THEN
77     dbms_output.put_line('导入要素异常！');
78 END;

创建要素