909: /** update invoice amounts and also running totals.
910: Also create payment schedules ***/
911: /*Bug 5382916: Date in the description should be in LE Time zone*/
912:
913: fnd_message.set_name('PO', 'PO_INV_CR_ERS_INVOICE_DESC');
914:
915: X_progress := '100';
916: fnd_message.set_token('RUN_DATE', x_curr_le_transaction_date);
917: X_progress := '110';
912:
913: fnd_message.set_name('PO', 'PO_INV_CR_ERS_INVOICE_DESC');
914:
915: X_progress := '100';
916: fnd_message.set_token('RUN_DATE', x_curr_le_transaction_date);
917: X_progress := '110';
918: X_invoice_description := fnd_message.get;
919:
920: IF (UPPER(x_curr_conversion_rate_type) <> 'USER') THEN
914:
915: X_progress := '100';
916: fnd_message.set_token('RUN_DATE', x_curr_le_transaction_date);
917: X_progress := '110';
918: X_invoice_description := fnd_message.get;
919:
920: IF (UPPER(x_curr_conversion_rate_type) <> 'USER') THEN
921: x_curr_conversion_rate := NULL;
922: END IF;
1280: IF (X_first_rcv_txn_flag = 'N') AND
1281: (X_curr_inv_process_flag = 'Y')
1282: THEN
1283: /*Bug 5382916: Date in the description should be in LE Time zone*/
1284: fnd_message.set_name('PO', 'PO_INV_CR_ERS_INVOICE_DESC');
1285: X_progress := '100';
1286: fnd_message.set_token('RUN_DATE', x_curr_le_transaction_date);
1287: X_progress := '110';
1288: X_invoice_description := fnd_message.get;
1282: THEN
1283: /*Bug 5382916: Date in the description should be in LE Time zone*/
1284: fnd_message.set_name('PO', 'PO_INV_CR_ERS_INVOICE_DESC');
1285: X_progress := '100';
1286: fnd_message.set_token('RUN_DATE', x_curr_le_transaction_date);
1287: X_progress := '110';
1288: X_invoice_description := fnd_message.get;
1289:
1290: IF (UPPER(x_curr_conversion_rate_type) <> 'USER') THEN
1284: fnd_message.set_name('PO', 'PO_INV_CR_ERS_INVOICE_DESC');
1285: X_progress := '100';
1286: fnd_message.set_token('RUN_DATE', x_curr_le_transaction_date);
1287: X_progress := '110';
1288: X_invoice_description := fnd_message.get;
1289:
1290: IF (UPPER(x_curr_conversion_rate_type) <> 'USER') THEN
1291: x_curr_conversion_rate := NULL;
1292: END IF;
1422: IF (x_group_id is NOT NULL) THEN
1423: FND_PROFILE.GET('USER_ID', l_user_id);
1424:
1425: /*Bug# 1539257 Building the batch name which was earlier NA */
1426: fnd_message.set_name('PO', 'PO_INV_CR_ERS_BATCH_DESC');
1427: X_batch_name := fnd_message.get;
1428:
1429: SELECT ap_batches_s.nextval
1430: INTO X_tmp_batch_id
1423: FND_PROFILE.GET('USER_ID', l_user_id);
1424:
1425: /*Bug# 1539257 Building the batch name which was earlier NA */
1426: fnd_message.set_name('PO', 'PO_INV_CR_ERS_BATCH_DESC');
1427: X_batch_name := fnd_message.get;
1428:
1429: SELECT ap_batches_s.nextval
1430: INTO X_tmp_batch_id
1431: FROM dual;
1456: END IF;
1457:
1458: /*
1459:
1460: fnd_message.set_name('PO', 'PO_ERS_CONC_REQUEST_CHECK');
1461: fnd_message.set_token('REQUEST', TO_CHAR(v_req_id));
1462: fnd_message.set_token('BATCH', x_group_id);
1463:
1464: IF (g_asn_debug = 'Y') THEN
1457:
1458: /*
1459:
1460: fnd_message.set_name('PO', 'PO_ERS_CONC_REQUEST_CHECK');
1461: fnd_message.set_token('REQUEST', TO_CHAR(v_req_id));
1462: fnd_message.set_token('BATCH', x_group_id);
1463:
1464: IF (g_asn_debug = 'Y') THEN
1465: asn_debug.put_line(fnd_message.get);
1458: /*
1459:
1460: fnd_message.set_name('PO', 'PO_ERS_CONC_REQUEST_CHECK');
1461: fnd_message.set_token('REQUEST', TO_CHAR(v_req_id));
1462: fnd_message.set_token('BATCH', x_group_id);
1463:
1464: IF (g_asn_debug = 'Y') THEN
1465: asn_debug.put_line(fnd_message.get);
1466: END IF;
1461: fnd_message.set_token('REQUEST', TO_CHAR(v_req_id));
1462: fnd_message.set_token('BATCH', x_group_id);
1463:
1464: IF (g_asn_debug = 'Y') THEN
1465: asn_debug.put_line(fnd_message.get);
1466: END IF;
1467: END IF;
1468:
1469: RETURN (X_completion_status);
1796:
1797: RETURN (x_tmp_invoice_num);
1798: EXCEPTION
1799: WHEN create_invoice_error THEN
1800: FND_MESSAGE.SET_NAME('PO','RCV_CREATE_INVOICE_NUM_ERROR');
1801: FND_MESSAGE.SET_TOKEN('RECEIPT_NUM',x_receipt_num);
1802: FND_MESSAGE.SET_TOKEN('REASON',x_msg_data);
1803: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
1804: RAISE create_invoice_error;
1797: RETURN (x_tmp_invoice_num);
1798: EXCEPTION
1799: WHEN create_invoice_error THEN
1800: FND_MESSAGE.SET_NAME('PO','RCV_CREATE_INVOICE_NUM_ERROR');
1801: FND_MESSAGE.SET_TOKEN('RECEIPT_NUM',x_receipt_num);
1802: FND_MESSAGE.SET_TOKEN('REASON',x_msg_data);
1803: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
1804: RAISE create_invoice_error;
1805: WHEN OTHERS THEN
1798: EXCEPTION
1799: WHEN create_invoice_error THEN
1800: FND_MESSAGE.SET_NAME('PO','RCV_CREATE_INVOICE_NUM_ERROR');
1801: FND_MESSAGE.SET_TOKEN('RECEIPT_NUM',x_receipt_num);
1802: FND_MESSAGE.SET_TOKEN('REASON',x_msg_data);
1803: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
1804: RAISE create_invoice_error;
1805: WHEN OTHERS THEN
1806: po_message_s.sql_error ('create_invoice_num', x_progress, SQLCODE);
1799: WHEN create_invoice_error THEN
1800: FND_MESSAGE.SET_NAME('PO','RCV_CREATE_INVOICE_NUM_ERROR');
1801: FND_MESSAGE.SET_TOKEN('RECEIPT_NUM',x_receipt_num);
1802: FND_MESSAGE.SET_TOKEN('REASON',x_msg_data);
1803: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
1804: RAISE create_invoice_error;
1805: WHEN OTHERS THEN
1806: po_message_s.sql_error ('create_invoice_num', x_progress, SQLCODE);
1807: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
1803: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
1804: RAISE create_invoice_error;
1805: WHEN OTHERS THEN
1806: po_message_s.sql_error ('create_invoice_num', x_progress, SQLCODE);
1807: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
1808: RAISE;
1809: END create_invoice_num;
1810:
1811: /* =====================================================================
2772: ASN_DEBUG.put_line('group_id = ' || l_group_id);
2773: END IF;
2774:
2775: -- get invoice description
2776: FND_MESSAGE.set_name('PO', 'PO_INV_CR_USE_INVOICE_DESC');
2777: FND_MESSAGE.set_token('RUN_DATE', sysdate);
2778: l_invoice_desc := FND_MESSAGE.get;
2779:
2780: IF (g_asn_debug = 'Y') THEN
2773: END IF;
2774:
2775: -- get invoice description
2776: FND_MESSAGE.set_name('PO', 'PO_INV_CR_USE_INVOICE_DESC');
2777: FND_MESSAGE.set_token('RUN_DATE', sysdate);
2778: l_invoice_desc := FND_MESSAGE.get;
2779:
2780: IF (g_asn_debug = 'Y') THEN
2781: ASN_DEBUG.put_line('invoice_desc = ' || l_invoice_desc);
2774:
2775: -- get invoice description
2776: FND_MESSAGE.set_name('PO', 'PO_INV_CR_USE_INVOICE_DESC');
2777: FND_MESSAGE.set_token('RUN_DATE', sysdate);
2778: l_invoice_desc := FND_MESSAGE.get;
2779:
2780: IF (g_asn_debug = 'Y') THEN
2781: ASN_DEBUG.put_line('invoice_desc = ' || l_invoice_desc);
2782: END IF;
3051: SELECT ap_batches_s.nextval
3052: INTO l_tmp_batch_id
3053: FROM sys.dual;
3054:
3055: FND_MESSAGE.set_name('PO', 'PO_INV_CR_USE_BATCH_DESC');
3056: l_batch_name := FND_MESSAGE.get || '/' || TO_CHAR(sysdate) ||
3057: '/' || TO_CHAR(l_tmp_batch_id);
3058:
3059: IF (g_asn_debug = 'Y') THEN
3052: INTO l_tmp_batch_id
3053: FROM sys.dual;
3054:
3055: FND_MESSAGE.set_name('PO', 'PO_INV_CR_USE_BATCH_DESC');
3056: l_batch_name := FND_MESSAGE.get || '/' || TO_CHAR(sysdate) ||
3057: '/' || TO_CHAR(l_tmp_batch_id);
3058:
3059: IF (g_asn_debug = 'Y') THEN
3060: ASN_DEBUG.put_line('Batch name = ' || l_batch_name);
3077: END IF;
3078:
3079: l_progress := '140';
3080:
3081: FND_MESSAGE.set_name('PO', 'PO_ERS_CONC_REQUEST_CHECK');
3082: FND_MESSAGE.set_token('REQUEST', TO_CHAR(l_request_id));
3083: FND_MESSAGE.set_token('BATCH', l_batch_name);
3084: IF (g_asn_debug = 'Y') THEN
3085: ASN_DEBUG.put_line(FND_MESSAGE.get);
3078:
3079: l_progress := '140';
3080:
3081: FND_MESSAGE.set_name('PO', 'PO_ERS_CONC_REQUEST_CHECK');
3082: FND_MESSAGE.set_token('REQUEST', TO_CHAR(l_request_id));
3083: FND_MESSAGE.set_token('BATCH', l_batch_name);
3084: IF (g_asn_debug = 'Y') THEN
3085: ASN_DEBUG.put_line(FND_MESSAGE.get);
3086: END IF;
3079: l_progress := '140';
3080:
3081: FND_MESSAGE.set_name('PO', 'PO_ERS_CONC_REQUEST_CHECK');
3082: FND_MESSAGE.set_token('REQUEST', TO_CHAR(l_request_id));
3083: FND_MESSAGE.set_token('BATCH', l_batch_name);
3084: IF (g_asn_debug = 'Y') THEN
3085: ASN_DEBUG.put_line(FND_MESSAGE.get);
3086: END IF;
3087:
3081: FND_MESSAGE.set_name('PO', 'PO_ERS_CONC_REQUEST_CHECK');
3082: FND_MESSAGE.set_token('REQUEST', TO_CHAR(l_request_id));
3083: FND_MESSAGE.set_token('BATCH', l_batch_name);
3084: IF (g_asn_debug = 'Y') THEN
3085: ASN_DEBUG.put_line(FND_MESSAGE.get);
3086: END IF;
3087:
3088: END IF; -- l_distr_count > 0
3089: