20: x_object_version_number IN NUMBER
21: ) IS
22: l_success VARCHAR2(1) := 'N';
23: l_code varchar2(1);
24: cursor C1 is select '1' from ar_lookups a
25: where a.lookup_type = 'HZ_BUSINESS_OBJECTS' and
26: a.lookup_code = x_business_object_code;
27: cursor C2 is select '1' from ar_lookups b where
28: b.lookup_type = 'HZ_BUSINESS_OBJECTS' and
23: l_code varchar2(1);
24: cursor C1 is select '1' from ar_lookups a
25: where a.lookup_type = 'HZ_BUSINESS_OBJECTS' and
26: a.lookup_code = x_business_object_code;
27: cursor C2 is select '1' from ar_lookups b where
28: b.lookup_type = 'HZ_BUSINESS_OBJECTS' and
29: nvl( x_child_bo_code, b.lookup_code) = b.lookup_code;
30: BEGIN
31: OPEN C1;