1: PACKAGE utl_recomp IS
2:
3: $if utl_ident.is_oracle_server <> TRUE and
4: utl_ident.is_timesten <> TRUE $then
5: $error 'utl_recomp is not supported in this environment' $end
6: $end
7:
1: PACKAGE utl_recomp IS
2:
3: $if utl_ident.is_oracle_server <> TRUE and
4: utl_ident.is_timesten <> TRUE $then
5: $error 'utl_recomp is not supported in this environment' $end
6: $end
7:
8: /*
97: * This is an internal function that runs in each parallel thread.
98: * It picks up any remaining invalid objects from utl_recomp_sorted
99: * and recompiles them.
100: */
101: $if utl_ident.is_oracle_server $then
102: PROCEDURE parallel_slave(flags PLS_INTEGER);
103: $else
104: /* parallel_slave is not supported */
105: $end