1 PACKAGE CZ_REFS AS
2 /* $Header: czrefs.pls 120.0.12010000.2 2009/03/02 14:45:22 vsingava 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
37 PROCEDURE delete_Node
38 (p_ps_node_id IN INTEGER,
39 p_ps_node_type IN INTEGER,
40 p_out_err OUT NOCOPY INTEGER,
41 p_del_logically IN VARCHAR2 -- DEFAULT '1'
42 );
43
44 PROCEDURE move_Node
45 (p_from_ps_node_id IN INTEGER,
46 p_to_ps_node_id IN INTEGER,
47 p_project_id IN INTEGER,
48 p_out_err OUT NOCOPY INTEGER);
49
50 PROCEDURE CHECK_REF_REQUEST
51 (p_refroot_model_id IN INTEGER,
52 p_ref_parent_node_id IN INTEGER,
53 p_ref_target_model_id IN INTEGER,
54 p_out_status_code OUT NOCOPY INTEGER);
55
56 PROCEDURE get_Node_Up
57 (p_ps_node_id IN INTEGER,
58 p_project_id IN INTEGER,
59 p_out_ps_node_id IN OUT NOCOPY INTEGER,
60 p_out_expl_id IN OUT NOCOPY INTEGER,
61 p_out_level IN OUT NOCOPY INTEGER);
62
63 PROCEDURE get_Node_Down
64 (p_ps_node_id IN INTEGER,
65 p_project_id IN INTEGER,
66 p_out_ps_node_id IN OUT NOCOPY INTEGER,
67 p_out_expl_id IN OUT NOCOPY INTEGER,
68 p_out_level IN OUT NOCOPY INTEGER);
69
70 PROCEDURE add_Reference
71 (p_ps_node_id IN INTEGER,
72 p_to_model_id IN INTEGER,
73 p_containing_model_id IN INTEGER,
74 p_virtual_flag IN VARCHAR2,
75 p_out_err OUT NOCOPY INTEGER,
76 p_ps_type IN INTEGER DEFAULT NULL,
77 p_expl_node_type IN INTEGER -- DEFAULT MANDATORY_EXPL_TYPE
78 );
79
80 PROCEDURE change_structure(p_model_id IN INTEGER);
81
82 PROCEDURE SolutionBasedModelcheck
83 (p_model_id IN INTEGER,
84 p_instanciable OUT NOCOPY INTEGER);
85
86 PROCEDURE set_Trackable_Children_Flag(p_model_id IN NUMBER);
87
88 PROCEDURE update_child_nodes(p_model_id IN NUMBER);
89
90 PROCEDURE update_node_depth(p_model_id IN INTEGER);
91
92 PROCEDURE populate_COMPONENT_ID(p_model_id IN NUMBER);
93
94 PROCEDURE validate_Inst_Flag
95 (
96 p_ps_node_id IN NUMBER,
97 p_instantiable_flag IN NUMBER,
98 x_validation_flag OUT NOCOPY VARCHAR2,
99 x_run_id OUT NOCOPY NUMBER
100 );
101
102 -- PROCEDURE check_Inst_Rule
103 -- Called when a rule is about to be enabled. It checks the instantiable_flag of the node
104 -- on the RHS and the selected system property MinInstances/MaxInstances
105 --
106 -- IN
107 -- p_rule_id
108 -- OUT
109 -- x_inst_flag : current instantiable_flag of the node on the RHS of the rule, values
110 -- OPTIONAL_EXPL_TYPE, MANDATORY_EXPL_TYPE, CONNECTOR_EXPL_TYPE, MINMAX_EXPL_TYPE
111 -- x_sys_prop : system property contributed/consumed: MIN_RULE, MAX_RULE, NOT_MINMAX_RULE
112 -- x_validation_flag : cannot be enabled = NO_FLAG, can be enabled = YES_FLAG
113
114 PROCEDURE check_Inst_Rule
115 (
116 p_rule_id IN NUMBER,
117 x_inst_flag OUT NOCOPY NUMBER,
118 x_sys_prop OUT NOCOPY NUMBER,
119 x_validation_flag OUT NOCOPY VARCHAR2
120 );
121
122 --
123 -- vsingava bug7831246 02nd Mar '09
124 -- procedure which populates the set of explosions p_ps_node_id of p_model_id
125 -- to all model referencing it, up the entire model heirarchy. Usually called when a node
126 -- in structure is copied
127
128 PROCEDURE populate_parent_expl_tree
129 (
130 p_ps_node_id IN NUMBER, --ps_node_id of the new (root) node that
131 --has been created during copy operation with in struture
132 p_model_id IN NUMBER -- model_id of the model within which structure copy is being done
133 );
134 END;