1: PACKAGE BODY PO_REQIMP_S AS
2: /* $Header: POXRQIMB.pls 120.6 2011/05/17 11:25:59 uchennam ship $*/
3:
4: --< Bug 3540365 Start >
5: g_bulk_limit CONSTANT NUMBER := 1000; -- Bulk collect limit in number of rows
318: END LOOP;
319: WHEN OTHERS THEN
320: -- Any other exception should be written to log with generic error msg.
321: FND_MSG_PUB.build_exc_msg
322: ( p_pkg_name => 'PO_REQIMP_S'
323: , p_procedure_name => 'default_trx_reason_codes-'||l_progress
324: );
325: FND_FILE.put_line(FND_FILE.log, FND_MESSAGE.get);
326: END default_trx_reason_codes;
627:
628: END REQIMPORT_DEF_VALIDATE_SEC_QTY;
629: --
630:
631: END PO_REQIMP_S;
632: