[Home] [Help]
PACKAGE BODY: APPS.PFT_BR_ACCT_REL_CONS_PVT
Source
1 PACKAGE BODY PFT_BR_ACCT_REL_CONS_PVT AS
2 /* $Header: PFTVACCB.pls 120.0 2005/06/06 18:59:47 appldev noship $ */
3
4 --------------------------------------------------------------------------------
5 -- PRIVATE CONSTANTS
6 --------------------------------------------------------------------------------
7
8 G_PKG_NAME CONSTANT VARCHAR2(30) := 'PFT_BR_ACCT_REL_CONS_PVT;';
9
10 --------------------------------------------------------------------------------
11 -- PRIVATE SPECIFICATIONS
12 --------------------------------------------------------------------------------
13
14 PROCEDURE CopyAcctRelConsRec(
15 p_source_obj_def_id IN NUMBER
16 ,p_target_obj_def_id IN NUMBER
17 ,p_created_by IN NUMBER
18 ,p_creation_date IN DATE
19 );
20
21 PROCEDURE DeleteAcctRelConsRec(
22 p_obj_def_id IN NUMBER
23 );
24
25 --------------------------------------------------------------------------------
26 -- PUBLIC BODIES
27 --------------------------------------------------------------------------------
28
29
30 --
31 -- PROCEDURE
32 -- CopyObjectDefinition
33 --
34 -- DESCRIPTION
35 -- Creates all the detail records of a new Account Relationship Consolidation Rule Definition (target)
36 -- by copying the detail records of another Account Relationship Consolidation Rule Definition (source).
37 --
38 -- IN
39 -- p_source_obj_def_id - Source Object Definition ID.
40 -- p_target_obj_def_id - Target Object Definition ID.
41 -- p_created_by - FND User ID (optional).
42 -- p_creation_date - System Date (optional).
43 --
44 --------------------------------------------------------------------------------
45 PROCEDURE CopyObjectDefinition(
46 p_source_obj_def_id IN NUMBER
47 ,p_target_obj_def_id IN NUMBER
48 ,p_created_by IN NUMBER
49 ,p_creation_date IN DATE
50 )
51 --------------------------------------------------------------------------------
52 IS
53
54 G_API_NAME CONSTANT VARCHAR2(30) := 'CopyObjectDefinition';
55
56 BEGIN
57
58
59 CopyAcctRelConsRec(
60 p_source_obj_def_id => p_source_obj_def_id
61 ,p_target_obj_def_id => p_target_obj_def_id
62 ,p_created_by => p_created_by
63 ,p_creation_date => p_creation_date
64 );
65
66
67 EXCEPTION
68
69 when others then
70 FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, G_API_NAME);
71 raise FND_API.G_EXC_UNEXPECTED_ERROR;
72
73 END CopyObjectDefinition;
74
75
76 --
77 -- PROCEDURE
78 -- DeleteObjectDefinition
79 --
80 -- DESCRIPTION
81 -- Deletes all the details records of a Account Relationship Consolidation Rule Definition.
82 --
83 -- IN
84 -- p_obj_def_id - Object Definition ID.
85 --
86 --------------------------------------------------------------------------------
87 PROCEDURE DeleteObjectDefinition(
88 p_obj_def_id IN NUMBER
89 )
90 --------------------------------------------------------------------------------
91 IS
92
93 G_API_NAME CONSTANT VARCHAR2(30) := 'DeleteObjectDefinition';
94
95 BEGIN
96
97 DeleteAcctRelConsRec(
98 p_obj_def_id => p_obj_def_id
99 );
100
101 EXCEPTION
102
103 when others then
104 FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, G_API_NAME);
105 raise FND_API.G_EXC_UNEXPECTED_ERROR;
106
107 END DeleteObjectDefinition;
108
109
110
111 --------------------------------------------------------------------------------
112 -- PRIVATE BODIES
113 --------------------------------------------------------------------------------
114
115
116
117 --
118 -- PROCEDURE
119 -- CopyAcctRelConsRec
120 --
121 -- DESCRIPTION
122 -- Creates a new Account Relationship Consolidation Rule Definition Formula by copying records in the
123 -- PFT_ACCT_REL_CONS_RULES table.
124 --
125 -- IN
126 -- p_source_obj_def_id - Source Object Definition ID.
127 -- p_target_obj_def_id - Target Object Definition ID.
128 -- p_created_by - FND User ID (optional).
129 -- p_creation_date - System Date (optional).
130 --
131 --------------------------------------------------------------------------------
132 PROCEDURE CopyAcctRelConsRec(
133 p_source_obj_def_id IN NUMBER
134 ,p_target_obj_def_id IN NUMBER
135 ,p_created_by IN NUMBER
136 ,p_creation_date IN DATE
137 )
138 --------------------------------------------------------------------------------
139 IS
140 BEGIN
141
142 INSERT INTO PFT_ACCT_REL_CONS_RULES (
143 acct_rel_cons_obj_def_id
144 ,processing_table
145 ,condition_obj_id
146 ,load_secondary_rel_flag
147 ,created_by
148 ,creation_date
149 ,last_updated_by
150 ,last_update_date
151 ,last_update_login
152 ,object_version_number
153 ,col_tmplt_obj_id
154 ) SELECT
155 p_target_obj_def_id
156 ,processing_table
157 ,condition_obj_id
158 ,load_secondary_rel_flag
159 ,NVL(p_created_by,created_by)
160 ,NVL(p_creation_date,creation_date)
161 ,FND_GLOBAL.user_id
162 ,SYSDATE
163 ,FND_GLOBAL.login_id
164 ,object_version_number
165 ,col_tmplt_obj_id
166 FROM pft_acct_rel_cons_rules
167 WHERE acct_rel_cons_obj_def_id = p_source_obj_def_id;
168
169 END CopyAcctRelConsRec;
170
171 --
172 -- PROCEDURE
173 -- DeletAcctRelConsRec
174 --
175 -- DESCRIPTION
176 -- Deletes a Account Relationship Consolidation Rule Definition by performing deletes on records
177 -- in the PFT_ACCT_REL_CONS_RULES table.
178 --
179 -- IN
180 -- p_obj_def_id - Object Definition ID.
181 --
182 --------------------------------------------------------------------------------
183 PROCEDURE DeleteAcctRelConsRec(
184 p_obj_def_id IN NUMBER
185 )
186 --------------------------------------------------------------------------------
187 IS
188 BEGIN
189
190 DELETE FROM pft_acct_rel_cons_rules
191 WHERE acct_rel_cons_obj_def_id = p_obj_def_id;
192
193 END DeleteAcctRelConsRec;
194
195
196 END PFT_BR_ACCT_REL_CONS_PVT;