eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.
PACKAGE BODY: APPS.GMF_AR_GET_INVOICE_HEADER

Source


1 PACKAGE BODY GMF_AR_GET_INVOICE_HEADER AS
2 /* $Header: gmfinrhb.pls 115.5 2004/06/18 17:17:10 vchukkap ship $ */
3         apps_base_language	fnd_languages.language_code%TYPE;
4 
5 	CURSOR cur_get_invoice_header (
6 		invoice_id NUMBER,
7 		t_start_date DATE,
8 		t_end_date DATE) IS
9 
10 SELECT
11 	arc.CUSTOMER_TRX_ID, arc.LAST_UPDATED_BY, arc.LAST_UPDATE_DATE,
12 	arc.CREATION_DATE, arc.CREATED_BY, arc.LAST_UPDATE_LOGIN,
13 	arc.TRX_NUMBER, arc.CUST_TRX_TYPE_ID, arc.TRX_DATE,
14 	arc.SET_OF_BOOKS_ID, arc.BILL_TO_CONTACT_ID, arc.BATCH_ID,
15 	arc.BATCH_SOURCE_ID, arc.REASON_CODE, arc.SOLD_TO_CUSTOMER_ID,
16 	arc.SOLD_TO_CONTACT_ID, arc.SOLD_TO_SITE_USE_ID, arc.BILL_TO_CUSTOMER_ID,
17 	arc.BILL_TO_SITE_USE_ID, arc.SHIP_TO_CUSTOMER_ID, arc.SHIP_TO_CONTACT_ID,
18 	arc.SHIP_TO_SITE_USE_ID, arc.REMIT_TO_ADDRESS_ID, arc.TERM_ID,
19 	arc.TERM_DUE_DATE, arc.PREVIOUS_CUSTOMER_TRX_ID, arc.PRIMARY_SALESREP_ID,
20 	arc.PRINTING_ORIGINAL_DATE, arc.PRINTING_LAST_PRINTED, arc.PRINTING_OPTION,
21 	arc.PRINTING_COUNT, arc.PRINTING_PENDING, arc.PURCHASE_ORDER,
22 	arc.PURCHASE_ORDER_REVISION, arc.PURCHASE_ORDER_DATE, arc.CUSTOMER_REFERENCE,
23 	arc.INTERNAL_NOTES, arc.EXCHANGE_RATE_TYPE, arc.EXCHANGE_DATE,
24 	arc.EXCHANGE_RATE, TERRITORY_ID, arc.INVOICE_CURRENCY_CODE,
25 	arc.INITIAL_CUSTOMER_TRX_ID, arc.AGREEMENT_ID, arc.END_DATE_COMMITMENT,
26 	arc.START_DATE_COMMITMENT, arc.LAST_PRINTED_SEQUENCE_NUM,arc.ORIG_SYSTEM_BATCH_NAME,
27 	arc.POST_REQUEST_ID, arc.REQUEST_ID, arc.PROGRAM_APPLICATION_ID,
28    	arc.PROGRAM_ID, arc.PROGRAM_UPDATE_DATE, arc.FINANCE_CHARGES,
29    	arc.COMPLETE_FLAG, arc.POSTING_CONTROL_ID, arc.BILL_TO_ADDRESS_ID,
30    	arc.RA_POST_LOOP_NUMBER, arc.SHIP_TO_ADDRESS_ID, arc.CREDIT_METHOD_FOR_RULES,
31    	arc.CREDIT_METHOD_FOR_INSTALLMENTS, arc.RECEIPT_METHOD_ID,
32 	arc.RELATED_CUSTOMER_TRX_ID,
33 	arc.INVOICING_RULE_ID, arc.SHIP_VIA, arc.SHIP_DATE_ACTUAL,
34 	arc.WAYBILL_NUMBER, arc.FOB_POINT, arc.CUSTOMER_BANK_ACCOUNT_ID,
35 	arc.STATUS_TRX, arc.DOC_SEQUENCE_ID,
36    	arc.DOC_SEQUENCE_VALUE, arc.PAYING_CUSTOMER_ID, arc.PAYING_SITE_USE_ID,
37    	arc.RELATED_BATCH_SOURCE_ID, arc.DEFAULT_TAX_EXEMPT_FLAG,
38    	arc.CREATED_FROM, sum(arp.AMOUNT_DUE_ORIGINAL), sum(arp.AMOUNT_DUE_REMAINING),
39 	art.NAME, racust.NAME, racust.TYPE
40 from	RA_TERMS_TL art,
41 	RA_CUST_TRX_TYPES_ALL racust,
42 	AR_PAYMENT_SCHEDULES_ALL arp,
43         RA_CUSTOMER_TRX_ALL arc
44 where 	arc.CUSTOMER_TRX_ID = invoice_id
45         AND (arp.CUSTOMER_TRX_ID = arc.customer_trx_id)
46         AND (arc.last_update_date between nvl(t_start_date, arc.last_update_date)
47 	AND nvl(t_end_date, arc.last_update_date))
48 	AND (art.TERM_ID(+) = arc.TERM_ID)
49         AND  nvl(art.language,apps_base_language) = apps_base_language
50 	AND (arc.CUST_TRX_TYPE_ID = racust.CUST_TRX_TYPE_ID)
51 	AND (racust.CUST_TRX_TYPE_ID, racust.ORG_ID) =
52 		(	SELECT 	t.CUST_TRX_TYPE_ID, t.ORG_ID
53 	 		FROM 	RA_CUST_TRX_TYPES_ALL t
54 			WHERE 	t.CUST_TRX_TYPE_ID = racust.CUST_TRX_TYPE_ID
55 			AND	rownum=1)
56 group by
57 	arc.CUSTOMER_TRX_ID, arc.LAST_UPDATED_BY, arc.LAST_UPDATE_DATE,
58 	arc.CREATION_DATE, arc.CREATED_BY, arc.LAST_UPDATE_LOGIN,
59 	arc.TRX_NUMBER, arc.CUST_TRX_TYPE_ID, arc.TRX_DATE,
60 	arc.SET_OF_BOOKS_ID, arc.BILL_TO_CONTACT_ID, arc.BATCH_ID,
61 	arc.BATCH_SOURCE_ID, arc.REASON_CODE, arc.SOLD_TO_CUSTOMER_ID,
62 	arc.SOLD_TO_CONTACT_ID, arc.SOLD_TO_SITE_USE_ID, arc.BILL_TO_CUSTOMER_ID,
63 	arc.BILL_TO_SITE_USE_ID, arc.SHIP_TO_CUSTOMER_ID, arc.SHIP_TO_CONTACT_ID,
64 	arc.SHIP_TO_SITE_USE_ID, arc.REMIT_TO_ADDRESS_ID, arc.TERM_ID,
65 	arc.TERM_DUE_DATE, arc.PREVIOUS_CUSTOMER_TRX_ID, arc.PRIMARY_SALESREP_ID,
66 	arc.PRINTING_ORIGINAL_DATE, arc.PRINTING_LAST_PRINTED, arc.PRINTING_OPTION,
67 	arc.PRINTING_COUNT, arc.PRINTING_PENDING, arc.PURCHASE_ORDER,
68 	arc.PURCHASE_ORDER_REVISION, arc.PURCHASE_ORDER_DATE, arc.CUSTOMER_REFERENCE,
69 	arc.INTERNAL_NOTES, arc.EXCHANGE_RATE_TYPE, arc.EXCHANGE_DATE,
70 	arc.EXCHANGE_RATE, arc.TERRITORY_ID, arc.INVOICE_CURRENCY_CODE,
71 	arc.INITIAL_CUSTOMER_TRX_ID, arc.AGREEMENT_ID, arc.END_DATE_COMMITMENT,
72 	arc.START_DATE_COMMITMENT, arc.LAST_PRINTED_SEQUENCE_NUM,arc.ORIG_SYSTEM_BATCH_NAME,
73 	arc.POST_REQUEST_ID, arc.REQUEST_ID, arc.PROGRAM_APPLICATION_ID,
74    	arc.PROGRAM_ID, arc.PROGRAM_UPDATE_DATE, arc.FINANCE_CHARGES,
75    	arc.COMPLETE_FLAG, arc.POSTING_CONTROL_ID, arc.BILL_TO_ADDRESS_ID,
76    	arc.RA_POST_LOOP_NUMBER, arc.SHIP_TO_ADDRESS_ID, arc.CREDIT_METHOD_FOR_RULES,
77    	arc.CREDIT_METHOD_FOR_INSTALLMENTS, arc.RECEIPT_METHOD_ID,
78 	arc.RELATED_CUSTOMER_TRX_ID,
79 	arc.INVOICING_RULE_ID, arc.SHIP_VIA, arc.SHIP_DATE_ACTUAL,
80 	arc.WAYBILL_NUMBER, arc.FOB_POINT, arc.CUSTOMER_BANK_ACCOUNT_ID,
81 	arc.STATUS_TRX, arc.DOC_SEQUENCE_ID,
82    	arc.DOC_SEQUENCE_VALUE, arc.PAYING_CUSTOMER_ID, arc.PAYING_SITE_USE_ID,
83    	arc.RELATED_BATCH_SOURCE_ID, arc.DEFAULT_TAX_EXEMPT_FLAG,
84    	arc.CREATED_FROM, art.NAME, racust.NAME, racust.TYPE
85 UNION
86 SELECT
87 	arc.CUSTOMER_TRX_ID, arc.LAST_UPDATED_BY, arc.LAST_UPDATE_DATE,
88 	arc.CREATION_DATE, arc.CREATED_BY, arc.LAST_UPDATE_LOGIN,
89 	arc.TRX_NUMBER, arc.CUST_TRX_TYPE_ID, arc.TRX_DATE,
90 	arc.SET_OF_BOOKS_ID, arc.BILL_TO_CONTACT_ID, arc.BATCH_ID,
91 	arc.BATCH_SOURCE_ID, arc.REASON_CODE, arc.SOLD_TO_CUSTOMER_ID,
92 	arc.SOLD_TO_CONTACT_ID, arc.SOLD_TO_SITE_USE_ID, arc.BILL_TO_CUSTOMER_ID,
93 	arc.BILL_TO_SITE_USE_ID, arc.SHIP_TO_CUSTOMER_ID, arc.SHIP_TO_CONTACT_ID,
94 	arc.SHIP_TO_SITE_USE_ID, arc.REMIT_TO_ADDRESS_ID, arc.TERM_ID,
95 	arc.TERM_DUE_DATE, arc.PREVIOUS_CUSTOMER_TRX_ID, arc.PRIMARY_SALESREP_ID,
96 	arc.PRINTING_ORIGINAL_DATE, arc.PRINTING_LAST_PRINTED, arc.PRINTING_OPTION,
97 	arc.PRINTING_COUNT, arc.PRINTING_PENDING, arc.PURCHASE_ORDER,
98 	arc.PURCHASE_ORDER_REVISION, arc.PURCHASE_ORDER_DATE, arc.CUSTOMER_REFERENCE,
99 	arc.INTERNAL_NOTES, arc.EXCHANGE_RATE_TYPE, arc.EXCHANGE_DATE,
100 	arc.EXCHANGE_RATE, arc.TERRITORY_ID, arc.INVOICE_CURRENCY_CODE,
101 	arc.INITIAL_CUSTOMER_TRX_ID, arc.AGREEMENT_ID, arc.END_DATE_COMMITMENT,
102 	arc.START_DATE_COMMITMENT, arc.LAST_PRINTED_SEQUENCE_NUM,arc.ORIG_SYSTEM_BATCH_NAME,
103 	arc.POST_REQUEST_ID, arc.REQUEST_ID, arc.PROGRAM_APPLICATION_ID,
104    	arc.PROGRAM_ID, arc.PROGRAM_UPDATE_DATE, arc.FINANCE_CHARGES,
105    	arc.COMPLETE_FLAG, arc.POSTING_CONTROL_ID, arc.BILL_TO_ADDRESS_ID,
106    	arc.RA_POST_LOOP_NUMBER, arc.SHIP_TO_ADDRESS_ID, arc.CREDIT_METHOD_FOR_RULES,
107    	arc.CREDIT_METHOD_FOR_INSTALLMENTS, arc.RECEIPT_METHOD_ID,
108 	arc.RELATED_CUSTOMER_TRX_ID,
109 	arc.INVOICING_RULE_ID, arc.SHIP_VIA, arc.SHIP_DATE_ACTUAL,
110 	arc.WAYBILL_NUMBER, arc.FOB_POINT, arc.CUSTOMER_BANK_ACCOUNT_ID,
111 	arc.STATUS_TRX, arc.DOC_SEQUENCE_ID,
112    	arc.DOC_SEQUENCE_VALUE, arc.PAYING_CUSTOMER_ID, arc.PAYING_SITE_USE_ID,
113    	arc.RELATED_BATCH_SOURCE_ID, arc.DEFAULT_TAX_EXEMPT_FLAG,
114    	arc.CREATED_FROM, sum(arp.AMOUNT_DUE_ORIGINAL), sum(arp.AMOUNT_DUE_REMAINING),
115 	art.NAME, racust.NAME, racust.TYPE
116 from	RA_TERMS_TL art,
117 	RA_CUST_TRX_TYPES_ALL racust,
118 	AR_PAYMENT_SCHEDULES_ALL arp,
119         RA_CUSTOMER_TRX_ALL arc
120 where 	arc.previous_customer_trx_id = invoice_id
121         AND (arp.CUSTOMER_TRX_ID = arc.customer_trx_id)
122         AND (arc.last_update_date between nvl(t_start_date, arc.last_update_date)
123 	AND nvl(t_end_date, arc.last_update_date))
124 	AND (art.TERM_ID(+) = arc.TERM_ID)
125         AND  nvl(art.language,apps_base_language) = apps_base_language
126 	AND (arc.CUST_TRX_TYPE_ID = racust.CUST_TRX_TYPE_ID)
127 	AND (racust.CUST_TRX_TYPE_ID, racust.ORG_ID) =
128 		(	SELECT 	t.CUST_TRX_TYPE_ID, t.ORG_ID
129 	 		FROM 	RA_CUST_TRX_TYPES_ALL t
130 			WHERE 	t.CUST_TRX_TYPE_ID = racust.CUST_TRX_TYPE_ID
131 			AND	rownum=1)
132 group by
133 	arc.CUSTOMER_TRX_ID, arc.LAST_UPDATED_BY, arc.LAST_UPDATE_DATE,
134 	arc.CREATION_DATE, arc.CREATED_BY, arc.LAST_UPDATE_LOGIN,
135 	arc.TRX_NUMBER, arc.CUST_TRX_TYPE_ID, arc.TRX_DATE,
136 	arc.SET_OF_BOOKS_ID, arc.BILL_TO_CONTACT_ID, arc.BATCH_ID,
137 	arc.BATCH_SOURCE_ID, arc.REASON_CODE, arc.SOLD_TO_CUSTOMER_ID,
138 	arc.SOLD_TO_CONTACT_ID, arc.SOLD_TO_SITE_USE_ID, arc.BILL_TO_CUSTOMER_ID,
139 	arc.BILL_TO_SITE_USE_ID, arc.SHIP_TO_CUSTOMER_ID, arc.SHIP_TO_CONTACT_ID,
140 	arc.SHIP_TO_SITE_USE_ID, arc.REMIT_TO_ADDRESS_ID, arc.TERM_ID,
141 	arc.TERM_DUE_DATE, arc.PREVIOUS_CUSTOMER_TRX_ID, arc.PRIMARY_SALESREP_ID,
142 	arc.PRINTING_ORIGINAL_DATE, arc.PRINTING_LAST_PRINTED, arc.PRINTING_OPTION,
143 	arc.PRINTING_COUNT, arc.PRINTING_PENDING, arc.PURCHASE_ORDER,
144 	arc.PURCHASE_ORDER_REVISION, arc.PURCHASE_ORDER_DATE, arc.CUSTOMER_REFERENCE,
145 	arc.INTERNAL_NOTES, arc.EXCHANGE_RATE_TYPE, arc.EXCHANGE_DATE,
146 	arc.EXCHANGE_RATE, arc.TERRITORY_ID, arc.INVOICE_CURRENCY_CODE,
147 	arc.INITIAL_CUSTOMER_TRX_ID, arc.AGREEMENT_ID, arc.END_DATE_COMMITMENT,
148 	arc.START_DATE_COMMITMENT, arc.LAST_PRINTED_SEQUENCE_NUM,arc.ORIG_SYSTEM_BATCH_NAME,
149 	arc.POST_REQUEST_ID, arc.REQUEST_ID, arc.PROGRAM_APPLICATION_ID,
150    	arc.PROGRAM_ID, arc.PROGRAM_UPDATE_DATE, arc.FINANCE_CHARGES,
151    	arc.COMPLETE_FLAG, arc.POSTING_CONTROL_ID, arc.BILL_TO_ADDRESS_ID,
152    	arc.RA_POST_LOOP_NUMBER, arc.SHIP_TO_ADDRESS_ID, arc.CREDIT_METHOD_FOR_RULES,
153    	arc.CREDIT_METHOD_FOR_INSTALLMENTS, arc.RECEIPT_METHOD_ID,
154 	arc.RELATED_CUSTOMER_TRX_ID,
155 	arc.INVOICING_RULE_ID, arc.SHIP_VIA, arc.SHIP_DATE_ACTUAL,
156 	arc.WAYBILL_NUMBER, arc.FOB_POINT, arc.CUSTOMER_BANK_ACCOUNT_ID,
157 	arc.STATUS_TRX, arc.DOC_SEQUENCE_ID,
158    	arc.DOC_SEQUENCE_VALUE, arc.PAYING_CUSTOMER_ID, arc.PAYING_SITE_USE_ID,
159    	arc.RELATED_BATCH_SOURCE_ID, arc.DEFAULT_TAX_EXEMPT_FLAG,
160    	arc.CREATED_FROM, art.NAME, racust.NAME, racust.TYPE
161 order by 26 desc;
162 /* order by arc.previous_customer_trx_id desc */
163 
164 
165 PROCEDURE get_invoice_header
166 	(invoice_id			IN	OUT 	NOCOPY NUMBER,
167 	t_start_date			IN 	OUT	NOCOPY DATE,
168 	t_end_date			IN 	OUT	NOCOPY DATE,
169 	t_created_by				OUT	NOCOPY NUMBER,
170 	t_creation_date				OUT	NOCOPY DATE,
171 	t_last_updated_by			OUT	NOCOPY NUMBER,
172 	t_last_update_date			OUT	NOCOPY DATE,
173 	t_trx_number                 		OUT   	NOCOPY VARCHAR2,
174 	t_invoice_amount			OUT	NOCOPY NUMBER,
175 	t_balance_amount			OUT	NOCOPY NUMBER,
176  	t_trx_date	            		OUT	NOCOPY DATE,
177 	t_cust_trx_type_id     			OUT   	NOCOPY NUMBER,
178    	t_invoice_currency_code		        OUT   	NOCOPY VARCHAR2,
179    	t_term_id                        	OUT   	NOCOPY NUMBER,
180 	t_customer_trx_id  	   		OUT   	NOCOPY NUMBER,
181 	t_last_update_login          		OUT	NOCOPY NUMBER,
182    	t_set_of_books_id            		OUT   	NOCOPY NUMBER,
183  	t_bill_to_contact_id         		OUT   	NOCOPY NUMBER,
184    	t_batch_id                   		OUT   	NOCOPY NUMBER,
185    	t_batch_source_id            		OUT   	NOCOPY NUMBER,
186    	t_reason_code                		OUT   	NOCOPY VARCHAR2,
187    	t_sold_to_customer_id        		OUT   	NOCOPY NUMBER,
188    	t_sold_to_contact_id         		OUT   	NOCOPY NUMBER,
189    	t_sold_to_site_use_id        		OUT   	NOCOPY NUMBER,
190    	t_bill_to_customer_id        		OUT   	NOCOPY NUMBER,
191    	t_bill_to_site_use_id        		OUT   	NOCOPY NUMBER,
192    	t_ship_to_customer_id        		OUT   	NOCOPY NUMBER,
193    	t_ship_to_contact_id         		OUT   	NOCOPY NUMBER,
194    	t_ship_to_site_use_id        		OUT   	NOCOPY NUMBER,
195    	t_remit_to_address_id        		OUT   	NOCOPY NUMBER,
196    	t_term_due_date                  	OUT   	NOCOPY DATE,
197    	t_previous_customer_trx_id       	OUT   	NOCOPY NUMBER,
198    	t_primary_salesrep_id            	OUT   	NOCOPY NUMBER,
199    	t_printing_original_date         	OUT   	NOCOPY DATE,
200    	t_printing_last_printed          	OUT   	NOCOPY DATE,
201    	t_printing_option                	OUT   	NOCOPY VARCHAR2,
202    	t_printing_count                 	OUT   	NOCOPY NUMBER,
203    	t_printing_pending               	OUT   	NOCOPY VARCHAR2,
204    	t_purchase_order                 	OUT   	NOCOPY VARCHAR2,
205    	t_purchase_order_revision        	OUT   	NOCOPY VARCHAR2,
206    	t_purchase_order_date            	OUT   	NOCOPY DATE,
207    	t_customer_reference             	OUT   	NOCOPY VARCHAR2,
208    	t_internal_notes                 	OUT   	NOCOPY VARCHAR2,
209    	t_exchange_rate_type             	OUT   	NOCOPY VARCHAR2,
210    	t_exchange_date                  	OUT   	NOCOPY DATE,
211    	t_exchange_rate                  	OUT   	NOCOPY NUMBER,
212    	t_territory_id                   	OUT   	NOCOPY NUMBER,
213    	t_initial_customer_trx_id        	OUT   	NOCOPY NUMBER,
214    	t_agreement_id                   	OUT   	NOCOPY NUMBER,
215    	t_end_date_commitment            	OUT   	NOCOPY DATE,
216    	t_start_date_commitment          	OUT   	NOCOPY DATE,
217    	t_last_printed_sequence_num      	OUT   	NOCOPY NUMBER,
218    	t_orig_system_batch_name         	OUT   	NOCOPY VARCHAR2,
219    	t_post_request_id                	OUT   	NOCOPY NUMBER,
220    	t_request_id                     	OUT   	NOCOPY NUMBER,
221    	t_program_application_id         	OUT   	NOCOPY NUMBER,
222    	t_program_id                     	OUT   	NOCOPY NUMBER,
223    	t_program_update_date            	OUT   	NOCOPY DATE,
224    	t_finance_charges                	OUT   	NOCOPY VARCHAR2,
225    	t_complete_flag                  	OUT   	NOCOPY VARCHAR2,
226    	t_posting_control_id             	OUT   	NOCOPY NUMBER,
227    	t_bill_to_address_id             	OUT   	NOCOPY NUMBER,
228    	t_ra_post_loop_number            	OUT   	NOCOPY NUMBER,
229    	t_ship_to_address_id             	OUT   	NOCOPY NUMBER,
230    	t_credit_method_for_rules        	OUT   	NOCOPY VARCHAR2,
231    	t_cr_method_for_installments     	OUT   	NOCOPY VARCHAR2,
232    	t_receipt_method_id              	OUT   	NOCOPY NUMBER,
233    	t_related_customer_trx_id        	OUT   	NOCOPY NUMBER,
234    	t_invoicing_rule_id              	OUT   	NOCOPY NUMBER,
235    	t_ship_via                       	OUT   	NOCOPY VARCHAR2,
236    	t_ship_date_actual               	OUT   	NOCOPY DATE,
237    	t_waybill_number                 	OUT   	NOCOPY VARCHAR2,
238    	t_fob_point                      	OUT   	NOCOPY VARCHAR2,
239    	t_customer_bank_account_id       	OUT   	NOCOPY NUMBER,
240    	t_status_trx                     	OUT   	NOCOPY VARCHAR2,
241    	t_doc_sequence_id                	OUT   	NOCOPY NUMBER,
242    	t_doc_sequence_value             	OUT   	NOCOPY NUMBER,
243    	t_paying_customer_id             	OUT   	NOCOPY NUMBER,
244    	t_paying_site_use_id             	OUT   	NOCOPY NUMBER,
245    	t_related_batch_source_id        	OUT   	NOCOPY NUMBER,
246    	t_default_tax_exempt_flag        	OUT   	NOCOPY VARCHAR2,
247    	t_created_from                   	OUT   	NOCOPY VARCHAR2,
248 	row_to_fetch			IN 	OUT	NOCOPY NUMBER,
249 	error_status				OUT	NOCOPY NUMBER,
250 	t_term_name				OUT	NOCOPY VARCHAR2,
251 	t_trx_name				OUT     NOCOPY VARCHAR2,
252 	t_type					OUT     NOCOPY VARCHAR2) IS
253 
254 BEGIN
255         SELECT language_code
256         INTO apps_base_language
257         FROM fnd_languages
258         WHERE installed_flag = 'B';
259 
260 	if NOT cur_get_invoice_header%ISOPEN
261 	then
262 		OPEN cur_get_invoice_header( invoice_id, t_start_date, t_end_date);
263 	end if;
264 
265 	FETCH cur_get_invoice_header INTO
266 		invoice_id,
267 		t_last_updated_by,
268 		t_last_update_date,
269 		t_creation_date,
270 		t_created_by,
271 		t_last_update_login,
272 		t_trx_number,
273 		t_cust_trx_type_id,
274 	 	t_trx_date,
275    		t_set_of_books_id,
276  		t_bill_to_contact_id,
277    		t_batch_id,
278    		t_batch_source_id,
279    		t_reason_code,
280    		t_sold_to_customer_id,
281    		t_sold_to_contact_id,
282    		t_sold_to_site_use_id,
283    		t_bill_to_customer_id,
284    		t_bill_to_site_use_id,
285    		t_ship_to_customer_id,
286    		t_ship_to_contact_id,
287    		t_ship_to_site_use_id,
288    		t_remit_to_address_id,
289    		t_term_id,
290    		t_term_due_date,
291    		t_previous_customer_trx_id,
292    		t_primary_salesrep_id,
293    		t_printing_original_date,
294    		t_printing_last_printed,
295    		t_printing_option,
296    		t_printing_count,
297    		t_printing_pending,
298    		t_purchase_order,
299    		t_purchase_order_revision,
300    		t_purchase_order_date,
301    		t_customer_reference,
302    		t_internal_notes,
303    		t_exchange_rate_type,
304    		t_exchange_date,
305    		t_exchange_rate,
306    		t_territory_id,
307    		t_invoice_currency_code,
308    		t_initial_customer_trx_id,
309    		t_agreement_id,
310    		t_end_date_commitment,
311    		t_start_date_commitment,
312    		t_last_printed_sequence_num,
313    		t_orig_system_batch_name,
314    		t_post_request_id,
315    		t_request_id,
316    		t_program_application_id,
317    		t_program_id,
318    		t_program_update_date,
319    		t_finance_charges,
320    		t_complete_flag,
321    		t_posting_control_id,
322    		t_bill_to_address_id,
323    		t_ra_post_loop_number,
324    		t_ship_to_address_id,
325    		t_credit_method_for_rules,
326    		t_cr_method_for_installments,
327    		t_receipt_method_id,
328    		t_related_customer_trx_id,
329    		t_invoicing_rule_id,
330    		t_ship_via,
331    		t_ship_date_actual,
332    		t_waybill_number,
333    		t_fob_point,
334    		t_customer_bank_account_id,
335    		t_status_trx,
336    		t_doc_sequence_id,
337    		t_doc_sequence_value,
338    		t_paying_customer_id,
339    		t_paying_site_use_id,
340    		t_related_batch_source_id,
341    		t_default_tax_exempt_flag,
342    		t_created_from,
343 		t_invoice_amount,
344 		t_balance_amount,
345 		t_term_name,
346 		t_trx_name,
347 		t_type;
348 
349 	if cur_get_invoice_header%NOTFOUND
350 	then
351 		error_status := 100;
352 		close cur_get_invoice_header;
353 	end if;
354 
355 	if row_to_fetch = 1 and cur_get_invoice_header%ISOPEN
356 	then
357 		close cur_get_invoice_header;
358 	end if;
359 
360 	EXCEPTION
361 
362 		when others then
363 		error_status := SQLCODE;
364 END get_invoice_header;
365 END GMF_AR_GET_INVOICE_HEADER;