DBA Data[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