[Home] [Help]
PACKAGE: APPS.JAI_AR_RCTLA_TRIGGER_PKG
Source
1 PACKAGE JAI_AR_RCTLA_TRIGGER_PKG AS
2 /* $Header: jai_ar_rctla_t.pls 120.7 2007/08/17 19:33:02 brathod ship $ */
3
4 /*----------------------------------------------------------------------------------------
5 Change History
6 S.No. DATE Description
7 ------------------------------------------------------------------------------------------
8
9 1 24/04/1005 cbabu for bug#6012570 (5876390) Version: 120.2
10 Projects Billing Enh.
11 forward ported from R11i to R12
12
13 2 27/04/2007 CSahoo for bug#5879769, File Version 120.3
14 Forward porting of 11i bug#5694855
15 Added a function get_service_type to get the service_type_code
16 added the cursor c_get_address_details to get the customer_id and Customer_site_id
17 5. 14/05/2007 bduvarag for Bug5879769 File Version 120.14
18 Removed the Project Billing Code
19
20 6. 18-Aug-2007 brathod, File Version 120.6
21 Reimplemented Project Billing code
22 ---------------------------------------------------------------------------------------- */
23
24
25 t_rec RA_CUSTOMER_TRX_LINES_ALL%rowtype ;
26 lc_modvat_tax CONSTANT varchar2(15) := 'Modvat Recovery';/*Bug 5684363 bduvarag*/
27 PROCEDURE ARD_T1 ( pr_old t_rec%type , pr_new t_rec%type , pv_action varchar2 , pv_return_code out nocopy varchar2 , pv_return_message out nocopy varchar2 ) ;
28 PROCEDURE ARI_T1 ( pr_old t_rec%type , pr_new t_rec%type , pv_action varchar2 , pv_return_code out nocopy varchar2 , pv_return_message out nocopy varchar2 ) ;
29 PROCEDURE ARI_T2 ( pr_old t_rec%type , pr_new t_rec%type , pv_action varchar2 , pv_return_code out nocopy varchar2 , pv_return_message out nocopy varchar2 ) ;
30 PROCEDURE ARI_T3 ( pr_old t_rec%type , pr_new t_rec%type , pv_action varchar2 , pv_return_code out nocopy varchar2 , pv_return_message out nocopy varchar2 ) ;
31 PROCEDURE ARIU_T1 ( pr_old t_rec%type , pr_new t_rec%type , pv_action varchar2 , pv_return_code out nocopy varchar2 , pv_return_message out nocopy varchar2 ) ;
32 PROCEDURE ARU_T1 ( pr_old t_rec%type , pr_new t_rec%type , pv_action varchar2 , pv_return_code out nocopy varchar2 , pv_return_message out nocopy varchar2 ) ;
33 PROCEDURE ARU_T2 ( pr_old t_rec%type , pr_new t_rec%type , pv_action varchar2 , pv_return_code out nocopy varchar2 , pv_return_message out nocopy varchar2 ) ;
34
35 -- added by csahoo for bug#5879769
36 ---start
37 cursor c_get_address_details(cp_cust_trx_id ra_customer_trx_lines_all.customer_trx_id%type)
38 is
39 select bill_to_customer_id,
40 bill_to_site_use_id,
41 ship_to_customer_id,
42 ship_to_site_use_id
43 from ra_customer_trx_all
44 where customer_trx_id = cp_cust_trx_id;
45
46 r_add c_get_address_details%rowtype;
47
48 FUNCTION get_service_type(pn_party_id NUMBER,
49 pn_party_site_id NUMBER,
50 pv_party_type VARCHAR2) return VARCHAR2;
51
52 ---End
53
54 /*following function added for Projects Billing Implementation. bug#6012570 (5876390) */
55
56 procedure import_projects_taxes
57 ( r_new in ra_customer_trx_lines_all%rowtype
58 , r_old in ra_customer_trx_lines_all%rowtype
59 , pv_action in varchar2
60 , pv_err_msg OUT NOCOPY varchar2
61 , pv_err_flg OUT NOCOPY varchar2
62 );
63
64
65 function is_this_projects_context(
66 pv_context IN varchar2
67 ) return boolean ;
68
69
70 END JAI_AR_RCTLA_TRIGGER_PKG ;