DBA Data[Home] [Help]

APPS.PAY_PRT_SHD dependencies on PAY_PRT_SHD

Line 1: Package Body pay_prt_shd as

1: Package Body pay_prt_shd as
2: /* $Header: pyprtrhi.pkb 120.1 2011/03/10 05:48:33 abdash ship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |

Line 8: g_package varchar2(33) := ' pay_prt_shd.'; -- Global package name

4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
6: -- ----------------------------------------------------------------------------
7: --
8: g_package varchar2(33) := ' pay_prt_shd.'; -- Global package name
9: g_dynamic_sql VARCHAR2(2000); -- dynamic SQL text string
10: --
11: -- ----------------------------------------------------------------------------
12: -- |---------------------------< constraint_error >---------------------------|

Line 114: pay_prt_shd.g_old_rec.run_type_id and

110: --
111: l_fct_ret := false;
112: Else
113: If (p_run_type_id =
114: pay_prt_shd.g_old_rec.run_type_id and
115: p_object_version_number =
116: pay_prt_shd.g_old_rec.object_version_number) Then
117: --
118: -- The g_old_rec is current therefore we must

Line 116: pay_prt_shd.g_old_rec.object_version_number) Then

112: Else
113: If (p_run_type_id =
114: pay_prt_shd.g_old_rec.run_type_id and
115: p_object_version_number =
116: pay_prt_shd.g_old_rec.object_version_number) Then
117: --
118: -- The g_old_rec is current therefore we must
119: -- set the returning function to true
120: --

Line 127: Fetch C_Sel1 Into pay_prt_shd.g_old_rec;

123: --
124: -- Select the current row
125: --
126: Open C_Sel1;
127: Fetch C_Sel1 Into pay_prt_shd.g_old_rec;
128: If C_Sel1%notfound Then
129: Close C_Sel1;
130: --
131: -- The primary key is invalid therefore we must error

Line 138: <> pay_prt_shd.g_old_rec.object_version_number) Then

134: fnd_message.raise_error;
135: End If;
136: Close C_Sel1;
137: If (p_object_version_number
138: <> pay_prt_shd.g_old_rec.object_version_number) Then
139: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
140: fnd_message.raise_error;
141: End If;
142: l_fct_ret := true;

Line 214: pay_prt_shd.g_dynamic_sql :=

210: BEGIN
211: hr_utility.set_location('Entering:'||l_proc, 5);
212: effective_date_valid(p_effective_date => p_effective_date);
213: -- Define dynamic sql text with substitution tokens
214: pay_prt_shd.g_dynamic_sql :=
215: 'select t.effective_start_date, ' ||
216: ' t.effective_end_date ' ||
217: 'from '||p_base_table_name||' t ' ||
218: 'where t.'||p_base_key_column||' = :p_base_key_value ' ||

Line 222: EXECUTE IMMEDIATE pay_prt_shd.g_dynamic_sql

218: 'where t.'||p_base_key_column||' = :p_base_key_value ' ||
219: 'and :p_effective_date ' ||
220: 'between t.effective_start_date and t.effective_end_date';
221: -- native dynamic PL/SQL call
222: EXECUTE IMMEDIATE pay_prt_shd.g_dynamic_sql
223: INTO p_effective_start_date
224: ,p_effective_end_date
225: USING p_base_key_value
226: ,p_effective_date;

Line 310: pay_prt_shd.g_dynamic_sql:=

306: p_argument => 'p_base_key_value',
307: p_argument_value => p_base_key_value);
308: -- [ end of change 30.14 ]
309: -- Define dynamic sql text with substitution tokens
310: pay_prt_shd.g_dynamic_sql:=
311: 'select max(t.effective_end_date) '||
312: 'from '||p_base_table_name||' t '||
313: 'where t.'||p_base_key_column||' = :p_base_key_value';
314: --

Line 315: EXECUTE IMMEDIATE pay_prt_shd.g_dynamic_sql

311: 'select max(t.effective_end_date) '||
312: 'from '||p_base_table_name||' t '||
313: 'where t.'||p_base_key_column||' = :p_base_key_value';
314: --
315: EXECUTE IMMEDIATE pay_prt_shd.g_dynamic_sql
316: INTO l_max_date
317: USING p_base_key_value;
318: --
319: hr_utility.set_location('Leaving :'||l_proc, 10);

Line 345: pay_prt_shd.g_dynamic_sql :=

341: --
342: BEGIN
343: hr_utility.set_location('Entering:'||l_proc, 5);
344: -- Define dynamic sql text with substitution tokens
345: pay_prt_shd.g_dynamic_sql :=
346: 'select min(t.effective_start_date) '||
347: 'from '||p_base_table_name||' t '||
348: 'where t.'||p_base_key_column||' = :p_base_key_value';
349: --

Line 350: EXECUTE IMMEDIATE pay_prt_shd.g_dynamic_sql

346: 'select min(t.effective_start_date) '||
347: 'from '||p_base_table_name||' t '||
348: 'where t.'||p_base_key_column||' = :p_base_key_value';
349: --
350: EXECUTE IMMEDIATE pay_prt_shd.g_dynamic_sql
351: INTO l_min_date
352: USING p_base_key_value;
353: -- Need to ensure that the minimum date is NOT null. If it is then we
354: -- must error

Line 778: pay_prt_shd.g_dynamic_sql :=

774: -- If the p_key_value is null then we must not
775: -- process the sql as it could be a nullable column.
776: IF (p_key_value IS NOT NULL) THEN
777: -- Define dynamic sql text with substitution tokens
778: pay_prt_shd.g_dynamic_sql :=
779: 'select 1 ' ||
780: 'from '||p_table_name||' t1 ' ||
781: 'where t1.'||p_key_column||' = :p_key_value ' ||
782: 'and t1.effective_end_date >= :p_effective_date ' ||

Line 786: OPEN l_csr FOR pay_prt_shd.g_dynamic_sql USING p_key_value, p_effective_date

782: 'and t1.effective_end_date >= :p_effective_date ' ||
783: 'order by t1.effective_start_date ' ||
784: 'for update nowait';
785: --
786: OPEN l_csr FOR pay_prt_shd.g_dynamic_sql USING p_key_value, p_effective_date
787: ;
788: LOOP
789: FETCH l_csr INTO l_dummy_num;
790: EXIT WHEN l_csr%NOTFOUND; -- exit loop when last row is fetched

Line 905: pay_prt_shd.g_dynamic_sql :=

901: --
902: IF (p_parent_key_value IS NOT NULL) THEN
903: hr_utility.set_location(l_proc, 10);
904: -- Define dynamic sql text with substitution tokens
905: pay_prt_shd.g_dynamic_sql :=
906: 'select t1.effective_end_date effective_end_date ' ||
907: 'from '||p_child_table_name||' t1 ' ||
908: 'where (t1.'||p_child_key_column||', ' ||
909: ' t1.effective_start_date, ' ||

Line 921: FOR pay_prt_shd.g_dynamic_sql

917: 'order by t1.'||p_child_key_column||' ' ||
918: 'for update nowait';
919: -- open a cursor
920: OPEN l_cursor
921: FOR pay_prt_shd.g_dynamic_sql
922: USING p_parent_key_value;
923: hr_utility.set_location(l_proc, 15);
924: --
925: LOOP

Line 2396: Fetch C_Sel1 Into pay_prt_shd.g_old_rec;

2392: --
2393: -- We must select and lock the current row.
2394: --
2395: Open C_Sel1;
2396: Fetch C_Sel1 Into pay_prt_shd.g_old_rec;
2397: If C_Sel1%notfound then
2398: Close C_Sel1;
2399: --
2400: -- The primary key is invalid therefore we must error

Line 2407: <> pay_prt_shd.g_old_rec.object_version_number) Then

2403: fnd_message.raise_error;
2404: End If;
2405: Close C_Sel1;
2406: If (p_object_version_number
2407: <> pay_prt_shd.g_old_rec.object_version_number) Then
2408: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
2409: fnd_message.raise_error;
2410: End If;
2411: --

Line 2585: end pay_prt_shd;

2581: Return(l_rec);
2582: --
2583: End convert_args;
2584: --
2585: end pay_prt_shd;