ORA-04021

Question

Hi all,
I am in trouble with a packaged function. Anyone could help me?
Package A
Function F (p1,p2,p3)
if p1 = 'C' then return p2+p3
else return p2-p3
Package B
Procedure G ()
INSERT /*+APPEND*/ INTO <table> NOLOGGING
(<columns>)
(SELECT A.F(c1,c2,c3), A.F(c3,c4,c5),...
FROM ...
WHERE ...)
When stored procedure B.G is executed, package A locks and procedure G dies with ...
CREATE OR REPLACE PACKAGE BODY B IS
ERROR at line 1:
ORA-04021: timeout occurred while waiting to lock object
User.B
Surprisingly (for me) if you put only one call to function A.F in the select then works fine.
Thanks in advance,
Lucas.

Answer 1

I'm assuming your bizarre syntax is some attempt at pseudo-code rather than what you're actually running. Alas, the devil must be in the details as what you are trying to do ought to work. Consequently you'll need to post your actual code if we are to figure out what's going wrong. The smallest possible test case that demonstrates the behaviour, please.
Cheers, APC
SQL> CREATE OR REPLACE PACKAGE aaa
  2  AS
  3      FUNCTION f
  4          (p1 IN VARCHAR2,p2 IN NUMBER,p3 IN NUMBER)
  5          RETURN NUMBER;
  6  END aaa;
  7  /
Package created.
SQL> CREATE OR REPLACE PACKAGE BODY aaa
  2  AS
  3      FUNCTION f
  4          (p1 IN VARCHAR2,p2 IN NUMBER,p3 IN NUMBER)
  5          RETURN NUMBER
  6      IS
  7      BEGIN
  8        IF p1 = 'C' THEN
  9              RETURN p2+p3;
10        ELSE
11              RETURN p2-p3;
12        END IF;
13      END f;
14  END aaa;
15  /
Package body created.
SQL>
SQL> DECLARE
  2      i NUMBER := 49382;
  3      j NUMBER := 2783;
  4      k NUMBER := 8293;
  5      l NUMBER := 7283;
  6  BEGIN
  7     INSERT INTO bt1 (col1, col2) VALUES ( aaa.f('C', i, j) , aaa.f('C', k, l));
  8  END;
  9  /
PL/SQL procedure successfully completed.
SQL>