4: G_PKG_NAME CONSTANT VARCHAR2(30) := 'XDP_INTERFACES_PUB';
5:
6: PROCEDURE Process_Order(
7: p_api_version IN NUMBER,
8: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
9: p_commit IN VARCHAR2 := FND_API.G_FALSE,
10: p_validation_level IN NUMBER :=
11: FND_API.G_VALID_LEVEL_FULL,
12: x_RETURN_STATUS OUT NOCOPY VARCHAR2,
5:
6: PROCEDURE Process_Order(
7: p_api_version IN NUMBER,
8: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
9: p_commit IN VARCHAR2 := FND_API.G_FALSE,
10: p_validation_level IN NUMBER :=
11: FND_API.G_VALID_LEVEL_FULL,
12: x_RETURN_STATUS OUT NOCOPY VARCHAR2,
13: x_msg_count OUT NOCOPY NUMBER,
7: p_api_version IN NUMBER,
8: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
9: p_commit IN VARCHAR2 := FND_API.G_FALSE,
10: p_validation_level IN NUMBER :=
11: FND_API.G_VALID_LEVEL_FULL,
12: x_RETURN_STATUS OUT NOCOPY VARCHAR2,
13: x_msg_count OUT NOCOPY NUMBER,
14: x_msg_data OUT NOCOPY VARCHAR2,
15: P_ORDER_HEADER IN XDP_TYPES.ORDER_HEADER,
42: -- Standard Start of API savepoint
43: -- SAVEPOINT l_order_tag;
44:
45: -- Standard call to check for call compatibility.
46: IF NOT FND_API.Compatible_API_Call (
47: l_api_version,
48: p_api_version,
49: l_api_name,
50: G_PKG_NAME )
48: p_api_version,
49: l_api_name,
50: G_PKG_NAME )
51: THEN
52: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
53: END IF;
54:
55: -- Initialize message list if p_init_msg_list is set to TRUE.
56: IF FND_API.to_Boolean( p_init_msg_list ) THEN
52: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
53: END IF;
54:
55: -- Initialize message list if p_init_msg_list is set to TRUE.
56: IF FND_API.to_Boolean( p_init_msg_list ) THEN
57: FND_MSG_PUB.initialize;
58: END IF;
59:
60: /******* Prepare for going into pre processing *******/
80: p_sdp_order_id => l_sdp_order_id,
81: x_data => l_data,
82: x_count => l_count,
83: x_return_code => l_return_code );
84: if ( l_return_code = FND_API.G_RET_STS_ERROR ) then
85: RAISE FND_API.G_EXC_ERROR;
86: elsif (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) then
87: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
88: end if;
81: x_data => l_data,
82: x_count => l_count,
83: x_return_code => l_return_code );
84: if ( l_return_code = FND_API.G_RET_STS_ERROR ) then
85: RAISE FND_API.G_EXC_ERROR;
86: elsif (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) then
87: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
88: end if;
89: end if;
82: x_count => l_count,
83: x_return_code => l_return_code );
84: if ( l_return_code = FND_API.G_RET_STS_ERROR ) then
85: RAISE FND_API.G_EXC_ERROR;
86: elsif (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) then
87: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
88: end if;
89: end if;
90:
83: x_return_code => l_return_code );
84: if ( l_return_code = FND_API.G_RET_STS_ERROR ) then
85: RAISE FND_API.G_EXC_ERROR;
86: elsif (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) then
87: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
88: end if;
89: end if;
90:
91: if JTF_USR_HKS.Ok_to_Execute(
102: p_sdp_order_id => l_sdp_order_id,
103: x_data => l_data,
104: x_count => l_count,
105: x_return_code => l_return_code );
106: if ( l_return_code = FND_API.G_RET_STS_ERROR ) then
107: RAISE FND_API.G_EXC_ERROR;
108: elsif (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) then
109: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
110: end if;
103: x_data => l_data,
104: x_count => l_count,
105: x_return_code => l_return_code );
106: if ( l_return_code = FND_API.G_RET_STS_ERROR ) then
107: RAISE FND_API.G_EXC_ERROR;
108: elsif (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) then
109: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
110: end if;
111: end if;
104: x_count => l_count,
105: x_return_code => l_return_code );
106: if ( l_return_code = FND_API.G_RET_STS_ERROR ) then
107: RAISE FND_API.G_EXC_ERROR;
108: elsif (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) then
109: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
110: end if;
111: end if;
112:
105: x_return_code => l_return_code );
106: if ( l_return_code = FND_API.G_RET_STS_ERROR ) then
107: RAISE FND_API.G_EXC_ERROR;
108: elsif (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) then
109: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
110: end if;
111: end if;
112:
113:
122: RETURN_CODE => lv_ret,
123: ERROR_DESCRIPTION => lv_str);
124:
125: if lv_ret <> 0 then
126: x_return_status := FND_API.G_RET_STS_ERROR ;
127: FND_MESSAGE.SET_NAME('XDP', 'XDP_INTFACE_PROCESS_FAIL');
128: FND_MESSAGE.SET_TOKEN('ERROR_MSG',lv_str);
129: FND_MSG_PUB.Add;
130: FND_MSG_PUB.COUNT_AND_GET
156: p_sdp_order_id => l_sdp_order_id,
157: x_data => l_data,
158: x_count => l_count,
159: x_return_code => l_return_code );
160: if ( l_return_code = FND_API.G_RET_STS_ERROR ) then
161: RAISE FND_API.G_EXC_ERROR;
162: elsif (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) then
163: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
164: end if;
157: x_data => l_data,
158: x_count => l_count,
159: x_return_code => l_return_code );
160: if ( l_return_code = FND_API.G_RET_STS_ERROR ) then
161: RAISE FND_API.G_EXC_ERROR;
162: elsif (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) then
163: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
164: end if;
165: end if;
158: x_count => l_count,
159: x_return_code => l_return_code );
160: if ( l_return_code = FND_API.G_RET_STS_ERROR ) then
161: RAISE FND_API.G_EXC_ERROR;
162: elsif (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) then
163: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
164: end if;
165: end if;
166:
159: x_return_code => l_return_code );
160: if ( l_return_code = FND_API.G_RET_STS_ERROR ) then
161: RAISE FND_API.G_EXC_ERROR;
162: elsif (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) then
163: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
164: end if;
165: end if;
166:
167: if JTF_USR_HKS.Ok_to_Execute(
178: p_sdp_order_id => l_sdp_order_id,
179: x_data => l_data,
180: x_count => l_count,
181: x_return_code => l_return_code );
182: if ( l_return_code = FND_API.G_RET_STS_ERROR ) then
183: RAISE FND_API.G_EXC_ERROR;
184: elsif (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) then
185: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
186: end if;
179: x_data => l_data,
180: x_count => l_count,
181: x_return_code => l_return_code );
182: if ( l_return_code = FND_API.G_RET_STS_ERROR ) then
183: RAISE FND_API.G_EXC_ERROR;
184: elsif (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) then
185: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
186: end if;
187: end if;
180: x_count => l_count,
181: x_return_code => l_return_code );
182: if ( l_return_code = FND_API.G_RET_STS_ERROR ) then
183: RAISE FND_API.G_EXC_ERROR;
184: elsif (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) then
185: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
186: end if;
187: end if;
188:
181: x_return_code => l_return_code );
182: if ( l_return_code = FND_API.G_RET_STS_ERROR ) then
183: RAISE FND_API.G_EXC_ERROR;
184: elsif (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) then
185: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
186: end if;
187: end if;
188:
189:
222: p_bind_data_id => l_bind_data_id,
223: x_return_code => l_return_code
224: );
225:
226: if (l_return_code = FND_API.G_RET_STS_ERROR) then
227: RAISE FND_API.G_EXC_ERROR;
228: elsif (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR) then
229: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
230: end if;
223: x_return_code => l_return_code
224: );
225:
226: if (l_return_code = FND_API.G_RET_STS_ERROR) then
227: RAISE FND_API.G_EXC_ERROR;
228: elsif (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR) then
229: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
230: end if;
231: end if;
224: );
225:
226: if (l_return_code = FND_API.G_RET_STS_ERROR) then
227: RAISE FND_API.G_EXC_ERROR;
228: elsif (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR) then
229: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
230: end if;
231: end if;
232: end if;
225:
226: if (l_return_code = FND_API.G_RET_STS_ERROR) then
227: RAISE FND_API.G_EXC_ERROR;
228: elsif (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR) then
229: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
230: end if;
231: end if;
232: end if;
233:
232: end if;
233:
234: /******* End of Message Generation Section ********/
235:
236: x_return_status := FND_API.G_RET_STS_SUCCESS;
237:
238: -- Standard check of p_commit.
239: IF FND_API.To_Boolean( p_commit ) THEN
240: COMMIT WORK;
235:
236: x_return_status := FND_API.G_RET_STS_SUCCESS;
237:
238: -- Standard check of p_commit.
239: IF FND_API.To_Boolean( p_commit ) THEN
240: COMMIT WORK;
241: END IF;
242:
243: -- Standard call to get message count and if count is 1, get message info.
245: p_count => x_msg_count,
246: p_data => x_msg_data );
247:
248: EXCEPTION
249: WHEN FND_API.G_EXC_ERROR THEN
250: -- ROLLBACK TO l_order_tag;
251: x_return_status := FND_API.G_RET_STS_ERROR ;
252: FND_MSG_PUB.Count_And_Get
253: ( p_count => x_msg_count ,
247:
248: EXCEPTION
249: WHEN FND_API.G_EXC_ERROR THEN
250: -- ROLLBACK TO l_order_tag;
251: x_return_status := FND_API.G_RET_STS_ERROR ;
252: FND_MSG_PUB.Count_And_Get
253: ( p_count => x_msg_count ,
254: p_data => x_msg_data
255: );
252: FND_MSG_PUB.Count_And_Get
253: ( p_count => x_msg_count ,
254: p_data => x_msg_data
255: );
256: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
257: -- ROLLBACK TO l_order_tag;
258: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
259: FND_MSG_PUB.Count_And_Get
260: ( p_count => x_msg_count,
254: p_data => x_msg_data
255: );
256: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
257: -- ROLLBACK TO l_order_tag;
258: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
259: FND_MSG_PUB.Count_And_Get
260: ( p_count => x_msg_count,
261: p_data => x_msg_data
262: );
261: p_data => x_msg_data
262: );
263: WHEN OTHERS THEN
264: -- ROLLBACK TO l_order_tag;
265: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
266: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
267: THEN
268: FND_MSG_PUB.Add_Exc_Msg
269: ( G_PKG_NAME ,
281:
282:
283: PROCEDURE Cancel_Order(
284: p_api_version IN NUMBER,
285: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
286: p_commit IN VARCHAR2 := FND_API.G_FALSE,
287: p_validation_level IN NUMBER :=
288: FND_API.G_VALID_LEVEL_FULL,
289: x_RETURN_STATUS OUT NOCOPY VARCHAR2,
282:
283: PROCEDURE Cancel_Order(
284: p_api_version IN NUMBER,
285: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
286: p_commit IN VARCHAR2 := FND_API.G_FALSE,
287: p_validation_level IN NUMBER :=
288: FND_API.G_VALID_LEVEL_FULL,
289: x_RETURN_STATUS OUT NOCOPY VARCHAR2,
290: x_msg_count OUT NOCOPY NUMBER,
284: p_api_version IN NUMBER,
285: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
286: p_commit IN VARCHAR2 := FND_API.G_FALSE,
287: p_validation_level IN NUMBER :=
288: FND_API.G_VALID_LEVEL_FULL,
289: x_RETURN_STATUS OUT NOCOPY VARCHAR2,
290: x_msg_count OUT NOCOPY NUMBER,
291: x_msg_data OUT NOCOPY VARCHAR2,
292: P_SDP_ORDER_ID IN NUMBER,
314: -- Standard Start of API savepoint
315: -- SAVEPOINT l_order_tag;
316:
317: -- Standard call to check for call compatibility.
318: IF NOT FND_API.Compatible_API_Call (
319: l_api_version,
320: p_api_version,
321: l_api_name,
322: G_PKG_NAME )
320: p_api_version,
321: l_api_name,
322: G_PKG_NAME )
323: THEN
324: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
325: END IF;
326:
327: -- Initialize message list if p_init_msg_list is set to TRUE.
328: IF FND_API.to_Boolean( p_init_msg_list ) THEN
324: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
325: END IF;
326:
327: -- Initialize message list if p_init_msg_list is set to TRUE.
328: IF FND_API.to_Boolean( p_init_msg_list ) THEN
329: FND_MSG_PUB.initialize;
330: END IF;
331:
332:
346: p_sdp_order_id => l_sdp_order_id,
347: x_data => l_data,
348: x_count => l_count,
349: x_return_code => l_return_code );
350: if ( l_return_code = FND_API.G_RET_STS_ERROR ) then
351: RAISE FND_API.G_EXC_ERROR;
352: elsif (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) then
353: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
354: end if;
347: x_data => l_data,
348: x_count => l_count,
349: x_return_code => l_return_code );
350: if ( l_return_code = FND_API.G_RET_STS_ERROR ) then
351: RAISE FND_API.G_EXC_ERROR;
352: elsif (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) then
353: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
354: end if;
355: end if;
348: x_count => l_count,
349: x_return_code => l_return_code );
350: if ( l_return_code = FND_API.G_RET_STS_ERROR ) then
351: RAISE FND_API.G_EXC_ERROR;
352: elsif (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) then
353: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
354: end if;
355: end if;
356:
349: x_return_code => l_return_code );
350: if ( l_return_code = FND_API.G_RET_STS_ERROR ) then
351: RAISE FND_API.G_EXC_ERROR;
352: elsif (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) then
353: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
354: end if;
355: end if;
356:
357: if JTF_USR_HKS.Ok_to_Execute(
365: p_sdp_order_id => l_sdp_order_id,
366: x_data => l_data,
367: x_count => l_count,
368: x_return_code => l_return_code );
369: if ( l_return_code = FND_API.G_RET_STS_ERROR ) then
370: RAISE FND_API.G_EXC_ERROR;
371: elsif (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) then
372: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
373: end if;
366: x_data => l_data,
367: x_count => l_count,
368: x_return_code => l_return_code );
369: if ( l_return_code = FND_API.G_RET_STS_ERROR ) then
370: RAISE FND_API.G_EXC_ERROR;
371: elsif (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) then
372: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
373: end if;
374: end if;
367: x_count => l_count,
368: x_return_code => l_return_code );
369: if ( l_return_code = FND_API.G_RET_STS_ERROR ) then
370: RAISE FND_API.G_EXC_ERROR;
371: elsif (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) then
372: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
373: end if;
374: end if;
375:
368: x_return_code => l_return_code );
369: if ( l_return_code = FND_API.G_RET_STS_ERROR ) then
370: RAISE FND_API.G_EXC_ERROR;
371: elsif (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) then
372: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
373: end if;
374: end if;
375:
376:
382: RETURN_CODE => lv_ret,
383: ERROR_DESCRIPTION => lv_str);
384:
385: if lv_ret <> 0 then
386: x_return_status := FND_API.G_RET_STS_ERROR ;
387: FND_MESSAGE.SET_NAME('XDP', 'XDP_INTFACE_CANCEL_FAIL');
388: FND_MESSAGE.SET_TOKEN('ERROR_MSG',lv_str);
389: FND_MSG_PUB.Add;
390: FND_MSG_PUB.COUNT_AND_GET
413: p_sdp_order_id => l_sdp_order_id,
414: x_data => l_data,
415: x_count => l_count,
416: x_return_code => l_return_code );
417: if ( l_return_code = FND_API.G_RET_STS_ERROR ) then
418: RAISE FND_API.G_EXC_ERROR;
419: elsif (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) then
420: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
421: end if;
414: x_data => l_data,
415: x_count => l_count,
416: x_return_code => l_return_code );
417: if ( l_return_code = FND_API.G_RET_STS_ERROR ) then
418: RAISE FND_API.G_EXC_ERROR;
419: elsif (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) then
420: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
421: end if;
422: end if;
415: x_count => l_count,
416: x_return_code => l_return_code );
417: if ( l_return_code = FND_API.G_RET_STS_ERROR ) then
418: RAISE FND_API.G_EXC_ERROR;
419: elsif (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) then
420: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
421: end if;
422: end if;
423:
416: x_return_code => l_return_code );
417: if ( l_return_code = FND_API.G_RET_STS_ERROR ) then
418: RAISE FND_API.G_EXC_ERROR;
419: elsif (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) then
420: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
421: end if;
422: end if;
423:
424: if JTF_USR_HKS.Ok_to_Execute(
432: p_sdp_order_id => l_sdp_order_id,
433: x_data => l_data,
434: x_count => l_count,
435: x_return_code => l_return_code );
436: if ( l_return_code = FND_API.G_RET_STS_ERROR ) then
437: RAISE FND_API.G_EXC_ERROR;
438: elsif (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) then
439: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
440: end if;
433: x_data => l_data,
434: x_count => l_count,
435: x_return_code => l_return_code );
436: if ( l_return_code = FND_API.G_RET_STS_ERROR ) then
437: RAISE FND_API.G_EXC_ERROR;
438: elsif (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) then
439: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
440: end if;
441: end if;
434: x_count => l_count,
435: x_return_code => l_return_code );
436: if ( l_return_code = FND_API.G_RET_STS_ERROR ) then
437: RAISE FND_API.G_EXC_ERROR;
438: elsif (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) then
439: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
440: end if;
441: end if;
442:
435: x_return_code => l_return_code );
436: if ( l_return_code = FND_API.G_RET_STS_ERROR ) then
437: RAISE FND_API.G_EXC_ERROR;
438: elsif (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) then
439: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
440: end if;
441: end if;
442:
443:
473: p_bind_data_id => l_bind_data_id,
474: x_return_code => l_return_code
475: );
476:
477: if (l_return_code = FND_API.G_RET_STS_ERROR) then
478: RAISE FND_API.G_EXC_ERROR;
479: elsif (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR) then
480: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
481: end if;
474: x_return_code => l_return_code
475: );
476:
477: if (l_return_code = FND_API.G_RET_STS_ERROR) then
478: RAISE FND_API.G_EXC_ERROR;
479: elsif (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR) then
480: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
481: end if;
482: end if;
475: );
476:
477: if (l_return_code = FND_API.G_RET_STS_ERROR) then
478: RAISE FND_API.G_EXC_ERROR;
479: elsif (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR) then
480: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
481: end if;
482: end if;
483: end if;
476:
477: if (l_return_code = FND_API.G_RET_STS_ERROR) then
478: RAISE FND_API.G_EXC_ERROR;
479: elsif (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR) then
480: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
481: end if;
482: end if;
483: end if;
484:
483: end if;
484:
485: /******* End of Message Generation Section ********/
486:
487: x_return_status := FND_API.G_RET_STS_SUCCESS;
488:
489: -- Standard check of p_commit.
490: IF FND_API.To_Boolean( p_commit ) THEN
491: COMMIT WORK;
486:
487: x_return_status := FND_API.G_RET_STS_SUCCESS;
488:
489: -- Standard check of p_commit.
490: IF FND_API.To_Boolean( p_commit ) THEN
491: COMMIT WORK;
492: END IF;
493:
494: -- Standard call to get message count and if count is 1, get message info.
496: p_count => x_msg_count,
497: p_data => x_msg_data );
498:
499: EXCEPTION
500: WHEN FND_API.G_EXC_ERROR THEN
501: -- ROLLBACK TO l_order_tag;
502: x_return_status := FND_API.G_RET_STS_ERROR ;
503: FND_MSG_PUB.Count_And_Get
504: ( p_count => x_msg_count ,
498:
499: EXCEPTION
500: WHEN FND_API.G_EXC_ERROR THEN
501: -- ROLLBACK TO l_order_tag;
502: x_return_status := FND_API.G_RET_STS_ERROR ;
503: FND_MSG_PUB.Count_And_Get
504: ( p_count => x_msg_count ,
505: p_data => x_msg_data
506: );
503: FND_MSG_PUB.Count_And_Get
504: ( p_count => x_msg_count ,
505: p_data => x_msg_data
506: );
507: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
508: -- ROLLBACK TO l_order_tag;
509: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
510: FND_MSG_PUB.Count_And_Get
511: ( p_count => x_msg_count,
505: p_data => x_msg_data
506: );
507: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
508: -- ROLLBACK TO l_order_tag;
509: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
510: FND_MSG_PUB.Count_And_Get
511: ( p_count => x_msg_count,
512: p_data => x_msg_data
513: );
512: p_data => x_msg_data
513: );
514: WHEN OTHERS THEN
515: -- ROLLBACK TO l_order_tag;
516: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
517: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
518: THEN
519: FND_MSG_PUB.Add_Exc_Msg
520: ( G_PKG_NAME ,
541: l_ret_code NUMBER := 0;
542: l_ret_desc VARCHAR2(2000);
543: BEGIN
544: -- Standard call to check for call compatibility.
545: IF NOT FND_API.Compatible_API_Call (
546: l_api_version,
547: p_api_version,
548: l_api_name,
549: G_PKG_NAME )
547: p_api_version,
548: l_api_name,
549: G_PKG_NAME )
550: THEN
551: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
552: END IF;
553:
554: /******* Start of API Body *******/
555: XDP_INTERFACES.Get_Order_Param_Value(
558: x_parameter_value => x_ORDER_PARAM_VALUE,
559: x_RETURN_CODE => l_ret_code,
560: x_ERROR_DESCRIPTION => l_ret_desc);
561: IF l_ret_code = 0 THEN
562: x_return_status := FND_API.G_RET_STS_SUCCESS;
563: x_RETURN_MSG := '';
564: ELSE
565: x_return_status := FND_API.G_RET_STS_ERROR;
566: x_RETURN_MSG := l_ret_desc;
561: IF l_ret_code = 0 THEN
562: x_return_status := FND_API.G_RET_STS_SUCCESS;
563: x_RETURN_MSG := '';
564: ELSE
565: x_return_status := FND_API.G_RET_STS_ERROR;
566: x_RETURN_MSG := l_ret_desc;
567: END IF;
568:
569: /******* End of API Body *******/
567: END IF;
568:
569: /******* End of API Body *******/
570: EXCEPTION
571: WHEN FND_API.G_EXC_ERROR THEN
572: x_return_status := FND_API.G_RET_STS_ERROR ;
573: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
574: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
575: WHEN OTHERS THEN
568:
569: /******* End of API Body *******/
570: EXCEPTION
571: WHEN FND_API.G_EXC_ERROR THEN
572: x_return_status := FND_API.G_RET_STS_ERROR ;
573: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
574: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
575: WHEN OTHERS THEN
576: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
569: /******* End of API Body *******/
570: EXCEPTION
571: WHEN FND_API.G_EXC_ERROR THEN
572: x_return_status := FND_API.G_RET_STS_ERROR ;
573: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
574: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
575: WHEN OTHERS THEN
576: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
577:
570: EXCEPTION
571: WHEN FND_API.G_EXC_ERROR THEN
572: x_return_status := FND_API.G_RET_STS_ERROR ;
573: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
574: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
575: WHEN OTHERS THEN
576: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
577:
578: END Get_Order_Parameter_Value;
572: x_return_status := FND_API.G_RET_STS_ERROR ;
573: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
574: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
575: WHEN OTHERS THEN
576: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
577:
578: END Get_Order_Parameter_Value;
579:
580: PROCEDURE Get_Order_Parameter_List(
589: l_ret_code NUMBER := 0;
590: l_ret_desc VARCHAR2(2000);
591: BEGIN
592: -- Standard call to check for call compatibility.
593: IF NOT FND_API.Compatible_API_Call (
594: l_api_version,
595: p_api_version,
596: l_api_name,
597: G_PKG_NAME )
595: p_api_version,
596: l_api_name,
597: G_PKG_NAME )
598: THEN
599: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
600: END IF;
601:
602: /******* Start of API Body *******/
603:
605: P_ORDER_ID => P_SDP_ORDER_ID,
606: x_RETURN_CODE => L_ret_code,
607: x_ERROR_DESCRIPTION => l_ret_desc);
608: IF l_ret_code = 0 THEN
609: x_return_status := FND_API.G_RET_STS_SUCCESS;
610: x_RETURN_MSG := '';
611: ELSE
612: x_return_status := FND_API.G_RET_STS_ERROR;
613: x_RETURN_MSG := l_ret_desc;
608: IF l_ret_code = 0 THEN
609: x_return_status := FND_API.G_RET_STS_SUCCESS;
610: x_RETURN_MSG := '';
611: ELSE
612: x_return_status := FND_API.G_RET_STS_ERROR;
613: x_RETURN_MSG := l_ret_desc;
614: END IF;
615:
616: /******* End of API Body *******/
614: END IF;
615:
616: /******* End of API Body *******/
617: EXCEPTION
618: WHEN FND_API.G_EXC_ERROR THEN
619: x_return_status := FND_API.G_RET_STS_ERROR ;
620: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
621: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
622: WHEN OTHERS THEN
615:
616: /******* End of API Body *******/
617: EXCEPTION
618: WHEN FND_API.G_EXC_ERROR THEN
619: x_return_status := FND_API.G_RET_STS_ERROR ;
620: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
621: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
622: WHEN OTHERS THEN
623: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
616: /******* End of API Body *******/
617: EXCEPTION
618: WHEN FND_API.G_EXC_ERROR THEN
619: x_return_status := FND_API.G_RET_STS_ERROR ;
620: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
621: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
622: WHEN OTHERS THEN
623: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
624: END Get_Order_Parameter_List;
617: EXCEPTION
618: WHEN FND_API.G_EXC_ERROR THEN
619: x_return_status := FND_API.G_RET_STS_ERROR ;
620: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
621: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
622: WHEN OTHERS THEN
623: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
624: END Get_Order_Parameter_List;
625:
619: x_return_status := FND_API.G_RET_STS_ERROR ;
620: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
621: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
622: WHEN OTHERS THEN
623: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
624: END Get_Order_Parameter_List;
625:
626: PROCEDURE Get_Line_Parameter_Value(
627: p_api_version IN NUMBER,
637: l_ret_code NUMBER := 0;
638: l_ret_desc VARCHAR2(2000);
639: BEGIN
640: -- Standard call to check for call compatibility.
641: IF NOT FND_API.Compatible_API_Call (
642: l_api_version,
643: p_api_version,
644: l_api_name,
645: G_PKG_NAME )
643: p_api_version,
644: l_api_name,
645: G_PKG_NAME )
646: THEN
647: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
648: END IF;
649:
650: /******* Start of API Body *******/
651: XDP_INTERFACES.Get_Line_Param_Value(
655: x_parameter_value => x_LINE_PARAM_VALUE,
656: x_RETURN_CODE => l_ret_code,
657: x_ERROR_DESCRIPTION => l_ret_desc);
658: IF l_ret_code = 0 THEN
659: x_return_status := FND_API.G_RET_STS_SUCCESS;
660: x_RETURN_MSG := '';
661: ELSE
662: x_return_status := FND_API.G_RET_STS_ERROR;
663: x_RETURN_MSG := l_ret_desc;
658: IF l_ret_code = 0 THEN
659: x_return_status := FND_API.G_RET_STS_SUCCESS;
660: x_RETURN_MSG := '';
661: ELSE
662: x_return_status := FND_API.G_RET_STS_ERROR;
663: x_RETURN_MSG := l_ret_desc;
664: END IF;
665:
666: /******* End of API Body *******/
664: END IF;
665:
666: /******* End of API Body *******/
667: EXCEPTION
668: WHEN FND_API.G_EXC_ERROR THEN
669: x_return_status := FND_API.G_RET_STS_ERROR ;
670: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
671: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
672: WHEN OTHERS THEN
665:
666: /******* End of API Body *******/
667: EXCEPTION
668: WHEN FND_API.G_EXC_ERROR THEN
669: x_return_status := FND_API.G_RET_STS_ERROR ;
670: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
671: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
672: WHEN OTHERS THEN
673: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
666: /******* End of API Body *******/
667: EXCEPTION
668: WHEN FND_API.G_EXC_ERROR THEN
669: x_return_status := FND_API.G_RET_STS_ERROR ;
670: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
671: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
672: WHEN OTHERS THEN
673: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
674: END Get_Line_Parameter_Value;
667: EXCEPTION
668: WHEN FND_API.G_EXC_ERROR THEN
669: x_return_status := FND_API.G_RET_STS_ERROR ;
670: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
671: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
672: WHEN OTHERS THEN
673: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
674: END Get_Line_Parameter_Value;
675:
669: x_return_status := FND_API.G_RET_STS_ERROR ;
670: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
671: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
672: WHEN OTHERS THEN
673: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
674: END Get_Line_Parameter_Value;
675:
676:
677: /*
690: -- Process Order
691:
692: PROCEDURE Process_Order(
693: p_api_version IN NUMBER,
694: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
695: p_commit IN VARCHAR2 := FND_API.G_FALSE,
696: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
697: x_return_status OUT NOCOPY VARCHAR2,
698: x_msg_count OUT NOCOPY NUMBER,
691:
692: PROCEDURE Process_Order(
693: p_api_version IN NUMBER,
694: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
695: p_commit IN VARCHAR2 := FND_API.G_FALSE,
696: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
697: x_return_status OUT NOCOPY VARCHAR2,
698: x_msg_count OUT NOCOPY NUMBER,
699: x_msg_data OUT NOCOPY VARCHAR2,
692: PROCEDURE Process_Order(
693: p_api_version IN NUMBER,
694: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
695: p_commit IN VARCHAR2 := FND_API.G_FALSE,
696: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
697: x_return_status OUT NOCOPY VARCHAR2,
698: x_msg_count OUT NOCOPY NUMBER,
699: x_msg_data OUT NOCOPY VARCHAR2,
700: x_error_code OUT NOCOPY VARCHAR2,
729:
730: BEGIN
731: -- Standard call to check for call compatibility.
732:
733: IF NOT FND_API.Compatible_API_Call (
734: l_api_version,
735: p_api_version,
736: l_api_name,
737: G_PKG_NAME
736: l_api_name,
737: G_PKG_NAME
738: )
739: THEN
740: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
741: END IF;
742:
743: -- Initialize message list if p_init_msg_list is set to TRUE.
744:
741: END IF;
742:
743: -- Initialize message list if p_init_msg_list is set to TRUE.
744:
745: IF FND_API.to_Boolean( p_init_msg_list ) THEN
746: FND_MSG_PUB.initialize;
747: END IF;
748:
749: -- Converting G_Miss variables
773: p_order_id => l_order_id,
774: x_data => l_data,
775: x_count => l_count,
776: x_return_code => l_return_code );
777: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
778: RAISE FND_API.G_EXC_ERROR;
779: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
780: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
781: END IF;
774: x_data => l_data,
775: x_count => l_count,
776: x_return_code => l_return_code );
777: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
778: RAISE FND_API.G_EXC_ERROR;
779: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
780: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
781: END IF;
782: END IF;
775: x_count => l_count,
776: x_return_code => l_return_code );
777: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
778: RAISE FND_API.G_EXC_ERROR;
779: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
780: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
781: END IF;
782: END IF;
783:
776: x_return_code => l_return_code );
777: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
778: RAISE FND_API.G_EXC_ERROR;
779: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
780: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
781: END IF;
782: END IF;
783:
784: IF JTF_USR_HKS.Ok_to_Execute(
794: p_order_id => l_order_id,
795: x_data => l_data,
796: x_count => l_count,
797: x_return_code => l_return_code );
798: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
799: RAISE FND_API.G_EXC_ERROR;
800: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
801: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
802: END IF;
795: x_data => l_data,
796: x_count => l_count,
797: x_return_code => l_return_code );
798: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
799: RAISE FND_API.G_EXC_ERROR;
800: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
801: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
802: END IF;
803: END IF;
796: x_count => l_count,
797: x_return_code => l_return_code );
798: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
799: RAISE FND_API.G_EXC_ERROR;
800: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
801: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
802: END IF;
803: END IF;
804:
797: x_return_code => l_return_code );
798: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
799: RAISE FND_API.G_EXC_ERROR;
800: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
801: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
802: END IF;
803: END IF;
804:
805: /******* Start of API Body *******/
814: lv_str
815: );
816:
817: IF lv_ret <> 0 THEN
818: x_return_status := FND_API.G_RET_STS_ERROR ;
819: x_error_code := lv_ret;
820: FND_MESSAGE.SET_NAME('XDP', 'XDP_INTFACE_PROCESS_FAIL');
821: FND_MESSAGE.SET_TOKEN('ERROR_MSG',lv_str);
822: FND_MSG_PUB.Add;
851: p_order_id => l_order_id,
852: x_data => l_data,
853: x_count => l_count,
854: x_return_code => l_return_code );
855: IF ( l_return_code = FND_API.G_RET_STS_ERROR ) THEN
856: RAISE FND_API.G_EXC_ERROR;
857: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
858: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
859: END IF;
852: x_data => l_data,
853: x_count => l_count,
854: x_return_code => l_return_code );
855: IF ( l_return_code = FND_API.G_RET_STS_ERROR ) THEN
856: RAISE FND_API.G_EXC_ERROR;
857: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
858: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
859: END IF;
860: END IF;
853: x_count => l_count,
854: x_return_code => l_return_code );
855: IF ( l_return_code = FND_API.G_RET_STS_ERROR ) THEN
856: RAISE FND_API.G_EXC_ERROR;
857: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
858: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
859: END IF;
860: END IF;
861:
854: x_return_code => l_return_code );
855: IF ( l_return_code = FND_API.G_RET_STS_ERROR ) THEN
856: RAISE FND_API.G_EXC_ERROR;
857: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
858: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
859: END IF;
860: END IF;
861:
862: IF JTF_USR_HKS.Ok_to_Execute(
872: p_order_id => l_order_id,
873: x_data => l_data,
874: x_count => l_count,
875: x_return_code => l_return_code );
876: IF ( l_return_code = FND_API.G_RET_STS_ERROR ) THEN
877: RAISE FND_API.G_EXC_ERROR;
878: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
879: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
880: END IF;
873: x_data => l_data,
874: x_count => l_count,
875: x_return_code => l_return_code );
876: IF ( l_return_code = FND_API.G_RET_STS_ERROR ) THEN
877: RAISE FND_API.G_EXC_ERROR;
878: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
879: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
880: END IF;
881: END IF;
874: x_count => l_count,
875: x_return_code => l_return_code );
876: IF ( l_return_code = FND_API.G_RET_STS_ERROR ) THEN
877: RAISE FND_API.G_EXC_ERROR;
878: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
879: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
880: END IF;
881: END IF;
882:
875: x_return_code => l_return_code );
876: IF ( l_return_code = FND_API.G_RET_STS_ERROR ) THEN
877: RAISE FND_API.G_EXC_ERROR;
878: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
879: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
880: END IF;
881: END IF;
882:
883: /******* Message Generation Section ********/
913: p_bind_data_id => l_bind_data_id,
914: x_return_code => l_return_code
915: );
916:
917: IF (l_return_code = FND_API.G_RET_STS_ERROR) THEN
918: RAISE FND_API.G_EXC_ERROR;
919: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR) THEN
920: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
921: END IF;
914: x_return_code => l_return_code
915: );
916:
917: IF (l_return_code = FND_API.G_RET_STS_ERROR) THEN
918: RAISE FND_API.G_EXC_ERROR;
919: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR) THEN
920: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
921: END IF;
922: END IF;
915: );
916:
917: IF (l_return_code = FND_API.G_RET_STS_ERROR) THEN
918: RAISE FND_API.G_EXC_ERROR;
919: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR) THEN
920: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
921: END IF;
922: END IF;
923: END IF;
916:
917: IF (l_return_code = FND_API.G_RET_STS_ERROR) THEN
918: RAISE FND_API.G_EXC_ERROR;
919: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR) THEN
920: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
921: END IF;
922: END IF;
923: END IF;
924:
923: END IF;
924:
925: /******* End of Message Generation Section ********/
926:
927: x_return_status := FND_API.G_RET_STS_SUCCESS;
928: x_error_code := 0;
929:
930: -- Standard check of p_commit.
931:
928: x_error_code := 0;
929:
930: -- Standard check of p_commit.
931:
932: IF FND_API.To_Boolean(p_commit) THEN
933: COMMIT WORK;
934: END IF;
935:
936: -- Standard call to get message count and if count is 1, get message info.
939: p_count => x_msg_count,
940: p_data => x_msg_data );
941:
942: EXCEPTION
943: WHEN FND_API.G_EXC_ERROR THEN
944: -- ROLLBACK TO l_order_tag;
945: x_return_status := FND_API.G_RET_STS_ERROR ;
946: x_error_code := SQLCODE;
947: FND_MSG_PUB.Count_And_Get
941:
942: EXCEPTION
943: WHEN FND_API.G_EXC_ERROR THEN
944: -- ROLLBACK TO l_order_tag;
945: x_return_status := FND_API.G_RET_STS_ERROR ;
946: x_error_code := SQLCODE;
947: FND_MSG_PUB.Count_And_Get
948: ( p_count => x_msg_count ,
949: p_data => x_msg_data
948: ( p_count => x_msg_count ,
949: p_data => x_msg_data
950: );
951: x_msg_data := SQLERRM;
952: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
953: -- ROLLBACK TO l_order_tag;
954: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
955: x_error_code := SQLCODE;
956: FND_MSG_PUB.Count_And_Get
950: );
951: x_msg_data := SQLERRM;
952: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
953: -- ROLLBACK TO l_order_tag;
954: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
955: x_error_code := SQLCODE;
956: FND_MSG_PUB.Count_And_Get
957: ( p_count => x_msg_count,
958: p_data => x_msg_data
959: );
960: x_msg_data := SQLERRM;
961: WHEN OTHERS THEN
962: -- ROLLBACK TO l_order_tag;
963: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
964: x_error_code := SQLCODE;
965: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
966: THEN
967: FND_MSG_PUB.Add_Exc_Msg
978:
979:
980: PROCEDURE Cancel_Order(
981: p_api_version IN NUMBER,
982: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
983: p_commit IN VARCHAR2 := FND_API.G_FALSE,
984: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
985: x_return_status OUT NOCOPY VARCHAR2,
986: x_msg_count OUT NOCOPY NUMBER,
979:
980: PROCEDURE Cancel_Order(
981: p_api_version IN NUMBER,
982: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
983: p_commit IN VARCHAR2 := FND_API.G_FALSE,
984: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
985: x_return_status OUT NOCOPY VARCHAR2,
986: x_msg_count OUT NOCOPY NUMBER,
987: x_msg_data OUT NOCOPY VARCHAR2,
980: PROCEDURE Cancel_Order(
981: p_api_version IN NUMBER,
982: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
983: p_commit IN VARCHAR2 := FND_API.G_FALSE,
984: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
985: x_return_status OUT NOCOPY VARCHAR2,
986: x_msg_count OUT NOCOPY NUMBER,
987: x_msg_data OUT NOCOPY VARCHAR2,
988: p_order_number IN VARCHAR2,
1014: BEGIN
1015:
1016: -- Standard call to check for call compatibility.
1017:
1018: IF NOT FND_API.Compatible_API_Call (
1019: l_api_version,
1020: p_api_version,
1021: l_api_name,
1022: G_PKG_NAME )
1020: p_api_version,
1021: l_api_name,
1022: G_PKG_NAME )
1023: THEN
1024: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1025: END IF;
1026:
1027: -- Initialize message list if p_init_msg_list is set to TRUE.
1028:
1025: END IF;
1026:
1027: -- Initialize message list if p_init_msg_list is set to TRUE.
1028:
1029: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1030: FND_MSG_PUB.initialize;
1031: END IF;
1032:
1033: l_caller_name := p_caller_name;
1048: p_order_version => l_order_version,
1049: x_data => l_data,
1050: x_count => l_count,
1051: x_return_code => l_return_code );
1052: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1053: RAISE FND_API.G_EXC_ERROR;
1054: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1055: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1056: END IF;
1049: x_data => l_data,
1050: x_count => l_count,
1051: x_return_code => l_return_code );
1052: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1053: RAISE FND_API.G_EXC_ERROR;
1054: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1055: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1056: END IF;
1057: END IF;
1050: x_count => l_count,
1051: x_return_code => l_return_code );
1052: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1053: RAISE FND_API.G_EXC_ERROR;
1054: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1055: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1056: END IF;
1057: END IF;
1058:
1051: x_return_code => l_return_code );
1052: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1053: RAISE FND_API.G_EXC_ERROR;
1054: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1055: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1056: END IF;
1057: END IF;
1058:
1059: IF JTF_USR_HKS.Ok_to_Execute(
1068: p_order_version => l_order_version,
1069: x_data => l_data,
1070: x_count => l_count,
1071: x_return_code => l_return_code );
1072: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1073: RAISE FND_API.G_EXC_ERROR;
1074: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1075: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1076: END IF;
1069: x_data => l_data,
1070: x_count => l_count,
1071: x_return_code => l_return_code );
1072: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1073: RAISE FND_API.G_EXC_ERROR;
1074: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1075: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1076: END IF;
1077: END IF;
1070: x_count => l_count,
1071: x_return_code => l_return_code );
1072: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1073: RAISE FND_API.G_EXC_ERROR;
1074: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1075: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1076: END IF;
1077: END IF;
1078:
1071: x_return_code => l_return_code );
1072: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1073: RAISE FND_API.G_EXC_ERROR;
1074: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1075: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1076: END IF;
1077: END IF;
1078:
1079:
1103:
1104:
1105: IF lv_ret <> 0 THEN
1106: x_error_code := lv_ret;
1107: x_return_status := FND_API.G_RET_STS_ERROR ;
1108: FND_MESSAGE.SET_NAME('XDP', 'XDP_INTFACE_CANCEL_FAIL');
1109: FND_MESSAGE.SET_TOKEN('ERROR_MSG',lv_str);
1110: FND_MSG_PUB.Add;
1111: FND_MSG_PUB.COUNT_AND_GET
1138: p_order_version => l_order_version,
1139: x_data => l_data,
1140: x_count => l_count,
1141: x_return_code => l_return_code );
1142: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1143: RAISE FND_API.G_EXC_ERROR;
1144: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1145: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1146: END IF;
1139: x_data => l_data,
1140: x_count => l_count,
1141: x_return_code => l_return_code );
1142: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1143: RAISE FND_API.G_EXC_ERROR;
1144: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1145: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1146: END IF;
1147: END IF;
1140: x_count => l_count,
1141: x_return_code => l_return_code );
1142: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1143: RAISE FND_API.G_EXC_ERROR;
1144: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1145: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1146: END IF;
1147: END IF;
1148:
1141: x_return_code => l_return_code );
1142: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1143: RAISE FND_API.G_EXC_ERROR;
1144: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1145: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1146: END IF;
1147: END IF;
1148:
1149: IF JTF_USR_HKS.Ok_to_Execute(
1158: p_order_version => l_order_version,
1159: x_data => l_data,
1160: x_count => l_count,
1161: x_return_code => l_return_code );
1162: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1163: RAISE FND_API.G_EXC_ERROR;
1164: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1165: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1166: END IF;
1159: x_data => l_data,
1160: x_count => l_count,
1161: x_return_code => l_return_code );
1162: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1163: RAISE FND_API.G_EXC_ERROR;
1164: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1165: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1166: END IF;
1167: END IF;
1160: x_count => l_count,
1161: x_return_code => l_return_code );
1162: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1163: RAISE FND_API.G_EXC_ERROR;
1164: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1165: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1166: END IF;
1167: END IF;
1168:
1161: x_return_code => l_return_code );
1162: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1163: RAISE FND_API.G_EXC_ERROR;
1164: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1165: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1166: END IF;
1167: END IF;
1168:
1169: /******* Message Generation Section ********/
1177: END IF;
1178:
1179: /******* End of Message Generation Section ********/
1180:
1181: x_return_status := FND_API.G_RET_STS_SUCCESS;
1182:
1183: -- Standard check of p_commit.
1184:
1185: IF FND_API.To_Boolean(p_commit) THEN
1181: x_return_status := FND_API.G_RET_STS_SUCCESS;
1182:
1183: -- Standard check of p_commit.
1184:
1185: IF FND_API.To_Boolean(p_commit) THEN
1186: COMMIT WORK;
1187: END IF;
1188:
1189: -- Standard call to get message count and if count is 1, get message info.
1192: p_count => x_msg_count,
1193: p_data => x_msg_data );
1194:
1195: EXCEPTION
1196: WHEN FND_API.G_EXC_ERROR THEN
1197: -- ROLLBACK TO l_order_tag;
1198: x_return_status := FND_API.G_RET_STS_ERROR ;
1199: x_error_code := SQLCODE;
1200: FND_MSG_PUB.Count_And_Get
1194:
1195: EXCEPTION
1196: WHEN FND_API.G_EXC_ERROR THEN
1197: -- ROLLBACK TO l_order_tag;
1198: x_return_status := FND_API.G_RET_STS_ERROR ;
1199: x_error_code := SQLCODE;
1200: FND_MSG_PUB.Count_And_Get
1201: ( p_count => x_msg_count ,
1202: p_data => x_msg_data
1201: ( p_count => x_msg_count ,
1202: p_data => x_msg_data
1203: );
1204: x_msg_data := SQLERRM;
1205: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1206: -- ROLLBACK TO l_order_tag;
1207: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1208: x_error_code := SQLCODE;
1209: FND_MSG_PUB.Count_And_Get
1203: );
1204: x_msg_data := SQLERRM;
1205: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1206: -- ROLLBACK TO l_order_tag;
1207: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1208: x_error_code := SQLCODE;
1209: FND_MSG_PUB.Count_And_Get
1210: ( p_count => x_msg_count,
1211: p_data => x_msg_data
1212: );
1213: x_msg_data := SQLERRM;
1214: WHEN OTHERS THEN
1215: -- ROLLBACK TO l_order_tag;
1216: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1217: x_error_code := SQLCODE;
1218: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1219: THEN
1220: FND_MSG_PUB.Add_Exc_Msg
1268: BEGIN
1269:
1270: -- Standard call to check for call compatibility.
1271:
1272: IF NOT FND_API.Compatible_API_Call (
1273: l_api_version,
1274: p_api_version,
1275: l_api_name,
1276: G_PKG_NAME )
1274: p_api_version,
1275: l_api_name,
1276: G_PKG_NAME )
1277: THEN
1278: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1279: END IF;
1280:
1281: -- Initialize message list if p_init_msg_list is set to TRUE.
1282:
1279: END IF;
1280:
1281: -- Initialize message list if p_init_msg_list is set to TRUE.
1282:
1283: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1284: FND_MSG_PUB.initialize;
1285: END IF;
1286:
1287: l_order_id := p_order_id;
1303: x_line_param_list =>x_line_param_list,
1304: x_data => l_data,
1305: x_count => l_count,
1306: x_return_code => l_return_code );
1307: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1308: RAISE FND_API.G_EXC_ERROR;
1309: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1310: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1311: END IF;
1304: x_data => l_data,
1305: x_count => l_count,
1306: x_return_code => l_return_code );
1307: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1308: RAISE FND_API.G_EXC_ERROR;
1309: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1310: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1311: END IF;
1312: END IF;
1305: x_count => l_count,
1306: x_return_code => l_return_code );
1307: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1308: RAISE FND_API.G_EXC_ERROR;
1309: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1310: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1311: END IF;
1312: END IF;
1313:
1306: x_return_code => l_return_code );
1307: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1308: RAISE FND_API.G_EXC_ERROR;
1309: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1310: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1311: END IF;
1312: END IF;
1313:
1314: IF JTF_USR_HKS.Ok_to_Execute(
1327: x_line_param_list =>x_line_param_list,
1328: x_data => l_data,
1329: x_count => l_count,
1330: x_return_code => l_return_code );
1331: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1332: RAISE FND_API.G_EXC_ERROR;
1333: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1334: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1335: END IF;
1328: x_data => l_data,
1329: x_count => l_count,
1330: x_return_code => l_return_code );
1331: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1332: RAISE FND_API.G_EXC_ERROR;
1333: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1334: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1335: END IF;
1336: END IF;
1329: x_count => l_count,
1330: x_return_code => l_return_code );
1331: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1332: RAISE FND_API.G_EXC_ERROR;
1333: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1334: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1335: END IF;
1336: END IF;
1337:
1330: x_return_code => l_return_code );
1331: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1332: RAISE FND_API.G_EXC_ERROR;
1333: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1334: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1335: END IF;
1336: END IF;
1337:
1338:
1350: lv_str
1351: );
1352:
1353: IF lv_ret <> 0 THEN
1354: x_return_status := FND_API.G_RET_STS_ERROR ;
1355: x_error_code := lv_ret;
1356: FND_MESSAGE.SET_NAME('XDP', 'XDP_INTFACE_DETAILS_FAIL');
1357: FND_MESSAGE.SET_TOKEN('ERROR_MSG',lv_str);
1358: FND_MSG_PUB.Add;
1387: x_line_param_list =>x_line_param_list,
1388: x_data => l_data,
1389: x_count => l_count,
1390: x_return_code => l_return_code );
1391: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1392: RAISE FND_API.G_EXC_ERROR;
1393: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1394: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1395: END IF;
1388: x_data => l_data,
1389: x_count => l_count,
1390: x_return_code => l_return_code );
1391: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1392: RAISE FND_API.G_EXC_ERROR;
1393: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1394: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1395: END IF;
1396: END IF;
1389: x_count => l_count,
1390: x_return_code => l_return_code );
1391: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1392: RAISE FND_API.G_EXC_ERROR;
1393: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1394: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1395: END IF;
1396: END IF;
1397:
1390: x_return_code => l_return_code );
1391: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1392: RAISE FND_API.G_EXC_ERROR;
1393: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1394: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1395: END IF;
1396: END IF;
1397:
1398: IF JTF_USR_HKS.Ok_to_Execute(
1410: x_line_param_list =>x_line_param_list,
1411: x_data => l_data,
1412: x_count => l_count,
1413: x_return_code => l_return_code );
1414: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1415: RAISE FND_API.G_EXC_ERROR;
1416: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1417: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1418: END IF;
1411: x_data => l_data,
1412: x_count => l_count,
1413: x_return_code => l_return_code );
1414: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1415: RAISE FND_API.G_EXC_ERROR;
1416: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1417: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1418: END IF;
1419: END IF;
1412: x_count => l_count,
1413: x_return_code => l_return_code );
1414: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1415: RAISE FND_API.G_EXC_ERROR;
1416: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1417: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1418: END IF;
1419: END IF;
1420:
1413: x_return_code => l_return_code );
1414: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1415: RAISE FND_API.G_EXC_ERROR;
1416: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1417: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1418: END IF;
1419: END IF;
1420:
1421: x_return_status := FND_API.G_RET_STS_SUCCESS;
1417: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1418: END IF;
1419: END IF;
1420:
1421: x_return_status := FND_API.G_RET_STS_SUCCESS;
1422:
1423: -- Standard check of p_commit. DO NOT NEED TO
1424:
1425: -- IF FND_API.To_Boolean(p_commit) THEN
1421: x_return_status := FND_API.G_RET_STS_SUCCESS;
1422:
1423: -- Standard check of p_commit. DO NOT NEED TO
1424:
1425: -- IF FND_API.To_Boolean(p_commit) THEN
1426: -- COMMIT WORK;
1427: -- END IF;
1428:
1429: -- Standard call to get message count and if count is 1, get message info.
1432: p_count => x_msg_count,
1433: p_data => x_msg_data );
1434:
1435: EXCEPTION
1436: WHEN FND_API.G_EXC_ERROR THEN
1437: -- ROLLBACK TO l_order_tag;
1438: x_return_status := FND_API.G_RET_STS_ERROR ;
1439: x_error_code := SQLCODE;
1440: FND_MSG_PUB.Count_And_Get
1434:
1435: EXCEPTION
1436: WHEN FND_API.G_EXC_ERROR THEN
1437: -- ROLLBACK TO l_order_tag;
1438: x_return_status := FND_API.G_RET_STS_ERROR ;
1439: x_error_code := SQLCODE;
1440: FND_MSG_PUB.Count_And_Get
1441: ( p_count => x_msg_count ,
1442: p_data => x_msg_data
1441: ( p_count => x_msg_count ,
1442: p_data => x_msg_data
1443: );
1444: x_msg_data := SQLERRM;
1445: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1446: -- ROLLBACK TO l_order_tag;
1447: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1448: x_error_code := SQLCODE;
1449: FND_MSG_PUB.Count_And_Get
1443: );
1444: x_msg_data := SQLERRM;
1445: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1446: -- ROLLBACK TO l_order_tag;
1447: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1448: x_error_code := SQLCODE;
1449: FND_MSG_PUB.Count_And_Get
1450: ( p_count => x_msg_count,
1451: p_data => x_msg_data
1452: );
1453: x_msg_data := SQLERRM;
1454: WHEN OTHERS THEN
1455: -- ROLLBACK TO l_order_tag;
1456: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1457: x_error_code := SQLCODE;
1458: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1459: THEN
1460: FND_MSG_PUB.Add_Exc_Msg
1507: BEGIN
1508:
1509: -- Standard call to check for call compatibility.
1510:
1511: IF NOT FND_API.Compatible_API_Call (
1512: l_api_version,
1513: p_api_version,
1514: l_api_name,
1515: G_PKG_NAME )
1513: p_api_version,
1514: l_api_name,
1515: G_PKG_NAME )
1516: THEN
1517: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1518: END IF;
1519:
1520: -- Initialize message list if p_init_msg_list is set to TRUE.
1521:
1518: END IF;
1519:
1520: -- Initialize message list if p_init_msg_list is set to TRUE.
1521:
1522: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1523: FND_MSG_PUB.initialize;
1524: END IF;
1525:
1526: l_order_id := p_order_id;
1539: x_order_status =>x_order_status,
1540: x_data => l_data,
1541: x_count => l_count,
1542: x_return_code => l_return_code );
1543: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1544: RAISE FND_API.G_EXC_ERROR;
1545: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1546: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1547: END IF;
1540: x_data => l_data,
1541: x_count => l_count,
1542: x_return_code => l_return_code );
1543: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1544: RAISE FND_API.G_EXC_ERROR;
1545: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1546: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1547: END IF;
1548: END IF;
1541: x_count => l_count,
1542: x_return_code => l_return_code );
1543: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1544: RAISE FND_API.G_EXC_ERROR;
1545: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1546: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1547: END IF;
1548: END IF;
1549:
1542: x_return_code => l_return_code );
1543: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1544: RAISE FND_API.G_EXC_ERROR;
1545: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1546: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1547: END IF;
1548: END IF;
1549:
1550: IF JTF_USR_HKS.Ok_to_Execute(
1560: x_order_status =>x_order_status,
1561: x_data => l_data,
1562: x_count => l_count,
1563: x_return_code => l_return_code );
1564: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1565: RAISE FND_API.G_EXC_ERROR;
1566: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1567: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1568: END IF;
1561: x_data => l_data,
1562: x_count => l_count,
1563: x_return_code => l_return_code );
1564: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1565: RAISE FND_API.G_EXC_ERROR;
1566: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1567: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1568: END IF;
1569: END IF;
1562: x_count => l_count,
1563: x_return_code => l_return_code );
1564: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1565: RAISE FND_API.G_EXC_ERROR;
1566: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1567: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1568: END IF;
1569: END IF;
1570:
1563: x_return_code => l_return_code );
1564: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1565: RAISE FND_API.G_EXC_ERROR;
1566: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1567: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1568: END IF;
1569: END IF;
1570:
1571:
1578: lv_ret,
1579: lv_str
1580: );
1581: IF lv_ret <> 0 THEN
1582: x_return_status := FND_API.G_RET_STS_ERROR ;
1583: x_error_code := lv_ret;
1584: FND_MESSAGE.SET_NAME('XDP', 'XDP_INTFACE_STATUS_FAIL');
1585: FND_MESSAGE.SET_TOKEN('ERROR_MSG',lv_str);
1586: FND_MSG_PUB.Add;
1612: x_order_status =>x_order_status,
1613: x_data => l_data,
1614: x_count => l_count,
1615: x_return_code => l_return_code );
1616: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1617: RAISE FND_API.G_EXC_ERROR;
1618: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1619: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1620: END IF;
1613: x_data => l_data,
1614: x_count => l_count,
1615: x_return_code => l_return_code );
1616: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1617: RAISE FND_API.G_EXC_ERROR;
1618: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1619: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1620: END IF;
1621: END IF;
1614: x_count => l_count,
1615: x_return_code => l_return_code );
1616: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1617: RAISE FND_API.G_EXC_ERROR;
1618: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1619: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1620: END IF;
1621: END IF;
1622:
1615: x_return_code => l_return_code );
1616: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1617: RAISE FND_API.G_EXC_ERROR;
1618: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1619: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1620: END IF;
1621: END IF;
1622:
1623: IF JTF_USR_HKS.Ok_to_Execute(
1632: x_order_status =>x_order_status,
1633: x_data => l_data,
1634: x_count => l_count,
1635: x_return_code => l_return_code );
1636: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1637: RAISE FND_API.G_EXC_ERROR;
1638: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1639: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1640: END IF;
1633: x_data => l_data,
1634: x_count => l_count,
1635: x_return_code => l_return_code );
1636: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1637: RAISE FND_API.G_EXC_ERROR;
1638: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1639: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1640: END IF;
1641: END IF;
1634: x_count => l_count,
1635: x_return_code => l_return_code );
1636: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1637: RAISE FND_API.G_EXC_ERROR;
1638: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1639: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1640: END IF;
1641: END IF;
1642:
1635: x_return_code => l_return_code );
1636: IF (l_return_code = FND_API.G_RET_STS_ERROR ) THEN
1637: RAISE FND_API.G_EXC_ERROR;
1638: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1639: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1640: END IF;
1641: END IF;
1642:
1643: x_return_status := FND_API.G_RET_STS_SUCCESS;
1639: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1640: END IF;
1641: END IF;
1642:
1643: x_return_status := FND_API.G_RET_STS_SUCCESS;
1644:
1645: -- Standard check of p_commit. DO NOT NEED TO
1646:
1647: -- IF FND_API.To_Boolean(p_commit) THEN
1643: x_return_status := FND_API.G_RET_STS_SUCCESS;
1644:
1645: -- Standard check of p_commit. DO NOT NEED TO
1646:
1647: -- IF FND_API.To_Boolean(p_commit) THEN
1648: -- COMMIT WORK;
1649: -- END IF;
1650:
1651: -- Standard call to get message count and if count is 1, get message info.
1654: p_count => x_msg_count,
1655: p_data => x_msg_data );
1656:
1657: EXCEPTION
1658: WHEN FND_API.G_EXC_ERROR THEN
1659: -- ROLLBACK TO l_order_tag;
1660: x_return_status := FND_API.G_RET_STS_ERROR ;
1661: x_error_code := SQLCODE;
1662: FND_MSG_PUB.Count_And_Get
1656:
1657: EXCEPTION
1658: WHEN FND_API.G_EXC_ERROR THEN
1659: -- ROLLBACK TO l_order_tag;
1660: x_return_status := FND_API.G_RET_STS_ERROR ;
1661: x_error_code := SQLCODE;
1662: FND_MSG_PUB.Count_And_Get
1663: ( p_count => x_msg_count ,
1664: p_data => x_msg_data
1662: FND_MSG_PUB.Count_And_Get
1663: ( p_count => x_msg_count ,
1664: p_data => x_msg_data
1665: );
1666: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1667: -- ROLLBACK TO l_order_tag;
1668: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1669: x_error_code := SQLCODE;
1670: FND_MSG_PUB.Count_And_Get
1664: p_data => x_msg_data
1665: );
1666: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1667: -- ROLLBACK TO l_order_tag;
1668: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1669: x_error_code := SQLCODE;
1670: FND_MSG_PUB.Count_And_Get
1671: ( p_count => x_msg_count,
1672: p_data => x_msg_data
1672: p_data => x_msg_data
1673: );
1674: WHEN OTHERS THEN
1675: -- ROLLBACK TO l_order_tag;
1676: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1677: x_error_code := SQLCODE;
1678: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1679: THEN
1680: FND_MSG_PUB.Add_Exc_Msg
1693:
1694: PROCEDURE TO_NULL(p_order_header IN OUT NOCOPY XDP_TYPES.SERVICE_ORDER_HEADER)
1695: IS
1696: BEGIN
1697: IF p_order_header.order_number = FND_API.G_MISS_CHAR THEN
1698: p_order_header.order_number := NULL;
1699: END IF;
1700: IF p_order_header.account_number = FND_API.G_MISS_CHAR THEN
1701: p_order_header.account_number := NULL;
1696: BEGIN
1697: IF p_order_header.order_number = FND_API.G_MISS_CHAR THEN
1698: p_order_header.order_number := NULL;
1699: END IF;
1700: IF p_order_header.account_number = FND_API.G_MISS_CHAR THEN
1701: p_order_header.account_number := NULL;
1702: END IF;
1703: IF p_order_header.cust_account_id = FND_API.G_MISS_NUM THEN
1704: p_order_header.cust_account_id := NULL;
1699: END IF;
1700: IF p_order_header.account_number = FND_API.G_MISS_CHAR THEN
1701: p_order_header.account_number := NULL;
1702: END IF;
1703: IF p_order_header.cust_account_id = FND_API.G_MISS_NUM THEN
1704: p_order_header.cust_account_id := NULL;
1705: END IF;
1706: IF p_order_header.due_date = FND_API.G_MISS_DATE THEN
1707: p_order_header.due_date := NULL;
1702: END IF;
1703: IF p_order_header.cust_account_id = FND_API.G_MISS_NUM THEN
1704: p_order_header.cust_account_id := NULL;
1705: END IF;
1706: IF p_order_header.due_date = FND_API.G_MISS_DATE THEN
1707: p_order_header.due_date := NULL;
1708: END IF;
1709:
1710: IF p_order_header.customer_required_date = FND_API.G_MISS_DATE THEN
1706: IF p_order_header.due_date = FND_API.G_MISS_DATE THEN
1707: p_order_header.due_date := NULL;
1708: END IF;
1709:
1710: IF p_order_header.customer_required_date = FND_API.G_MISS_DATE THEN
1711: p_order_header.customer_required_date := NULL;
1712: END IF;
1713:
1714: IF p_order_header.customer_name = FND_API.G_MISS_CHAR THEN
1710: IF p_order_header.customer_required_date = FND_API.G_MISS_DATE THEN
1711: p_order_header.customer_required_date := NULL;
1712: END IF;
1713:
1714: IF p_order_header.customer_name = FND_API.G_MISS_CHAR THEN
1715: p_order_header.customer_name := NULL;
1716: END IF;
1717: IF p_order_header.customer_id = FND_API.G_MISS_NUM THEN
1718: p_order_header.customer_id := NULL;
1713:
1714: IF p_order_header.customer_name = FND_API.G_MISS_CHAR THEN
1715: p_order_header.customer_name := NULL;
1716: END IF;
1717: IF p_order_header.customer_id = FND_API.G_MISS_NUM THEN
1718: p_order_header.customer_id := NULL;
1719: END IF;
1720: IF p_order_header.telephone_number = FND_API.G_MISS_CHAR THEN
1721: p_order_header.telephone_number := NULL;
1716: END IF;
1717: IF p_order_header.customer_id = FND_API.G_MISS_NUM THEN
1718: p_order_header.customer_id := NULL;
1719: END IF;
1720: IF p_order_header.telephone_number = FND_API.G_MISS_CHAR THEN
1721: p_order_header.telephone_number := NULL;
1722: END IF;
1723:
1724: IF p_order_header.order_type = FND_API.G_MISS_CHAR THEN
1720: IF p_order_header.telephone_number = FND_API.G_MISS_CHAR THEN
1721: p_order_header.telephone_number := NULL;
1722: END IF;
1723:
1724: IF p_order_header.order_type = FND_API.G_MISS_CHAR THEN
1725: p_order_header.order_type := NULL;
1726: END IF;
1727:
1728: IF p_order_header.order_source = FND_API.G_MISS_CHAR THEN
1724: IF p_order_header.order_type = FND_API.G_MISS_CHAR THEN
1725: p_order_header.order_type := NULL;
1726: END IF;
1727:
1728: IF p_order_header.order_source = FND_API.G_MISS_CHAR THEN
1729: p_order_header.order_source := NULL;
1730: END IF;
1731:
1732: IF p_order_header.org_id = FND_API.G_MISS_NUM THEN
1728: IF p_order_header.order_source = FND_API.G_MISS_CHAR THEN
1729: p_order_header.order_source := NULL;
1730: END IF;
1731:
1732: IF p_order_header.org_id = FND_API.G_MISS_NUM THEN
1733: p_order_header.org_id := NULL;
1734: END IF;
1735:
1736: IF p_order_header.related_order_id = FND_API.G_MISS_NUM THEN
1732: IF p_order_header.org_id = FND_API.G_MISS_NUM THEN
1733: p_order_header.org_id := NULL;
1734: END IF;
1735:
1736: IF p_order_header.related_order_id = FND_API.G_MISS_NUM THEN
1737: p_order_header.related_order_id := NULL;
1738: END IF;
1739:
1740: IF p_order_header.previous_order_id = FND_API.G_MISS_NUM THEN
1736: IF p_order_header.related_order_id = FND_API.G_MISS_NUM THEN
1737: p_order_header.related_order_id := NULL;
1738: END IF;
1739:
1740: IF p_order_header.previous_order_id = FND_API.G_MISS_NUM THEN
1741: p_order_header.previous_order_id := NULL;
1742: END IF;
1743:
1744: IF p_order_header.next_order_id = FND_API.G_MISS_NUM THEN
1740: IF p_order_header.previous_order_id = FND_API.G_MISS_NUM THEN
1741: p_order_header.previous_order_id := NULL;
1742: END IF;
1743:
1744: IF p_order_header.next_order_id = FND_API.G_MISS_NUM THEN
1745: p_order_header.next_order_id := NULL;
1746: END IF;
1747:
1748: IF p_order_header.order_ref_name = FND_API.G_MISS_CHAR THEN
1744: IF p_order_header.next_order_id = FND_API.G_MISS_NUM THEN
1745: p_order_header.next_order_id := NULL;
1746: END IF;
1747:
1748: IF p_order_header.order_ref_name = FND_API.G_MISS_CHAR THEN
1749: p_order_header.order_ref_name := NULL;
1750: END IF;
1751:
1752: IF p_order_header.order_ref_value = FND_API.G_MISS_CHAR THEN
1748: IF p_order_header.order_ref_name = FND_API.G_MISS_CHAR THEN
1749: p_order_header.order_ref_name := NULL;
1750: END IF;
1751:
1752: IF p_order_header.order_ref_value = FND_API.G_MISS_CHAR THEN
1753: p_order_header.order_ref_value := NULL;
1754: END IF;
1755: IF p_order_header.order_comments = FND_API.G_MISS_CHAR THEN
1756: p_order_header.order_comments := NULL;
1751:
1752: IF p_order_header.order_ref_value = FND_API.G_MISS_CHAR THEN
1753: p_order_header.order_ref_value := NULL;
1754: END IF;
1755: IF p_order_header.order_comments = FND_API.G_MISS_CHAR THEN
1756: p_order_header.order_comments := NULL;
1757: END IF;
1758: IF p_order_header.order_ref_name = FND_API.G_MISS_CHAR THEN
1759: p_order_header.order_ref_name := NULL;
1754: END IF;
1755: IF p_order_header.order_comments = FND_API.G_MISS_CHAR THEN
1756: p_order_header.order_comments := NULL;
1757: END IF;
1758: IF p_order_header.order_ref_name = FND_API.G_MISS_CHAR THEN
1759: p_order_header.order_ref_name := NULL;
1760: END IF;
1761:
1762: IF p_order_header.order_id = FND_API.G_MISS_NUM THEN
1758: IF p_order_header.order_ref_name = FND_API.G_MISS_CHAR THEN
1759: p_order_header.order_ref_name := NULL;
1760: END IF;
1761:
1762: IF p_order_header.order_id = FND_API.G_MISS_NUM THEN
1763: p_order_header.order_id := NULL;
1764: END IF;
1765:
1766: IF p_order_header.order_status = FND_API.G_MISS_CHAR THEN
1762: IF p_order_header.order_id = FND_API.G_MISS_NUM THEN
1763: p_order_header.order_id := NULL;
1764: END IF;
1765:
1766: IF p_order_header.order_status = FND_API.G_MISS_CHAR THEN
1767: p_order_header.order_status := NULL;
1768: END IF;
1769: IF p_order_header.fulfillment_status = FND_API.G_MISS_CHAR THEN
1770: p_order_header.fulfillment_status := NULL;
1765:
1766: IF p_order_header.order_status = FND_API.G_MISS_CHAR THEN
1767: p_order_header.order_status := NULL;
1768: END IF;
1769: IF p_order_header.fulfillment_status = FND_API.G_MISS_CHAR THEN
1770: p_order_header.fulfillment_status := NULL;
1771: END IF;
1772: IF p_order_header.fulfillment_result = FND_API.G_MISS_CHAR THEN
1773: p_order_header.fulfillment_result := NULL;
1768: END IF;
1769: IF p_order_header.fulfillment_status = FND_API.G_MISS_CHAR THEN
1770: p_order_header.fulfillment_status := NULL;
1771: END IF;
1772: IF p_order_header.fulfillment_result = FND_API.G_MISS_CHAR THEN
1773: p_order_header.fulfillment_result := NULL;
1774: END IF;
1775: IF p_order_header.completion_date = FND_API.G_MISS_DATE THEN
1776: p_order_header.completion_date := NULL;
1771: END IF;
1772: IF p_order_header.fulfillment_result = FND_API.G_MISS_CHAR THEN
1773: p_order_header.fulfillment_result := NULL;
1774: END IF;
1775: IF p_order_header.completion_date = FND_API.G_MISS_DATE THEN
1776: p_order_header.completion_date := NULL;
1777: END IF;
1778: IF p_order_header.actual_fulfillment_date = FND_API.G_MISS_DATE THEN
1779: p_order_header.actual_fulfillment_date := NULL;
1774: END IF;
1775: IF p_order_header.completion_date = FND_API.G_MISS_DATE THEN
1776: p_order_header.completion_date := NULL;
1777: END IF;
1778: IF p_order_header.actual_fulfillment_date = FND_API.G_MISS_DATE THEN
1779: p_order_header.actual_fulfillment_date := NULL;
1780: END IF;
1781:
1782: IF p_order_header.attribute_category = FND_API.G_MISS_CHAR THEN
1778: IF p_order_header.actual_fulfillment_date = FND_API.G_MISS_DATE THEN
1779: p_order_header.actual_fulfillment_date := NULL;
1780: END IF;
1781:
1782: IF p_order_header.attribute_category = FND_API.G_MISS_CHAR THEN
1783: p_order_header.attribute_category := NULL;
1784: END IF;
1785:
1786: IF p_order_header.attribute1 = FND_API.G_MISS_CHAR THEN
1782: IF p_order_header.attribute_category = FND_API.G_MISS_CHAR THEN
1783: p_order_header.attribute_category := NULL;
1784: END IF;
1785:
1786: IF p_order_header.attribute1 = FND_API.G_MISS_CHAR THEN
1787: p_order_header.attribute1 := NULL;
1788: END IF;
1789: IF p_order_header.attribute2 = FND_API.G_MISS_CHAR THEN
1790: p_order_header.attribute2 := NULL;
1785:
1786: IF p_order_header.attribute1 = FND_API.G_MISS_CHAR THEN
1787: p_order_header.attribute1 := NULL;
1788: END IF;
1789: IF p_order_header.attribute2 = FND_API.G_MISS_CHAR THEN
1790: p_order_header.attribute2 := NULL;
1791: END IF;
1792: IF p_order_header.attribute3 = FND_API.G_MISS_CHAR THEN
1793: p_order_header.attribute3 := NULL;
1788: END IF;
1789: IF p_order_header.attribute2 = FND_API.G_MISS_CHAR THEN
1790: p_order_header.attribute2 := NULL;
1791: END IF;
1792: IF p_order_header.attribute3 = FND_API.G_MISS_CHAR THEN
1793: p_order_header.attribute3 := NULL;
1794: END IF;
1795: IF p_order_header.attribute4 = FND_API.G_MISS_CHAR THEN
1796: p_order_header.attribute4 := NULL;
1791: END IF;
1792: IF p_order_header.attribute3 = FND_API.G_MISS_CHAR THEN
1793: p_order_header.attribute3 := NULL;
1794: END IF;
1795: IF p_order_header.attribute4 = FND_API.G_MISS_CHAR THEN
1796: p_order_header.attribute4 := NULL;
1797: END IF;
1798: IF p_order_header.attribute5 = FND_API.G_MISS_CHAR THEN
1799: p_order_header.attribute5 := NULL;
1794: END IF;
1795: IF p_order_header.attribute4 = FND_API.G_MISS_CHAR THEN
1796: p_order_header.attribute4 := NULL;
1797: END IF;
1798: IF p_order_header.attribute5 = FND_API.G_MISS_CHAR THEN
1799: p_order_header.attribute5 := NULL;
1800: END IF;
1801: IF p_order_header.attribute6 = FND_API.G_MISS_CHAR THEN
1802: p_order_header.attribute6 := NULL;
1797: END IF;
1798: IF p_order_header.attribute5 = FND_API.G_MISS_CHAR THEN
1799: p_order_header.attribute5 := NULL;
1800: END IF;
1801: IF p_order_header.attribute6 = FND_API.G_MISS_CHAR THEN
1802: p_order_header.attribute6 := NULL;
1803: END IF;
1804: IF p_order_header.attribute7 = FND_API.G_MISS_CHAR THEN
1805: p_order_header.attribute7 := NULL;
1800: END IF;
1801: IF p_order_header.attribute6 = FND_API.G_MISS_CHAR THEN
1802: p_order_header.attribute6 := NULL;
1803: END IF;
1804: IF p_order_header.attribute7 = FND_API.G_MISS_CHAR THEN
1805: p_order_header.attribute7 := NULL;
1806: END IF;
1807: IF p_order_header.attribute8 = FND_API.G_MISS_CHAR THEN
1808: p_order_header.attribute8 := NULL;
1803: END IF;
1804: IF p_order_header.attribute7 = FND_API.G_MISS_CHAR THEN
1805: p_order_header.attribute7 := NULL;
1806: END IF;
1807: IF p_order_header.attribute8 = FND_API.G_MISS_CHAR THEN
1808: p_order_header.attribute8 := NULL;
1809: END IF;
1810: IF p_order_header.attribute9 = FND_API.G_MISS_CHAR THEN
1811: p_order_header.attribute9 := NULL;
1806: END IF;
1807: IF p_order_header.attribute8 = FND_API.G_MISS_CHAR THEN
1808: p_order_header.attribute8 := NULL;
1809: END IF;
1810: IF p_order_header.attribute9 = FND_API.G_MISS_CHAR THEN
1811: p_order_header.attribute9 := NULL;
1812: END IF;
1813: IF p_order_header.attribute10 = FND_API.G_MISS_CHAR THEN
1814: p_order_header.attribute10 := NULL;
1809: END IF;
1810: IF p_order_header.attribute9 = FND_API.G_MISS_CHAR THEN
1811: p_order_header.attribute9 := NULL;
1812: END IF;
1813: IF p_order_header.attribute10 = FND_API.G_MISS_CHAR THEN
1814: p_order_header.attribute10 := NULL;
1815: END IF;
1816: IF p_order_header.attribute11 = FND_API.G_MISS_CHAR THEN
1817: p_order_header.attribute11 := NULL;
1812: END IF;
1813: IF p_order_header.attribute10 = FND_API.G_MISS_CHAR THEN
1814: p_order_header.attribute10 := NULL;
1815: END IF;
1816: IF p_order_header.attribute11 = FND_API.G_MISS_CHAR THEN
1817: p_order_header.attribute11 := NULL;
1818: END IF;
1819: IF p_order_header.attribute12 = FND_API.G_MISS_CHAR THEN
1820: p_order_header.attribute12 := NULL;
1815: END IF;
1816: IF p_order_header.attribute11 = FND_API.G_MISS_CHAR THEN
1817: p_order_header.attribute11 := NULL;
1818: END IF;
1819: IF p_order_header.attribute12 = FND_API.G_MISS_CHAR THEN
1820: p_order_header.attribute12 := NULL;
1821: END IF;
1822: IF p_order_header.attribute13 = FND_API.G_MISS_CHAR THEN
1823: p_order_header.attribute13 := NULL;
1818: END IF;
1819: IF p_order_header.attribute12 = FND_API.G_MISS_CHAR THEN
1820: p_order_header.attribute12 := NULL;
1821: END IF;
1822: IF p_order_header.attribute13 = FND_API.G_MISS_CHAR THEN
1823: p_order_header.attribute13 := NULL;
1824: END IF;
1825: IF p_order_header.attribute14 = FND_API.G_MISS_CHAR THEN
1826: p_order_header.attribute14 := NULL;
1821: END IF;
1822: IF p_order_header.attribute13 = FND_API.G_MISS_CHAR THEN
1823: p_order_header.attribute13 := NULL;
1824: END IF;
1825: IF p_order_header.attribute14 = FND_API.G_MISS_CHAR THEN
1826: p_order_header.attribute14 := NULL;
1827: END IF;
1828: IF p_order_header.attribute15 = FND_API.G_MISS_CHAR THEN
1829: p_order_header.attribute15 := NULL;
1824: END IF;
1825: IF p_order_header.attribute14 = FND_API.G_MISS_CHAR THEN
1826: p_order_header.attribute14 := NULL;
1827: END IF;
1828: IF p_order_header.attribute15 = FND_API.G_MISS_CHAR THEN
1829: p_order_header.attribute15 := NULL;
1830: END IF;
1831: IF p_order_header.attribute16 = FND_API.G_MISS_CHAR THEN
1832: p_order_header.attribute16 := NULL;
1827: END IF;
1828: IF p_order_header.attribute15 = FND_API.G_MISS_CHAR THEN
1829: p_order_header.attribute15 := NULL;
1830: END IF;
1831: IF p_order_header.attribute16 = FND_API.G_MISS_CHAR THEN
1832: p_order_header.attribute16 := NULL;
1833: END IF;
1834: IF p_order_header.attribute17 = FND_API.G_MISS_CHAR THEN
1835: p_order_header.attribute17 := NULL;
1830: END IF;
1831: IF p_order_header.attribute16 = FND_API.G_MISS_CHAR THEN
1832: p_order_header.attribute16 := NULL;
1833: END IF;
1834: IF p_order_header.attribute17 = FND_API.G_MISS_CHAR THEN
1835: p_order_header.attribute17 := NULL;
1836: END IF;
1837: IF p_order_header.attribute18 = FND_API.G_MISS_CHAR THEN
1838: p_order_header.attribute18 := NULL;
1833: END IF;
1834: IF p_order_header.attribute17 = FND_API.G_MISS_CHAR THEN
1835: p_order_header.attribute17 := NULL;
1836: END IF;
1837: IF p_order_header.attribute18 = FND_API.G_MISS_CHAR THEN
1838: p_order_header.attribute18 := NULL;
1839: END IF;
1840: IF p_order_header.attribute19 = FND_API.G_MISS_CHAR THEN
1841: p_order_header.attribute19 := NULL;
1836: END IF;
1837: IF p_order_header.attribute18 = FND_API.G_MISS_CHAR THEN
1838: p_order_header.attribute18 := NULL;
1839: END IF;
1840: IF p_order_header.attribute19 = FND_API.G_MISS_CHAR THEN
1841: p_order_header.attribute19 := NULL;
1842: END IF;
1843: IF p_order_header.attribute20 = FND_API.G_MISS_CHAR THEN
1844: p_order_header.attribute20 := NULL;
1839: END IF;
1840: IF p_order_header.attribute19 = FND_API.G_MISS_CHAR THEN
1841: p_order_header.attribute19 := NULL;
1842: END IF;
1843: IF p_order_header.attribute20 = FND_API.G_MISS_CHAR THEN
1844: p_order_header.attribute20 := NULL;
1845: END IF;
1846:
1847: IF p_order_header.order_version IS NULL THEN
1870: IF p_order_param_list.COUNT > 0 THEN
1871: lv_param_index := p_order_param_list.first;
1872: LOOP
1873:
1874: IF p_order_param_list(lv_param_index).parameter_name = FND_API.G_MISS_CHAR
1875: THEN
1876: p_order_param_list(lv_param_index).parameter_name := NULL;
1877: END IF;
1878: IF p_order_param_list(lv_param_index).parameter_value = FND_API.G_MISS_CHAR
1874: IF p_order_param_list(lv_param_index).parameter_name = FND_API.G_MISS_CHAR
1875: THEN
1876: p_order_param_list(lv_param_index).parameter_name := NULL;
1877: END IF;
1878: IF p_order_param_list(lv_param_index).parameter_value = FND_API.G_MISS_CHAR
1879: THEN
1880: p_order_param_list(lv_param_index).parameter_value := NULL;
1881: END IF;
1882:
1888:
1889: PROCEDURE TO_NULL(p_order_line_item IN OUT NOCOPY XDP_TYPES.SERVICE_LINE_ITEM)
1890: IS
1891: BEGIN
1892: IF p_order_line_item.line_number = FND_API.G_MISS_NUM THEN
1893: p_order_line_item.line_number := NULL;
1894: END IF;
1895: IF p_order_line_item.line_source = FND_API.G_MISS_CHAR THEN
1896: p_order_line_item.line_source := NULL;
1891: BEGIN
1892: IF p_order_line_item.line_number = FND_API.G_MISS_NUM THEN
1893: p_order_line_item.line_number := NULL;
1894: END IF;
1895: IF p_order_line_item.line_source = FND_API.G_MISS_CHAR THEN
1896: p_order_line_item.line_source := NULL;
1897: END IF;
1898:
1899: IF p_order_line_item.inventory_item_id = FND_API.G_MISS_NUM THEN
1895: IF p_order_line_item.line_source = FND_API.G_MISS_CHAR THEN
1896: p_order_line_item.line_source := NULL;
1897: END IF;
1898:
1899: IF p_order_line_item.inventory_item_id = FND_API.G_MISS_NUM THEN
1900: p_order_line_item.inventory_item_id := NULL;
1901: END IF;
1902:
1903: IF p_order_line_item.service_item_name = FND_API.G_MISS_CHAR THEN
1899: IF p_order_line_item.inventory_item_id = FND_API.G_MISS_NUM THEN
1900: p_order_line_item.inventory_item_id := NULL;
1901: END IF;
1902:
1903: IF p_order_line_item.service_item_name = FND_API.G_MISS_CHAR THEN
1904: p_order_line_item.service_item_name := NULL;
1905: END IF;
1906:
1907: IF p_order_line_item.workitem_id = FND_API.G_MISS_NUM THEN
1903: IF p_order_line_item.service_item_name = FND_API.G_MISS_CHAR THEN
1904: p_order_line_item.service_item_name := NULL;
1905: END IF;
1906:
1907: IF p_order_line_item.workitem_id = FND_API.G_MISS_NUM THEN
1908: p_order_line_item.workitem_id := NULL;
1909: END IF;
1910:
1911: IF p_order_line_item.version = FND_API.G_MISS_CHAR THEN
1907: IF p_order_line_item.workitem_id = FND_API.G_MISS_NUM THEN
1908: p_order_line_item.workitem_id := NULL;
1909: END IF;
1910:
1911: IF p_order_line_item.version = FND_API.G_MISS_CHAR THEN
1912: p_order_line_item.version := NULL;
1913: END IF;
1914:
1915: IF p_order_line_item.action_code = FND_API.G_MISS_CHAR THEN
1911: IF p_order_line_item.version = FND_API.G_MISS_CHAR THEN
1912: p_order_line_item.version := NULL;
1913: END IF;
1914:
1915: IF p_order_line_item.action_code = FND_API.G_MISS_CHAR THEN
1916: p_order_line_item.action_code := NULL;
1917: END IF;
1918:
1919: IF p_order_line_item.organization_code = FND_API.G_MISS_CHAR THEN
1915: IF p_order_line_item.action_code = FND_API.G_MISS_CHAR THEN
1916: p_order_line_item.action_code := NULL;
1917: END IF;
1918:
1919: IF p_order_line_item.organization_code = FND_API.G_MISS_CHAR THEN
1920: p_order_line_item.organization_code := NULL;
1921: END IF;
1922:
1923: IF p_order_line_item.organization_id = FND_API.G_MISS_NUM THEN
1919: IF p_order_line_item.organization_code = FND_API.G_MISS_CHAR THEN
1920: p_order_line_item.organization_code := NULL;
1921: END IF;
1922:
1923: IF p_order_line_item.organization_id = FND_API.G_MISS_NUM THEN
1924: p_order_line_item.organization_id := NULL;
1925: END IF;
1926: IF p_order_line_item.site_use_id = FND_API.G_MISS_NUM THEN
1927: p_order_line_item.site_use_id := NULL;
1922:
1923: IF p_order_line_item.organization_id = FND_API.G_MISS_NUM THEN
1924: p_order_line_item.organization_id := NULL;
1925: END IF;
1926: IF p_order_line_item.site_use_id = FND_API.G_MISS_NUM THEN
1927: p_order_line_item.site_use_id := NULL;
1928: END IF;
1929: IF p_order_line_item.ib_source_id = FND_API.G_MISS_NUM THEN
1930: p_order_line_item.ib_source_id := NULL;
1925: END IF;
1926: IF p_order_line_item.site_use_id = FND_API.G_MISS_NUM THEN
1927: p_order_line_item.site_use_id := NULL;
1928: END IF;
1929: IF p_order_line_item.ib_source_id = FND_API.G_MISS_NUM THEN
1930: p_order_line_item.ib_source_id := NULL;
1931: END IF;
1932:
1933:
1930: p_order_line_item.ib_source_id := NULL;
1931: END IF;
1932:
1933:
1934: IF p_order_line_item.required_fulfillment_date = FND_API.G_MISS_DATE THEN
1935: p_order_line_item.required_fulfillment_date := NULL;
1936: END IF;
1937: IF p_order_line_item.bundle_id = FND_API.G_MISS_NUM THEN
1938: p_order_line_item.bundle_id := NULL;
1933:
1934: IF p_order_line_item.required_fulfillment_date = FND_API.G_MISS_DATE THEN
1935: p_order_line_item.required_fulfillment_date := NULL;
1936: END IF;
1937: IF p_order_line_item.bundle_id = FND_API.G_MISS_NUM THEN
1938: p_order_line_item.bundle_id := NULL;
1939: END IF;
1940: IF p_order_line_item.bundle_sequence = FND_API.G_MISS_NUM THEN
1941: p_order_line_item.bundle_sequence := NULL;
1936: END IF;
1937: IF p_order_line_item.bundle_id = FND_API.G_MISS_NUM THEN
1938: p_order_line_item.bundle_id := NULL;
1939: END IF;
1940: IF p_order_line_item.bundle_sequence = FND_API.G_MISS_NUM THEN
1941: p_order_line_item.bundle_sequence := NULL;
1942: END IF;
1943:
1944: IF p_order_line_item.due_date = FND_API.G_MISS_DATE THEN
1940: IF p_order_line_item.bundle_sequence = FND_API.G_MISS_NUM THEN
1941: p_order_line_item.bundle_sequence := NULL;
1942: END IF;
1943:
1944: IF p_order_line_item.due_date = FND_API.G_MISS_DATE THEN
1945: p_order_line_item.due_date := NULL;
1946: END IF;
1947: IF p_order_line_item.customer_required_date = FND_API.G_MISS_DATE THEN
1948: p_order_line_item.customer_required_date := NULL;
1943:
1944: IF p_order_line_item.due_date = FND_API.G_MISS_DATE THEN
1945: p_order_line_item.due_date := NULL;
1946: END IF;
1947: IF p_order_line_item.customer_required_date = FND_API.G_MISS_DATE THEN
1948: p_order_line_item.customer_required_date := NULL;
1949: END IF;
1950:
1951: IF p_order_line_item.starting_number = FND_API.G_MISS_NUM THEN
1947: IF p_order_line_item.customer_required_date = FND_API.G_MISS_DATE THEN
1948: p_order_line_item.customer_required_date := NULL;
1949: END IF;
1950:
1951: IF p_order_line_item.starting_number = FND_API.G_MISS_NUM THEN
1952: p_order_line_item.starting_number := NULL;
1953: END IF;
1954: IF p_order_line_item.ending_number = FND_API.G_MISS_NUM THEN
1955: p_order_line_item.ending_number := NULL;
1950:
1951: IF p_order_line_item.starting_number = FND_API.G_MISS_NUM THEN
1952: p_order_line_item.starting_number := NULL;
1953: END IF;
1954: IF p_order_line_item.ending_number = FND_API.G_MISS_NUM THEN
1955: p_order_line_item.ending_number := NULL;
1956: END IF;
1957:
1958: IF p_order_line_item.line_item_id = FND_API.G_MISS_NUM THEN
1954: IF p_order_line_item.ending_number = FND_API.G_MISS_NUM THEN
1955: p_order_line_item.ending_number := NULL;
1956: END IF;
1957:
1958: IF p_order_line_item.line_item_id = FND_API.G_MISS_NUM THEN
1959: p_order_line_item.line_item_id := NULL;
1960: END IF;
1961:
1962: IF p_order_line_item.line_status = FND_API.G_MISS_CHAR THEN
1958: IF p_order_line_item.line_item_id = FND_API.G_MISS_NUM THEN
1959: p_order_line_item.line_item_id := NULL;
1960: END IF;
1961:
1962: IF p_order_line_item.line_status = FND_API.G_MISS_CHAR THEN
1963: p_order_line_item.line_status := NULL;
1964: END IF;
1965:
1966: IF p_order_line_item.completion_date = FND_API.G_MISS_DATE THEN
1962: IF p_order_line_item.line_status = FND_API.G_MISS_CHAR THEN
1963: p_order_line_item.line_status := NULL;
1964: END IF;
1965:
1966: IF p_order_line_item.completion_date = FND_API.G_MISS_DATE THEN
1967: p_order_line_item.completion_date := NULL;
1968: END IF;
1969:
1970: IF p_order_line_item.actual_fulfillment_date = FND_API.G_MISS_DATE THEN
1966: IF p_order_line_item.completion_date = FND_API.G_MISS_DATE THEN
1967: p_order_line_item.completion_date := NULL;
1968: END IF;
1969:
1970: IF p_order_line_item.actual_fulfillment_date = FND_API.G_MISS_DATE THEN
1971: p_order_line_item.actual_fulfillment_date := NULL;
1972: END IF;
1973:
1974: IF p_order_line_item.parent_line_number = FND_API.G_MISS_NUM THEN
1970: IF p_order_line_item.actual_fulfillment_date = FND_API.G_MISS_DATE THEN
1971: p_order_line_item.actual_fulfillment_date := NULL;
1972: END IF;
1973:
1974: IF p_order_line_item.parent_line_number = FND_API.G_MISS_NUM THEN
1975: p_order_line_item.parent_line_number := NULL;
1976: END IF;
1977:
1978: IF p_order_line_item.attribute_category = FND_API.G_MISS_CHAR THEN
1974: IF p_order_line_item.parent_line_number = FND_API.G_MISS_NUM THEN
1975: p_order_line_item.parent_line_number := NULL;
1976: END IF;
1977:
1978: IF p_order_line_item.attribute_category = FND_API.G_MISS_CHAR THEN
1979: p_order_line_item.attribute_category := NULL;
1980: END IF;
1981:
1982: IF p_order_line_item.attribute1 = FND_API.G_MISS_CHAR THEN
1978: IF p_order_line_item.attribute_category = FND_API.G_MISS_CHAR THEN
1979: p_order_line_item.attribute_category := NULL;
1980: END IF;
1981:
1982: IF p_order_line_item.attribute1 = FND_API.G_MISS_CHAR THEN
1983: p_order_line_item.attribute1 := NULL;
1984: END IF;
1985: IF p_order_line_item.attribute2 = FND_API.G_MISS_CHAR THEN
1986: p_order_line_item.attribute2 := NULL;
1981:
1982: IF p_order_line_item.attribute1 = FND_API.G_MISS_CHAR THEN
1983: p_order_line_item.attribute1 := NULL;
1984: END IF;
1985: IF p_order_line_item.attribute2 = FND_API.G_MISS_CHAR THEN
1986: p_order_line_item.attribute2 := NULL;
1987: END IF;
1988: IF p_order_line_item.attribute3 = FND_API.G_MISS_CHAR THEN
1989: p_order_line_item.attribute3 := NULL;
1984: END IF;
1985: IF p_order_line_item.attribute2 = FND_API.G_MISS_CHAR THEN
1986: p_order_line_item.attribute2 := NULL;
1987: END IF;
1988: IF p_order_line_item.attribute3 = FND_API.G_MISS_CHAR THEN
1989: p_order_line_item.attribute3 := NULL;
1990: END IF;
1991: IF p_order_line_item.attribute4 = FND_API.G_MISS_CHAR THEN
1992: p_order_line_item.attribute4 := NULL;
1987: END IF;
1988: IF p_order_line_item.attribute3 = FND_API.G_MISS_CHAR THEN
1989: p_order_line_item.attribute3 := NULL;
1990: END IF;
1991: IF p_order_line_item.attribute4 = FND_API.G_MISS_CHAR THEN
1992: p_order_line_item.attribute4 := NULL;
1993: END IF;
1994: IF p_order_line_item.attribute5 = FND_API.G_MISS_CHAR THEN
1995: p_order_line_item.attribute5 := NULL;
1990: END IF;
1991: IF p_order_line_item.attribute4 = FND_API.G_MISS_CHAR THEN
1992: p_order_line_item.attribute4 := NULL;
1993: END IF;
1994: IF p_order_line_item.attribute5 = FND_API.G_MISS_CHAR THEN
1995: p_order_line_item.attribute5 := NULL;
1996: END IF;
1997: IF p_order_line_item.attribute6 = FND_API.G_MISS_CHAR THEN
1998: p_order_line_item.attribute6 := NULL;
1993: END IF;
1994: IF p_order_line_item.attribute5 = FND_API.G_MISS_CHAR THEN
1995: p_order_line_item.attribute5 := NULL;
1996: END IF;
1997: IF p_order_line_item.attribute6 = FND_API.G_MISS_CHAR THEN
1998: p_order_line_item.attribute6 := NULL;
1999: END IF;
2000: IF p_order_line_item.attribute7 = FND_API.G_MISS_CHAR THEN
2001: p_order_line_item.attribute7 := NULL;
1996: END IF;
1997: IF p_order_line_item.attribute6 = FND_API.G_MISS_CHAR THEN
1998: p_order_line_item.attribute6 := NULL;
1999: END IF;
2000: IF p_order_line_item.attribute7 = FND_API.G_MISS_CHAR THEN
2001: p_order_line_item.attribute7 := NULL;
2002: END IF;
2003: IF p_order_line_item.attribute8 = FND_API.G_MISS_CHAR THEN
2004: p_order_line_item.attribute8 := NULL;
1999: END IF;
2000: IF p_order_line_item.attribute7 = FND_API.G_MISS_CHAR THEN
2001: p_order_line_item.attribute7 := NULL;
2002: END IF;
2003: IF p_order_line_item.attribute8 = FND_API.G_MISS_CHAR THEN
2004: p_order_line_item.attribute8 := NULL;
2005: END IF;
2006: IF p_order_line_item.attribute9 = FND_API.G_MISS_CHAR THEN
2007: p_order_line_item.attribute9 := NULL;
2002: END IF;
2003: IF p_order_line_item.attribute8 = FND_API.G_MISS_CHAR THEN
2004: p_order_line_item.attribute8 := NULL;
2005: END IF;
2006: IF p_order_line_item.attribute9 = FND_API.G_MISS_CHAR THEN
2007: p_order_line_item.attribute9 := NULL;
2008: END IF;
2009: IF p_order_line_item.attribute10 = FND_API.G_MISS_CHAR THEN
2010: p_order_line_item.attribute10 := NULL;
2005: END IF;
2006: IF p_order_line_item.attribute9 = FND_API.G_MISS_CHAR THEN
2007: p_order_line_item.attribute9 := NULL;
2008: END IF;
2009: IF p_order_line_item.attribute10 = FND_API.G_MISS_CHAR THEN
2010: p_order_line_item.attribute10 := NULL;
2011: END IF;
2012: IF p_order_line_item.attribute11 = FND_API.G_MISS_CHAR THEN
2013: p_order_line_item.attribute11 := NULL;
2008: END IF;
2009: IF p_order_line_item.attribute10 = FND_API.G_MISS_CHAR THEN
2010: p_order_line_item.attribute10 := NULL;
2011: END IF;
2012: IF p_order_line_item.attribute11 = FND_API.G_MISS_CHAR THEN
2013: p_order_line_item.attribute11 := NULL;
2014: END IF;
2015: IF p_order_line_item.attribute12 = FND_API.G_MISS_CHAR THEN
2016: p_order_line_item.attribute12 := NULL;
2011: END IF;
2012: IF p_order_line_item.attribute11 = FND_API.G_MISS_CHAR THEN
2013: p_order_line_item.attribute11 := NULL;
2014: END IF;
2015: IF p_order_line_item.attribute12 = FND_API.G_MISS_CHAR THEN
2016: p_order_line_item.attribute12 := NULL;
2017: END IF;
2018: IF p_order_line_item.attribute13 = FND_API.G_MISS_CHAR THEN
2019: p_order_line_item.attribute13 := NULL;
2014: END IF;
2015: IF p_order_line_item.attribute12 = FND_API.G_MISS_CHAR THEN
2016: p_order_line_item.attribute12 := NULL;
2017: END IF;
2018: IF p_order_line_item.attribute13 = FND_API.G_MISS_CHAR THEN
2019: p_order_line_item.attribute13 := NULL;
2020: END IF;
2021: IF p_order_line_item.attribute14 = FND_API.G_MISS_CHAR THEN
2022: p_order_line_item.attribute14 := NULL;
2017: END IF;
2018: IF p_order_line_item.attribute13 = FND_API.G_MISS_CHAR THEN
2019: p_order_line_item.attribute13 := NULL;
2020: END IF;
2021: IF p_order_line_item.attribute14 = FND_API.G_MISS_CHAR THEN
2022: p_order_line_item.attribute14 := NULL;
2023: END IF;
2024: IF p_order_line_item.attribute15 = FND_API.G_MISS_CHAR THEN
2025: p_order_line_item.attribute15 := NULL;
2020: END IF;
2021: IF p_order_line_item.attribute14 = FND_API.G_MISS_CHAR THEN
2022: p_order_line_item.attribute14 := NULL;
2023: END IF;
2024: IF p_order_line_item.attribute15 = FND_API.G_MISS_CHAR THEN
2025: p_order_line_item.attribute15 := NULL;
2026: END IF;
2027: IF p_order_line_item.attribute16 = FND_API.G_MISS_CHAR THEN
2028: p_order_line_item.attribute16 := NULL;
2023: END IF;
2024: IF p_order_line_item.attribute15 = FND_API.G_MISS_CHAR THEN
2025: p_order_line_item.attribute15 := NULL;
2026: END IF;
2027: IF p_order_line_item.attribute16 = FND_API.G_MISS_CHAR THEN
2028: p_order_line_item.attribute16 := NULL;
2029: END IF;
2030: IF p_order_line_item.attribute17 = FND_API.G_MISS_CHAR THEN
2031: p_order_line_item.attribute17 := NULL;
2026: END IF;
2027: IF p_order_line_item.attribute16 = FND_API.G_MISS_CHAR THEN
2028: p_order_line_item.attribute16 := NULL;
2029: END IF;
2030: IF p_order_line_item.attribute17 = FND_API.G_MISS_CHAR THEN
2031: p_order_line_item.attribute17 := NULL;
2032: END IF;
2033: IF p_order_line_item.attribute18 = FND_API.G_MISS_CHAR THEN
2034: p_order_line_item.attribute18 := NULL;
2029: END IF;
2030: IF p_order_line_item.attribute17 = FND_API.G_MISS_CHAR THEN
2031: p_order_line_item.attribute17 := NULL;
2032: END IF;
2033: IF p_order_line_item.attribute18 = FND_API.G_MISS_CHAR THEN
2034: p_order_line_item.attribute18 := NULL;
2035: END IF;
2036: IF p_order_line_item.attribute19 = FND_API.G_MISS_CHAR THEN
2037: p_order_line_item.attribute19 := NULL;
2032: END IF;
2033: IF p_order_line_item.attribute18 = FND_API.G_MISS_CHAR THEN
2034: p_order_line_item.attribute18 := NULL;
2035: END IF;
2036: IF p_order_line_item.attribute19 = FND_API.G_MISS_CHAR THEN
2037: p_order_line_item.attribute19 := NULL;
2038: END IF;
2039: IF p_order_line_item.attribute20 = FND_API.G_MISS_CHAR THEN
2040: p_order_line_item.attribute20 := NULL;
2035: END IF;
2036: IF p_order_line_item.attribute19 = FND_API.G_MISS_CHAR THEN
2037: p_order_line_item.attribute19 := NULL;
2038: END IF;
2039: IF p_order_line_item.attribute20 = FND_API.G_MISS_CHAR THEN
2040: p_order_line_item.attribute20 := NULL;
2041: END IF;
2042:
2043: IF p_order_line_item.ib_source IS NULL THEN
2085: BEGIN
2086: IF p_line_param_list.COUNT > 0 THEN
2087: lv_param_index := p_line_param_list.first;
2088: LOOP
2089: IF p_line_param_list(lv_param_index).line_number = FND_API.G_MISS_NUM
2090: THEN
2091: p_line_param_list(lv_param_index).line_number := NULL;
2092: END IF;
2093:
2090: THEN
2091: p_line_param_list(lv_param_index).line_number := NULL;
2092: END IF;
2093:
2094: IF p_line_param_list(lv_param_index).parameter_name = FND_API.G_MISS_CHAR
2095: THEN
2096: p_line_param_list(lv_param_index).parameter_name := NULL;
2097: END IF;
2098: IF p_line_param_list(lv_param_index).parameter_value = FND_API.G_MISS_CHAR
2094: IF p_line_param_list(lv_param_index).parameter_name = FND_API.G_MISS_CHAR
2095: THEN
2096: p_line_param_list(lv_param_index).parameter_name := NULL;
2097: END IF;
2098: IF p_line_param_list(lv_param_index).parameter_value = FND_API.G_MISS_CHAR
2099: THEN
2100: p_line_param_list(lv_param_index).parameter_value := NULL;
2101: END IF;
2102: IF p_line_param_list(lv_param_index).parameter_ref_value = FND_API.G_MISS_CHAR
2098: IF p_line_param_list(lv_param_index).parameter_value = FND_API.G_MISS_CHAR
2099: THEN
2100: p_line_param_list(lv_param_index).parameter_value := NULL;
2101: END IF;
2102: IF p_line_param_list(lv_param_index).parameter_ref_value = FND_API.G_MISS_CHAR
2103: THEN
2104: p_line_param_list(lv_param_index).parameter_ref_value := NULL;
2105: END IF;
2106: