DBA Data[Home] [Help]

PACKAGE BODY: APPS.CSI_T_II_RELATIONSHIPS_PKG

Source


1 PACKAGE BODY CSI_T_II_RELATIONSHIPS_PKG as
2 /* $Header: csittiib.pls 115.9 2003/09/02 20:06:47 epajaril ship $ */
3 -- Package name     : CSI_T_II_RELATIONSHIPS_PKG
4 -- Purpose          : Table Handler for csi_t_ii_relationships
5 -- History          : brmanesh created 12-MAY-2001
6 --                  : epajaril added the transfer_components 26-AUG-2003
7 -- NOTE             :
8 
9 G_PKG_NAME CONSTANT VARCHAR2(30):= 'CSI_T_II_RELATIONSHIPS_PKG';
10 G_FILE_NAME CONSTANT VARCHAR2(12) := 'csittiib.pls';
11 
12 ---Added (Start) for m-to-m enhancements
13 --New columns p_OBJECT_TYPE , p_SUBJECT_TYPE added
14 --and due to this there are changes at various modules
15 ---Added (End) for m-to-m enhancements
16 
17 PROCEDURE Insert_Row(
18           px_TXN_RELATIONSHIP_ID   IN OUT NOCOPY NUMBER,
19           p_TRANSACTION_LINE_ID    NUMBER,
20           p_OBJECT_TYPE VARCHAR2 ,
21           p_OBJECT_ID    NUMBER,
22           p_RELATIONSHIP_TYPE_CODE    VARCHAR2,
23           p_DISPLAY_ORDER    NUMBER,
24           p_POSITION_REFERENCE    VARCHAR2,
25           p_MANDATORY_FLAG    VARCHAR2,
26           p_ACTIVE_START_DATE    DATE,
27           p_ACTIVE_END_DATE    DATE,
28           p_CSI_INST_RELATIONSHIP_ID    NUMBER,
29           p_SUBJECT_TYPE  VARCHAR2 ,
30           p_SUBJECT_ID    NUMBER,
31           p_SUB_CONFIG_INST_HDR_ID  NUMBER ,
32           p_SUB_CONFIG_INST_REV_NUM NUMBER ,
33           p_SUB_CONFIG_INST_ITEM_ID NUMBER ,
34           p_OBJ_CONFIG_INST_HDR_ID  NUMBER ,
35           p_OBJ_CONFIG_INST_REV_NUM NUMBER ,
36           p_OBJ_CONFIG_INST_ITEM_ID NUMBER ,
37           p_TARGET_COMMITMENT_DATE  DATE   ,
38           p_ATTRIBUTE1    VARCHAR2,
39           p_ATTRIBUTE2    VARCHAR2,
40           p_ATTRIBUTE3    VARCHAR2,
41           p_ATTRIBUTE4    VARCHAR2,
42           p_ATTRIBUTE5    VARCHAR2,
43           p_ATTRIBUTE6    VARCHAR2,
44           p_ATTRIBUTE7    VARCHAR2,
45           p_ATTRIBUTE8    VARCHAR2,
46           p_ATTRIBUTE9    VARCHAR2,
47           p_ATTRIBUTE10    VARCHAR2,
48           p_ATTRIBUTE11    VARCHAR2,
49           p_ATTRIBUTE12    VARCHAR2,
50           p_ATTRIBUTE13    VARCHAR2,
51           p_ATTRIBUTE14    VARCHAR2,
52           p_ATTRIBUTE15    VARCHAR2,
53           p_CREATED_BY    NUMBER,
54           p_CREATION_DATE    DATE,
55           p_LAST_UPDATED_BY    NUMBER,
56           p_LAST_UPDATE_DATE    DATE,
57           p_LAST_UPDATE_LOGIN    NUMBER,
58           p_OBJECT_VERSION_NUMBER    NUMBER,
59           p_CONTEXT    VARCHAR2,
60           p_TRANSFER_COMPONENTS_FLAG  VARCHAR2)
61 
62  IS
63    CURSOR C2 IS SELECT CSI_T_II_RELATIONSHIPS_S.nextval FROM sys.dual;
64 BEGIN
65    If (px_TXN_RELATIONSHIP_ID IS NULL) OR (px_TXN_RELATIONSHIP_ID = FND_API.G_MISS_NUM) then
66        OPEN C2;
67        FETCH C2 INTO px_TXN_RELATIONSHIP_ID;
68        CLOSE C2;
69    End If;
70    INSERT INTO CSI_T_II_RELATIONSHIPS(
71            TXN_RELATIONSHIP_ID,
72            TRANSACTION_LINE_ID,
73            OBJECT_TYPE ,
74            OBJECT_ID,
75            RELATIONSHIP_TYPE_CODE,
76            DISPLAY_ORDER,
77            POSITION_REFERENCE,
78            MANDATORY_FLAG,
79            ACTIVE_START_DATE,
80            ACTIVE_END_DATE,
81            CSI_INST_RELATIONSHIP_ID,
82            SUBJECT_TYPE ,
83            SUBJECT_ID,
84            SUB_CONFIG_INST_HDR_ID ,
85            SUB_CONFIG_INST_REV_NUM  ,
86            SUB_CONFIG_INST_ITEM_ID  ,
87            OBJ_CONFIG_INST_HDR_ID    ,
88            OBJ_CONFIG_INST_REV_NUM  ,
89            OBJ_CONFIG_INST_ITEM_ID ,
90            TARGET_COMMITMENT_DATE ,
91            ATTRIBUTE1,
92            ATTRIBUTE2,
93            ATTRIBUTE3,
94            ATTRIBUTE4,
95            ATTRIBUTE5,
96            ATTRIBUTE6,
97            ATTRIBUTE7,
98            ATTRIBUTE8,
99            ATTRIBUTE9,
100            ATTRIBUTE10,
101            ATTRIBUTE11,
102            ATTRIBUTE12,
103            ATTRIBUTE13,
104            ATTRIBUTE14,
105            ATTRIBUTE15,
106            CREATED_BY,
107            CREATION_DATE,
108            LAST_UPDATED_BY,
109            LAST_UPDATE_DATE,
110            LAST_UPDATE_LOGIN,
111            OBJECT_VERSION_NUMBER,
112            CONTEXT,
113            TRANSFER_COMPONENTS_FLAG
114           ) VALUES (
115            px_TXN_RELATIONSHIP_ID,
116            decode( p_TRANSACTION_LINE_ID, FND_API.G_MISS_NUM, NULL, p_TRANSACTION_LINE_ID),
117            decode( p_OBJECT_TYPE, FND_API.G_MISS_CHAR, NULL, p_OBJECT_TYPE),
118            decode( p_OBJECT_ID, FND_API.G_MISS_NUM, NULL, p_OBJECT_ID),
119            decode( p_RELATIONSHIP_TYPE_CODE, FND_API.G_MISS_CHAR, NULL, p_RELATIONSHIP_TYPE_CODE),
120            decode( p_DISPLAY_ORDER, FND_API.G_MISS_NUM, NULL, p_DISPLAY_ORDER),
121            decode( p_POSITION_REFERENCE, FND_API.G_MISS_CHAR, NULL, p_POSITION_REFERENCE),
122            decode( p_MANDATORY_FLAG, FND_API.G_MISS_CHAR, NULL, p_MANDATORY_FLAG),
123            decode( p_ACTIVE_START_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL), p_ACTIVE_START_DATE),
124            decode( p_ACTIVE_END_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL), p_ACTIVE_END_DATE),
125            decode( p_CSI_INST_RELATIONSHIP_ID, FND_API.G_MISS_NUM, NULL, p_CSI_INST_RELATIONSHIP_ID),
126            decode( p_SUBJECT_TYPE, FND_API.G_MISS_CHAR, NULL, p_SUBJECT_TYPE),
127            decode( p_SUBJECT_ID, FND_API.G_MISS_NUM, NULL, p_SUBJECT_ID),
128            decode( p_SUB_CONFIG_INST_HDR_ID, FND_API.G_MISS_NUM, NULL, p_SUB_CONFIG_INST_HDR_ID),
129            decode( p_SUB_CONFIG_INST_REV_NUM, FND_API.G_MISS_NUM, NULL, p_SUB_CONFIG_INST_REV_NUM),
130            decode( p_SUB_CONFIG_INST_ITEM_ID, FND_API.G_MISS_NUM, NULL, p_SUB_CONFIG_INST_ITEM_ID),
131            decode( p_OBJ_CONFIG_INST_HDR_ID, FND_API.G_MISS_NUM, NULL, p_OBJ_CONFIG_INST_HDR_ID),
132            decode( p_OBJ_CONFIG_INST_REV_NUM, FND_API.G_MISS_NUM, NULL, p_OBJ_CONFIG_INST_REV_NUM),
133            decode( p_OBJ_CONFIG_INST_ITEM_ID, FND_API.G_MISS_NUM, NULL, p_OBJ_CONFIG_INST_ITEM_ID),
134            decode( p_TARGET_COMMITMENT_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL), p_TARGET_COMMITMENT_DATE),
135            decode( p_ATTRIBUTE1, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE1),
136            decode( p_ATTRIBUTE2, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE2),
137            decode( p_ATTRIBUTE3, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE3),
138            decode( p_ATTRIBUTE4, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE4),
139            decode( p_ATTRIBUTE5, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE5),
140            decode( p_ATTRIBUTE6, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE6),
141            decode( p_ATTRIBUTE7, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE7),
142            decode( p_ATTRIBUTE8, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE8),
143            decode( p_ATTRIBUTE9, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE9),
144            decode( p_ATTRIBUTE10, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE10),
145            decode( p_ATTRIBUTE11, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE11),
146            decode( p_ATTRIBUTE12, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE12),
147            decode( p_ATTRIBUTE13, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE13),
148            decode( p_ATTRIBUTE14, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE14),
149            decode( p_ATTRIBUTE15, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE15),
150            decode( p_CREATED_BY, FND_API.G_MISS_NUM, NULL, p_CREATED_BY),
151            decode( p_CREATION_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL), p_CREATION_DATE),
152            decode( p_LAST_UPDATED_BY, FND_API.G_MISS_NUM, NULL, p_LAST_UPDATED_BY),
153            decode( p_LAST_UPDATE_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL), p_LAST_UPDATE_DATE),
154            decode( p_LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL, p_LAST_UPDATE_LOGIN),
155            decode( p_OBJECT_VERSION_NUMBER, FND_API.G_MISS_NUM, NULL, p_OBJECT_VERSION_NUMBER),
156            decode( p_CONTEXT, FND_API.G_MISS_CHAR, NULL, p_CONTEXT),
157            decode( p_TRANSFER_COMPONENTS_FLAG, FND_API.G_MISS_CHAR, NULL, p_TRANSFER_COMPONENTS_FLAG));
158 End Insert_Row;
159 
160 PROCEDURE Update_Row(
161           p_TXN_RELATIONSHIP_ID    NUMBER,
162           p_TRANSACTION_LINE_ID    NUMBER,
163           p_OBJECT_TYPE VARCHAR2 ,
164           p_OBJECT_ID    NUMBER,
165           p_RELATIONSHIP_TYPE_CODE    VARCHAR2,
166           p_DISPLAY_ORDER    NUMBER,
167           p_POSITION_REFERENCE    VARCHAR2,
168           p_MANDATORY_FLAG    VARCHAR2,
169           p_ACTIVE_START_DATE    DATE,
170           p_ACTIVE_END_DATE    DATE,
171           p_CSI_INST_RELATIONSHIP_ID    NUMBER,
172           p_SUBJECT_TYPE  VARCHAR2 ,
173           p_SUBJECT_ID    NUMBER,
174           p_SUB_CONFIG_INST_HDR_ID  NUMBER ,
175           p_SUB_CONFIG_INST_REV_NUM NUMBER ,
176           p_SUB_CONFIG_INST_ITEM_ID NUMBER ,
177           p_OBJ_CONFIG_INST_HDR_ID  NUMBER ,
178           p_OBJ_CONFIG_INST_REV_NUM NUMBER ,
179           p_OBJ_CONFIG_INST_ITEM_ID NUMBER ,
180           p_TARGET_COMMITMENT_DATE  DATE   ,
181           p_ATTRIBUTE1    VARCHAR2,
182           p_ATTRIBUTE2    VARCHAR2,
183           p_ATTRIBUTE3    VARCHAR2,
184           p_ATTRIBUTE4    VARCHAR2,
185           p_ATTRIBUTE5    VARCHAR2,
186           p_ATTRIBUTE6    VARCHAR2,
187           p_ATTRIBUTE7    VARCHAR2,
188           p_ATTRIBUTE8    VARCHAR2,
189           p_ATTRIBUTE9    VARCHAR2,
190           p_ATTRIBUTE10    VARCHAR2,
191           p_ATTRIBUTE11    VARCHAR2,
192           p_ATTRIBUTE12    VARCHAR2,
193           p_ATTRIBUTE13    VARCHAR2,
194           p_ATTRIBUTE14    VARCHAR2,
195           p_ATTRIBUTE15    VARCHAR2,
196           p_CREATED_BY    NUMBER,
197           p_CREATION_DATE    DATE,
198           p_LAST_UPDATED_BY    NUMBER,
199           p_LAST_UPDATE_DATE    DATE,
200           p_LAST_UPDATE_LOGIN    NUMBER,
201           p_OBJECT_VERSION_NUMBER    NUMBER,
202           p_CONTEXT    VARCHAR2,
203           p_TRANSFER_COMPONENTS_FLAG VARCHAR2)
204 
205  IS
206  BEGIN
207     Update CSI_T_II_RELATIONSHIPS
208     SET
209               TRANSACTION_LINE_ID = decode( p_TRANSACTION_LINE_ID, FND_API.G_MISS_NUM, TRANSACTION_LINE_ID, p_TRANSACTION_LINE_ID),
210               OBJECT_TYPE = decode( OBJECT_TYPE, FND_API.G_MISS_CHAR, OBJECT_TYPE, p_OBJECT_TYPE) ,
211               OBJECT_ID = decode( p_OBJECT_ID, FND_API.G_MISS_NUM, OBJECT_ID, p_OBJECT_ID),
212               RELATIONSHIP_TYPE_CODE = decode( p_RELATIONSHIP_TYPE_CODE, FND_API.G_MISS_CHAR, RELATIONSHIP_TYPE_CODE, p_RELATIONSHIP_TYPE_CODE),
213               DISPLAY_ORDER = decode( p_DISPLAY_ORDER, FND_API.G_MISS_NUM, DISPLAY_ORDER, p_DISPLAY_ORDER),
214               POSITION_REFERENCE = decode( p_POSITION_REFERENCE, FND_API.G_MISS_CHAR, POSITION_REFERENCE, p_POSITION_REFERENCE),
215               MANDATORY_FLAG = decode( p_MANDATORY_FLAG, FND_API.G_MISS_CHAR, MANDATORY_FLAG, p_MANDATORY_FLAG),
216               ACTIVE_START_DATE = decode( p_ACTIVE_START_DATE, FND_API.G_MISS_DATE, ACTIVE_START_DATE, p_ACTIVE_START_DATE),
217               ACTIVE_END_DATE = decode( p_ACTIVE_END_DATE, FND_API.G_MISS_DATE, ACTIVE_END_DATE, p_ACTIVE_END_DATE),
218               CSI_INST_RELATIONSHIP_ID = decode( p_CSI_INST_RELATIONSHIP_ID, FND_API.G_MISS_NUM, CSI_INST_RELATIONSHIP_ID, p_CSI_INST_RELATIONSHIP_ID),
219               SUBJECT_TYPE = decode( SUBJECT_TYPE, FND_API.G_MISS_CHAR, SUBJECT_TYPE , p_SUBJECT_TYPE),
220               SUBJECT_ID = decode( p_SUBJECT_ID, FND_API.G_MISS_NUM, SUBJECT_ID, p_SUBJECT_ID),
221               SUB_CONFIG_INST_HDR_ID = decode( p_SUB_CONFIG_INST_HDR_ID, FND_API.G_MISS_NUM, SUB_CONFIG_INST_HDR_ID, p_SUB_CONFIG_INST_HDR_ID),
222               SUB_CONFIG_INST_REV_NUM = decode( p_SUB_CONFIG_INST_REV_NUM, FND_API.G_MISS_NUM, SUB_CONFIG_INST_REV_NUM, p_SUB_CONFIG_INST_REV_NUM),
223               SUB_CONFIG_INST_ITEM_ID = decode( p_SUB_CONFIG_INST_ITEM_ID, FND_API.G_MISS_NUM, SUB_CONFIG_INST_ITEM_ID, p_SUB_CONFIG_INST_ITEM_ID),
224              OBJ_CONFIG_INST_HDR_ID = decode( p_OBJ_CONFIG_INST_HDR_ID, FND_API.G_MISS_NUM, OBJ_CONFIG_INST_HDR_ID, p_OBJ_CONFIG_INST_HDR_ID),
225               OBJ_CONFIG_INST_REV_NUM = decode( p_OBJ_CONFIG_INST_REV_NUM, FND_API.G_MISS_NUM, OBJ_CONFIG_INST_REV_NUM, p_OBJ_CONFIG_INST_REV_NUM),
226               OBJ_CONFIG_INST_ITEM_ID = decode( p_OBJ_CONFIG_INST_ITEM_ID, FND_API.G_MISS_NUM, OBJ_CONFIG_INST_ITEM_ID, p_OBJ_CONFIG_INST_ITEM_ID),
227               TARGET_COMMITMENT_DATE = decode( p_TARGET_COMMITMENT_DATE, FND_API.G_MISS_DATE, TARGET_COMMITMENT_DATE, p_TARGET_COMMITMENT_DATE),
228               ATTRIBUTE1 = decode( p_ATTRIBUTE1, FND_API.G_MISS_CHAR, ATTRIBUTE1, p_ATTRIBUTE1),
229               ATTRIBUTE2 = decode( p_ATTRIBUTE2, FND_API.G_MISS_CHAR, ATTRIBUTE2, p_ATTRIBUTE2),
230               ATTRIBUTE3 = decode( p_ATTRIBUTE3, FND_API.G_MISS_CHAR, ATTRIBUTE3, p_ATTRIBUTE3),
231               ATTRIBUTE4 = decode( p_ATTRIBUTE4, FND_API.G_MISS_CHAR, ATTRIBUTE4, p_ATTRIBUTE4),
232               ATTRIBUTE5 = decode( p_ATTRIBUTE5, FND_API.G_MISS_CHAR, ATTRIBUTE5, p_ATTRIBUTE5),
233               ATTRIBUTE6 = decode( p_ATTRIBUTE6, FND_API.G_MISS_CHAR, ATTRIBUTE6, p_ATTRIBUTE6),
234               ATTRIBUTE7 = decode( p_ATTRIBUTE7, FND_API.G_MISS_CHAR, ATTRIBUTE7, p_ATTRIBUTE7),
235               ATTRIBUTE8 = decode( p_ATTRIBUTE8, FND_API.G_MISS_CHAR, ATTRIBUTE8, p_ATTRIBUTE8),
236               ATTRIBUTE9 = decode( p_ATTRIBUTE9, FND_API.G_MISS_CHAR, ATTRIBUTE9, p_ATTRIBUTE9),
237               ATTRIBUTE10 = decode( p_ATTRIBUTE10, FND_API.G_MISS_CHAR, ATTRIBUTE10, p_ATTRIBUTE10),
238               ATTRIBUTE11 = decode( p_ATTRIBUTE11, FND_API.G_MISS_CHAR, ATTRIBUTE11, p_ATTRIBUTE11),
239               ATTRIBUTE12 = decode( p_ATTRIBUTE12, FND_API.G_MISS_CHAR, ATTRIBUTE12, p_ATTRIBUTE12),
240               ATTRIBUTE13 = decode( p_ATTRIBUTE13, FND_API.G_MISS_CHAR, ATTRIBUTE13, p_ATTRIBUTE13),
241               ATTRIBUTE14 = decode( p_ATTRIBUTE14, FND_API.G_MISS_CHAR, ATTRIBUTE14, p_ATTRIBUTE14),
242               ATTRIBUTE15 = decode( p_ATTRIBUTE15, FND_API.G_MISS_CHAR, ATTRIBUTE15, p_ATTRIBUTE15),
243               CREATED_BY = decode( p_CREATED_BY, FND_API.G_MISS_NUM, CREATED_BY, p_CREATED_BY),
244               CREATION_DATE = decode( p_CREATION_DATE, FND_API.G_MISS_DATE, CREATION_DATE, p_CREATION_DATE),
245               LAST_UPDATED_BY = decode( p_LAST_UPDATED_BY, FND_API.G_MISS_NUM, LAST_UPDATED_BY, p_LAST_UPDATED_BY),
246               LAST_UPDATE_DATE = decode( p_LAST_UPDATE_DATE, FND_API.G_MISS_DATE, LAST_UPDATE_DATE, p_LAST_UPDATE_DATE),
247               LAST_UPDATE_LOGIN = decode( p_LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, LAST_UPDATE_LOGIN, p_LAST_UPDATE_LOGIN),
248               OBJECT_VERSION_NUMBER = decode( p_OBJECT_VERSION_NUMBER, FND_API.G_MISS_NUM, OBJECT_VERSION_NUMBER, p_OBJECT_VERSION_NUMBER),
249               CONTEXT = decode( p_CONTEXT, FND_API.G_MISS_CHAR, CONTEXT, p_CONTEXT),
250               TRANSFER_COMPONENTS_FLAG = decode( p_TRANSFER_COMPONENTS_FLAG, FND_API.G_MISS_CHAR, TRANSFER_COMPONENTS_FLAG, p_TRANSFER_COMPONENTS_FLAG)
251     where TXN_RELATIONSHIP_ID = p_TXN_RELATIONSHIP_ID;
252 
253     If (SQL%NOTFOUND) then
254         RAISE NO_DATA_FOUND;
255     End If;
256 END Update_Row;
257 
258 PROCEDURE Delete_Row(
259     p_TXN_RELATIONSHIP_ID  NUMBER)
260  IS
261  BEGIN
262    DELETE FROM CSI_T_II_RELATIONSHIPS
263     WHERE TXN_RELATIONSHIP_ID = p_TXN_RELATIONSHIP_ID;
264    If (SQL%NOTFOUND) then
265        RAISE NO_DATA_FOUND;
266    End If;
267  END Delete_Row;
268 
269 PROCEDURE Lock_Row(
270           p_TXN_RELATIONSHIP_ID    NUMBER,
271           p_TRANSACTION_LINE_ID    NUMBER,
272           p_OBJECT_TYPE VARCHAR2 ,
273           p_OBJECT_ID    NUMBER,
274           p_RELATIONSHIP_TYPE_CODE    VARCHAR2,
275           p_DISPLAY_ORDER    NUMBER,
276           p_POSITION_REFERENCE    VARCHAR2,
277           p_MANDATORY_FLAG    VARCHAR2,
278           p_ACTIVE_START_DATE    DATE,
279           p_ACTIVE_END_DATE    DATE,
280           p_CSI_INST_RELATIONSHIP_ID    NUMBER,
281           p_SUBJECT_TYPE  VARCHAR2 ,
282           p_SUBJECT_ID    NUMBER,
283           p_SUB_CONFIG_INST_HDR_ID  NUMBER ,
284           p_SUB_CONFIG_INST_REV_NUM NUMBER ,
285           p_SUB_CONFIG_INST_ITEM_ID NUMBER ,
286           p_OBJ_CONFIG_INST_HDR_ID  NUMBER ,
287           p_OBJ_CONFIG_INST_REV_NUM NUMBER ,
288           p_OBJ_CONFIG_INST_ITEM_ID NUMBER ,
289           p_TARGET_COMMITMENT_DATE  DATE   ,
290           p_ATTRIBUTE1    VARCHAR2,
291           p_ATTRIBUTE2    VARCHAR2,
292           p_ATTRIBUTE3    VARCHAR2,
293           p_ATTRIBUTE4    VARCHAR2,
294           p_ATTRIBUTE5    VARCHAR2,
295           p_ATTRIBUTE6    VARCHAR2,
296           p_ATTRIBUTE7    VARCHAR2,
297           p_ATTRIBUTE8    VARCHAR2,
298           p_ATTRIBUTE9    VARCHAR2,
299           p_ATTRIBUTE10    VARCHAR2,
300           p_ATTRIBUTE11    VARCHAR2,
301           p_ATTRIBUTE12    VARCHAR2,
302           p_ATTRIBUTE13    VARCHAR2,
303           p_ATTRIBUTE14    VARCHAR2,
304           p_ATTRIBUTE15    VARCHAR2,
308           p_LAST_UPDATE_DATE    DATE,
305           p_CREATED_BY    NUMBER,
306           p_CREATION_DATE    DATE,
307           p_LAST_UPDATED_BY    NUMBER,
309           p_LAST_UPDATE_LOGIN    NUMBER,
310           p_OBJECT_VERSION_NUMBER    NUMBER,
311           p_CONTEXT    VARCHAR2,
312           p_TRANSFER_COMPONENTS_FLAG  VARCHAR2)
313 
314  IS
315    CURSOR C IS
316         SELECT *
317          FROM CSI_T_II_RELATIONSHIPS
318         WHERE TXN_RELATIONSHIP_ID =  p_TXN_RELATIONSHIP_ID
319         FOR UPDATE of TXN_RELATIONSHIP_ID NOWAIT;
320    Recinfo C%ROWTYPE;
321  BEGIN
322     OPEN C;
323     FETCH C INTO Recinfo;
324     If (C%NOTFOUND) then
325         CLOSE C;
326         FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
327         APP_EXCEPTION.RAISE_EXCEPTION;
328     End If;
329     CLOSE C;
330     if (
331            (      Recinfo.TXN_RELATIONSHIP_ID = p_TXN_RELATIONSHIP_ID)
332        AND (    ( Recinfo.TRANSACTION_LINE_ID = p_TRANSACTION_LINE_ID)
333             OR (    ( Recinfo.TRANSACTION_LINE_ID IS NULL )
334                 AND (  p_TRANSACTION_LINE_ID IS NULL )))
335        AND (    ( Recinfo.OBJECT_TYPE = p_OBJECT_TYPE)
336             OR (    ( Recinfo.OBJECT_TYPE IS NULL )
337                 AND (  p_OBJECT_TYPE IS NULL )))
338        AND (    ( Recinfo.OBJECT_ID = p_OBJECT_ID)
339             OR (    ( Recinfo.OBJECT_ID IS NULL )
340                 AND (  p_OBJECT_ID IS NULL )))
341        AND (    ( Recinfo.RELATIONSHIP_TYPE_CODE = p_RELATIONSHIP_TYPE_CODE)
342             OR (    ( Recinfo.RELATIONSHIP_TYPE_CODE IS NULL )
343                 AND (  p_RELATIONSHIP_TYPE_CODE IS NULL )))
344        AND (    ( Recinfo.DISPLAY_ORDER = p_DISPLAY_ORDER)
345             OR (    ( Recinfo.DISPLAY_ORDER IS NULL )
346                 AND (  p_DISPLAY_ORDER IS NULL )))
347        AND (    ( Recinfo.POSITION_REFERENCE = p_POSITION_REFERENCE)
348             OR (    ( Recinfo.POSITION_REFERENCE IS NULL )
349                 AND (  p_POSITION_REFERENCE IS NULL )))
350        AND (    ( Recinfo.MANDATORY_FLAG = p_MANDATORY_FLAG)
351             OR (    ( Recinfo.MANDATORY_FLAG IS NULL )
352                 AND (  p_MANDATORY_FLAG IS NULL )))
353        AND (    ( Recinfo.ACTIVE_START_DATE = p_ACTIVE_START_DATE)
354             OR (    ( Recinfo.ACTIVE_START_DATE IS NULL )
355                 AND (  p_ACTIVE_START_DATE IS NULL )))
356        AND (    ( Recinfo.ACTIVE_END_DATE = p_ACTIVE_END_DATE)
357             OR (    ( Recinfo.ACTIVE_END_DATE IS NULL )
358                 AND (  p_ACTIVE_END_DATE IS NULL )))
359        AND (    ( Recinfo.CSI_INST_RELATIONSHIP_ID = p_CSI_INST_RELATIONSHIP_ID)
360             OR (    ( Recinfo.CSI_INST_RELATIONSHIP_ID IS NULL )
361                 AND (  p_CSI_INST_RELATIONSHIP_ID IS NULL )))
362        AND (    ( Recinfo.SUBJECT_TYPE = p_SUBJECT_TYPE)
363             OR (    ( Recinfo.SUBJECT_TYPE IS NULL )
364                 AND (  p_SUBJECT_TYPE IS NULL )))
365        AND (    ( Recinfo.SUBJECT_ID = p_SUBJECT_ID)
366             OR (    ( Recinfo.SUBJECT_ID IS NULL )
367                 AND (  p_SUBJECT_ID IS NULL )))
368        AND (    ( Recinfo.SUB_CONFIG_INST_HDR_ID = p_SUB_CONFIG_INST_HDR_ID)
369             OR (    ( Recinfo.SUB_CONFIG_INST_HDR_ID IS NULL )
370                 AND (  p_SUB_CONFIG_INST_HDR_ID IS NULL )))
371        AND (    ( Recinfo.SUB_CONFIG_INST_REV_NUM = p_SUB_CONFIG_INST_REV_NUM)
372             OR (    ( Recinfo.SUB_CONFIG_INST_REV_NUM IS NULL )
373                 AND (  p_SUB_CONFIG_INST_REV_NUM IS NULL )))
374        AND (    ( Recinfo.SUB_CONFIG_INST_ITEM_ID = p_SUB_CONFIG_INST_ITEM_ID)
375             OR (    ( Recinfo.SUB_CONFIG_INST_ITEM_ID IS NULL )
376                 AND (  p_SUB_CONFIG_INST_ITEM_ID IS NULL )))
377        AND (    ( Recinfo.OBJ_CONFIG_INST_HDR_ID = p_OBJ_CONFIG_INST_HDR_ID)
378             OR (    ( Recinfo.OBJ_CONFIG_INST_HDR_ID IS NULL )
379                 AND (  p_OBJ_CONFIG_INST_HDR_ID IS NULL )))
380        AND (    ( Recinfo.OBJ_CONFIG_INST_REV_NUM = p_OBJ_CONFIG_INST_REV_NUM)
381             OR (    ( Recinfo.OBJ_CONFIG_INST_REV_NUM IS NULL )
382                 AND (  p_OBJ_CONFIG_INST_REV_NUM IS NULL )))
383        AND (    ( Recinfo.OBJ_CONFIG_INST_ITEM_ID = p_OBJ_CONFIG_INST_ITEM_ID)
384             OR (    ( Recinfo.OBJ_CONFIG_INST_ITEM_ID IS NULL )
385                 AND (  p_OBJ_CONFIG_INST_ITEM_ID IS NULL )))
386        AND (    ( Recinfo.ATTRIBUTE1 = p_ATTRIBUTE1)
387             OR (    ( Recinfo.ATTRIBUTE1 IS NULL )
388                 AND (  p_ATTRIBUTE1 IS NULL )))
389        AND (    ( Recinfo.ATTRIBUTE2 = p_ATTRIBUTE2)
390             OR (    ( Recinfo.ATTRIBUTE2 IS NULL )
391                 AND (  p_ATTRIBUTE2 IS NULL )))
392        AND (    ( Recinfo.ATTRIBUTE3 = p_ATTRIBUTE3)
393             OR (    ( Recinfo.ATTRIBUTE3 IS NULL )
394                 AND (  p_ATTRIBUTE3 IS NULL )))
395        AND (    ( Recinfo.ATTRIBUTE4 = p_ATTRIBUTE4)
396             OR (    ( Recinfo.ATTRIBUTE4 IS NULL )
397                 AND (  p_ATTRIBUTE4 IS NULL )))
398        AND (    ( Recinfo.ATTRIBUTE5 = p_ATTRIBUTE5)
399             OR (    ( Recinfo.ATTRIBUTE5 IS NULL )
400                 AND (  p_ATTRIBUTE5 IS NULL )))
401        AND (    ( Recinfo.ATTRIBUTE6 = p_ATTRIBUTE6)
402             OR (    ( Recinfo.ATTRIBUTE6 IS NULL )
403                 AND (  p_ATTRIBUTE6 IS NULL )))
404        AND (    ( Recinfo.ATTRIBUTE7 = p_ATTRIBUTE7)
405             OR (    ( Recinfo.ATTRIBUTE7 IS NULL )
406                 AND (  p_ATTRIBUTE7 IS NULL )))
407        AND (    ( Recinfo.ATTRIBUTE8 = p_ATTRIBUTE8)
408             OR (    ( Recinfo.ATTRIBUTE8 IS NULL )
409                 AND (  p_ATTRIBUTE8 IS NULL )))
410        AND (    ( Recinfo.ATTRIBUTE9 = p_ATTRIBUTE9)
411             OR (    ( Recinfo.ATTRIBUTE9 IS NULL )
412                 AND (  p_ATTRIBUTE9 IS NULL )))
413        AND (    ( Recinfo.ATTRIBUTE10 = p_ATTRIBUTE10)
414             OR (    ( Recinfo.ATTRIBUTE10 IS NULL )
415                 AND (  p_ATTRIBUTE10 IS NULL )))
416        AND (    ( Recinfo.ATTRIBUTE11 = p_ATTRIBUTE11)
417             OR (    ( Recinfo.ATTRIBUTE11 IS NULL )
418                 AND (  p_ATTRIBUTE11 IS NULL )))
419        AND (    ( Recinfo.ATTRIBUTE12 = p_ATTRIBUTE12)
420             OR (    ( Recinfo.ATTRIBUTE12 IS NULL )
421                 AND (  p_ATTRIBUTE12 IS NULL )))
422        AND (    ( Recinfo.ATTRIBUTE13 = p_ATTRIBUTE13)
423             OR (    ( Recinfo.ATTRIBUTE13 IS NULL )
424                 AND (  p_ATTRIBUTE13 IS NULL )))
425        AND (    ( Recinfo.ATTRIBUTE14 = p_ATTRIBUTE14)
426             OR (    ( Recinfo.ATTRIBUTE14 IS NULL )
427                 AND (  p_ATTRIBUTE14 IS NULL )))
428        AND (    ( Recinfo.ATTRIBUTE15 = p_ATTRIBUTE15)
429             OR (    ( Recinfo.ATTRIBUTE15 IS NULL )
430                 AND (  p_ATTRIBUTE15 IS NULL )))
431        AND (    ( Recinfo.CREATED_BY = p_CREATED_BY)
432             OR (    ( Recinfo.CREATED_BY IS NULL )
433                 AND (  p_CREATED_BY IS NULL )))
434        AND (    ( Recinfo.CREATION_DATE = p_CREATION_DATE)
435             OR (    ( Recinfo.CREATION_DATE IS NULL )
436                 AND (  p_CREATION_DATE IS NULL )))
437        AND (    ( Recinfo.LAST_UPDATED_BY = p_LAST_UPDATED_BY)
438             OR (    ( Recinfo.LAST_UPDATED_BY IS NULL )
439                 AND (  p_LAST_UPDATED_BY IS NULL )))
440        AND (    ( Recinfo.LAST_UPDATE_DATE = p_LAST_UPDATE_DATE)
441             OR (    ( Recinfo.LAST_UPDATE_DATE IS NULL )
442                 AND (  p_LAST_UPDATE_DATE IS NULL )))
443        AND (    ( Recinfo.LAST_UPDATE_LOGIN = p_LAST_UPDATE_LOGIN)
444             OR (    ( Recinfo.LAST_UPDATE_LOGIN IS NULL )
445                 AND (  p_LAST_UPDATE_LOGIN IS NULL )))
446        AND (    ( Recinfo.OBJECT_VERSION_NUMBER = p_OBJECT_VERSION_NUMBER)
447             OR (    ( Recinfo.OBJECT_VERSION_NUMBER IS NULL )
448                 AND (  p_OBJECT_VERSION_NUMBER IS NULL )))
449        AND (    ( Recinfo.CONTEXT = p_CONTEXT)
450             OR (    ( Recinfo.CONTEXT IS NULL )
451                 AND (  p_CONTEXT IS NULL )))
452        AND (    ( Recinfo.TRANSFER_COMPONENTS_FLAG = p_TRANSFER_COMPONENTS_FLAG)
453             OR (    ( Recinfo.TRANSFER_COMPONENTS_FLAG IS NULL )
454                 AND (  p_TRANSFER_COMPONENTS_FLAG IS NULL )))
455        ) then
456        return;
457    else
458        FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_CHANGED');
459        APP_EXCEPTION.RAISE_EXCEPTION;
460    End If;
461 END Lock_Row;
462 
463 End CSI_T_II_RELATIONSHIPS_PKG;