1: PACKAGE BODY cn_obj_dblinks_v_pkg AS
2: -- $Header: cnredblb.pls 115.1 99/07/16 07:13:47 porting ship $
3:
4:
5: --
7: --
8:
9: PROCEDURE insert_row (
10: X_rowid OUT ROWID,
11: X_dblink_id cn_obj_dblinks_v.dblink_id%TYPE,
12: X_name cn_obj_dblinks_v.name%TYPE,
13: X_description cn_obj_dblinks_v.description%TYPE,
14: X_dependency_map_complete cn_obj_dblinks_v.dependency_map_complete%TYPE,
15: X_status cn_obj_dblinks_v.status%TYPE,
8:
9: PROCEDURE insert_row (
10: X_rowid OUT ROWID,
11: X_dblink_id cn_obj_dblinks_v.dblink_id%TYPE,
12: X_name cn_obj_dblinks_v.name%TYPE,
13: X_description cn_obj_dblinks_v.description%TYPE,
14: X_dependency_map_complete cn_obj_dblinks_v.dependency_map_complete%TYPE,
15: X_status cn_obj_dblinks_v.status%TYPE,
16: X_repository_id cn_obj_dblinks_v.repository_id%TYPE,
9: PROCEDURE insert_row (
10: X_rowid OUT ROWID,
11: X_dblink_id cn_obj_dblinks_v.dblink_id%TYPE,
12: X_name cn_obj_dblinks_v.name%TYPE,
13: X_description cn_obj_dblinks_v.description%TYPE,
14: X_dependency_map_complete cn_obj_dblinks_v.dependency_map_complete%TYPE,
15: X_status cn_obj_dblinks_v.status%TYPE,
16: X_repository_id cn_obj_dblinks_v.repository_id%TYPE,
17: X_connect_to_username cn_obj_dblinks_v.connect_to_username%TYPE,
10: X_rowid OUT ROWID,
11: X_dblink_id cn_obj_dblinks_v.dblink_id%TYPE,
12: X_name cn_obj_dblinks_v.name%TYPE,
13: X_description cn_obj_dblinks_v.description%TYPE,
14: X_dependency_map_complete cn_obj_dblinks_v.dependency_map_complete%TYPE,
15: X_status cn_obj_dblinks_v.status%TYPE,
16: X_repository_id cn_obj_dblinks_v.repository_id%TYPE,
17: X_connect_to_username cn_obj_dblinks_v.connect_to_username%TYPE,
18: X_connect_to_password cn_obj_dblinks_v.connect_to_password%TYPE,
11: X_dblink_id cn_obj_dblinks_v.dblink_id%TYPE,
12: X_name cn_obj_dblinks_v.name%TYPE,
13: X_description cn_obj_dblinks_v.description%TYPE,
14: X_dependency_map_complete cn_obj_dblinks_v.dependency_map_complete%TYPE,
15: X_status cn_obj_dblinks_v.status%TYPE,
16: X_repository_id cn_obj_dblinks_v.repository_id%TYPE,
17: X_connect_to_username cn_obj_dblinks_v.connect_to_username%TYPE,
18: X_connect_to_password cn_obj_dblinks_v.connect_to_password%TYPE,
19: X_connect_to_host cn_obj_dblinks_v.connect_to_host%TYPE,
12: X_name cn_obj_dblinks_v.name%TYPE,
13: X_description cn_obj_dblinks_v.description%TYPE,
14: X_dependency_map_complete cn_obj_dblinks_v.dependency_map_complete%TYPE,
15: X_status cn_obj_dblinks_v.status%TYPE,
16: X_repository_id cn_obj_dblinks_v.repository_id%TYPE,
17: X_connect_to_username cn_obj_dblinks_v.connect_to_username%TYPE,
18: X_connect_to_password cn_obj_dblinks_v.connect_to_password%TYPE,
19: X_connect_to_host cn_obj_dblinks_v.connect_to_host%TYPE,
20: X_seed_dblink_id cn_obj_dblinks_v.seed_dblink_id%TYPE) IS
13: X_description cn_obj_dblinks_v.description%TYPE,
14: X_dependency_map_complete cn_obj_dblinks_v.dependency_map_complete%TYPE,
15: X_status cn_obj_dblinks_v.status%TYPE,
16: X_repository_id cn_obj_dblinks_v.repository_id%TYPE,
17: X_connect_to_username cn_obj_dblinks_v.connect_to_username%TYPE,
18: X_connect_to_password cn_obj_dblinks_v.connect_to_password%TYPE,
19: X_connect_to_host cn_obj_dblinks_v.connect_to_host%TYPE,
20: X_seed_dblink_id cn_obj_dblinks_v.seed_dblink_id%TYPE) IS
21:
14: X_dependency_map_complete cn_obj_dblinks_v.dependency_map_complete%TYPE,
15: X_status cn_obj_dblinks_v.status%TYPE,
16: X_repository_id cn_obj_dblinks_v.repository_id%TYPE,
17: X_connect_to_username cn_obj_dblinks_v.connect_to_username%TYPE,
18: X_connect_to_password cn_obj_dblinks_v.connect_to_password%TYPE,
19: X_connect_to_host cn_obj_dblinks_v.connect_to_host%TYPE,
20: X_seed_dblink_id cn_obj_dblinks_v.seed_dblink_id%TYPE) IS
21:
22: X_primary_key cn_obj_dblinks_v.dblink_id%TYPE;
15: X_status cn_obj_dblinks_v.status%TYPE,
16: X_repository_id cn_obj_dblinks_v.repository_id%TYPE,
17: X_connect_to_username cn_obj_dblinks_v.connect_to_username%TYPE,
18: X_connect_to_password cn_obj_dblinks_v.connect_to_password%TYPE,
19: X_connect_to_host cn_obj_dblinks_v.connect_to_host%TYPE,
20: X_seed_dblink_id cn_obj_dblinks_v.seed_dblink_id%TYPE) IS
21:
22: X_primary_key cn_obj_dblinks_v.dblink_id%TYPE;
23: BEGIN
16: X_repository_id cn_obj_dblinks_v.repository_id%TYPE,
17: X_connect_to_username cn_obj_dblinks_v.connect_to_username%TYPE,
18: X_connect_to_password cn_obj_dblinks_v.connect_to_password%TYPE,
19: X_connect_to_host cn_obj_dblinks_v.connect_to_host%TYPE,
20: X_seed_dblink_id cn_obj_dblinks_v.seed_dblink_id%TYPE) IS
21:
22: X_primary_key cn_obj_dblinks_v.dblink_id%TYPE;
23: BEGIN
24:
18: X_connect_to_password cn_obj_dblinks_v.connect_to_password%TYPE,
19: X_connect_to_host cn_obj_dblinks_v.connect_to_host%TYPE,
20: X_seed_dblink_id cn_obj_dblinks_v.seed_dblink_id%TYPE) IS
21:
22: X_primary_key cn_obj_dblinks_v.dblink_id%TYPE;
23: BEGIN
24:
25: X_primary_key := X_dblink_id;
26: IF (X_primary_key IS NULL) THEN
28: INTO X_primary_key
29: FROM dual;
30: END IF;
31:
32: INSERT INTO cn_obj_dblinks_v (
33: dblink_id,
34: name,
35: description,
36: dependency_map_complete,
55: X_seed_dblink_id);
56:
57: SELECT ROWID
58: INTO X_rowid
59: FROM cn_obj_dblinks_v
60: WHERE dblink_id = X_primary_key;
61:
62: IF (SQL%NOTFOUND) THEN
63: RAISE NO_DATA_FOUND;
66: END insert_row;
67:
68:
69: PROCEDURE select_row (
70: recinfo IN OUT cn_obj_dblinks_v%ROWTYPE) IS
71: BEGIN
72: -- select row based on dblink_id (primary key)
73: IF (recinfo.dblink_id IS NOT NULL) THEN
74:
72: -- select row based on dblink_id (primary key)
73: IF (recinfo.dblink_id IS NOT NULL) THEN
74:
75: SELECT * INTO recinfo
76: FROM cn_obj_dblinks_v crosv
77: WHERE crosv.dblink_id = recinfo.dblink_id;
78:
79: END IF;
80: END select_row;
79: END IF;
80: END select_row;
81:
82:
83: END cn_obj_dblinks_v_pkg;