36: trx.PRINTING_ORIGINAL_DATE is null and
37: trx.LAST_PRINTED_SEQUENCE_NUM is null;
38:
39: begin
40: if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_EXTRACT_DOCUMENT.extract_documents(+)'); end if;
41: if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_EXTRACT_DOCUMENT.extract_documents(+)'); end if;
42: l_trx_class := argument1;
43: if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('l_trx_class:'||l_trx_class); end if;
44: l_trx_type_id := argument2;
37: trx.LAST_PRINTED_SEQUENCE_NUM is null;
38:
39: begin
40: if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_EXTRACT_DOCUMENT.extract_documents(+)'); end if;
41: if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_EXTRACT_DOCUMENT.extract_documents(+)'); end if;
42: l_trx_class := argument1;
43: if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('l_trx_class:'||l_trx_class); end if;
44: l_trx_type_id := argument2;
45: if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('l_trx_type_id:'||to_char(l_trx_type_id)); end if;
39: begin
40: if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_EXTRACT_DOCUMENT.extract_documents(+)'); end if;
41: if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_EXTRACT_DOCUMENT.extract_documents(+)'); end if;
42: l_trx_class := argument1;
43: if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('l_trx_class:'||l_trx_class); end if;
44: l_trx_type_id := argument2;
45: if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('l_trx_type_id:'||to_char(l_trx_type_id)); end if;
46: l_trx_number_low := argument3;
47: if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('l_trx_number_low:'||l_trx_number_low); end if;
41: if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_EXTRACT_DOCUMENT.extract_documents(+)'); end if;
42: l_trx_class := argument1;
43: if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('l_trx_class:'||l_trx_class); end if;
44: l_trx_type_id := argument2;
45: if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('l_trx_type_id:'||to_char(l_trx_type_id)); end if;
46: l_trx_number_low := argument3;
47: if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('l_trx_number_low:'||l_trx_number_low); end if;
48: l_trx_number_high := argument4;
49: if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('l_trx_number_high:'||l_trx_number_high); end if;
43: if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('l_trx_class:'||l_trx_class); end if;
44: l_trx_type_id := argument2;
45: if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('l_trx_type_id:'||to_char(l_trx_type_id)); end if;
46: l_trx_number_low := argument3;
47: if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('l_trx_number_low:'||l_trx_number_low); end if;
48: l_trx_number_high := argument4;
49: if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('l_trx_number_high:'||l_trx_number_high); end if;
50: l_cust_class := argument5;
51: if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('l_cust_class:'||l_cust_class); end if;
45: if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('l_trx_type_id:'||to_char(l_trx_type_id)); end if;
46: l_trx_number_low := argument3;
47: if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('l_trx_number_low:'||l_trx_number_low); end if;
48: l_trx_number_high := argument4;
49: if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('l_trx_number_high:'||l_trx_number_high); end if;
50: l_cust_class := argument5;
51: if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('l_cust_class:'||l_cust_class); end if;
52: l_cust_account_id := argument6;
53: if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('l_cust_account_id:'||to_char(l_cust_account_id)); end if;
47: if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('l_trx_number_low:'||l_trx_number_low); end if;
48: l_trx_number_high := argument4;
49: if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('l_trx_number_high:'||l_trx_number_high); end if;
50: l_cust_class := argument5;
51: if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('l_cust_class:'||l_cust_class); end if;
52: l_cust_account_id := argument6;
53: if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('l_cust_account_id:'||to_char(l_cust_account_id)); end if;
54: l_trx_date_low := to_date(argument7,'yyyy/mm/dd hh24:mi:ss'); /* Bug 5110228 - added Mask for fnd_standard_date */
55: /* l_trx_date_low := argument7; */
49: if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('l_trx_number_high:'||l_trx_number_high); end if;
50: l_cust_class := argument5;
51: if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('l_cust_class:'||l_cust_class); end if;
52: l_cust_account_id := argument6;
53: if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('l_cust_account_id:'||to_char(l_cust_account_id)); end if;
54: l_trx_date_low := to_date(argument7,'yyyy/mm/dd hh24:mi:ss'); /* Bug 5110228 - added Mask for fnd_standard_date */
55: /* l_trx_date_low := argument7; */
56: if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('l_trx_date_low:'||to_char(l_trx_date_low)); end if;
57: l_trx_date_high := to_date(argument8,'yyyy/mm/dd hh24:mi:ss'); /* Bug 5110228 - added Mask for fnd_standard_date */
52: l_cust_account_id := argument6;
53: if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('l_cust_account_id:'||to_char(l_cust_account_id)); end if;
54: l_trx_date_low := to_date(argument7,'yyyy/mm/dd hh24:mi:ss'); /* Bug 5110228 - added Mask for fnd_standard_date */
55: /* l_trx_date_low := argument7; */
56: if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('l_trx_date_low:'||to_char(l_trx_date_low)); end if;
57: l_trx_date_high := to_date(argument8,'yyyy/mm/dd hh24:mi:ss'); /* Bug 5110228 - added Mask for fnd_standard_date */
58: /* l_trx_date_high := argument8; */
59: if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('l_trx_date_high:'||to_char(l_trx_date_high)); end if;
60:
55: /* l_trx_date_low := argument7; */
56: if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('l_trx_date_low:'||to_char(l_trx_date_low)); end if;
57: l_trx_date_high := to_date(argument8,'yyyy/mm/dd hh24:mi:ss'); /* Bug 5110228 - added Mask for fnd_standard_date */
58: /* l_trx_date_high := argument8; */
59: if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('l_trx_date_high:'||to_char(l_trx_date_high)); end if;
60:
61: ar_doc_transfer_standard.updateStatus;
62:
63: insert into ar_document_transfers
57: l_trx_date_high := to_date(argument8,'yyyy/mm/dd hh24:mi:ss'); /* Bug 5110228 - added Mask for fnd_standard_date */
58: /* l_trx_date_high := argument8; */
59: if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('l_trx_date_high:'||to_char(l_trx_date_high)); end if;
60:
61: ar_doc_transfer_standard.updateStatus;
62:
63: insert into ar_document_transfers
64: ( DOCUMENT_TRANSFER_ID,
65: SOURCE_ID,
128: PRINTING_ORIGINAL_DATE is null and
129: LAST_PRINTED_SEQUENCE_NUM is null;
130:
131: retcode := 0; -- SUCCESS
132: if ar_doc_transfer_standard.isDebugOn then
133: ar_doc_transfer_standard.debug('AR_EXTRACT_DOCUMENT.extract_documents(-)');
134: end if;
135:
136: exception
129: LAST_PRINTED_SEQUENCE_NUM is null;
130:
131: retcode := 0; -- SUCCESS
132: if ar_doc_transfer_standard.isDebugOn then
133: ar_doc_transfer_standard.debug('AR_EXTRACT_DOCUMENT.extract_documents(-)');
134: end if;
135:
136: exception
137: when no_data_found then
134: end if;
135:
136: exception
137: when no_data_found then
138: if ar_doc_transfer_standard.isDebugOn then
139: ar_doc_transfer_standard.debug('AR_EXTRACT_DOCUMENT.extract_documents(): NO Invoice Fetched');
140: end if;
141:
142: when others then
135:
136: exception
137: when no_data_found then
138: if ar_doc_transfer_standard.isDebugOn then
139: ar_doc_transfer_standard.debug('AR_EXTRACT_DOCUMENT.extract_documents(): NO Invoice Fetched');
140: end if;
141:
142: when others then
143: l_sqlerrm := sqlerrm(sqlcode) || fnd_global.newline ||
146: retcode := 2;
147: fnd_message.set_name('AR','AR_DOC_EXT_SBJ');
148: fnd_message.set_token('REQUEST_ID', fnd_global.conc_request_id);
149: l_subject := fnd_message.get;
150: if ar_doc_transfer_standard.isDebugOn then
151: ar_doc_transfer_standard.debug('AR_EXTRACT_DOCUMENT.extract_documents()EXCEPTION:'||l_sqlerrm);
152: end if;
153: ar_notification_standard.notifyToSysadmin(l_subject,
154: l_sqlerrm);
147: fnd_message.set_name('AR','AR_DOC_EXT_SBJ');
148: fnd_message.set_token('REQUEST_ID', fnd_global.conc_request_id);
149: l_subject := fnd_message.get;
150: if ar_doc_transfer_standard.isDebugOn then
151: ar_doc_transfer_standard.debug('AR_EXTRACT_DOCUMENT.extract_documents()EXCEPTION:'||l_sqlerrm);
152: end if;
153: ar_notification_standard.notifyToSysadmin(l_subject,
154: l_sqlerrm);
155: end;
153: ar_notification_standard.notifyToSysadmin(l_subject,
154: l_sqlerrm);
155: end;
156: begin
157: if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_EXTRACT_DOCUMENT(+)'); end if;
158: if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_EXTRACT_DOCUMENT(-)'); end if;
159: end;
154: l_sqlerrm);
155: end;
156: begin
157: if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_EXTRACT_DOCUMENT(+)'); end if;
158: if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_EXTRACT_DOCUMENT(-)'); end if;
159: end;