1 package body PA_Client_Extn_Retention as
2 /* $Header: PAXBRTCB.pls 120.2 2005/08/19 17:09:50 mwasowic noship $ */
3
4 /*----------------------------------------------------------------------+
5 | Retention Billing Template |
6 +----------------------------------------------------------------------*/
7 Procedure Bill_Retention (
8 P_Customer_ID in number,
9 P_Project_ID in number,
10 P_Top_Task_ID in number,
11 X_Bill_Retention_Flag out NOCOPY varchar2, --File.Sql.39 bug 4440895
12 X_Bill_Percentage out NOCOPY number, --File.Sql.39 bug 4440895
13 X_Bill_Amount out NOCOPY number, --File.Sql.39 bug 4440895
14 X_Status out NOCOPY number ) is --File.Sql.39 bug 4440895
15 BEGIN
16 -- Reset the output parameters.
17 X_status := 0;
18
19 -- This extension will be called only if the billing method is chosen as
20 -- 'Client Extension' in the retention setup for a customer, project and top task
21 -- Add your Retention Billing Logic here.
22 -- If you want to bill the retention set the X_Bill_retention_flag to 'N'.
23 -- If it's null or set to 'N', Billing of retention will not be Done.
24 -- Do not add 'commit' or 'rollback' in your code, since Oracle
25 -- Projects controls the transaction for you.
26
27 EXCEPTION
28 when others then
29 X_Bill_Retention_Flag := NULL; --NOCOPY
30 X_Bill_Percentage := NULL; --NOCOPY
31 X_Bill_Amount := NULL; --NOCOPY
32 -- Add your exception handler here.
33 -- To raise an application error, assign a positive number to X_Status.
34 -- To raise an ORACLE error, assign SQLCODE to X_Status.
35 RAISE;
36
37 END Bill_Retention;
38
39
40 end PA_Client_Extn_Retention;