|
SQL> DECLARE
2
3
4 returnValue INTEGER;
5
6 BEGIN
7
8
9 returnValue := DBMS_PIPE.CREATE_PIPE('PLSQL$THREAD_ABORT', 20000 );
10
11
12 returnValue := DBMS_PIPE.CREATE_PIPE('PLSQL$THREAD_ABORT_LOCK', 20000 );
13
14
15 returnValue := DBMS_PIPE.CREATE_PIPE('PLSQL$THREAD_COMMIT', 20000 );
16
17
18 returnValue := DBMS_PIPE.CREATE_PIPE('PLSQL$THREAD_COMMIT_LOCK', 20000 );
19
20
21 returnValue := DBMS_PIPE.CREATE_PIPE('PLSQL$THREAD_COMPLETE', 20000 );
22
23
24 returnValue := DBMS_PIPE.CREATE_PIPE('PLSQL$THREAD_COMPLETE_LOCK', 20000 );
25
26
27 returnValue := DBMS_PIPE.CREATE_PIPE('PLSQL$THREAD_REGISTER', 20000 );
28
29
30 returnValue := DBMS_PIPE.CREATE_PIPE('PLSQL$THREAD_REGISTER_LOCK', 20000 );
31
32
33 IF (returnValue = 0) THEN
34 DBMS_OUTPUT.PUT_LINE('THREAD_PIPES are created.');
35 END IF;
36
37 EXCEPTION
38
39
40 WHEN others THEN
41 DBMS_OUTPUT.PUT_LINE(SQLERRM);
42 RETURN;
43
44 END;
45 /
THREAD_PIPES are created.
PL/SQL procedure successfully completed.
SQL>
SQL>
|