1 PACKAGE CZ_REFS AUTHID CURRENT_USER AS
2 /* $Header: czrefs.pls 120.0.12010000.3 2010/04/28 20:26:01 lamrute ship $ */
3
4 OPTIONAL_EXPL_TYPE CONSTANT INTEGER:=1;
5 MANDATORY_EXPL_TYPE CONSTANT INTEGER:=2;
6 CONNECTOR_EXPL_TYPE CONSTANT INTEGER:=3;
7 MINMAX_EXPL_TYPE CONSTANT INTEGER:=4;
8
9 NOT_MIN_MAX_RULE CONSTANT INTEGER:=0;
10 MIN_RULE CONSTANT INTEGER:=1;
11 MAX_RULE CONSTANT INTEGER:=2;
12
13 NULL_VALUE CONSTANT INTEGER:=-1;
14 NO_FLAG CONSTANT VARCHAR2(1):='0';
15 YES_FLAG CONSTANT VARCHAR2(1):='1';
16
17 ERROR_CODE PLS_INTEGER:=0;
18
19 PROCEDURE IsNonVirtual
20 (p_ps_node_id IN INTEGER,
21 p_model_id IN INTEGER,
22 p_out_flag OUT NOCOPY INTEGER);
23
24 PROCEDURE check_Node
25 (p_ps_node_id IN INTEGER,
26 p_model_id IN INTEGER,
27 p_maximum IN INTEGER,
28 p_minimum IN INTEGER,
29 p_reference_id IN INTEGER,
30 p_out_err OUT NOCOPY INTEGER,
31 p_out_virtual_flag OUT NOCOPY INTEGER,
32 p_consequent_flag IN VARCHAR2 , -- DEFAULT '0',
33 p_expr_node_id IN INTEGER DEFAULT NULL,
34 p_ps_type IN INTEGER DEFAULT NULL,
35 p_expr_subtype IN INTEGER DEFAULT NULL,
36 p_skip_upd_nod_dep IN VARCHAR2 DEFAULT NO_FLAG);
37
38 PROCEDURE delete_Node
39 (p_ps_node_id IN INTEGER,
40 p_ps_node_type IN INTEGER,
41 p_out_err OUT NOCOPY INTEGER,
42 p_del_logically IN VARCHAR2 -- DEFAULT '1'
43 );
44
45 PROCEDURE move_Node
46 (p_from_ps_node_id IN INTEGER,
47 p_to_ps_node_id IN INTEGER,
48 p_project_id IN INTEGER,
49 p_out_err OUT NOCOPY INTEGER);
50
51 PROCEDURE CHECK_REF_REQUEST
52 (p_refroot_model_id IN INTEGER,
53 p_ref_parent_node_id IN INTEGER,
54 p_ref_target_model_id IN INTEGER,
55 p_out_status_code OUT NOCOPY INTEGER);
56
57 PROCEDURE get_Node_Up
58 (p_ps_node_id IN INTEGER,
59 p_project_id IN INTEGER,
60 p_out_ps_node_id IN OUT NOCOPY INTEGER,
61 p_out_expl_id IN OUT NOCOPY INTEGER,
62 p_out_level IN OUT NOCOPY INTEGER);
63
64 PROCEDURE get_Node_Down
65 (p_ps_node_id IN INTEGER,
66 p_project_id IN INTEGER,
67 p_out_ps_node_id IN OUT NOCOPY INTEGER,
68 p_out_expl_id IN OUT NOCOPY INTEGER,
69 p_out_level IN OUT NOCOPY INTEGER);
70
71 PROCEDURE add_Reference
72 (p_ps_node_id IN INTEGER,
73 p_to_model_id IN INTEGER,
74 p_containing_model_id IN INTEGER,
75 p_virtual_flag IN VARCHAR2,
76 p_out_err OUT NOCOPY INTEGER,
77 p_ps_type IN INTEGER DEFAULT NULL,
78 p_expl_node_type IN INTEGER -- DEFAULT MANDATORY_EXPL_TYPE
79 );
80
81 PROCEDURE change_structure(p_model_id IN INTEGER);
82
83 PROCEDURE SolutionBasedModelcheck
84 (p_model_id IN INTEGER,
85 p_instanciable OUT NOCOPY INTEGER);
86
87 PROCEDURE set_Trackable_Children_Flag(p_model_id IN NUMBER);
88
89 PROCEDURE update_child_nodes(p_model_id IN NUMBER);
90
91 PROCEDURE update_node_depth(p_model_id IN INTEGER DEFAULT NULL);
92
93 -- Bugfix 9446997
94 PROCEDURE reset_model_array ;
95
96 PROCEDURE populate_COMPONENT_ID(p_model_id IN NUMBER);
97
98 PROCEDURE validate_Inst_Flag
99 (
100 p_ps_node_id IN NUMBER,
101 p_instantiable_flag IN NUMBER,
102 x_validation_flag OUT NOCOPY VARCHAR2,
103 x_run_id OUT NOCOPY NUMBER
104 );
105
106 -- PROCEDURE check_Inst_Rule
107 -- Called when a rule is about to be enabled. It checks the instantiable_flag of the node
108 -- on the RHS and the selected system property MinInstances/MaxInstances
109 --
110 -- IN
111 -- p_rule_id
112 -- OUT
113 -- x_inst_flag : current instantiable_flag of the node on the RHS of the rule, values
114 -- OPTIONAL_EXPL_TYPE, MANDATORY_EXPL_TYPE, CONNECTOR_EXPL_TYPE, MINMAX_EXPL_TYPE
115 -- x_sys_prop : system property contributed/consumed: MIN_RULE, MAX_RULE, NOT_MINMAX_RULE
116 -- x_validation_flag : cannot be enabled = NO_FLAG, can be enabled = YES_FLAG
117
118 PROCEDURE check_Inst_Rule
119 (
120 p_rule_id IN NUMBER,
121 x_inst_flag OUT NOCOPY NUMBER,
122 x_sys_prop OUT NOCOPY NUMBER,
123 x_validation_flag OUT NOCOPY VARCHAR2
124 );
125
126 --
127 -- vsingava bug7831246 02nd Mar '09
128 -- procedure which populates the set of explosions p_ps_node_id of p_model_id
129 -- to all model referencing it, up the entire model heirarchy. Usually called when a node
130 -- in structure is copied
131
132 PROCEDURE populate_parent_expl_tree
133 (
134 p_ps_node_id IN NUMBER, --ps_node_id of the new (root) node that
135 --has been created during copy operation with in struture
136 p_model_id IN NUMBER -- model_id of the model within which structure copy is being done
137 );
138 END;