1 PACKAGE cz_pb_sync_util AUTHID CURRENT_USER AS
2 /* $Header: czclouts.pls 120.2 2005/11/30 08:43:49 qmao ship $ */
3
4 TYPE t_messageRecord IS RECORD (
5 msg_text cz_db_logs.message%TYPE,
6 called_proc cz_db_logs.caller%TYPE,
7 sql_code cz_db_logs.statuscode%TYPE
8 );
9
10 TYPE t_ref IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
11 TYPE message_list IS TABLE OF t_messageRecord INDEX BY BINARY_INTEGER;
12 v_msg_tbl message_list;
13
14 ----constant declarations used in resync package
15 RESYNC_SUCCESS CONSTANT VARCHAR2(3) := 'ERR';
16 RESYNC_FAILURE CONSTANT VARCHAR2(3) := 'OK';
17
18 FUNCTION get_run_id RETURN NUMBER;
19
20 PROCEDURE log_pb_sync_errors(p_msg_tbl IN message_list,p_run_id IN NUMBER);
21
22 FUNCTION retrieve_link_name(p_tgt_server_id cz_servers.server_local_id%TYPE)
23 RETURN VARCHAR2;
24
25 FUNCTION get_target_instance_id(p_target_instance IN VARCHAR2)
26 RETURN NUMBER;
27
28 FUNCTION check_db_link(p_db_link_name IN cz_servers.fndnam_link_name%TYPE)
29 RETURN BOOLEAN;
30
31 FUNCTION validate_schema(target_server_id cz_servers.server_local_id%TYPE)
32 RETURN BOOLEAN;
33
34 -- Returns the process name if there is a pub sync or publishing process running
35 -- Returns null otherwise
36 FUNCTION check_process RETURN VARCHAR2;
37 PROCEDURE set_dbms_info(p_module_name IN VARCHAR2);
38
39 PROCEDURE reset_dbms_info;
40
41 PROCEDURE verify_tgt_server(p_link_name IN cz_servers.fndnam_link_name%TYPE,
42 x_status OUT NOCOPY VARCHAR2,
43 x_msg OUT NOCOPY VARCHAR2);
44
45
46 PROCEDURE verify_mig_tgt_server(p_link_name IN cz_servers.fndnam_link_name%TYPE,
47 x_status OUT NOCOPY VARCHAR2,
48 x_msg OUT NOCOPY VARCHAR2);
49 END cz_pb_sync_util;