PACKAGE: APPS.CZ_PS_COPY

Source

1 PACKAGE cz_ps_copy AUTHID CURRENT_USER AS
2 /*	$Header: czpscps.pls 115.26 2002/12/02 23:31:00 qmao ship $		*/
3 
4 TYPE SeqRecord     IS RECORD(id INTEGER,name VARCHAR2(50));
5 TYPE SequenceArray IS TABLE OF SeqRecord INDEX BY BINARY_INTEGER;
6 TYPE FlowId        IS TABLE OF INTEGER INDEX BY BINARY_INTEGER;
7 
8 INCREMENT          INTEGER:=20;
9 NEW_PROJECT_ID     INTEGER:=0;
10 OLD_PROJECT_ID     INTEGER;
11 GLOBAL_RUN_ID      INTEGER;
12 NULL_              CONSTANT INTEGER:=-1;
13 NO_FLAG            CONSTANT VARCHAR2(1):='0';
14 YES_FLAG           CONSTANT VARCHAR2(1):='1';
15 REFRENCE_NODE_TYPE CONSTANT INTEGER:=263;
16 
17 FlowId_PS_NODE         FlowId;
18 FlowId_INTL_TEXT       FlowId;
19 FlowId_EXPRESSION      FlowId;
20 FlowId_EXPRESSION_NODE FlowId;
21 FlowId_FILTER_SET      FlowId;
22 FlowId_RULE            FlowId;
23 FlowId_SUB_CON_SET     FlowId;
24 FlowId_POPULATOR       FlowId;
25 FlowId_GRID_DEF        FlowId;
26 FlowId_GRID_COL        FlowId;
27 FlowId_GRID_CELL       FlowId;
28 FlowId_UI_DEF          FlowId;
29 FlowId_UI_NODE         FlowId;
30 FlowId_FUNC_COMP_SPEC  FlowId;
31 FlowId_RULE_FOLDER     FlowId;
32 FlowId_MODEL_REF_EXPL  FlowId;
33 
34 Sequences          SequenceArray;
35 
36 PROCEDURE Project_Copy
37 (p_old_id      IN  INTEGER,
38  p_new_id      IN  OUT NOCOPY  INTEGER,
39  p_Copy_Rules  IN  VARCHAR2 , -- DEFAULT '1',
40  p_Copy_UI     IN  VARCHAR2 , -- DEFAULT '1',
41  p_name        IN  VARCHAR2 DEFAULT NULL,
42  p_folder_id   IN  INTEGER  DEFAULT NULL
43 );
44 
45 PROCEDURE Copy_PS_NODE_subtree
46 (p_project_id     IN     INTEGER,
47  p_parent_id      IN     INTEGER,
48  p_new_project_id IN     INTEGER,
49  p_out_new_root   IN OUT NOCOPY INTEGER,
50  p_new_parent_id  IN     INTEGER DEFAULT NULL);
51 
52 PROCEDURE Copy_RULES_subschema
53 (p_rule_id             IN   INTEGER,
54  p_out_new_rule_id     OUT NOCOPY  INTEGER,
55  p_FUNC_COMP_Flag      IN   VARCHAR2 , -- DEFAULT '0',
56  p_rule_folder_id      IN   INTEGER  DEFAULT NULL,
57  p_Rules_Seq_Flag      IN   VARCHAR2   -- DEFAULT '0'
58 );
59 
60 PROCEDURE COPY_FUNC_COMPANION
61 (p_func_comp_id         IN      INTEGER,
62  p_project_id           IN      INTEGER,
63  p_new_rule_folder_id   IN      INTEGER  DEFAULT NULL,
64  p_out_new_func_comp_id IN OUT NOCOPY  INTEGER );
65 
66 PROCEDURE copy_RULE_SEQ
67 (p_rule_seq_id     IN INTEGER,
68  p_new_rule_seq_id IN OUT NOCOPY INTEGER);
69 
70 PROCEDURE Test
71 (p_id        IN INTEGER,
72  p_Rules     IN VARCHAR2 , -- DEFAULT '1',
73  p_UI        IN VARCHAR2 , -- DEFAULT '1',
74  p_folder_id IN INTEGER    -- DEFAULT -1
75 );
76 
77 END cz_ps_copy;