[Home] [Help]
PACKAGE BODY: APPS.PAY_PAYRPBLK1_XMLP_PKG
Source
1 PACKAGE BODY PAY_PAYRPBLK1_XMLP_PKG AS
2 /* $Header: PAYRPBLK1B.pls 120.1 2011/03/11 04:41:54 bkeshary ship $ */
3
4 function BeforeReport return boolean is
5
6 begin
7
8 --hr_standard.event('BEFORE REPORT');
9
10
11 if p_payroll_id is not null then
12 cp_payroll_name := hr_reports.get_payroll_name(P_EFFECTIVE_DATE, P_PAYROLL_ID);
13 end if;
14
15 c_effective_date := fnd_date.date_to_displaydate(P_EFFECTIVE_DATE,calendar_aware=>FND_DATE.calendar_aware_alt); -- change as per bug 11830805
16 LP_EFFECTIVE_DATE :=P_EFFECTIVE_DATE;
17 return (TRUE);
18 end;
19
20 function AfterReport return boolean is
21 begin
22 --hr_standard.event('AFTER REPORT');
23 return (TRUE);
24 end;
25
26 function CF_business_groupFormula return VARCHAR2 is
27 v_business_group hr_all_organization_units.name%type;
28
29 begin
30 v_business_group := hr_reports.get_business_group(p_business_group_id);
31 return v_business_group;
32 end;
33
34 function CF_legislation_codeFormula return VARCHAR2 is
35
36 v_legislation_code hr_organization_information.org_information9%type := null;
37
38 cursor legislation_code
39 (c_business_group_id hr_organization_information.organization_id%type) is
40
41 select org_information9
42 from hr_organization_information
43 where organization_id = c_business_group_id
44 and org_information9 is not null
45 and org_information_context = 'Business Group Information';
46 begin
47 open legislation_code (p_business_group_id);
48 fetch legislation_code into v_legislation_code;
49 close legislation_code;
50
51 return v_legislation_code;
52 end;
53
54 function cf_currency_format_maskformula(cf_legislation_code in varchar2) return varchar2 is
55
56 v_currency_code fnd_currencies.currency_code%type;
57 v_format_mask varchar2(100) := null;
58 v_field_length number(3) := 14;
59
60 cursor currency_format_mask
61 (c_territory_code in fnd_currencies.issuing_territory_code%type) is
62 select currency_code
63 from fnd_currencies
64 where issuing_territory_code = c_territory_code;
65
66 begin
67 open currency_format_mask (cf_legislation_code);
68 fetch currency_format_mask into v_currency_code;
69 close currency_format_mask;
70
71 v_format_mask := fnd_currency.get_format_mask(v_currency_code, v_field_length);
72
73 return v_format_mask;
74 end;
75
76 PROCEDURE set_currency_format_mask IS
77 BEGIN
78
79 /*SRW.SET_FORMAT_MASK(CF_currency_format_mask);*/null;
80
81
82 END;
83
84 function P_BUSINESS_GROUP_IDValidTrigge return boolean is
85 begin
86 return (TRUE);
87 end;
88
89 function CF_Q1_data_foundFormula return Number is
90 begin
91 CP_Q1_NO_DATA_FOUND := 0;
92
93 Return(1);
94 end;
95
96 function CF_Q2_data_foundFormula return Number is
97 begin
98 CP_Q2_NO_DATA_FOUND := 0;
99 Return(1);
100 end;
101
102 --Functions to refer Oracle report placeholders--
103
104 Function CP_PAYROLL_NAME_p return varchar2 is
105 Begin
106 return CP_PAYROLL_NAME;
107 END;
108 Function CP_Q1_NO_DATA_FOUND_p return number is
109 Begin
110 return CP_Q1_NO_DATA_FOUND;
111 END;
112 Function CP_Q2_NO_DATA_FOUND_p return number is
113 Begin
114 return CP_Q2_NO_DATA_FOUND;
115 END;
116 Function C_EFFECTIVE_DATE_p return varchar2 is
117 Begin
118 return C_EFFECTIVE_DATE;
119 END;
120 END PAY_PAYRPBLK1_XMLP_PKG ;