PACKAGE BODY: APPS.PA_CC_TP_CLIENT_EXTN

Source

1 PACKAGE BODY PA_CC_TP_CLIENT_EXTN AS
2 /*  $Header: PAPTPRCB.pls 120.1.12020000.2 2012/07/19 09:57:03 admarath ship $  */
3 
4 
5 
6 -------------------------------------------------------------------------------
7   -- Pre-client extension
8 
9 PROCEDURE Determine_Transfer_Price(
10         p_transaction_type		IN	Varchar2 DEFAULT 'ACTUAL',
11         p_prvdr_org_id                  IN      Number,
12  	p_prvdr_organization_id		IN      Number,
13         p_recvr_org_id                  IN      Number,
14         p_recvr_organization_id         IN      Number,
15         p_expnd_organization_id         IN      Number,
16         p_expenditure_item_id           IN      Number,
17         p_expenditure_item_type         IN      Varchar2,
18         p_expenditure_type_class        IN      Varchar2,
19 	p_task_id                       IN      Number,
20 	p_project_id                    IN      Number,
21 	p_quantity                      IN      Number,
22 	p_incurred_by_person_id         IN      Number,
23 	x_denom_tp_curr_code            OUT     NOCOPY Varchar2, --File.Sql.39 bug 4440895
24 	x_denom_transfer_price          OUT     NOCOPY Number, --File.Sql.39 bug 4440895
25 	x_tp_bill_rate                  OUT     NOCOPY Number, --File.Sql.39 bug 4440895
26 	x_tp_bill_markup_percentage     OUT     NOCOPY Number, --File.Sql.39 bug 4440895
27 	x_error_message                 OUT     NOCOPY Varchar2, --File.Sql.39 bug 4440895
28 	x_status                        OUT     NOCOPY NUMBER	 --File.Sql.39 bug 4440895
29         )
30 IS
31 BEGIN
32 
33    x_denom_transfer_price := null;
34    x_denom_tp_curr_code  := null;
35    x_tp_bill_rate  := null;
36    x_tp_bill_markup_percentage := null;
37    x_status := 0;
38    x_error_message := null;
39 
40 END Determine_Transfer_Price;
41 
42 --------------------------------------------------------------------------------
43 -- Post-client extension
44 
45 PROCEDURE Override_Transfer_Price(
46         p_transaction_type		IN	Varchar2 DEFAULT 'ACTUAL',
47         p_prvdr_org_id                  IN      Number,
48  	p_prvdr_organization_id		IN      Number,
49         p_recvr_org_id                  IN      Number,
50         p_recvr_organization_id         IN      Number,
51         p_expnd_organization_id         IN      Number,
52         p_expenditure_item_id           IN      Number,
53         p_expenditure_item_type         IN      Varchar2,
54         p_expenditure_type_class        IN      Varchar2,
55 	p_task_id                       IN      Number,
56 	p_project_id                    IN      Number,
57 	p_quantity                      IN      Number,
58 	p_incurred_by_person_id         IN      Number,
59 	p_base_curr_code                IN      Varchar2,
60 	p_base_amount                   IN      Number,
61 	p_denom_tp_curr_code            IN      Varchar2,
62 	p_denom_transfer_price          IN      Number,
63 	x_denom_tp_curr_code            OUT     NOCOPY Varchar2, --File.Sql.39 bug 4440895
64 	x_denom_transfer_price          OUT     NOCOPY Number, --File.Sql.39 bug 4440895
65 	x_tp_bill_rate                  OUT     NOCOPY Number, --File.Sql.39 bug 4440895
66 	x_tp_bill_markup_percentage     OUT     NOCOPY Number, --File.Sql.39 bug 4440895
67 	x_error_message                 OUT     NOCOPY Varchar2, --File.Sql.39 bug 4440895
68 	x_status                        OUT     NOCOPY NUMBER	 --File.Sql.39 bug 4440895
69         )
70 IS
71 BEGIN
72 
73    x_denom_tp_curr_code := p_denom_tp_curr_code;
74    x_denom_transfer_price := p_denom_transfer_price;
75    x_tp_bill_rate := null;
76    x_tp_bill_markup_percentage := null;
77    x_error_message := null;
78    x_status := 0;
79 
80 END Override_Transfer_Price;
81 
82 --------------------------------------------------------------------------------
83 
84 END PA_CC_TP_CLIENT_EXTN;