DBA Data[Home] [Help]

PACKAGE BODY: APPS.ZX_WRAPPER_PKG

Source


1 PACKAGE BODY ZX_WRAPPER_PKG AS
2 /* $Header: zxiwrapperpkgb.pls 120.3 2005/08/09 10:55:33 asengupt noship $ */
3 
4 
5 
6 
7  /* ======================================================================
8  | PROCEDURE redef_tax_class_wrapper: This procedure acts as a wrapper
9  | to the ZX_API_PUB.redef_tax_classification_code.It is used to populate
10  | the ZX_API_PUB.def_tax_cls_code_info_rec_type and then pass this record
11  | as a parameter to redef_tax_classification_code.
12  * ======================================================================*/
13   PROCEDURE redef_tax_class_wrapper(
14   p_api_version                    number,
15   p_init_msg_list                  varchar2,
16   p_commit                         varchar2,
17   p_validation_level               number,
18   p_application_id                 number,
19   p_entity_code                    varchar2,
20   p_event_class_code               varchar2,
21   p_internal_organization_id       number,
22   p_trx_id                         number,
23   p_trx_line_id                    number,
24   p_trx_level_type                 varchar2,
25   p_ledger_id                      number,
26   p_trx_date                       date,
27   p_ref_doc_application_id         number,
28   p_ref_doc_entity_code            varchar2,
29   p_ref_doc_event_class_code       varchar2,
30   p_ref_doc_trx_id                 number,
31   p_ref_doc_line_id                number,
32   p_ref_doc_trx_level_type         varchar2,
33   p_account_ccid                   number,
34   p_account_string                 varchar2,
35   p_product_id                     number,
36   p_product_org_id                 number,
37   p_receivables_trx_type_id        number,
38   p_ship_third_pty_acct_id         number,
39   p_bill_third_pty_acct_id         number,
40   p_ship_third_pty_acct_site_id    number,
41   p_bill_third_pty_acct_site_id    number,
42   p_ship_acct_site_use_id          number,
43   p_bill_acct_site_use_id          number,
44   p_ship_to_location_id            number,
45   p_defaulting_attribute1          varchar2,
46   p_defaulting_attribute2          varchar2,
47   p_defaulting_attribute3          varchar2,
48   p_defaulting_attribute4          varchar2,
49   p_defaulting_attribute5          varchar2,
50   p_defaulting_attribute6          varchar2,
51   p_defaulting_attribute7          varchar2,
52   p_defaulting_attribute8          varchar2,
53   p_defaulting_attribute9          varchar2,
54   p_defaulting_attribute10         varchar2,
55   p_tax_user_override_flag         varchar2,
56   p_overridden_tax_cls_code        varchar2,
57   x_tax_classification_code      out    nocopy    varchar2,
58   x_allow_tax_code_override_flag out    nocopy    varchar2,
59   x_msg_count                    out    nocopy    number ,
60   x_msg_data                     out    nocopy    varchar2,
61   x_return_status                out    nocopy    varchar2
62  ) AS
63  l_tax_class_code_record ZX_API_PUB.def_tax_cls_code_info_rec_type;
64 
65  BEGIN
66 
67   l_tax_class_code_record.application_id  :=  p_application_id  ;
68   l_tax_class_code_record.entity_code     :=  p_entity_code      ;
69   l_tax_class_code_record.event_class_code  := p_event_class_code          ;
70   l_tax_class_code_record.internal_organization_id :=    p_internal_organization_id ;
71   l_tax_class_code_record.trx_id   :=  p_trx_id                   ;
72   l_tax_class_code_record.trx_line_id := p_trx_line_id             ;
73   l_tax_class_code_record.trx_level_type := p_trx_level_type        ;
74   l_tax_class_code_record.ledger_id   := p_ledger_id              ;
75   l_tax_class_code_record.trx_date    := p_trx_date                ;
76   l_tax_class_code_record.ref_doc_application_id := p_ref_doc_application_id     ;
77   l_tax_class_code_record.ref_doc_entity_code  := p_ref_doc_entity_code      ;
78   l_tax_class_code_record.ref_doc_event_class_code := p_ref_doc_event_class_code   ;
79   l_tax_class_code_record.ref_doc_trx_id  := p_ref_doc_trx_id         ;
80   l_tax_class_code_record.ref_doc_line_id := p_ref_doc_line_id         ;
81   l_tax_class_code_record.ref_doc_trx_level_type := p_ref_doc_trx_level_type     ;
82   l_tax_class_code_record.account_ccid  := p_account_ccid         ;
83   l_tax_class_code_record.account_string := p_account_string        ;
84   l_tax_class_code_record.product_id := p_product_id                 ;
85  l_tax_class_code_record.product_org_id := p_product_org_id         ;
86   l_tax_class_code_record.receivables_trx_type_id := p_receivables_trx_type_id     ;
87   l_tax_class_code_record.ship_third_pty_acct_id := p_ship_third_pty_acct_id       ;
88   l_tax_class_code_record.bill_third_pty_acct_id := p_bill_third_pty_acct_id       ;
89   l_tax_class_code_record.ship_third_pty_acct_site_id := p_ship_third_pty_acct_site_id  ;
90   l_tax_class_code_record.bill_third_pty_acct_site_id := p_bill_third_pty_acct_site_id;
91   l_tax_class_code_record.ship_to_cust_acct_site_use_id := p_ship_acct_site_use_id;
92   l_tax_class_code_record.bill_to_cust_acct_site_use_id := p_bill_acct_site_use_id;
93   l_tax_class_code_record.ship_to_location_id   := p_ship_to_location_id      ;
94   l_tax_class_code_record.defaulting_attribute1 := p_defaulting_attribute1    ;
95   l_tax_class_code_record.defaulting_attribute2 := p_defaulting_attribute2    ;
96   l_tax_class_code_record.defaulting_attribute3 := p_defaulting_attribute3    ;
97   l_tax_class_code_record.defaulting_attribute4 := p_defaulting_attribute4    ;
98   l_tax_class_code_record.defaulting_attribute5 := p_defaulting_attribute5    ;
99   l_tax_class_code_record.defaulting_attribute6 := p_defaulting_attribute6    ;
100   l_tax_class_code_record.defaulting_attribute7 := p_defaulting_attribute7    ;
101   l_tax_class_code_record.defaulting_attribute8 := p_defaulting_attribute8    ;
102   l_tax_class_code_record.defaulting_attribute9 := p_defaulting_attribute9    ;
103   l_tax_class_code_record.defaulting_attribute10 := p_defaulting_attribute10   ;
104   l_tax_class_code_record.tax_user_override_flag := p_tax_user_override_flag    ;
105   l_tax_class_code_record.overridden_tax_cls_code := p_overridden_tax_cls_code;
106 
107 
108   ZX_API_PUB.redef_tax_classification_code
109                 (
110                         p_api_version               ,
111                         p_init_msg_list             ,
112                         p_commit                    ,
113                         p_validation_level          ,
114                         x_msg_count                 ,
115                         x_msg_data                  ,
116                         x_return_status             ,
117                         l_tax_class_code_record
118                 );
119 
120     x_tax_classification_code  := l_tax_class_code_record.x_tax_classification_code;
121     x_allow_tax_code_override_flag := l_tax_class_code_record.x_allow_tax_code_override_flag;
122 
123 end;
124 
125 /* ======================================================================
126 | PROCEDURE calculate_tax_wrapper: This procedure acts as a wrapper
127 | to the ZX_API_PUB.calculate_tax.It is used to populate
128 | the ZX_API_PUB.transaction_rec_type and then pass this record
129 | as a parameter to calculate_tax.
130 * ======================================================================*/
131 PROCEDURE calculate_tax_wrapper
132   ( p_api_version           	IN         NUMBER,
133     p_init_msg_list         	IN         VARCHAR2,
134     p_commit                	IN         VARCHAR2,
135     p_validation_level      	IN         NUMBER,
136     x_return_status         	OUT NOCOPY VARCHAR2,
137     x_msg_count             	OUT NOCOPY NUMBER,
138     x_msg_data              	OUT NOCOPY VARCHAR2,
139     p_application_id          	IN         NUMBER,
140     p_entity_code           	IN         VARCHAR2,
141     p_event_class_code      	IN         VARCHAR2,
142     p_event_type_code        	IN         VARCHAR2,
143     p_trx_id                 	IN         NUMBER,
144     p_internal_organization_id  IN         NUMBER,
145     p_hdr_trx_user_key1        	IN         VARCHAR2,
146     p_hdr_trx_user_key2        	IN         VARCHAR2,
147     p_hdr_trx_user_key3       	IN         VARCHAR2,
148     p_hdr_trx_user_key4      	IN         VARCHAR2,
149     p_hdr_trx_user_key5       	IN         VARCHAR2,
150     p_hdr_trx_user_key6       	IN         VARCHAR2,
151     p_first_pty_org_id       	IN         NUMBER,
152     p_tax_event_class_code     	IN         VARCHAR2,
153     p_tax_event_type_code      	IN         VARCHAR2,
154     p_doc_event_status        	IN         VARCHAR2,
155     p_application_doc_status 	IN         VARCHAR2,
156     p_quote_flag            	IN         VARCHAR2,
157     p_data_transfer_mode    	IN         VARCHAR2,
158     x_doc_level_recalc_flag 	OUT NOCOPY VARCHAR2
159    ) AS
160 
161     	l_transaction_rec ZX_API_PUB.transaction_rec_type;
162 
163    BEGIN
164 
165 	l_transaction_rec.APPLICATION_ID		:=p_application_id;
166 	l_transaction_rec.ENTITY_CODE			:=p_entity_code;
167 	l_transaction_rec.EVENT_CLASS_CODE		:=p_event_class_code;
168 	l_transaction_rec.EVENT_TYPE_CODE       	:=p_event_type_code;
169 	l_transaction_rec.TRX_ID		   	:=p_trx_id  ;
170 	l_transaction_rec.INTERNAL_ORGANIZATION_ID 	:=p_internal_organization_id;
171 	l_transaction_rec.HDR_TRX_USER_KEY1        	:=p_hdr_trx_user_key1;
172 	l_transaction_rec.HDR_TRX_USER_KEY2        	:=p_hdr_trx_user_key2;
173 	l_transaction_rec.HDR_TRX_USER_KEY3        	:=p_hdr_trx_user_key3;
174 	l_transaction_rec.HDR_TRX_USER_KEY4        	:=p_hdr_trx_user_key4;
175 	l_transaction_rec.HDR_TRX_USER_KEY5        	:=p_hdr_trx_user_key5;
176 	l_transaction_rec.HDR_TRX_USER_KEY6        	:=p_hdr_trx_user_key6;
177 	l_transaction_rec.FIRST_PTY_ORG_ID         	:=p_first_pty_org_id;
178 	l_transaction_rec.TAX_EVENT_CLASS_CODE     	:=p_tax_event_class_code;
179 	l_transaction_rec.TAX_EVENT_TYPE_CODE      	:=p_tax_event_type_code;
180 	l_transaction_rec.DOC_EVENT_STATUS         	:=p_doc_event_status;
181 	l_transaction_rec.APPLICATION_DOC_STATUS   	:=p_application_doc_status;
182 
183 
184 	ZX_API_PUB.calculate_tax(
185 					p_api_version,p_init_msg_list	,
186 					p_commit			,
187 					p_validation_level		,
188 					x_return_status			,
189 					x_msg_count			,
190 					x_msg_data			,
191 					l_transaction_rec		,
192 					p_quote_flag			,
193 					p_data_transfer_mode		,
194 					x_doc_level_recalc_flag
195 				);
196 
197    END calculate_tax_wrapper;
198 
199 END ZX_WRAPPER_PKG;