398: --
399: i := 0;
400: l_create_intr_sr := FALSE;
401:
402: fnd_message.set_name('CSD','CSD_BULK_RCV_SERIAL_CONC_LABEL');
403: l_serial_label := fnd_message.get;
404:
405: fnd_message.set_name('CSD','CSD_BULK_RCV_ITEM_CONC_LABEL');
406: l_item_label := fnd_message.get;
399: i := 0;
400: l_create_intr_sr := FALSE;
401:
402: fnd_message.set_name('CSD','CSD_BULK_RCV_SERIAL_CONC_LABEL');
403: l_serial_label := fnd_message.get;
404:
405: fnd_message.set_name('CSD','CSD_BULK_RCV_ITEM_CONC_LABEL');
406: l_item_label := fnd_message.get;
407:
401:
402: fnd_message.set_name('CSD','CSD_BULK_RCV_SERIAL_CONC_LABEL');
403: l_serial_label := fnd_message.get;
404:
405: fnd_message.set_name('CSD','CSD_BULK_RCV_ITEM_CONC_LABEL');
406: l_item_label := fnd_message.get;
407:
408: fnd_message.set_name('CSD','CSD_BULK_RCV_QTY_CONC_LABEL');
409: l_qty_label := fnd_message.get;
402: fnd_message.set_name('CSD','CSD_BULK_RCV_SERIAL_CONC_LABEL');
403: l_serial_label := fnd_message.get;
404:
405: fnd_message.set_name('CSD','CSD_BULK_RCV_ITEM_CONC_LABEL');
406: l_item_label := fnd_message.get;
407:
408: fnd_message.set_name('CSD','CSD_BULK_RCV_QTY_CONC_LABEL');
409: l_qty_label := fnd_message.get;
410:
404:
405: fnd_message.set_name('CSD','CSD_BULK_RCV_ITEM_CONC_LABEL');
406: l_item_label := fnd_message.get;
407:
408: fnd_message.set_name('CSD','CSD_BULK_RCV_QTY_CONC_LABEL');
409: l_qty_label := fnd_message.get;
410:
411: For c_create_intr_sr_rec in c_create_intr_sr (p_transaction_number)
412: Loop
405: fnd_message.set_name('CSD','CSD_BULK_RCV_ITEM_CONC_LABEL');
406: l_item_label := fnd_message.get;
407:
408: fnd_message.set_name('CSD','CSD_BULK_RCV_QTY_CONC_LABEL');
409: l_qty_label := fnd_message.get;
410:
411: For c_create_intr_sr_rec in c_create_intr_sr (p_transaction_number)
412: Loop
413:
1718:
1719: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1720: -- write message to log file indicating the failure of the concurrent program,
1721: -- return error retcode
1722: errbuf := FND_MESSAGE.GET_STRING('CSD','CSD_BULK_RECEIVE_FAILURE');
1723: retcode := c_error;
1724:
1725: WHEN FND_API.G_EXC_ERROR THEN
1726: -- write message to log file indicating the failure of the concurrent program,
1724:
1725: WHEN FND_API.G_EXC_ERROR THEN
1726: -- write message to log file indicating the failure of the concurrent program,
1727: -- return error retcode
1728: errbuf := FND_MESSAGE.GET_STRING('CSD','CSD_BULK_RECEIVE_FAILURE');
1729: retcode := c_error;
1730:
1731: WHEN OTHERS THEN
1732: -- Add Unexpected Error to Message List, here SQLERRM is used for
1761:
1762: -- write message to log file indicating the failure of the concurrent program,
1763: -- return error retcode
1764:
1765: errbuf := FND_MESSAGE.GET_STRING('CSD','CSD_BULK_RECEIVE_FAILURE');
1766: retcode := c_error ;
1767:
1768: END process_bulk_receive_items;
1769: