DBA Data[Home] [Help]

PACKAGE BODY: APPS.CSP_REQUIREMENT_HEADERS_PKG

Source


1 PACKAGE BODY CSP_REQUIREMENT_HEADERS_PKG as
2 /* $Header: csptrqhb.pls 120.1 2006/03/13 16:50:52 phegde noship $ */
3 -- Start of Comments
4 -- Package name     : CSP_REQUIREMENT_HEADERS_PKG
5 -- Purpose          :
6 -- History          :
7 -- NOTE             :
8 -- End of Comments
9 
10 
11 G_PKG_NAME CONSTANT VARCHAR2(30):= 'CSP_REQUIREMENT_HEADERS_PKG';
12 G_FILE_NAME CONSTANT VARCHAR2(12) := 'csptrqhb.pls';
13 
14 PROCEDURE Insert_Row(
15           px_REQUIREMENT_HEADER_ID   IN OUT NOCOPY NUMBER,
16           p_CREATED_BY    NUMBER,
17           p_CREATION_DATE    DATE,
18           p_LAST_UPDATED_BY    NUMBER,
19           p_LAST_UPDATE_DATE    DATE,
20           p_LAST_UPDATE_LOGIN    NUMBER,
21           p_OPEN_REQUIREMENT    VARCHAR2,
22           p_SHIP_TO_LOCATION_ID    NUMBER,
23           p_TASK_ID    NUMBER,
24           p_TASK_ASSIGNMENT_ID    NUMBER,
25           p_SHIPPING_METHOD_CODE    VARCHAR2,
26           p_NEED_BY_DATE    DATE,
27           p_DESTINATION_ORGANIZATION_ID    NUMBER,
28           p_PARTS_DEFINED    VARCHAR2,
29           p_ATTRIBUTE_CATEGORY    VARCHAR2,
30           p_ATTRIBUTE1    VARCHAR2,
31           p_ATTRIBUTE2    VARCHAR2,
32           p_ATTRIBUTE3    VARCHAR2,
33           p_ATTRIBUTE4    VARCHAR2,
34           p_ATTRIBUTE5    VARCHAR2,
35           p_ATTRIBUTE6    VARCHAR2,
36           p_ATTRIBUTE7    VARCHAR2,
37           p_ATTRIBUTE8    VARCHAR2,
38           p_ATTRIBUTE9    VARCHAR2,
39           p_ATTRIBUTE10    VARCHAR2,
40           p_ATTRIBUTE11    VARCHAR2,
41           p_ATTRIBUTE12    VARCHAR2,
42           p_ATTRIBUTE13    VARCHAR2,
43           p_ATTRIBUTE14    VARCHAR2,
44           p_ATTRIBUTE15    VARCHAR2,
45           p_ORDER_TYPE_ID  NUMBER,
46           p_ADDRESS_TYPE   VARCHAR2,
47           p_RESOURCE_ID    NUMBER,
48           p_RESOURCE_TYPE  VARCHAR2,
49           p_TIMEZONE_ID    NUMBER,
50           p_DESTINATION_SUBINVENTORY varchar2)
51 
52  IS
53    CURSOR C2 IS SELECT CSP_REQUIREMENT_HEADERS_S1.nextval FROM sys.dual;
54    l_requirement_header CSP_REQUIREMENT_HEADERS_PVT.Requirement_header_Rec_Type;
55    l_return_status    varchar2(100);
56    l_msg_count        NUMBER;
57    l_msg_data         varchar2(1000);
58    l_api_name_full    varchar2(50) := 'CSP_REQUIREMENT_HEADERS_PKG.INSERT_ROW';
59 BEGIN
60        l_requirement_header.REQUIREMENT_HEADER_ID  :=     px_REQUIREMENT_HEADER_ID;
61        l_requirement_header.CREATED_BY             :=     p_CREATED_BY;
62        l_requirement_header.CREATION_DATE          :=     p_CREATION_DATE;
63        l_requirement_header.LAST_UPDATED_BY        :=     p_LAST_UPDATED_BY ;
64        l_requirement_header.LAST_UPDATE_DATE       :=     p_LAST_UPDATE_DATE ;
65        l_requirement_header.LAST_UPDATE_LOGIN      :=     p_LAST_UPDATE_LOGIN  ;
66        l_requirement_header.OPEN_REQUIREMENT       :=     p_OPEN_REQUIREMENT   ;
67        l_requirement_header.SHIP_TO_LOCATION_ID    :=     p_SHIP_TO_LOCATION_ID  ;
68        l_requirement_header.TASK_ID                :=     p_TASK_ID  ;
69        l_requirement_header.TASK_ASSIGNMENT_ID     :=     p_TASK_ASSIGNMENT_ID ;
70        l_requirement_header.SHIPPING_METHOD_CODE    :=    p_SHIPPING_METHOD_CODE;
71        l_requirement_header.NEED_BY_DATE            :=    p_NEED_BY_DATE   ;
72        l_requirement_header.DESTINATION_ORGANIZATION_ID  :=     p_DESTINATION_ORGANIZATION_ID;
73        l_requirement_header.PARTS_DEFINED                :=     p_PARTS_DEFINED;
74        l_requirement_header.ATTRIBUTE_CATEGORY           :=     p_ATTRIBUTE_CATEGORY;
75        l_requirement_header.ATTRIBUTE1                   :=     p_ATTRIBUTE1;
76        l_requirement_header.ATTRIBUTE2                   :=     p_ATTRIBUTE2;
77        l_requirement_header.ATTRIBUTE3                   :=     p_ATTRIBUTE3;
78        l_requirement_header.ATTRIBUTE4                   :=     p_ATTRIBUTE4;
79        l_requirement_header.ATTRIBUTE5                   :=     p_ATTRIBUTE5;
80        l_requirement_header.ATTRIBUTE6                   :=     p_ATTRIBUTE6;
81        l_requirement_header.ATTRIBUTE7                   :=     p_ATTRIBUTE7;
82        l_requirement_header.ATTRIBUTE8                   :=     p_ATTRIBUTE8;
83        l_requirement_header.ATTRIBUTE9                   :=     p_ATTRIBUTE9;
84        l_requirement_header.ATTRIBUTE10                  :=     p_ATTRIBUTE10;
85        l_requirement_header.ATTRIBUTE11                  :=     p_ATTRIBUTE11;
86        l_requirement_header.ATTRIBUTE12                  :=     p_ATTRIBUTE12;
87        l_requirement_header.ATTRIBUTE13                  :=     p_ATTRIBUTE13;
88        l_requirement_header.ATTRIBUTE14                  :=     p_ATTRIBUTE14;
89        l_requirement_header.ATTRIBUTE15                  :=     p_ATTRIBUTE15;
90        l_requirement_header.ORDER_TYPE_ID                :=     p_ORDER_TYPE_ID;
91        l_requirement_header.ADDRESS_TYPE                 :=     p_ADDRESS_TYPE;
92        l_requirement_header.RESOURCE_ID                  :=     p_RESOURCE_ID ;
93        l_requirement_header.RESOURCE_TYPE                :=     p_RESOURCE_TYPE;
94        l_requirement_header.TIMEZONE_ID                  :=     p_TIMEZONE_ID;
95        l_requirement_header.DESTINATION_SUBINVENTORY     :=     p_DESTINATION_SUBINVENTORY;
96     IF jtf_usr_hks.Ok_To_Execute('CSP_REQUIREMENT_HEADERS_PKG',
97                                       'Insert_Row',
98                                       'B', 'C')  THEN
99 
100             csp_requirement_headers_cuhk.Create_requirement_header_Pre
101                 ( px_requirement_header     => l_requirement_header,
102                   x_return_status          => l_return_status,
103                   x_msg_count              => l_msg_count,
104                   x_msg_data               => l_msg_data
105                 ) ;
106     IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
107       --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Customer User Hook');
108       FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_PRE_CUST_USR_HK');
109       FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
110       FND_MSG_PUB.Add;
111       RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
112     END IF;
113    END IF;
114 
115 
116   -- Pre call to the Vertical Type User Hook
117   --
118   IF jtf_usr_hks.Ok_To_Execute('CSP_REQUIREMENT_HEADERS_PKG',
119                                       'Insert_Row',
120                                       'B', 'V')  THEN
121     csp_requirement_headers_vuhk.Create_requirement_header_Pre
122                 ( px_requirement_header     => l_requirement_header,
123                   x_return_status          => l_return_status,
124                   x_msg_count              => l_msg_count,
125                   x_msg_data               => l_msg_data
126                 ) ;
127 
128     IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
129       --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
130       FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_PRE_VERT_USR_HK');
131       FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
132       FND_MSG_PUB.Add;
133       RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
134     END IF;
135   END IF;
136 
137   csp_requirement_headers_iuhk.Create_requirement_header_Pre
138                 ( x_return_status          => l_return_status
139                 ) ;
140     IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
141       --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
142       FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_PRE_INT_USR_HK');
143       FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
144       FND_MSG_PUB.Add;
145       RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
146     END IF;
147    If (l_requirement_header.REQUIREMENT_HEADER_ID IS NULL) OR (l_requirement_header.REQUIREMENT_HEADER_ID = FND_API.G_MISS_NUM) then
148        OPEN C2;
149        FETCH C2 INTO px_REQUIREMENT_HEADER_ID;
150        CLOSE C2;
151    End If;
152    	l_requirement_header.REQUIREMENT_HEADER_ID  :=     px_REQUIREMENT_HEADER_ID;
153 	user_hooks_rec.REQUIREMENT_HEADER_ID   := l_requirement_header.REQUIREMENT_HEADER_ID;
154    INSERT INTO CSP_REQUIREMENT_HEADERS(
155            REQUIREMENT_HEADER_ID,
156            CREATED_BY,
157            CREATION_DATE,
158            LAST_UPDATED_BY,
159            LAST_UPDATE_DATE,
160            LAST_UPDATE_LOGIN,
161            OPEN_REQUIREMENT,
162            SHIP_TO_LOCATION_ID,
163            TASK_ID,
164            TASK_ASSIGNMENT_ID,
165            SHIPPING_METHOD_CODE,
166            NEED_BY_DATE,
167            DESTINATION_ORGANIZATION_ID,
168            PARTS_DEFINED,
169            ATTRIBUTE_CATEGORY,
170            ATTRIBUTE1,
171            ATTRIBUTE2,
172            ATTRIBUTE3,
173            ATTRIBUTE4,
174            ATTRIBUTE5,
175            ATTRIBUTE6,
176            ATTRIBUTE7,
177            ATTRIBUTE8,
178            ATTRIBUTE9,
179            ATTRIBUTE10,
180            ATTRIBUTE11,
181            ATTRIBUTE12,
182            ATTRIBUTE13,
183            ATTRIBUTE14,
184            ATTRIBUTE15,
185            ORDER_TYPE_ID,
186            ADDRESS_TYPE,
187            RESOURCE_ID,
188            RESOURCE_TYPE,
189            --TIMEZONE_ID,
190            DESTINATION_SUBINVENTORY
191          ) VALUES (
192            px_REQUIREMENT_HEADER_ID,
193            decode( l_requirement_header.CREATED_BY, FND_API.G_MISS_NUM, NULL, l_requirement_header.CREATED_BY),
194            decode( l_requirement_header.CREATION_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL), l_requirement_header.CREATION_DATE),
195            decode( l_requirement_header.LAST_UPDATED_BY, FND_API.G_MISS_NUM, NULL, l_requirement_header.LAST_UPDATED_BY),
196            decode( l_requirement_header.LAST_UPDATE_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL), l_requirement_header.LAST_UPDATE_DATE),
197            decode( l_requirement_header.LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL, l_requirement_header.LAST_UPDATE_LOGIN),
198            decode( l_requirement_header.OPEN_REQUIREMENT, FND_API.G_MISS_CHAR, NULL, l_requirement_header.OPEN_REQUIREMENT),
199            decode( l_requirement_header.SHIP_TO_LOCATION_ID, FND_API.G_MISS_NUM, NULL, l_requirement_header.SHIP_TO_LOCATION_ID),
200            decode( l_requirement_header.TASK_ID, FND_API.G_MISS_NUM, NULL, l_requirement_header.TASK_ID),
201            decode( l_requirement_header.TASK_ASSIGNMENT_ID, FND_API.G_MISS_NUM, NULL, l_requirement_header.TASK_ASSIGNMENT_ID),
202            decode( l_requirement_header.SHIPPING_METHOD_CODE, FND_API.G_MISS_CHAR, NULL, l_requirement_header.SHIPPING_METHOD_CODE),
203            decode( l_requirement_header.NEED_BY_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL), l_requirement_header.NEED_BY_DATE),
204            decode( l_requirement_header.DESTINATION_ORGANIZATION_ID, FND_API.G_MISS_NUM, NULL, l_requirement_header.DESTINATION_ORGANIZATION_ID),
205            decode( l_requirement_header.PARTS_DEFINED, FND_API.G_MISS_CHAR, NULL, l_requirement_header.PARTS_DEFINED),
206            decode( l_requirement_header.ATTRIBUTE_CATEGORY, FND_API.G_MISS_CHAR, NULL, l_requirement_header.ATTRIBUTE_CATEGORY),
207            decode( l_requirement_header.ATTRIBUTE1, FND_API.G_MISS_CHAR, NULL, l_requirement_header.ATTRIBUTE1),
208            decode( l_requirement_header.ATTRIBUTE2, FND_API.G_MISS_CHAR, NULL, l_requirement_header.ATTRIBUTE2),
209            decode( l_requirement_header.ATTRIBUTE3, FND_API.G_MISS_CHAR, NULL, l_requirement_header.ATTRIBUTE3),
210            decode( l_requirement_header.ATTRIBUTE4, FND_API.G_MISS_CHAR, NULL, l_requirement_header.ATTRIBUTE4),
211            decode( l_requirement_header.ATTRIBUTE5, FND_API.G_MISS_CHAR, NULL, l_requirement_header.ATTRIBUTE5),
212            decode( l_requirement_header.ATTRIBUTE6, FND_API.G_MISS_CHAR, NULL, l_requirement_header.ATTRIBUTE6),
213            decode( l_requirement_header.ATTRIBUTE7, FND_API.G_MISS_CHAR, NULL, l_requirement_header.ATTRIBUTE7),
214            decode( l_requirement_header.ATTRIBUTE8, FND_API.G_MISS_CHAR, NULL, l_requirement_header.ATTRIBUTE8),
215            decode( l_requirement_header.ATTRIBUTE9, FND_API.G_MISS_CHAR, NULL, l_requirement_header.ATTRIBUTE9),
216            decode( l_requirement_header.ATTRIBUTE10, FND_API.G_MISS_CHAR, NULL, l_requirement_header.ATTRIBUTE10),
217            decode( l_requirement_header.ATTRIBUTE11, FND_API.G_MISS_CHAR, NULL, l_requirement_header.ATTRIBUTE11),
218            decode( l_requirement_header.ATTRIBUTE12, FND_API.G_MISS_CHAR, NULL, l_requirement_header.ATTRIBUTE12),
219            decode( l_requirement_header.ATTRIBUTE13, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE13),
220            decode( l_requirement_header.ATTRIBUTE14, FND_API.G_MISS_CHAR, NULL, l_requirement_header.ATTRIBUTE14),
221            decode( l_requirement_header.ATTRIBUTE15, FND_API.G_MISS_CHAR, NULL, l_requirement_header.ATTRIBUTE15),
222            decode( l_requirement_header.ORDER_TYPE_ID, FND_API.G_MISS_NUM, NULL, l_requirement_header.ORDER_TYPE_ID),
223            decode( l_requirement_header.ADDRESS_TYPE, FND_API.G_MISS_CHAR, NULL, l_requirement_header.ADDRESS_TYPE),
224            decode( l_requirement_header.RESOURCE_ID, FND_API.G_MISS_NUM, NULL, l_requirement_header.RESOURCE_ID),
225            decode( l_requirement_header.RESOURCE_TYPE, FND_API.G_MISS_CHAR, NULL, l_requirement_header.RESOURCE_TYPE),
226            --decode( l_requirement_header.TIMEZONE_ID, FND_API.G_MISS_NUM, NULL, l_requirement_header.TIMEZONE_ID),
227            decode( l_requirement_header.DESTINATION_SUBINVENTORY, FND_API.G_MISS_CHAR, NULL, l_requirement_header.DESTINATION_SUBINVENTORY)
228            );
229 
230            IF jtf_usr_hks.Ok_To_Execute('CSP_REQUIREMENT_HEADERS_PKG',
231                                       'Insert_Row',
232                                       'A', 'C')  THEN
233 
234    csp_requirement_headers_cuhk.Create_requirement_header_post
235                 ( px_requirement_header     => l_requirement_header,
236                   x_return_status          => l_return_status,
237                   x_msg_count              => l_msg_count,
238                   x_msg_data               => l_msg_data
239                 ) ;
240 
241 
242     IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
243       --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Post Customer User Hook');
244       FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_POST_CUST_USR_HK');
245       FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
246       FND_MSG_PUB.Add;
247       RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
248     END IF;
249   END IF;
250 
251 
252   -- Post call to the Vertical Type User Hook
253   --
254   IF jtf_usr_hks.Ok_To_Execute('CSP_REQUIREMENT_HEADERS_PKG',
255                                       'Insert_Row',
256                                       'A', 'V')  THEN
257 
258     csp_requirement_headers_vuhk.Create_requirement_header_post
259                 ( px_requirement_header     => l_requirement_header,
260                   x_return_status          => l_return_status,
261                   x_msg_count              => l_msg_count,
262                   x_msg_data               => l_msg_data
263                 ) ;
264     IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
265       --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Post Vertical User Hook');
266       FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_POST_VERT_USR_HK');
267       FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
268       FND_MSG_PUB.Add;
269       RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
270     END IF;
271   END IF;
272     csp_requirement_headers_iuhk.Create_requirement_header_post
273                 ( x_return_status          => l_return_status
274                 ) ;
275     IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
276       --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
277       FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_POST_INT_USR_HK');
278       FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
279       FND_MSG_PUB.Add;
280       RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
281     END IF;
282 
283 End Insert_Row;
284 
285 PROCEDURE Update_Row(
286           p_REQUIREMENT_HEADER_ID    NUMBER,
287           p_CREATED_BY    NUMBER,
288           p_CREATION_DATE    DATE,
289           p_LAST_UPDATED_BY    NUMBER,
290           p_LAST_UPDATE_DATE    DATE,
291           p_LAST_UPDATE_LOGIN    NUMBER,
292           p_OPEN_REQUIREMENT    VARCHAR2,
293           p_SHIP_TO_LOCATION_ID    NUMBER,
294           p_TASK_ID    NUMBER,
295           p_TASK_ASSIGNMENT_ID    NUMBER,
296           p_SHIPPING_METHOD_CODE    VARCHAR2,
297           p_NEED_BY_DATE    DATE,
298           p_DESTINATION_ORGANIZATION_ID    NUMBER,
299           p_PARTS_DEFINED    VARCHAR2,
300           p_ATTRIBUTE_CATEGORY    VARCHAR2,
301           p_ATTRIBUTE1    VARCHAR2,
302           p_ATTRIBUTE2    VARCHAR2,
303           p_ATTRIBUTE3    VARCHAR2,
304           p_ATTRIBUTE4    VARCHAR2,
305           p_ATTRIBUTE5    VARCHAR2,
306           p_ATTRIBUTE6    VARCHAR2,
307           p_ATTRIBUTE7    VARCHAR2,
308           p_ATTRIBUTE8    VARCHAR2,
309           p_ATTRIBUTE9    VARCHAR2,
310           p_ATTRIBUTE10    VARCHAR2,
311           p_ATTRIBUTE11    VARCHAR2,
312           p_ATTRIBUTE12    VARCHAR2,
313           p_ATTRIBUTE13    VARCHAR2,
314           p_ATTRIBUTE14    VARCHAR2,
315           p_ATTRIBUTE15    VARCHAR2,
316           p_ORDER_TYPE_ID  NUMBER,
317           p_ADDRESS_TYPE   VARCHAR2,
318           p_resource_id     NUMBER,
319           p_resource_type   VARCHAR2,
320           p_TIMEZONE_ID     NUMBER,
321           P_DESTINATION_SUBINVENTORY VARCHAR2)
322 
323  IS
324    l_requirement_header CSP_REQUIREMENT_HEADERS_PVT.Requirement_header_Rec_Type;
325    l_return_status    varchar2(100);
326    l_msg_count        NUMBER;
327    l_msg_data         varchar2(1000);
328       l_api_name_full    varchar2(50) := 'CSP_REQUIREMENT_HEADERS_PKG.UPDATE_ROW';
329  BEGIN
330         l_requirement_header.REQUIREMENT_HEADER_ID  :=     p_REQUIREMENT_HEADER_ID;
331        l_requirement_header.CREATED_BY             :=     p_CREATED_BY;
332        l_requirement_header.CREATION_DATE          :=     p_CREATION_DATE;
333        l_requirement_header.LAST_UPDATED_BY        :=     p_LAST_UPDATED_BY ;
334        l_requirement_header.LAST_UPDATE_DATE       :=     p_LAST_UPDATE_DATE ;
335        l_requirement_header.LAST_UPDATE_LOGIN      :=     p_LAST_UPDATE_LOGIN  ;
336        l_requirement_header.OPEN_REQUIREMENT       :=     p_OPEN_REQUIREMENT   ;
337        l_requirement_header.SHIP_TO_LOCATION_ID    :=     p_SHIP_TO_LOCATION_ID  ;
338        l_requirement_header.TASK_ID                :=     p_TASK_ID  ;
339        l_requirement_header.TASK_ASSIGNMENT_ID     :=     p_TASK_ASSIGNMENT_ID ;
340        l_requirement_header.SHIPPING_METHOD_CODE    :=    p_SHIPPING_METHOD_CODE;
341        l_requirement_header.NEED_BY_DATE            :=    p_NEED_BY_DATE   ;
342        l_requirement_header.DESTINATION_ORGANIZATION_ID  :=     p_DESTINATION_ORGANIZATION_ID;
343        l_requirement_header.PARTS_DEFINED                :=     p_PARTS_DEFINED;
344        l_requirement_header.ATTRIBUTE_CATEGORY           :=     p_ATTRIBUTE_CATEGORY;
345        l_requirement_header.ATTRIBUTE1                   :=     p_ATTRIBUTE1;
346        l_requirement_header.ATTRIBUTE2                   :=     p_ATTRIBUTE2;
347        l_requirement_header.ATTRIBUTE3                   :=     p_ATTRIBUTE3;
348        l_requirement_header.ATTRIBUTE4                   :=     p_ATTRIBUTE4;
349        l_requirement_header.ATTRIBUTE5                   :=     p_ATTRIBUTE5;
350        l_requirement_header.ATTRIBUTE6                   :=     p_ATTRIBUTE6;
351        l_requirement_header.ATTRIBUTE7                   :=     p_ATTRIBUTE7;
352        l_requirement_header.ATTRIBUTE8                   :=     p_ATTRIBUTE8;
353        l_requirement_header.ATTRIBUTE9                   :=     p_ATTRIBUTE9;
354        l_requirement_header.ATTRIBUTE10                  :=     p_ATTRIBUTE10;
355        l_requirement_header.ATTRIBUTE11                  :=     p_ATTRIBUTE11;
356        l_requirement_header.ATTRIBUTE12                  :=     p_ATTRIBUTE12;
357        l_requirement_header.ATTRIBUTE13                  :=     p_ATTRIBUTE13;
358        l_requirement_header.ATTRIBUTE14                  :=     p_ATTRIBUTE14;
359        l_requirement_header.ATTRIBUTE15                  :=     p_ATTRIBUTE15;
360        l_requirement_header.ORDER_TYPE_ID                :=     p_ORDER_TYPE_ID;
361        l_requirement_header.ADDRESS_TYPE                 :=     p_ADDRESS_TYPE;
362        l_requirement_header.RESOURCE_ID                  :=     p_RESOURCE_ID ;
363        l_requirement_header.RESOURCE_TYPE                :=     p_RESOURCE_TYPE;
364        l_requirement_header.TIMEZONE_ID                  :=     p_TIMEZONE_ID;
365        l_requirement_header.DESTINATION_SUBINVENTORY     :=     p_DESTINATION_SUBINVENTORY;
366     IF jtf_usr_hks.Ok_To_Execute('CSP_REQUIREMENT_HEADERS_PKG',
367                                       'Update_Row',
368                                       'B', 'C')  THEN
369 
370             csp_requirement_headers_cuhk.update_requirement_header_Pre
371                 ( px_requirement_header     => l_requirement_header,
372                   x_return_status          => l_return_status,
373                   x_msg_count              => l_msg_count,
374                   x_msg_data               => l_msg_data
375                 ) ;
376     IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
377       --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Customer User Hook');
378       FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_PRE_CUST_USR_HK');
379       FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
380       FND_MSG_PUB.Add;
381       RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
382     END IF;
383    END IF;
384 
385 
386   -- Pre call to the Vertical Type User Hook
387   --
388   IF jtf_usr_hks.Ok_To_Execute('CSP_REQUIREMENT_HEADERS_PKG',
389                                       'Update_Row',
390                                       'B', 'V')  THEN
391     csp_requirement_headers_vuhk.update_requirement_header_Pre
392                 ( px_requirement_header     => l_requirement_header,
393                   x_return_status          => l_return_status,
394                   x_msg_count              => l_msg_count,
395                   x_msg_data               => l_msg_data
396                 ) ;
397 
398     IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
399       --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
400       FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_PRE_VERT_USR_HK');
401       FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
402       FND_MSG_PUB.Add;
403       RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
404     END IF;
405   END IF;
406     user_hooks_rec.REQUIREMENT_HEADER_ID   := l_requirement_header.REQUIREMENT_HEADER_ID;
407   csp_requirement_headers_iuhk.update_requirement_header_Pre
408                 ( x_return_status          => l_return_status
409                 ) ;
410     IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
411       --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
412       FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_PRE_INT_USR_HK');
413       FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
414       FND_MSG_PUB.Add;
415       RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
416     END IF;
417     Update CSP_REQUIREMENT_HEADERS
418     SET
419               CREATED_BY = decode( l_requirement_header.CREATED_BY, FND_API.G_MISS_NUM, CREATED_BY, l_requirement_header.CREATED_BY),
420               CREATION_DATE = decode( l_requirement_header.CREATION_DATE, FND_API.G_MISS_DATE, CREATION_DATE, l_requirement_header.CREATION_DATE),
421               LAST_UPDATED_BY = decode( l_requirement_header.LAST_UPDATED_BY, FND_API.G_MISS_NUM, LAST_UPDATED_BY, l_requirement_header.LAST_UPDATED_BY),
422               LAST_UPDATE_DATE = decode( l_requirement_header.LAST_UPDATE_DATE, FND_API.G_MISS_DATE, LAST_UPDATE_DATE, l_requirement_header.LAST_UPDATE_DATE),
423               LAST_UPDATE_LOGIN = decode( l_requirement_header.LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, LAST_UPDATE_LOGIN, l_requirement_header.LAST_UPDATE_LOGIN),
424               OPEN_REQUIREMENT = decode( l_requirement_header.OPEN_REQUIREMENT, FND_API.G_MISS_CHAR, OPEN_REQUIREMENT, l_requirement_header.OPEN_REQUIREMENT),
425               SHIP_TO_LOCATION_ID = decode( l_requirement_header.SHIP_TO_LOCATION_ID, FND_API.G_MISS_NUM, SHIP_TO_LOCATION_ID, l_requirement_header.SHIP_TO_LOCATION_ID),
426               TASK_ID = decode( l_requirement_header.TASK_ID, FND_API.G_MISS_NUM, TASK_ID, l_requirement_header.TASK_ID),
427               TASK_ASSIGNMENT_ID = decode( l_requirement_header.TASK_ASSIGNMENT_ID, FND_API.G_MISS_NUM, TASK_ASSIGNMENT_ID, l_requirement_header.TASK_ASSIGNMENT_ID),
428               SHIPPING_METHOD_CODE = decode( l_requirement_header.SHIPPING_METHOD_CODE, FND_API.G_MISS_CHAR, SHIPPING_METHOD_CODE, l_requirement_header.SHIPPING_METHOD_CODE),
429               NEED_BY_DATE = decode( l_requirement_header.NEED_BY_DATE, FND_API.G_MISS_DATE, NEED_BY_DATE, l_requirement_header.NEED_BY_DATE),
430               DESTINATION_ORGANIZATION_ID = decode( l_requirement_header.DESTINATION_ORGANIZATION_ID, FND_API.G_MISS_NUM, DESTINATION_ORGANIZATION_ID, l_requirement_header.DESTINATION_ORGANIZATION_ID),
431               PARTS_DEFINED = decode( l_requirement_header.PARTS_DEFINED, FND_API.G_MISS_CHAR, PARTS_DEFINED, l_requirement_header.PARTS_DEFINED),
432               ATTRIBUTE_CATEGORY = decode( l_requirement_header.ATTRIBUTE_CATEGORY, FND_API.G_MISS_CHAR, ATTRIBUTE_CATEGORY, l_requirement_header.ATTRIBUTE_CATEGORY),
433               ATTRIBUTE1 = decode( l_requirement_header.ATTRIBUTE1, FND_API.G_MISS_CHAR, ATTRIBUTE1, l_requirement_header.ATTRIBUTE1),
434               ATTRIBUTE2 = decode( l_requirement_header.ATTRIBUTE2, FND_API.G_MISS_CHAR, ATTRIBUTE2, l_requirement_header.ATTRIBUTE2),
435               ATTRIBUTE3 = decode( l_requirement_header.ATTRIBUTE3, FND_API.G_MISS_CHAR, ATTRIBUTE3, l_requirement_header.ATTRIBUTE3),
436               ATTRIBUTE4 = decode( l_requirement_header.ATTRIBUTE4, FND_API.G_MISS_CHAR, ATTRIBUTE4, l_requirement_header.ATTRIBUTE4),
437               ATTRIBUTE5 = decode( l_requirement_header.ATTRIBUTE5, FND_API.G_MISS_CHAR, ATTRIBUTE5, l_requirement_header.ATTRIBUTE5),
438               ATTRIBUTE6 = decode( l_requirement_header.ATTRIBUTE6, FND_API.G_MISS_CHAR, ATTRIBUTE6, l_requirement_header.ATTRIBUTE6),
439               ATTRIBUTE7 = decode( l_requirement_header.ATTRIBUTE7, FND_API.G_MISS_CHAR, ATTRIBUTE7, l_requirement_header.ATTRIBUTE7),
440               ATTRIBUTE8 = decode( l_requirement_header.ATTRIBUTE8, FND_API.G_MISS_CHAR, ATTRIBUTE8, l_requirement_header.ATTRIBUTE8),
441               ATTRIBUTE9 = decode( l_requirement_header.ATTRIBUTE9, FND_API.G_MISS_CHAR, ATTRIBUTE9, l_requirement_header.ATTRIBUTE9),
442               ATTRIBUTE10 = decode( l_requirement_header.ATTRIBUTE10, FND_API.G_MISS_CHAR, ATTRIBUTE10, l_requirement_header.ATTRIBUTE10),
443               ATTRIBUTE11 = decode( l_requirement_header.ATTRIBUTE11, FND_API.G_MISS_CHAR, ATTRIBUTE11, l_requirement_header.ATTRIBUTE11),
444               ATTRIBUTE12 = decode( l_requirement_header.ATTRIBUTE12, FND_API.G_MISS_CHAR, ATTRIBUTE12, l_requirement_header.ATTRIBUTE12),
445               ATTRIBUTE13 = decode( l_requirement_header.ATTRIBUTE13, FND_API.G_MISS_CHAR, ATTRIBUTE13, l_requirement_header.ATTRIBUTE13),
446               ATTRIBUTE14 = decode( l_requirement_header.ATTRIBUTE14, FND_API.G_MISS_CHAR, ATTRIBUTE14, l_requirement_header.ATTRIBUTE14),
447               ATTRIBUTE15 = decode( l_requirement_header.ATTRIBUTE15, FND_API.G_MISS_CHAR, ATTRIBUTE15, l_requirement_header.ATTRIBUTE15),
448               ORDER_TYPE_ID = decode( l_requirement_header.ORDER_TYPE_ID, FND_API.G_MISS_NUM, ORDER_TYPE_ID, l_requirement_header.ORDER_TYPE_ID),
449               ADDRESS_TYPE = decode( l_requirement_header.ADDRESS_TYPE, FND_API.G_MISS_CHAR, ADDRESS_TYPE, l_requirement_header.ADDRESS_TYPE),
450               RESOURCE_ID = decode( l_requirement_header.RESOURCE_ID, FND_API.G_MISS_NUM, RESOURCE_ID, l_requirement_header.RESOURCE_ID),
451               RESOURCE_TYPE = decode( l_requirement_header.RESOURCE_TYPE, FND_API.G_MISS_CHAR,RESOURCE_TYPE, l_requirement_header.RESOURCE_TYPE),
452               --TIMEZONE_ID = decode( l_requirement_header.TIMEZONE_ID, FND_API.G_MISS_NUM, TIMEZONE_ID, l_requirement_header.TIMEZONE_ID),
453               DESTINATION_SUBINVENTORY = decode( l_requirement_header.DESTINATION_SUBINVENTORY, FND_API.G_MISS_CHAR, DESTINATION_SUBINVENTORY, l_requirement_header.DESTINATION_SUBINVENTORY)
454     where REQUIREMENT_HEADER_ID = l_requirement_header.REQUIREMENT_HEADER_ID;
455 
456     If (SQL%NOTFOUND) then
457         RAISE NO_DATA_FOUND;
458     End If;
459     IF jtf_usr_hks.Ok_To_Execute('CSP_REQUIREMENT_HEADERS_PKG',
460                                       'Update_Row',
461                                       'A', 'C')  THEN
462 
463             csp_requirement_headers_cuhk.update_requirement_header_post
464                 ( px_requirement_header     => l_requirement_header,
465                   x_return_status          => l_return_status,
466                   x_msg_count              => l_msg_count,
467                   x_msg_data               => l_msg_data
468                 ) ;
469     IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
470       --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Customer User Hook');
471       FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_POST_CUST_USR_HK');
472       FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
473       FND_MSG_PUB.Add;
474       RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
475     END IF;
476    END IF;
477 
478 
479   -- Pre call to the Vertical Type User Hook
480   --
481   IF jtf_usr_hks.Ok_To_Execute('CSP_REQUIREMENT_HEADERS_PKG',
482                                       'Update_Row',
483                                       'A', 'V')  THEN
484     csp_requirement_headers_vuhk.update_requirement_header_post
485                 ( px_requirement_header     => l_requirement_header,
486                   x_return_status          => l_return_status,
487                   x_msg_count              => l_msg_count,
488                   x_msg_data               => l_msg_data
489                 ) ;
490 
491     IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
492       --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
493       FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_POST_VERT_USR_HK');
494       FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
495       FND_MSG_PUB.Add;
496       RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
497     END IF;
498   END IF;
499   csp_requirement_headers_iuhk.update_requirement_header_post
500                 ( x_return_status          => l_return_status
501                 ) ;
502     IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
503       --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
504       FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_POST_INT_USR_HK');
505       FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
506       FND_MSG_PUB.Add;
507       RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
508     END IF;
509 END Update_Row;
510 
511 PROCEDURE Delete_Row(
512     p_REQUIREMENT_HEADER_ID  NUMBER)
513  IS
514    l_return_status    varchar2(100);
515    l_msg_count        NUMBER;
516    l_msg_data         varchar2(1000);
517    l_api_name_full    varchar2(50) := 'CSP_REQUIREMENT_HEADERS_PKG.DELETE_ROW';
518  BEGIN
519      IF jtf_usr_hks.Ok_To_Execute('CSP_REQUIREMENT_HEADERS_PKG',
520                                       'Delete_Row',
521                                       'B', 'C')  THEN
522 
523             csp_requirement_headers_cuhk.Delete_requirement_header_pre
524                   (
525                   p_header_id              => p_REQUIREMENT_HEADER_ID,
526                   x_return_status          => l_return_status,
527                   x_msg_count              => l_msg_count,
528                   x_msg_data               => l_msg_data
529                 ) ;
530     IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
531       --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Customer User Hook');
532       FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_PRE_CUST_USR_HK');
533       FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
534       FND_MSG_PUB.Add;
535       RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
536     END IF;
537    END IF;
538 
539 
540   -- Pre call to the Vertical Type User Hook
541   --
542   IF jtf_usr_hks.Ok_To_Execute('CSP_REQUIREMENT_HEADERS_PKG',
543                                       'Delete_Row',
544                                       'B', 'V')  THEN
545     csp_requirement_headers_vuhk.Delete_requirement_header_pre
546                   (
547                   p_header_id              => p_REQUIREMENT_HEADER_ID,
548                   x_return_status          => l_return_status,
549                   x_msg_count              => l_msg_count,
550                   x_msg_data               => l_msg_data
551                 ) ;
552 
553     IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
554       --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
555       FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_PRE_VERT_USR_HK');
556       FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
557       FND_MSG_PUB.Add;
558       RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
559     END IF;
560   END IF;
561     user_hooks_rec.REQUIREMENT_HEADER_ID   := p_REQUIREMENT_HEADER_ID;
562   csp_requirement_headers_iuhk.delete_requirement_header_Pre
563                 ( x_return_status          => l_return_status
564                 ) ;
565     IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
566       --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
567       FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_PRE_INT_USR_HK');
568       FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
569       FND_MSG_PUB.Add;
570       RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
571     END IF;
572    DELETE FROM CSP_REQUIREMENT_HEADERS
573     WHERE REQUIREMENT_HEADER_ID = p_REQUIREMENT_HEADER_ID;
574    If (SQL%NOTFOUND) then
575        RAISE NO_DATA_FOUND;
576    End If;
577     IF jtf_usr_hks.Ok_To_Execute('CSP_REQUIREMENT_HEADERS_PKG',
578                                       'Delete_Row',
579                                       'A', 'C')  THEN
580 
581             csp_requirement_headers_cuhk.Delete_requirement_header_post
582                   (
583                   p_header_id              => p_REQUIREMENT_HEADER_ID,
584                   x_return_status          => l_return_status,
585                   x_msg_count              => l_msg_count,
586                   x_msg_data               => l_msg_data
587                 ) ;
588     IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
589       --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Customer User Hook');
590       FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_POST_CUST_USR_HK');
591       FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
592       FND_MSG_PUB.Add;
593       RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
594     END IF;
595    END IF;
596 
597 
598   -- Pre call to the Vertical Type User Hook
599   --
600   IF jtf_usr_hks.Ok_To_Execute('CSP_REQUIREMENT_HEADERS_PKG',
601                                       'Delete_Row',
602                                       'A', 'V')  THEN
603     csp_requirement_headers_vuhk.Delete_requirement_header_post
604                   (
605                   p_header_id              => p_REQUIREMENT_HEADER_ID,
606                   x_return_status          => l_return_status,
607                   x_msg_count              => l_msg_count,
608                   x_msg_data               => l_msg_data
609                 ) ;
610 
611     IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
612       --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
613       FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_POST_VERT_USR_HK');
614       FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
615       FND_MSG_PUB.Add;
616       RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
617     END IF;
618   END IF;
619   csp_requirement_headers_iuhk.delete_requirement_header_post
620                 ( x_return_status          => l_return_status
621                 ) ;
622     IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
623       --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
624       FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_POST_INT_USR_HK');
625       FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
626       FND_MSG_PUB.Add;
627       RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
628     END IF;
629  END Delete_Row;
630 
631 PROCEDURE Lock_Row(
632           p_REQUIREMENT_HEADER_ID    NUMBER,
633           p_CREATED_BY    NUMBER,
634           p_CREATION_DATE    DATE,
635           p_LAST_UPDATED_BY    NUMBER,
636           p_LAST_UPDATE_DATE    DATE,
637           p_LAST_UPDATE_LOGIN    NUMBER,
638           p_OPEN_REQUIREMENT    VARCHAR2,
639           p_SHIP_TO_LOCATION_ID    NUMBER,
640           p_TASK_ID    NUMBER,
641           p_TASK_ASSIGNMENT_ID    NUMBER,
642           p_SHIPPING_METHOD_CODE    VARCHAR2,
643           p_NEED_BY_DATE    DATE,
644           p_DESTINATION_ORGANIZATION_ID    NUMBER,
645           p_PARTS_DEFINED    VARCHAR2,
646           p_ATTRIBUTE_CATEGORY    VARCHAR2,
647           p_ATTRIBUTE1    VARCHAR2,
648           p_ATTRIBUTE2    VARCHAR2,
649           p_ATTRIBUTE3    VARCHAR2,
650           p_ATTRIBUTE4    VARCHAR2,
651           p_ATTRIBUTE5    VARCHAR2,
652           p_ATTRIBUTE6    VARCHAR2,
653           p_ATTRIBUTE7    VARCHAR2,
654           p_ATTRIBUTE8    VARCHAR2,
655           p_ATTRIBUTE9    VARCHAR2,
656           p_ATTRIBUTE10    VARCHAR2,
657           p_ATTRIBUTE11    VARCHAR2,
658           p_ATTRIBUTE12    VARCHAR2,
659           p_ATTRIBUTE13    VARCHAR2,
660           p_ATTRIBUTE14    VARCHAR2,
661           p_ATTRIBUTE15    VARCHAR2,
662           p_ORDER_TYPE_ID  NUMBER,
663           p_ADDRESS_TYPE   VARCHAR2,
664           p_resource_id     NUMBER,
665           p_resource_type   VARCHAR2,
666           p_TIMEZONE_ID	    NUMBER,
667           P_DESTINATION_SUBINVENTORY VARCHAR2)
668 
669  IS
670    CURSOR C IS
671         SELECT *
672          FROM CSP_REQUIREMENT_HEADERS
673         WHERE REQUIREMENT_HEADER_ID =  p_REQUIREMENT_HEADER_ID
674         FOR UPDATE of REQUIREMENT_HEADER_ID NOWAIT;
675    Recinfo C%ROWTYPE;
676  BEGIN
677     OPEN C;
678     FETCH C INTO Recinfo;
679     If (C%NOTFOUND) then
680         CLOSE C;
681         FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
682         APP_EXCEPTION.RAISE_EXCEPTION;
683     End If;
684     CLOSE C;
685     if (
686            (      Recinfo.REQUIREMENT_HEADER_ID = p_REQUIREMENT_HEADER_ID)
687        AND (    ( Recinfo.CREATED_BY = p_CREATED_BY)
688             OR (    ( Recinfo.CREATED_BY IS NULL )
689                 AND (  p_CREATED_BY IS NULL )))
690        AND (    ( Recinfo.CREATION_DATE = p_CREATION_DATE)
691             OR (    ( Recinfo.CREATION_DATE IS NULL )
692                 AND (  p_CREATION_DATE IS NULL )))
693        AND (    ( Recinfo.LAST_UPDATED_BY = p_LAST_UPDATED_BY)
694             OR (    ( Recinfo.LAST_UPDATED_BY IS NULL )
695                 AND (  p_LAST_UPDATED_BY IS NULL )))
696        AND (    ( Recinfo.LAST_UPDATE_DATE = p_LAST_UPDATE_DATE)
697             OR (    ( Recinfo.LAST_UPDATE_DATE IS NULL )
698                 AND (  p_LAST_UPDATE_DATE IS NULL )))
699        AND (    ( Recinfo.LAST_UPDATE_LOGIN = p_LAST_UPDATE_LOGIN)
700             OR (    ( Recinfo.LAST_UPDATE_LOGIN IS NULL )
701                 AND (  p_LAST_UPDATE_LOGIN IS NULL )))
702        AND (    ( Recinfo.OPEN_REQUIREMENT = p_OPEN_REQUIREMENT)
703             OR (    ( Recinfo.OPEN_REQUIREMENT IS NULL )
704                 AND (  p_OPEN_REQUIREMENT IS NULL )))
705        AND (    ( Recinfo.SHIP_TO_LOCATION_ID = p_SHIP_TO_LOCATION_ID)
706             OR (    ( Recinfo.SHIP_TO_LOCATION_ID IS NULL )
707                 AND (  p_SHIP_TO_LOCATION_ID IS NULL )))
708        AND (    ( Recinfo.TASK_ID = p_TASK_ID)
709             OR (    ( Recinfo.TASK_ID IS NULL )
710                 AND (  p_TASK_ID IS NULL )))
711        AND (    ( Recinfo.TASK_ASSIGNMENT_ID = p_TASK_ASSIGNMENT_ID)
712             OR (    ( Recinfo.TASK_ASSIGNMENT_ID IS NULL )
713                 AND (  p_TASK_ASSIGNMENT_ID IS NULL )))
714        AND (    ( Recinfo.SHIPPING_METHOD_CODE = p_SHIPPING_METHOD_CODE)
715             OR (    ( Recinfo.SHIPPING_METHOD_CODE IS NULL )
716                 AND (  p_SHIPPING_METHOD_CODE IS NULL )))
717        AND (    ( Recinfo.NEED_BY_DATE = p_NEED_BY_DATE)
718             OR (    ( Recinfo.NEED_BY_DATE IS NULL )
719                 AND (  p_NEED_BY_DATE IS NULL )))
720        AND (    ( Recinfo.DESTINATION_ORGANIZATION_ID = p_DESTINATION_ORGANIZATION_ID)
721             OR (    ( Recinfo.DESTINATION_ORGANIZATION_ID IS NULL )
722                 AND (  p_DESTINATION_ORGANIZATION_ID IS NULL )))
723        AND (    ( Recinfo.PARTS_DEFINED = p_PARTS_DEFINED)
724             OR (    ( Recinfo.PARTS_DEFINED IS NULL )
725                 AND (  p_PARTS_DEFINED IS NULL )))
726        AND (    ( Recinfo.ATTRIBUTE_CATEGORY = p_ATTRIBUTE_CATEGORY)
727             OR (    ( Recinfo.ATTRIBUTE_CATEGORY IS NULL )
728                 AND (  p_ATTRIBUTE_CATEGORY IS NULL )))
729        AND (    ( Recinfo.ATTRIBUTE1 = p_ATTRIBUTE1)
730             OR (    ( Recinfo.ATTRIBUTE1 IS NULL )
731                 AND (  p_ATTRIBUTE1 IS NULL )))
732        AND (    ( Recinfo.ATTRIBUTE2 = p_ATTRIBUTE2)
733             OR (    ( Recinfo.ATTRIBUTE2 IS NULL )
734                 AND (  p_ATTRIBUTE2 IS NULL )))
735        AND (    ( Recinfo.ATTRIBUTE3 = p_ATTRIBUTE3)
736             OR (    ( Recinfo.ATTRIBUTE3 IS NULL )
737                 AND (  p_ATTRIBUTE3 IS NULL )))
738        AND (    ( Recinfo.ATTRIBUTE4 = p_ATTRIBUTE4)
739             OR (    ( Recinfo.ATTRIBUTE4 IS NULL )
740                 AND (  p_ATTRIBUTE4 IS NULL )))
741        AND (    ( Recinfo.ATTRIBUTE5 = p_ATTRIBUTE5)
742             OR (    ( Recinfo.ATTRIBUTE5 IS NULL )
743                 AND (  p_ATTRIBUTE5 IS NULL )))
744        AND (    ( Recinfo.ATTRIBUTE6 = p_ATTRIBUTE6)
745             OR (    ( Recinfo.ATTRIBUTE6 IS NULL )
746                 AND (  p_ATTRIBUTE6 IS NULL )))
747        AND (    ( Recinfo.ATTRIBUTE7 = p_ATTRIBUTE7)
748             OR (    ( Recinfo.ATTRIBUTE7 IS NULL )
749                 AND (  p_ATTRIBUTE7 IS NULL )))
750        AND (    ( Recinfo.ATTRIBUTE8 = p_ATTRIBUTE8)
751             OR (    ( Recinfo.ATTRIBUTE8 IS NULL )
752                 AND (  p_ATTRIBUTE8 IS NULL )))
753        AND (    ( Recinfo.ATTRIBUTE9 = p_ATTRIBUTE9)
754             OR (    ( Recinfo.ATTRIBUTE9 IS NULL )
755                 AND (  p_ATTRIBUTE9 IS NULL )))
756        AND (    ( Recinfo.ATTRIBUTE10 = p_ATTRIBUTE10)
757             OR (    ( Recinfo.ATTRIBUTE10 IS NULL )
758                 AND (  p_ATTRIBUTE10 IS NULL )))
759        AND (    ( Recinfo.ATTRIBUTE11 = p_ATTRIBUTE11)
760             OR (    ( Recinfo.ATTRIBUTE11 IS NULL )
761                 AND (  p_ATTRIBUTE11 IS NULL )))
762        AND (    ( Recinfo.ATTRIBUTE12 = p_ATTRIBUTE12)
763             OR (    ( Recinfo.ATTRIBUTE12 IS NULL )
764                 AND (  p_ATTRIBUTE12 IS NULL )))
765        AND (    ( Recinfo.ATTRIBUTE13 = p_ATTRIBUTE13)
766             OR (    ( Recinfo.ATTRIBUTE13 IS NULL )
767                 AND (  p_ATTRIBUTE13 IS NULL )))
768        AND (    ( Recinfo.ATTRIBUTE14 = p_ATTRIBUTE14)
769             OR (    ( Recinfo.ATTRIBUTE14 IS NULL )
770                 AND (  p_ATTRIBUTE14 IS NULL )))
771        AND (    ( Recinfo.ATTRIBUTE15 = p_ATTRIBUTE15)
772             OR (    ( Recinfo.ATTRIBUTE15 IS NULL )
773                 AND (  p_ATTRIBUTE15 IS NULL )))
774        AND (    ( Recinfo.ORDER_TYPE_ID = p_ORDER_TYPE_ID)
775             OR (    ( Recinfo.ORDER_TYPE_ID IS NULL )
776                 AND (  p_ORDER_TYPE_ID IS NULL )))
777        AND (    ( Recinfo.ADDRESS_TYPE = p_ADDRESS_TYPE)
778             OR (    ( Recinfo.ADDRESS_TYPE IS NULL )
779                 AND (  p_ADDRESS_TYPE IS NULL )))
780        AND (    ( Recinfo.RESOURCE_ID = p_RESOURCE_ID)
781             OR (    ( Recinfo.RESOURCE_ID IS NULL )
782                 AND (  p_RESOURCE_ID IS NULL )))
783        AND (    ( Recinfo.RESOURCE_TYPE = p_RESOURCE_TYPE)
784             OR (    ( Recinfo.RESOURCE_TYPE IS NULL )
785                 AND (  p_RESOURCE_TYPE IS NULL )))
786        /*AND (    ( Recinfo.TIMEZONE_ID = p_TIMEZONE_ID)
787             OR (    ( Recinfo.TIMEZONE_ID IS NULL )
788                 AND (  p_TIMEZONE_ID IS NULL )))*/
789        AND (    ( Recinfo.DESTINATION_SUBINVENTORY = p_DESTINATION_SUBINVENTORY)
790             OR (    ( Recinfo.DESTINATION_SUBINVENTORY IS NULL )
791                 AND (  p_DESTINATION_SUBINVENTORY IS NULL )))
792        ) then
793        return;
794    else
795        FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_CHANGED');
796        APP_EXCEPTION.RAISE_EXCEPTION;
797    End If;
798 END Lock_Row;
799 
800 End CSP_REQUIREMENT_HEADERS_PKG;