1: package body PA_CI_SUPPLIER_PKG as
2: -- $Header: PACISIIB.pls 115.5 2002/12/02 23:35:18 riyengar noship $
3: PROCEDURE print_msg(p_msg varchar2) IS
4: BEGIN
5: --dbms_output.put_line('Log:'||p_msg);
51:
52: pa_debug.set_process('PLSQL','LOG',l_debug_mode);
53:
54: IF l_debug_mode = 'Y' THEN
55: print_msg('Inside pa_ci_supplier_pkg table handler..');
56: End IF;
57:
58: if (x_ci_transaction_id is null) then
59: open get_itemid;
292: BEGIN
293: null;
294: END lock_row;
295:
296: END PA_CI_SUPPLIER_PKG;