[Home] [Help]
PACKAGE BODY: APPS.XLE_ASSOCIATION_PKG
Source
1 PACKAGE BODY XLE_Association_PKG AS
2 /* $Header: xleasstb.pls 120.3 2006/03/09 09:16:58 apbalakr ship $ */
3
4 PROCEDURE Insert_Row(
5 x_association_id IN OUT NOCOPY NUMBER,
6 p_association_type_id IN NUMBER DEFAULT NULL,
7 p_subject_id IN NUMBER DEFAULT NULL,
8 p_subject_parent_id IN NUMBER DEFAULT NULL,
9 p_object_id IN NUMBER DEFAULT NULL,
10 p_effective_from IN DATE DEFAULT NULL,
11 p_effective_to IN DATE DEFAULT NULL,
12 p_assoc_information_context IN VARCHAR2 DEFAULT NULL,
13 p_assoc_information1 IN VARCHAR2 DEFAULT NULL,
14 p_assoc_information2 IN VARCHAR2 DEFAULT NULL,
15 p_assoc_information3 IN VARCHAR2 DEFAULT NULL,
16 p_assoc_information4 IN VARCHAR2 DEFAULT NULL,
17 p_assoc_information5 IN VARCHAR2 DEFAULT NULL,
18 p_assoc_information6 IN VARCHAR2 DEFAULT NULL,
19 p_assoc_information7 IN VARCHAR2 DEFAULT NULL,
20 p_assoc_information8 IN VARCHAR2 DEFAULT NULL,
21 p_assoc_information9 IN VARCHAR2 DEFAULT NULL,
22 p_assoc_information10 IN VARCHAR2 DEFAULT NULL,
23 p_assoc_information11 IN VARCHAR2 DEFAULT NULL,
24 p_assoc_information12 IN VARCHAR2 DEFAULT NULL,
25 p_assoc_information13 IN VARCHAR2 DEFAULT NULL,
26 p_assoc_information14 IN VARCHAR2 DEFAULT NULL,
27 p_assoc_information15 IN VARCHAR2 DEFAULT NULL,
28 p_assoc_information16 IN VARCHAR2 DEFAULT NULL,
29 p_assoc_information17 IN VARCHAR2 DEFAULT NULL,
30 p_assoc_information18 IN VARCHAR2 DEFAULT NULL,
31 p_assoc_information19 IN VARCHAR2 DEFAULT NULL,
32 p_assoc_information20 IN VARCHAR2 DEFAULT NULL,
33 p_object_version_number IN NUMBER DEFAULT NULL,
34 p_last_update_date IN DATE DEFAULT NULL,
35 p_last_updated_by IN NUMBER DEFAULT NULL,
36 p_creation_date IN DATE DEFAULT NULL,
37 p_created_by IN NUMBER DEFAULT NULL,
38 p_last_update_login IN NUMBER DEFAULT NULL
39
40 ) IS
41 BEGIN
42
43
44
45 INSERT INTO xle_associations (
46 association_id
47 ,association_type_id
48 ,subject_id
49 ,subject_parent_id
50 ,object_id
51 ,effective_from
52 ,effective_to
53 ,assoc_information_context
54 ,assoc_information1
55 ,assoc_information2
56 ,assoc_information3
57 ,assoc_information4
58 ,assoc_information5
59 ,assoc_information6
60 ,assoc_information7
61 ,assoc_information8
62 ,assoc_information9
63 ,assoc_information10
64 ,assoc_information11
65 ,assoc_information12
66 ,assoc_information13
67 ,assoc_information14
68 ,assoc_information15
69 ,assoc_information16
70 ,assoc_information17
71 ,assoc_information18
72 ,assoc_information19
73 ,assoc_information20
74 ,object_version_number
75 ,last_update_date
76 ,last_updated_by
77 ,creation_date
78 ,created_by
79 ,last_update_login
80 )
81 VALUES (
82 xle_associations_s.NEXTVAL
83 ,DECODE(p_association_type_id, FND_API.G_MISS_NUM, NULL, p_association_type_id)
84 ,DECODE(p_subject_id, FND_API.G_MISS_NUM, NULL, p_subject_id)
85 ,DECODE(p_subject_parent_id, FND_API.G_MISS_NUM, NULL, p_subject_parent_id)
86 ,DECODE(p_object_id, FND_API.G_MISS_NUM, NULL, p_object_id)
87 ,DECODE(p_association_type_id,10006,SYSDATE,DECODE(p_effective_from, FND_API.G_MISS_DATE, NULL, p_effective_from))
88 ,DECODE(p_effective_to, FND_API.G_MISS_DATE, NULL, p_effective_to)
89 ,DECODE(p_assoc_information_context, FND_API.G_MISS_CHAR, NULL, p_assoc_information_context)
90 ,DECODE(p_assoc_information1, FND_API.G_MISS_CHAR, NULL, p_assoc_information1)
91 ,DECODE(p_assoc_information2, FND_API.G_MISS_CHAR, NULL, p_assoc_information2)
92 ,DECODE(p_assoc_information3, FND_API.G_MISS_CHAR, NULL, p_assoc_information3)
93 ,DECODE(p_assoc_information4, FND_API.G_MISS_CHAR, NULL, p_assoc_information4)
94 ,DECODE(p_assoc_information5, FND_API.G_MISS_CHAR, NULL, p_assoc_information5)
95 ,DECODE(p_assoc_information6, FND_API.G_MISS_CHAR, NULL, p_assoc_information6)
96 ,DECODE(p_assoc_information7, FND_API.G_MISS_CHAR, NULL, p_assoc_information7)
97 ,DECODE(p_assoc_information8, FND_API.G_MISS_CHAR, NULL, p_assoc_information8)
98 ,DECODE(p_assoc_information9, FND_API.G_MISS_CHAR, NULL, p_assoc_information9)
99 ,DECODE(p_assoc_information10, FND_API.G_MISS_CHAR, NULL, p_assoc_information10)
100 ,DECODE(p_assoc_information11, FND_API.G_MISS_CHAR, NULL, p_assoc_information11)
101 ,DECODE(p_assoc_information12, FND_API.G_MISS_CHAR, NULL, p_assoc_information12)
102 ,DECODE(p_assoc_information13, FND_API.G_MISS_CHAR, NULL, p_assoc_information13)
103 ,DECODE(p_assoc_information14, FND_API.G_MISS_CHAR, NULL, p_assoc_information14)
104 ,DECODE(p_assoc_information15, FND_API.G_MISS_CHAR, NULL, p_assoc_information15)
105 ,DECODE(p_assoc_information16, FND_API.G_MISS_CHAR, NULL, p_assoc_information16)
106 ,DECODE(p_assoc_information17, FND_API.G_MISS_CHAR, NULL, p_assoc_information17)
107 ,DECODE(p_assoc_information18, FND_API.G_MISS_CHAR, NULL, p_assoc_information18)
108 ,DECODE(p_assoc_information19, FND_API.G_MISS_CHAR, NULL, p_assoc_information19)
109 ,DECODE(p_assoc_information20, FND_API.G_MISS_CHAR, NULL, p_assoc_information20)
110 ,DECODE(p_object_version_number, FND_API.G_MISS_NUM, NULL, p_object_version_number)
111 ,XLE_UTILITY_PUB.LAST_UPDATE_DATE
112 ,XLE_UTILITY_PUB.LAST_UPDATED_BY
113 ,XLE_UTILITY_PUB.CREATION_DATE
114 ,XLE_UTILITY_PUB.CREATED_BY
115 ,XLE_UTILITY_PUB.LAST_UPDATE_LOGIN
116 )
117 RETURNING
118 association_id
119 INTO
120 x_association_id;
121 END Insert_Row;
122
123 PROCEDURE Update_Row(
124 p_association_id IN NUMBER,
125 p_association_type_id IN NUMBER DEFAULT NULL,
126 p_subject_id IN NUMBER DEFAULT NULL,
127 p_subject_parent_id IN NUMBER DEFAULT NULL,
128 p_object_id IN NUMBER DEFAULT NULL,
129 p_effective_from IN DATE DEFAULT NULL,
130 p_effective_to IN DATE DEFAULT NULL,
131 p_assoc_information_context IN VARCHAR2 DEFAULT NULL,
132 p_assoc_information1 IN VARCHAR2 DEFAULT NULL,
133 p_assoc_information2 IN VARCHAR2 DEFAULT NULL,
134 p_assoc_information3 IN VARCHAR2 DEFAULT NULL,
135 p_assoc_information4 IN VARCHAR2 DEFAULT NULL,
136 p_assoc_information5 IN VARCHAR2 DEFAULT NULL,
137 p_assoc_information6 IN VARCHAR2 DEFAULT NULL,
138 p_assoc_information7 IN VARCHAR2 DEFAULT NULL,
139 p_assoc_information8 IN VARCHAR2 DEFAULT NULL,
140 p_assoc_information9 IN VARCHAR2 DEFAULT NULL,
141 p_assoc_information10 IN VARCHAR2 DEFAULT NULL,
142 p_assoc_information11 IN VARCHAR2 DEFAULT NULL,
143 p_assoc_information12 IN VARCHAR2 DEFAULT NULL,
144 p_assoc_information13 IN VARCHAR2 DEFAULT NULL,
145 p_assoc_information14 IN VARCHAR2 DEFAULT NULL,
146 p_assoc_information15 IN VARCHAR2 DEFAULT NULL,
147 p_assoc_information16 IN VARCHAR2 DEFAULT NULL,
148 p_assoc_information17 IN VARCHAR2 DEFAULT NULL,
149 p_assoc_information18 IN VARCHAR2 DEFAULT NULL,
150 p_assoc_information19 IN VARCHAR2 DEFAULT NULL,
151 p_assoc_information20 IN VARCHAR2 DEFAULT NULL,
152 p_object_version_number IN NUMBER DEFAULT NULL,
153 p_last_update_date IN DATE DEFAULT NULL,
154 p_last_updated_by IN NUMBER DEFAULT NULL,
155 p_last_update_login IN NUMBER DEFAULT NULL
156 )
157 IS
158 BEGIN
159 UPDATE xle_associations SET
160 association_type_id = DECODE(p_association_type_id, NULL, association_type_id, FND_API.G_MISS_NUM, NULL, p_association_type_id),
161 subject_id = DECODE(p_subject_id, NULL, subject_id, FND_API.G_MISS_NUM, NULL, p_subject_id),
162 subject_parent_id = DECODE(p_subject_parent_id, NULL, subject_parent_id, FND_API.G_MISS_NUM, NULL, p_subject_parent_id),
163 object_id = DECODE(p_object_id, NULL, object_id, FND_API.G_MISS_NUM, NULL, p_object_id),
164 effective_from = DECODE(p_effective_from, NULL, effective_from, FND_API.G_MISS_DATE, NULL, p_effective_from),
165 effective_to = DECODE(association_type_id,10006,SYSDATE-1/86400,DECODE(p_effective_to, NULL, effective_to, FND_API.G_MISS_DATE, NULL, p_effective_to)),
166 assoc_information_context = DECODE (p_assoc_information_context, NULL, assoc_information_context, FND_API.G_MISS_CHAR, NULL, p_assoc_information_context),
167 assoc_information1 = DECODE (p_assoc_information1, NULL, assoc_information1, FND_API.G_MISS_CHAR, NULL, p_assoc_information1),
168 assoc_information2 = DECODE (p_assoc_information2, NULL, assoc_information2, FND_API.G_MISS_CHAR, NULL, p_assoc_information2),
169 assoc_information3 = DECODE (p_assoc_information3, NULL, assoc_information3, FND_API.G_MISS_CHAR, NULL, p_assoc_information3),
170 assoc_information4 = DECODE (p_assoc_information4, NULL, assoc_information4, FND_API.G_MISS_CHAR, NULL, p_assoc_information4),
171 assoc_information5 = DECODE (p_assoc_information5, NULL, assoc_information5, FND_API.G_MISS_CHAR, NULL, p_assoc_information5),
172 assoc_information6 = DECODE (p_assoc_information6, NULL, assoc_information6, FND_API.G_MISS_CHAR, NULL, p_assoc_information6),
173 assoc_information7 = DECODE (p_assoc_information7, NULL, assoc_information7, FND_API.G_MISS_CHAR, NULL, p_assoc_information7),
174 assoc_information8 = DECODE (p_assoc_information8, NULL, assoc_information8, FND_API.G_MISS_CHAR, NULL, p_assoc_information8),
175 assoc_information9 = DECODE (p_assoc_information9, NULL, assoc_information9, FND_API.G_MISS_CHAR, NULL, p_assoc_information9),
176 assoc_information10 = DECODE (p_assoc_information10, NULL, assoc_information10, FND_API.G_MISS_CHAR, NULL, p_assoc_information10),
177 assoc_information11 = DECODE (p_assoc_information11, NULL, assoc_information11, FND_API.G_MISS_CHAR, NULL, p_assoc_information11),
178 assoc_information12 = DECODE (p_assoc_information12, NULL, assoc_information12, FND_API.G_MISS_CHAR, NULL, p_assoc_information12),
179 assoc_information13 = DECODE (p_assoc_information13, NULL, assoc_information13, FND_API.G_MISS_CHAR, NULL, p_assoc_information13),
180 assoc_information14 = DECODE (p_assoc_information14, NULL, assoc_information14, FND_API.G_MISS_CHAR, NULL, p_assoc_information14),
181 assoc_information15 = DECODE (p_assoc_information15, NULL, assoc_information15, FND_API.G_MISS_CHAR, NULL, p_assoc_information15),
182 assoc_information16 = DECODE (p_assoc_information16, NULL, assoc_information16, FND_API.G_MISS_CHAR, NULL, p_assoc_information16),
183 assoc_information17 = DECODE (p_assoc_information17, NULL, assoc_information17, FND_API.G_MISS_CHAR, NULL, p_assoc_information17),
184 assoc_information18 = DECODE (p_assoc_information18, NULL, assoc_information18, FND_API.G_MISS_CHAR, NULL, p_assoc_information18),
185 assoc_information19 = DECODE (p_assoc_information19, NULL, assoc_information19, FND_API.G_MISS_CHAR, NULL, p_assoc_information19),
186 assoc_information20 = DECODE (p_assoc_information20, NULL, assoc_information20, FND_API.G_MISS_CHAR, NULL, p_assoc_information20),
187 object_version_number = DECODE(p_object_version_number, NULL, object_version_number, FND_API.G_MISS_NUM, NULL, p_object_version_number),
188 last_update_date = NVL(p_last_update_date, XLE_UTILITY_PUB.LAST_UPDATE_DATE),
189 last_updated_by = NVL(p_last_updated_by, XLE_UTILITY_PUB.LAST_UPDATED_BY),
190 last_update_login = NVL(p_last_update_login, XLE_UTILITY_PUB.LAST_UPDATE_LOGIN)
191
192 WHERE association_id = p_association_id;
193
194 IF (sql%notfound) THEN
195 RAISE no_data_found;
196 END IF;
197 END Update_Row;
198
199 PROCEDURE Delete_Row(p_association_id IN NUMBER) IS
200 BEGIN
201 DELETE FROM xle_associations
202 WHERE association_id = p_association_id;
203
204 IF (sql%notfound) THEN
205 RAISE no_data_found;
206 END IF;
207 END Delete_Row;
208
209
210
211 PROCEDURE Lock_Row(
212 p_association_id IN NUMBER,
213 p_object_version_number IN NUMBER
214 ) IS
215 CURSOR C IS
216 SELECT * FROM xle_associations
217 WHERE association_id = p_association_id
218 FOR UPDATE OF association_id NOWAIT;
219 Recinfo C%ROWTYPE;
220 BEGIN
221
222 OPEN C;
223 FETCH C INTO Recinfo;
224 IF (C%NOTFOUND) THEN
225 CLOSE C;
226 FND_MESSAGE.Set_Name('XLE', 'XLE_API_NO_RECORD');
227 FND_MSG_PUB.ADD;
228 RAISE FND_API.G_EXC_ERROR;
229 END IF;
230 CLOSE C;
231
232 IF NOT
233 (
234 (p_object_version_number IS NULL AND Recinfo.object_version_number IS NULL)
235 OR
236 (p_object_version_number IS NOT NULL AND Recinfo.object_version_number IS NOT NULL AND
237 p_object_version_number = Recinfo.object_version_number)
238 )
239 THEN
240 FND_MESSAGE.Set_Name('XLE', 'XLE_API_RECORD_CHANGED');
241 FND_MSG_PUB.ADD;
242 RAISE FND_API.G_EXC_ERROR;
243 END IF;
244
245 END Lock_Row;
246
247 END XLE_Association_PKG;
248