DBA Data[Home] [Help]

APPS.AHL_FMP_COMMON_PVT dependencies on FND_API

Line 41: x_return_status := FND_API.G_RET_STS_SUCCESS;

37: AND SYSDATE BETWEEN NVL( start_date_active, SYSDATE ) AND
38: NVL( end_date_active, SYSDATE );
39:
40: BEGIN
41: x_return_status := FND_API.G_RET_STS_SUCCESS;
42:
43: IF ( p_lookup_type IS NULL OR
44: p_lookup_type = FND_API.G_MISS_CHAR ) THEN
45: x_return_status := FND_API.G_RET_STS_ERROR;

Line 44: p_lookup_type = FND_API.G_MISS_CHAR ) THEN

40: BEGIN
41: x_return_status := FND_API.G_RET_STS_SUCCESS;
42:
43: IF ( p_lookup_type IS NULL OR
44: p_lookup_type = FND_API.G_MISS_CHAR ) THEN
45: x_return_status := FND_API.G_RET_STS_ERROR;
46: x_msg_data := 'AHL_COM_INVALID_PROCEDURE_CALL';
47: RETURN;
48: END IF;

Line 45: x_return_status := FND_API.G_RET_STS_ERROR;

41: x_return_status := FND_API.G_RET_STS_SUCCESS;
42:
43: IF ( p_lookup_type IS NULL OR
44: p_lookup_type = FND_API.G_MISS_CHAR ) THEN
45: x_return_status := FND_API.G_RET_STS_ERROR;
46: x_msg_data := 'AHL_COM_INVALID_PROCEDURE_CALL';
47: RETURN;
48: END IF;
49:

Line 51: p_lookup_meaning = FND_API.G_MISS_CHAR ) AND

47: RETURN;
48: END IF;
49:
50: IF ( ( p_lookup_meaning IS NULL OR
51: p_lookup_meaning = FND_API.G_MISS_CHAR ) AND
52: ( p_x_lookup_code IS NULL OR
53: p_x_lookup_code = FND_API.G_MISS_CHAR ) ) THEN
54: x_return_status := FND_API.G_RET_STS_ERROR;
55: x_msg_data := 'AHL_COM_INVALID_PROCEDURE_CALL';

Line 53: p_x_lookup_code = FND_API.G_MISS_CHAR ) ) THEN

49:
50: IF ( ( p_lookup_meaning IS NULL OR
51: p_lookup_meaning = FND_API.G_MISS_CHAR ) AND
52: ( p_x_lookup_code IS NULL OR
53: p_x_lookup_code = FND_API.G_MISS_CHAR ) ) THEN
54: x_return_status := FND_API.G_RET_STS_ERROR;
55: x_msg_data := 'AHL_COM_INVALID_PROCEDURE_CALL';
56: RETURN;
57: END IF;

Line 54: x_return_status := FND_API.G_RET_STS_ERROR;

50: IF ( ( p_lookup_meaning IS NULL OR
51: p_lookup_meaning = FND_API.G_MISS_CHAR ) AND
52: ( p_x_lookup_code IS NULL OR
53: p_x_lookup_code = FND_API.G_MISS_CHAR ) ) THEN
54: x_return_status := FND_API.G_RET_STS_ERROR;
55: x_msg_data := 'AHL_COM_INVALID_PROCEDURE_CALL';
56: RETURN;
57: END IF;
58:

Line 60: p_lookup_meaning = FND_API.G_MISS_CHAR ) AND

56: RETURN;
57: END IF;
58:
59: IF ( ( p_lookup_meaning IS NULL OR
60: p_lookup_meaning = FND_API.G_MISS_CHAR ) AND
61: ( p_x_lookup_code IS NOT NULL AND
62: p_x_lookup_code <> FND_API.G_MISS_CHAR ) ) THEN
63:
64: OPEN get_rec_from_id( p_lookup_type, p_x_lookup_code );

Line 62: p_x_lookup_code <> FND_API.G_MISS_CHAR ) ) THEN

58:
59: IF ( ( p_lookup_meaning IS NULL OR
60: p_lookup_meaning = FND_API.G_MISS_CHAR ) AND
61: ( p_x_lookup_code IS NOT NULL AND
62: p_x_lookup_code <> FND_API.G_MISS_CHAR ) ) THEN
63:
64: OPEN get_rec_from_id( p_lookup_type, p_x_lookup_code );
65:
66: FETCH get_rec_from_id INTO

Line 70: x_return_status := FND_API.G_RET_STS_ERROR;

66: FETCH get_rec_from_id INTO
67: l_lookup_code;
68:
69: IF get_rec_from_id%NOTFOUND THEN
70: x_return_status := FND_API.G_RET_STS_ERROR;
71: x_msg_data := 'AHL_COM_INVALID_LOOKUP';
72: END IF;
73:
74: CLOSE get_rec_from_id;

Line 80: p_lookup_meaning <> FND_API.G_MISS_CHAR ) THEN

76:
77: END IF;
78:
79: IF ( p_lookup_meaning IS NOT NULL AND
80: p_lookup_meaning <> FND_API.G_MISS_CHAR ) THEN
81:
82: OPEN get_rec_from_value( p_lookup_type, p_lookup_meaning );
83:
84: LOOP

Line 98: x_return_status := FND_API.G_RET_STS_ERROR;

94:
95: END LOOP;
96:
97: IF ( get_rec_from_value%ROWCOUNT = 0 ) THEN
98: x_return_status := FND_API.G_RET_STS_ERROR;
99: x_msg_data := 'AHL_COM_INVALID_LOOKUP';
100: ELSIF ( get_rec_from_value%ROWCOUNT = 1 ) THEN
101: p_x_lookup_code := l_lookup_code;
102: ELSE

Line 103: x_return_status := FND_API.G_RET_STS_ERROR;

99: x_msg_data := 'AHL_COM_INVALID_LOOKUP';
100: ELSIF ( get_rec_from_value%ROWCOUNT = 1 ) THEN
101: p_x_lookup_code := l_lookup_code;
102: ELSE
103: x_return_status := FND_API.G_RET_STS_ERROR;
104: x_msg_data := 'AHL_COM_TOO_MANY_LOOKUPS';
105: END IF;
106:
107: CLOSE get_rec_from_value;

Line 162: l_rec_found VARCHAR2(1):=FND_API.G_FALSE;

158: AND MI.enabled_flag = 'Y'
159: AND SYSDATE BETWEEN NVL( MI.start_date_active, SYSDATE )
160: AND NVL( MI.end_date_active, SYSDATE );
161: l_item_rec1 get_rec_from_id%rowtype;
162: l_rec_found VARCHAR2(1):=FND_API.G_FALSE;
163: L_REC_COUNT NUMBER:=0;
164: BEGIN
165: x_return_status := FND_API.G_RET_STS_SUCCESS;
166:

Line 165: x_return_status := FND_API.G_RET_STS_SUCCESS;

161: l_item_rec1 get_rec_from_id%rowtype;
162: l_rec_found VARCHAR2(1):=FND_API.G_FALSE;
163: L_REC_COUNT NUMBER:=0;
164: BEGIN
165: x_return_status := FND_API.G_RET_STS_SUCCESS;
166:
167: IF ( ( p_item_number IS NULL OR
168: p_item_number = FND_API.G_MISS_CHAR ) AND
169: ( p_x_inventory_item_id IS NULL OR

Line 168: p_item_number = FND_API.G_MISS_CHAR ) AND

164: BEGIN
165: x_return_status := FND_API.G_RET_STS_SUCCESS;
166:
167: IF ( ( p_item_number IS NULL OR
168: p_item_number = FND_API.G_MISS_CHAR ) AND
169: ( p_x_inventory_item_id IS NULL OR
170: p_x_inventory_item_id = FND_API.G_MISS_NUM ) ) THEN
171: x_return_status := FND_API.G_RET_STS_ERROR;
172: x_msg_data := 'AHL_COM_INVALID_PROCEDURE_CALL';

Line 170: p_x_inventory_item_id = FND_API.G_MISS_NUM ) ) THEN

166:
167: IF ( ( p_item_number IS NULL OR
168: p_item_number = FND_API.G_MISS_CHAR ) AND
169: ( p_x_inventory_item_id IS NULL OR
170: p_x_inventory_item_id = FND_API.G_MISS_NUM ) ) THEN
171: x_return_status := FND_API.G_RET_STS_ERROR;
172: x_msg_data := 'AHL_COM_INVALID_PROCEDURE_CALL';
173: RETURN;
174: END IF;

Line 171: x_return_status := FND_API.G_RET_STS_ERROR;

167: IF ( ( p_item_number IS NULL OR
168: p_item_number = FND_API.G_MISS_CHAR ) AND
169: ( p_x_inventory_item_id IS NULL OR
170: p_x_inventory_item_id = FND_API.G_MISS_NUM ) ) THEN
171: x_return_status := FND_API.G_RET_STS_ERROR;
172: x_msg_data := 'AHL_COM_INVALID_PROCEDURE_CALL';
173: RETURN;
174: END IF;
175:

Line 177: p_item_number = FND_API.G_MISS_CHAR ) AND

173: RETURN;
174: END IF;
175:
176: IF ( ( p_item_number IS NULL OR
177: p_item_number = FND_API.G_MISS_CHAR ) AND
178: ( p_x_inventory_item_id IS NOT NULL AND
179: p_x_inventory_item_id <> FND_API.G_MISS_NUM ) )
180: THEN
181: OPEN get_rec_from_id( p_x_inventory_item_id );

Line 179: p_x_inventory_item_id <> FND_API.G_MISS_NUM ) )

175:
176: IF ( ( p_item_number IS NULL OR
177: p_item_number = FND_API.G_MISS_CHAR ) AND
178: ( p_x_inventory_item_id IS NOT NULL AND
179: p_x_inventory_item_id <> FND_API.G_MISS_NUM ) )
180: THEN
181: OPEN get_rec_from_id( p_x_inventory_item_id );
182: LOOP
183: FETCH get_rec_from_id INTO l_item_rec1;

Line 196: l_rec_found:=FND_API.G_TRUE;

192: l_item_rec1.wip_supply_type=1 and
193: l_item_rec1.eam_item_type=3 and
194: l_item_rec1.comms_nl_trackable_flag='Y'
195: THEN
196: l_rec_found:=FND_API.G_TRUE;
197: END IF;
198: ELSIF G_APPLN_USAGE='PM'
199: THEN
200: IF l_item_rec1.comms_nl_trackable_flag='Y' and

Line 203: l_rec_found:=FND_API.G_TRUE;

199: THEN
200: IF l_item_rec1.comms_nl_trackable_flag='Y' and
201: l_item_rec1.serv_req_enabled_code='E'
202: THEN
203: l_rec_found:=FND_API.G_TRUE;
204: END IF;
205: END IF;
206: EXIT WHEN l_rec_found=FND_API.G_TRUE;
207: END LOOP;

Line 206: EXIT WHEN l_rec_found=FND_API.G_TRUE;

202: THEN
203: l_rec_found:=FND_API.G_TRUE;
204: END IF;
205: END IF;
206: EXIT WHEN l_rec_found=FND_API.G_TRUE;
207: END LOOP;
208: CLOSE get_rec_from_id;
209:
210: IF L_REC_COUNT=0

Line 212: x_return_status := FND_API.G_RET_STS_ERROR;

208: CLOSE get_rec_from_id;
209:
210: IF L_REC_COUNT=0
211: THEN
212: x_return_status := FND_API.G_RET_STS_ERROR;
213: x_msg_data := 'AHL_FMP_INVALID_ITEM';
214: RETURN;
215: END IF;
216:

Line 217: IF l_rec_found=FND_API.G_FALSE

213: x_msg_data := 'AHL_FMP_INVALID_ITEM';
214: RETURN;
215: END IF;
216:
217: IF l_rec_found=FND_API.G_FALSE
218: THEN
219: x_return_status := FND_API.G_RET_STS_ERROR;
220: x_msg_data := 'AHL_FMP_NOT_JOB_ITEM';
221: END IF;

Line 219: x_return_status := FND_API.G_RET_STS_ERROR;

215: END IF;
216:
217: IF l_rec_found=FND_API.G_FALSE
218: THEN
219: x_return_status := FND_API.G_RET_STS_ERROR;
220: x_msg_data := 'AHL_FMP_NOT_JOB_ITEM';
221: END IF;
222: RETURN;
223:

Line 225: p_item_number <> FND_API.G_MISS_CHAR

221: END IF;
222: RETURN;
223:
224: ELSIF p_item_number IS NOT NULL AND
225: p_item_number <> FND_API.G_MISS_CHAR
226: THEN
227: L_REC_COUNT:=0;
228: OPEN get_rec_from_value( p_item_number );
229: LOOP

Line 245: l_rec_found:=FND_API.G_TRUE;

241: l_item_rec2.wip_supply_type=1 and
242: l_item_rec2.eam_item_type=3 and
243: l_item_rec2.comms_nl_trackable_flag='Y'
244: THEN
245: l_rec_found:=FND_API.G_TRUE;
246: END IF;
247: ELSIF G_APPLN_USAGE='PM' -- PM MODE
248: THEN
249: IF l_item_rec2.comms_nl_trackable_flag='Y' and

Line 252: l_rec_found:=FND_API.G_TRUE;

248: THEN
249: IF l_item_rec2.comms_nl_trackable_flag='Y' and
250: l_item_rec2.serv_req_enabled_code='E'
251: THEN
252: l_rec_found:=FND_API.G_TRUE;
253: END IF;
254: END IF;
255:
256: END LOOP;

Line 262: x_return_status := FND_API.G_RET_STS_ERROR;

258: CLOSE get_rec_from_value;
259:
260: IF L_REC_COUNT=0
261: THEN
262: x_return_status := FND_API.G_RET_STS_ERROR;
263: x_msg_data := 'AHL_FMP_INVALID_ITEM';
264: RETURN;
265: END IF;
266:

Line 267: IF l_rec_found=FND_API.G_FALSE

263: x_msg_data := 'AHL_FMP_INVALID_ITEM';
264: RETURN;
265: END IF;
266:
267: IF l_rec_found=FND_API.G_FALSE
268: THEN
269: x_return_status := FND_API.G_RET_STS_ERROR;
270: x_msg_data := 'AHL_FMP_NOT_JOB_ITEM';
271: END IF;

Line 269: x_return_status := FND_API.G_RET_STS_ERROR;

265: END IF;
266:
267: IF l_rec_found=FND_API.G_FALSE
268: THEN
269: x_return_status := FND_API.G_RET_STS_ERROR;
270: x_msg_data := 'AHL_FMP_NOT_JOB_ITEM';
271: END IF;
272:
273: RETURN;

Line 306: x_return_status := FND_API.G_RET_STS_SUCCESS;

302: FROM AHL_PC_NODES_B
303: WHERE pc_node_id = c_pc_node_id;
304:
305: BEGIN
306: x_return_status := FND_API.G_RET_STS_SUCCESS;
307:
308: IF ( ( p_pc_node_name IS NULL OR
309: p_pc_node_name = FND_API.G_MISS_CHAR ) AND
310: ( p_x_pc_node_id IS NULL OR

Line 309: p_pc_node_name = FND_API.G_MISS_CHAR ) AND

305: BEGIN
306: x_return_status := FND_API.G_RET_STS_SUCCESS;
307:
308: IF ( ( p_pc_node_name IS NULL OR
309: p_pc_node_name = FND_API.G_MISS_CHAR ) AND
310: ( p_x_pc_node_id IS NULL OR
311: p_x_pc_node_id = FND_API.G_MISS_NUM ) ) THEN
312: x_return_status := FND_API.G_RET_STS_ERROR;
313: x_msg_data := 'AHL_COM_INVALID_PROCEDURE_CALL';

Line 311: p_x_pc_node_id = FND_API.G_MISS_NUM ) ) THEN

307:
308: IF ( ( p_pc_node_name IS NULL OR
309: p_pc_node_name = FND_API.G_MISS_CHAR ) AND
310: ( p_x_pc_node_id IS NULL OR
311: p_x_pc_node_id = FND_API.G_MISS_NUM ) ) THEN
312: x_return_status := FND_API.G_RET_STS_ERROR;
313: x_msg_data := 'AHL_COM_INVALID_PROCEDURE_CALL';
314: RETURN;
315: END IF;

Line 312: x_return_status := FND_API.G_RET_STS_ERROR;

308: IF ( ( p_pc_node_name IS NULL OR
309: p_pc_node_name = FND_API.G_MISS_CHAR ) AND
310: ( p_x_pc_node_id IS NULL OR
311: p_x_pc_node_id = FND_API.G_MISS_NUM ) ) THEN
312: x_return_status := FND_API.G_RET_STS_ERROR;
313: x_msg_data := 'AHL_COM_INVALID_PROCEDURE_CALL';
314: RETURN;
315: END IF;
316:

Line 318: p_pc_node_name = FND_API.G_MISS_CHAR ) AND

314: RETURN;
315: END IF;
316:
317: IF ( ( p_pc_node_name IS NULL OR
318: p_pc_node_name = FND_API.G_MISS_CHAR ) AND
319: ( p_x_pc_node_id IS NOT NULL AND
320: p_x_pc_node_id <> FND_API.G_MISS_NUM ) ) THEN
321:
322: OPEN get_rec_from_id( p_x_pc_node_id );

Line 320: p_x_pc_node_id <> FND_API.G_MISS_NUM ) ) THEN

316:
317: IF ( ( p_pc_node_name IS NULL OR
318: p_pc_node_name = FND_API.G_MISS_CHAR ) AND
319: ( p_x_pc_node_id IS NOT NULL AND
320: p_x_pc_node_id <> FND_API.G_MISS_NUM ) ) THEN
321:
322: OPEN get_rec_from_id( p_x_pc_node_id );
323:
324: FETCH get_rec_from_id INTO

Line 328: x_return_status := FND_API.G_RET_STS_ERROR;

324: FETCH get_rec_from_id INTO
325: l_pc_node_id;
326:
327: IF get_rec_from_id%NOTFOUND THEN
328: x_return_status := FND_API.G_RET_STS_ERROR;
329: x_msg_data := 'AHL_FMP_INVALID_PC_NODE';
330: END IF;
331:
332: CLOSE get_rec_from_id;

Line 338: p_pc_node_name <> FND_API.G_MISS_CHAR ) THEN

334:
335: END IF;
336:
337: IF ( p_pc_node_name IS NOT NULL AND
338: p_pc_node_name <> FND_API.G_MISS_CHAR ) THEN
339:
340: OPEN get_rec_from_value( p_pc_node_name );
341:
342: LOOP

Line 356: x_return_status := FND_API.G_RET_STS_ERROR;

352:
353: END LOOP;
354:
355: IF ( get_rec_from_value%ROWCOUNT = 0 ) THEN
356: x_return_status := FND_API.G_RET_STS_ERROR;
357: x_msg_data := 'AHL_FMP_INVALID_PC_NODE';
358: ELSIF ( get_rec_from_value%ROWCOUNT = 1 ) THEN
359: p_x_pc_node_id := l_pc_node_id;
360: ELSE

Line 361: x_return_status := FND_API.G_RET_STS_ERROR;

357: x_msg_data := 'AHL_FMP_INVALID_PC_NODE';
358: ELSIF ( get_rec_from_value%ROWCOUNT = 1 ) THEN
359: p_x_pc_node_id := l_pc_node_id;
360: ELSE
361: x_return_status := FND_API.G_RET_STS_ERROR;
362: x_msg_data := 'AHL_FMP_TOO_MANY_PC_NODES';
363: END IF;
364:
365: CLOSE get_rec_from_value;

Line 433: x_return_status := FND_API.G_RET_STS_SUCCESS;

429: AND trunc(sysdate) < trunc(nvl(active_end_date,sysdate+1));
430:
431:
432: BEGIN
433: x_return_status := FND_API.G_RET_STS_SUCCESS;
434:
435: IF ( ( p_position_ref_meaning IS NULL OR
436: p_position_ref_meaning = FND_API.G_MISS_CHAR ) AND
437: ( p_x_relationship_id IS NULL OR

Line 436: p_position_ref_meaning = FND_API.G_MISS_CHAR ) AND

432: BEGIN
433: x_return_status := FND_API.G_RET_STS_SUCCESS;
434:
435: IF ( ( p_position_ref_meaning IS NULL OR
436: p_position_ref_meaning = FND_API.G_MISS_CHAR ) AND
437: ( p_x_relationship_id IS NULL OR
438: p_x_relationship_id = FND_API.G_MISS_NUM ) ) THEN
439: x_return_status := FND_API.G_RET_STS_ERROR;
440: x_msg_data := 'AHL_COM_INVALID_PROCEDURE_CALL';

Line 438: p_x_relationship_id = FND_API.G_MISS_NUM ) ) THEN

434:
435: IF ( ( p_position_ref_meaning IS NULL OR
436: p_position_ref_meaning = FND_API.G_MISS_CHAR ) AND
437: ( p_x_relationship_id IS NULL OR
438: p_x_relationship_id = FND_API.G_MISS_NUM ) ) THEN
439: x_return_status := FND_API.G_RET_STS_ERROR;
440: x_msg_data := 'AHL_COM_INVALID_PROCEDURE_CALL';
441: RETURN;
442: END IF;

Line 439: x_return_status := FND_API.G_RET_STS_ERROR;

435: IF ( ( p_position_ref_meaning IS NULL OR
436: p_position_ref_meaning = FND_API.G_MISS_CHAR ) AND
437: ( p_x_relationship_id IS NULL OR
438: p_x_relationship_id = FND_API.G_MISS_NUM ) ) THEN
439: x_return_status := FND_API.G_RET_STS_ERROR;
440: x_msg_data := 'AHL_COM_INVALID_PROCEDURE_CALL';
441: RETURN;
442: END IF;
443:

Line 445: --p_position_ref_meaning = FND_API.G_MISS_CHAR ) AND

441: RETURN;
442: END IF;
443:
444: IF ( --( p_position_ref_meaning IS NULL OR
445: --p_position_ref_meaning = FND_API.G_MISS_CHAR ) AND
446: ( p_x_relationship_id IS NOT NULL AND
447: p_x_relationship_id <> FND_API.G_MISS_NUM ) ) THEN
448:
449: FOR relationship_rec IN get_rec_from_id( p_x_relationship_id ) LOOP

Line 447: p_x_relationship_id <> FND_API.G_MISS_NUM ) ) THEN

443:
444: IF ( --( p_position_ref_meaning IS NULL OR
445: --p_position_ref_meaning = FND_API.G_MISS_CHAR ) AND
446: ( p_x_relationship_id IS NOT NULL AND
447: p_x_relationship_id <> FND_API.G_MISS_NUM ) ) THEN
448:
449: FOR relationship_rec IN get_rec_from_id( p_x_relationship_id ) LOOP
450:
451: -- Check if position is valid.

Line 455: x_return_status := FND_API.G_RET_STS_ERROR;

451: -- Check if position is valid.
452: OPEN check_reln_valid_csr(relationship_rec.relationship_id);
453: FETCH check_reln_valid_csr INTO l_junk;
454: IF (check_reln_valid_csr%NOTFOUND) THEN
455: x_return_status := FND_API.G_RET_STS_ERROR;
456: x_msg_data := 'AHL_FMP_INVALID_MC_POS_STATUS';
457: CLOSE check_reln_valid_csr;
458:
459: ELSE

Line 461: p_position_ref_meaning <> FND_API.G_MISS_CHAR ) THEN

457: CLOSE check_reln_valid_csr;
458:
459: ELSE
460: IF (p_position_ref_meaning IS NOT NULL AND
461: p_position_ref_meaning <> FND_API.G_MISS_CHAR ) THEN
462:
463: l_posn_meaning := AHL_MC_PATH_POSITION_PVT.GET_POSREF_BY_ID(relationship_rec.relationship_id);
464: IF (l_posn_meaning <> p_position_ref_meaning) THEN
465: x_return_status := FND_API.G_RET_STS_ERROR;

Line 465: x_return_status := FND_API.G_RET_STS_ERROR;

461: p_position_ref_meaning <> FND_API.G_MISS_CHAR ) THEN
462:
463: l_posn_meaning := AHL_MC_PATH_POSITION_PVT.GET_POSREF_BY_ID(relationship_rec.relationship_id);
464: IF (l_posn_meaning <> p_position_ref_meaning) THEN
465: x_return_status := FND_API.G_RET_STS_ERROR;
466: x_msg_data := 'AHL_FMP_INVALID_MC_POS_MEANING';
467: ELSE
468: -- exit when at least one valid relationship found.
469: l_valid_rec_found := TRUE;

Line 482: x_return_status := FND_API.G_RET_STS_ERROR;

478:
479: END LOOP;
480:
481: IF NOT(l_valid_rec_found) THEN
482: x_return_status := FND_API.G_RET_STS_ERROR;
483: x_msg_data := 'AHL_FMP_INVALID_MC_POSITION';
484:
485: END IF;
486:

Line 492: p_position_ref_meaning <> FND_API.G_MISS_CHAR ) THEN

488:
489: END IF;
490:
491: IF ( p_position_ref_meaning IS NOT NULL AND
492: p_position_ref_meaning <> FND_API.G_MISS_CHAR ) THEN
493:
494: x_return_status := FND_API.G_RET_STS_ERROR;
495: x_msg_data := 'AHL_FMP_TOO_MANY_MC_POSITIONS';
496:

Line 494: x_return_status := FND_API.G_RET_STS_ERROR;

490:
491: IF ( p_position_ref_meaning IS NOT NULL AND
492: p_position_ref_meaning <> FND_API.G_MISS_CHAR ) THEN
493:
494: x_return_status := FND_API.G_RET_STS_ERROR;
495: x_msg_data := 'AHL_FMP_TOO_MANY_MC_POSITIONS';
496:
497: RETURN;
498: END IF;

Line 535: x_return_status := FND_API.G_RET_STS_SUCCESS;

531: WHERE mc_header_id = c_mc_header_id AND
532: config_status_code = 'COMPLETE';
533:
534: BEGIN
535: x_return_status := FND_API.G_RET_STS_SUCCESS;
536:
537: --If position meaning and path_position_id is null then throw 'invalid procedure call' error.
538:
539: IF ( ( p_position_ref_meaning IS NULL OR

Line 540: p_position_ref_meaning = FND_API.G_MISS_CHAR ) AND

536:
537: --If position meaning and path_position_id is null then throw 'invalid procedure call' error.
538:
539: IF ( ( p_position_ref_meaning IS NULL OR
540: p_position_ref_meaning = FND_API.G_MISS_CHAR ) AND
541: ( p_x_relationship_id IS NULL OR
542: p_x_relationship_id = FND_API.G_MISS_NUM ) ) THEN
543: x_return_status := FND_API.G_RET_STS_ERROR;
544: x_msg_data := 'AHL_COM_INVALID_PROCEDURE_CALL';

Line 542: p_x_relationship_id = FND_API.G_MISS_NUM ) ) THEN

538:
539: IF ( ( p_position_ref_meaning IS NULL OR
540: p_position_ref_meaning = FND_API.G_MISS_CHAR ) AND
541: ( p_x_relationship_id IS NULL OR
542: p_x_relationship_id = FND_API.G_MISS_NUM ) ) THEN
543: x_return_status := FND_API.G_RET_STS_ERROR;
544: x_msg_data := 'AHL_COM_INVALID_PROCEDURE_CALL';
545: RETURN;
546: END IF;

Line 543: x_return_status := FND_API.G_RET_STS_ERROR;

539: IF ( ( p_position_ref_meaning IS NULL OR
540: p_position_ref_meaning = FND_API.G_MISS_CHAR ) AND
541: ( p_x_relationship_id IS NULL OR
542: p_x_relationship_id = FND_API.G_MISS_NUM ) ) THEN
543: x_return_status := FND_API.G_RET_STS_ERROR;
544: x_msg_data := 'AHL_COM_INVALID_PROCEDURE_CALL';
545: RETURN;
546: END IF;
547:

Line 550: p_position_ref_meaning <> FND_API.G_MISS_CHAR ) AND

546: END IF;
547:
548: --If position meaning is not null but path_position_id is null, then throw error asking user to pick position from LOV.
549: IF ( ( p_position_ref_meaning IS NOT NULL AND
550: p_position_ref_meaning <> FND_API.G_MISS_CHAR ) AND
551: ( p_x_relationship_id IS NULL OR
552: p_x_relationship_id = FND_API.G_MISS_NUM ) ) THEN
553: x_return_status := FND_API.G_RET_STS_ERROR;
554: x_msg_data := 'AHL_FMP_TOO_MANY_MC_POSITIONS';

Line 552: p_x_relationship_id = FND_API.G_MISS_NUM ) ) THEN

548: --If position meaning is not null but path_position_id is null, then throw error asking user to pick position from LOV.
549: IF ( ( p_position_ref_meaning IS NOT NULL AND
550: p_position_ref_meaning <> FND_API.G_MISS_CHAR ) AND
551: ( p_x_relationship_id IS NULL OR
552: p_x_relationship_id = FND_API.G_MISS_NUM ) ) THEN
553: x_return_status := FND_API.G_RET_STS_ERROR;
554: x_msg_data := 'AHL_FMP_TOO_MANY_MC_POSITIONS';
555: RETURN;
556: END IF;

Line 553: x_return_status := FND_API.G_RET_STS_ERROR;

549: IF ( ( p_position_ref_meaning IS NOT NULL AND
550: p_position_ref_meaning <> FND_API.G_MISS_CHAR ) AND
551: ( p_x_relationship_id IS NULL OR
552: p_x_relationship_id = FND_API.G_MISS_NUM ) ) THEN
553: x_return_status := FND_API.G_RET_STS_ERROR;
554: x_msg_data := 'AHL_FMP_TOO_MANY_MC_POSITIONS';
555: RETURN;
556: END IF;
557:

Line 564: x_return_status := FND_API.G_RET_STS_ERROR;

560: --Retrieving the mc_header_id to check if the MC is complete.
561: OPEN get_mc_header_id(p_x_relationship_id);
562: FETCH get_mc_header_id INTO l_mc_header_id;
563: IF (get_mc_header_id%NOTFOUND) THEN
564: x_return_status := FND_API.G_RET_STS_ERROR;
565: x_msg_data := 'AHL_FMP_INVALID_MC_POSITION';
566: CLOSE get_mc_header_id;
567: RETURN;
568: END IF;

Line 575: x_return_status := FND_API.G_RET_STS_ERROR;

571: --Throw error if MC is not complete.
572: OPEN check_mc_status(l_mc_header_id);
573: FETCH check_mc_status INTO l_dummy_char;
574: IF (check_mc_status%NOTFOUND) THEN
575: x_return_status := FND_API.G_RET_STS_ERROR;
576: x_msg_data := 'AHL_FMP_MC_NOT_COMPLETE';
577: CLOSE check_mc_status;
578: RETURN;
579: END IF;

Line 588: x_return_status := FND_API.G_RET_STS_ERROR;

584: --Throw error 'Invalid Master Configuration Position FIELD entered for Effectivity RECORD.'if they dont match
585: --Fix for Bug 6032303. Calling below function with the path_position_id
586: l_posn_meaning := AHL_MC_PATH_POSITION_PVT.GET_POSREF_BY_ID(p_x_relationship_id);
587: IF (l_posn_meaning IS NULL) THEN
588: x_return_status := FND_API.G_RET_STS_ERROR;
589: x_msg_data := 'AHL_FMP_INVALID_MC_POSITION';
590: ELSIF (p_position_ref_meaning IS NOT NULL AND l_posn_meaning <> p_position_ref_meaning) THEN
591: x_return_status := FND_API.G_RET_STS_ERROR;
592: x_msg_data := 'AHL_FMP_INVALID_MC_POS_MEANING';

Line 591: x_return_status := FND_API.G_RET_STS_ERROR;

587: IF (l_posn_meaning IS NULL) THEN
588: x_return_status := FND_API.G_RET_STS_ERROR;
589: x_msg_data := 'AHL_FMP_INVALID_MC_POSITION';
590: ELSIF (p_position_ref_meaning IS NOT NULL AND l_posn_meaning <> p_position_ref_meaning) THEN
591: x_return_status := FND_API.G_RET_STS_ERROR;
592: x_msg_data := 'AHL_FMP_INVALID_MC_POS_MEANING';
593: END IF;
594:
595: END validate_position;

Line 641: x_return_status := FND_API.G_RET_STS_SUCCESS;

637: and trunc(sysdate) between trunc(nvl(it.start_date_active,sysdate))
638: and trunc(nvl(IT.end_date_active,sysdate+1));
639:
640: BEGIN
641: x_return_status := FND_API.G_RET_STS_SUCCESS;
642:
643: IF ( p_inventory_item_id IS NULL OR
644: p_inventory_item_id = FND_API.G_MISS_NUM OR
645: p_relationship_id IS NULL OR

Line 644: p_inventory_item_id = FND_API.G_MISS_NUM OR

640: BEGIN
641: x_return_status := FND_API.G_RET_STS_SUCCESS;
642:
643: IF ( p_inventory_item_id IS NULL OR
644: p_inventory_item_id = FND_API.G_MISS_NUM OR
645: p_relationship_id IS NULL OR
646: p_relationship_id = FND_API.G_MISS_NUM ) THEN
647: x_return_status := FND_API.G_RET_STS_ERROR;
648: x_msg_data := 'AHL_COM_INVALID_PROCEDURE_CALL';

Line 646: p_relationship_id = FND_API.G_MISS_NUM ) THEN

642:
643: IF ( p_inventory_item_id IS NULL OR
644: p_inventory_item_id = FND_API.G_MISS_NUM OR
645: p_relationship_id IS NULL OR
646: p_relationship_id = FND_API.G_MISS_NUM ) THEN
647: x_return_status := FND_API.G_RET_STS_ERROR;
648: x_msg_data := 'AHL_COM_INVALID_PROCEDURE_CALL';
649: RETURN;
650: END IF;

Line 647: x_return_status := FND_API.G_RET_STS_ERROR;

643: IF ( p_inventory_item_id IS NULL OR
644: p_inventory_item_id = FND_API.G_MISS_NUM OR
645: p_relationship_id IS NULL OR
646: p_relationship_id = FND_API.G_MISS_NUM ) THEN
647: x_return_status := FND_API.G_RET_STS_ERROR;
648: x_msg_data := 'AHL_COM_INVALID_PROCEDURE_CALL';
649: RETURN;
650: END IF;
651:

Line 658: x_return_status := FND_API.G_RET_STS_ERROR;

654: FETCH check_alternate INTO
655: l_dummy;
656:
657: IF check_alternate%NOTFOUND THEN
658: x_return_status := FND_API.G_RET_STS_ERROR;
659: x_msg_data := 'AHL_FMP_INVALID_POSITION_ITEM';
660: END IF;
661:
662: CLOSE check_alternate;

Line 799: x_return_status := FND_API.G_RET_STS_SUCCESS;

795: */
796:
797:
798: BEGIN
799: x_return_status := FND_API.G_RET_STS_SUCCESS;
800:
801: IF ( p_counter_name IS NULL AND --amsriniv . changed OR to AND
802: ( p_x_counter_id IS NULL OR
803: p_x_counter_id = FND_API.G_MISS_NUM ) ) THEN

Line 803: p_x_counter_id = FND_API.G_MISS_NUM ) ) THEN

799: x_return_status := FND_API.G_RET_STS_SUCCESS;
800:
801: IF ( p_counter_name IS NULL AND --amsriniv . changed OR to AND
802: ( p_x_counter_id IS NULL OR
803: p_x_counter_id = FND_API.G_MISS_NUM ) ) THEN
804: x_return_status := FND_API.G_RET_STS_ERROR;
805: x_msg_data := 'AHL_FMP_INVALID_COUNTER';
806: RETURN;
807: END IF;

Line 804: x_return_status := FND_API.G_RET_STS_ERROR;

800:
801: IF ( p_counter_name IS NULL AND --amsriniv . changed OR to AND
802: ( p_x_counter_id IS NULL OR
803: p_x_counter_id = FND_API.G_MISS_NUM ) ) THEN
804: x_return_status := FND_API.G_RET_STS_ERROR;
805: x_msg_data := 'AHL_FMP_INVALID_COUNTER';
806: RETURN;
807: END IF;
808:

Line 810: p_inventory_item_id = FND_API.G_MISS_NUM ) AND

806: RETURN;
807: END IF;
808:
809: IF ( ( p_inventory_item_id IS NULL OR
810: p_inventory_item_id = FND_API.G_MISS_NUM ) AND
811: ( p_relationship_id IS NULL OR
812: p_relationship_id = FND_API.G_MISS_NUM ) ) THEN
813: x_return_status := FND_API.G_RET_STS_ERROR;
814: x_msg_data := 'AHL_FMP_INVALID_CTR_ITEM';

Line 812: p_relationship_id = FND_API.G_MISS_NUM ) ) THEN

808:
809: IF ( ( p_inventory_item_id IS NULL OR
810: p_inventory_item_id = FND_API.G_MISS_NUM ) AND
811: ( p_relationship_id IS NULL OR
812: p_relationship_id = FND_API.G_MISS_NUM ) ) THEN
813: x_return_status := FND_API.G_RET_STS_ERROR;
814: x_msg_data := 'AHL_FMP_INVALID_CTR_ITEM';
815: RETURN;
816: END IF;

Line 813: x_return_status := FND_API.G_RET_STS_ERROR;

809: IF ( ( p_inventory_item_id IS NULL OR
810: p_inventory_item_id = FND_API.G_MISS_NUM ) AND
811: ( p_relationship_id IS NULL OR
812: p_relationship_id = FND_API.G_MISS_NUM ) ) THEN
813: x_return_status := FND_API.G_RET_STS_ERROR;
814: x_msg_data := 'AHL_FMP_INVALID_CTR_ITEM';
815: RETURN;
816: END IF;
817:

Line 819: p_counter_name = FND_API.G_MISS_CHAR ) AND

815: RETURN;
816: END IF;
817:
818: IF ( ( p_counter_name IS NULL OR
819: p_counter_name = FND_API.G_MISS_CHAR ) AND
820: ( p_x_counter_id IS NOT NULL AND
821: p_x_counter_id <> FND_API.G_MISS_NUM ) ) THEN
822:
823: IF ( p_inventory_item_id IS NOT NULL AND

Line 821: p_x_counter_id <> FND_API.G_MISS_NUM ) ) THEN

817:
818: IF ( ( p_counter_name IS NULL OR
819: p_counter_name = FND_API.G_MISS_CHAR ) AND
820: ( p_x_counter_id IS NOT NULL AND
821: p_x_counter_id <> FND_API.G_MISS_NUM ) ) THEN
822:
823: IF ( p_inventory_item_id IS NOT NULL AND
824: p_inventory_item_id <> FND_API.G_MISS_NUM ) THEN
825: OPEN validate_item_ctr_id(p_x_counter_id, p_inventory_item_id);

Line 824: p_inventory_item_id <> FND_API.G_MISS_NUM ) THEN

820: ( p_x_counter_id IS NOT NULL AND
821: p_x_counter_id <> FND_API.G_MISS_NUM ) ) THEN
822:
823: IF ( p_inventory_item_id IS NOT NULL AND
824: p_inventory_item_id <> FND_API.G_MISS_NUM ) THEN
825: OPEN validate_item_ctr_id(p_x_counter_id, p_inventory_item_id);
826: FETCH validate_item_ctr_id INTO l_dummy;
827: IF (validate_item_ctr_id%NOTFOUND) THEN
828: x_return_status := FND_API.G_RET_STS_ERROR;

Line 828: x_return_status := FND_API.G_RET_STS_ERROR;

824: p_inventory_item_id <> FND_API.G_MISS_NUM ) THEN
825: OPEN validate_item_ctr_id(p_x_counter_id, p_inventory_item_id);
826: FETCH validate_item_ctr_id INTO l_dummy;
827: IF (validate_item_ctr_id%NOTFOUND) THEN
828: x_return_status := FND_API.G_RET_STS_ERROR;
829: x_msg_data := 'AHL_FMP_INVALID_CTR_ITEM';
830: END IF;
831: CLOSE validate_item_ctr_id;
832: ELSIF (p_relationship_id IS NOT NULL AND

Line 833: p_relationship_id <> FND_API.G_MISS_NUM ) THEN

829: x_msg_data := 'AHL_FMP_INVALID_CTR_ITEM';
830: END IF;
831: CLOSE validate_item_ctr_id;
832: ELSIF (p_relationship_id IS NOT NULL AND
833: p_relationship_id <> FND_API.G_MISS_NUM ) THEN
834: OPEN check_alternate_ctr_id(p_x_counter_id, p_relationship_id);
835: FETCH check_alternate_ctr_id INTO l_dummy;
836: IF (check_alternate_ctr_id%NOTFOUND) THEN
837: x_return_status := FND_API.G_RET_STS_ERROR;

Line 837: x_return_status := FND_API.G_RET_STS_ERROR;

833: p_relationship_id <> FND_API.G_MISS_NUM ) THEN
834: OPEN check_alternate_ctr_id(p_x_counter_id, p_relationship_id);
835: FETCH check_alternate_ctr_id INTO l_dummy;
836: IF (check_alternate_ctr_id%NOTFOUND) THEN
837: x_return_status := FND_API.G_RET_STS_ERROR;
838: x_msg_data := 'AHL_FMP_INVALID_CTR_POSITION';
839: END IF;
840: CLOSE check_alternate_ctr_id;
841: END IF;

Line 845: p_counter_name <> FND_API.G_MISS_CHAR ) THEN

841: END IF;
842: END IF;
843:
844: IF ( p_counter_name IS NOT NULL AND
845: p_counter_name <> FND_API.G_MISS_CHAR ) THEN
846:
847: OPEN get_rec_from_value( p_counter_name );
848:
849: LOOP

Line 858: p_inventory_item_id <> FND_API.G_MISS_NUM ) THEN

854:
855: EXIT WHEN get_rec_from_value%NOTFOUND;
856:
857: IF ( p_inventory_item_id IS NOT NULL AND
858: p_inventory_item_id <> FND_API.G_MISS_NUM ) THEN
859: OPEN validate_item_ctr_id(l_counter_id, p_inventory_item_id);
860: FETCH validate_item_ctr_id INTO l_dummy;
861: IF (validate_item_ctr_id%FOUND) THEN
862: l_counter_valid_flag := TRUE;

Line 869: p_relationship_id <> FND_API.G_MISS_NUM ) THEN

865: EXIT;
866: END IF;
867: CLOSE validate_item_ctr_id;
868: ELSIF (p_relationship_id IS NOT NULL AND
869: p_relationship_id <> FND_API.G_MISS_NUM ) THEN
870: OPEN check_alternate_ctr_id(l_counter_id, p_relationship_id);
871: FETCH check_alternate_ctr_id INTO l_dummy;
872: IF (check_alternate_ctr_id%FOUND) THEN
873: l_counter_valid_flag := TRUE;

Line 884: x_return_status := FND_API.G_RET_STS_ERROR;

880:
881: END LOOP;
882:
883: IF (get_rec_from_value%ROWCOUNT = 0) THEN --added by amsriniv
884: x_return_status := FND_API.G_RET_STS_ERROR;
885: x_msg_data := 'AHL_FMP_INVALID_COUNTER';
886: ELSE
887: IF NOT(l_counter_valid_flag)THEN
888: IF ( p_inventory_item_id IS NOT NULL AND

Line 889: p_inventory_item_id <> FND_API.G_MISS_NUM ) THEN

885: x_msg_data := 'AHL_FMP_INVALID_COUNTER';
886: ELSE
887: IF NOT(l_counter_valid_flag)THEN
888: IF ( p_inventory_item_id IS NOT NULL AND
889: p_inventory_item_id <> FND_API.G_MISS_NUM ) THEN
890: x_return_status := FND_API.G_RET_STS_ERROR;
891: x_msg_data := 'AHL_FMP_INVALID_CTR_ITEM';
892: ELSIF ( p_relationship_id IS NOT NULL AND
893: p_relationship_id <> FND_API.G_MISS_NUM ) THEN

Line 890: x_return_status := FND_API.G_RET_STS_ERROR;

886: ELSE
887: IF NOT(l_counter_valid_flag)THEN
888: IF ( p_inventory_item_id IS NOT NULL AND
889: p_inventory_item_id <> FND_API.G_MISS_NUM ) THEN
890: x_return_status := FND_API.G_RET_STS_ERROR;
891: x_msg_data := 'AHL_FMP_INVALID_CTR_ITEM';
892: ELSIF ( p_relationship_id IS NOT NULL AND
893: p_relationship_id <> FND_API.G_MISS_NUM ) THEN
894: x_return_status := FND_API.G_RET_STS_ERROR;

Line 893: p_relationship_id <> FND_API.G_MISS_NUM ) THEN

889: p_inventory_item_id <> FND_API.G_MISS_NUM ) THEN
890: x_return_status := FND_API.G_RET_STS_ERROR;
891: x_msg_data := 'AHL_FMP_INVALID_CTR_ITEM';
892: ELSIF ( p_relationship_id IS NOT NULL AND
893: p_relationship_id <> FND_API.G_MISS_NUM ) THEN
894: x_return_status := FND_API.G_RET_STS_ERROR;
895: x_msg_data := 'AHL_FMP_INVALID_CTR_POSITION';
896: END IF;
897: END IF;

Line 894: x_return_status := FND_API.G_RET_STS_ERROR;

890: x_return_status := FND_API.G_RET_STS_ERROR;
891: x_msg_data := 'AHL_FMP_INVALID_CTR_ITEM';
892: ELSIF ( p_relationship_id IS NOT NULL AND
893: p_relationship_id <> FND_API.G_MISS_NUM ) THEN
894: x_return_status := FND_API.G_RET_STS_ERROR;
895: x_msg_data := 'AHL_FMP_INVALID_CTR_POSITION';
896: END IF;
897: END IF;
898: END IF;

Line 927: x_return_status := FND_API.G_RET_STS_SUCCESS;

923: FROM FND_TERRITORIES_VL
924: WHERE territory_code = c_country_code;
925:
926: BEGIN
927: x_return_status := FND_API.G_RET_STS_SUCCESS;
928:
929: IF ( ( p_country_name IS NULL OR
930: p_country_name = FND_API.G_MISS_CHAR ) AND
931: ( p_x_country_code IS NULL OR

Line 930: p_country_name = FND_API.G_MISS_CHAR ) AND

926: BEGIN
927: x_return_status := FND_API.G_RET_STS_SUCCESS;
928:
929: IF ( ( p_country_name IS NULL OR
930: p_country_name = FND_API.G_MISS_CHAR ) AND
931: ( p_x_country_code IS NULL OR
932: p_x_country_code = FND_API.G_MISS_CHAR ) ) THEN
933: x_return_status := FND_API.G_RET_STS_ERROR;
934: x_msg_data := 'AHL_COM_INVALID_PROCEDURE_CALL';

Line 932: p_x_country_code = FND_API.G_MISS_CHAR ) ) THEN

928:
929: IF ( ( p_country_name IS NULL OR
930: p_country_name = FND_API.G_MISS_CHAR ) AND
931: ( p_x_country_code IS NULL OR
932: p_x_country_code = FND_API.G_MISS_CHAR ) ) THEN
933: x_return_status := FND_API.G_RET_STS_ERROR;
934: x_msg_data := 'AHL_COM_INVALID_PROCEDURE_CALL';
935: RETURN;
936: END IF;

Line 933: x_return_status := FND_API.G_RET_STS_ERROR;

929: IF ( ( p_country_name IS NULL OR
930: p_country_name = FND_API.G_MISS_CHAR ) AND
931: ( p_x_country_code IS NULL OR
932: p_x_country_code = FND_API.G_MISS_CHAR ) ) THEN
933: x_return_status := FND_API.G_RET_STS_ERROR;
934: x_msg_data := 'AHL_COM_INVALID_PROCEDURE_CALL';
935: RETURN;
936: END IF;
937:

Line 939: p_country_name = FND_API.G_MISS_CHAR ) AND

935: RETURN;
936: END IF;
937:
938: IF ( ( p_country_name IS NULL OR
939: p_country_name = FND_API.G_MISS_CHAR ) AND
940: ( p_x_country_code IS NOT NULL AND
941: p_x_country_code <> FND_API.G_MISS_CHAR ) ) THEN
942:
943: OPEN get_rec_from_id( p_x_country_code );

Line 941: p_x_country_code <> FND_API.G_MISS_CHAR ) ) THEN

937:
938: IF ( ( p_country_name IS NULL OR
939: p_country_name = FND_API.G_MISS_CHAR ) AND
940: ( p_x_country_code IS NOT NULL AND
941: p_x_country_code <> FND_API.G_MISS_CHAR ) ) THEN
942:
943: OPEN get_rec_from_id( p_x_country_code );
944:
945: FETCH get_rec_from_id INTO

Line 949: x_return_status := FND_API.G_RET_STS_ERROR;

945: FETCH get_rec_from_id INTO
946: l_country_code;
947:
948: IF get_rec_from_id%NOTFOUND THEN
949: x_return_status := FND_API.G_RET_STS_ERROR;
950: x_msg_data := 'AHL_FMP_INVALID_COUNTRY';
951: END IF;
952:
953: CLOSE get_rec_from_id;

Line 959: p_country_name <> FND_API.G_MISS_CHAR ) THEN

955:
956: END IF;
957:
958: IF ( p_country_name IS NOT NULL AND
959: p_country_name <> FND_API.G_MISS_CHAR ) THEN
960:
961: OPEN get_rec_from_value( p_country_name );
962:
963: LOOP

Line 977: x_return_status := FND_API.G_RET_STS_ERROR;

973:
974: END LOOP;
975:
976: IF ( get_rec_from_value%ROWCOUNT = 0 ) THEN
977: x_return_status := FND_API.G_RET_STS_ERROR;
978: x_msg_data := 'AHL_FMP_INVALID_COUNTRY';
979: ELSIF ( get_rec_from_value%ROWCOUNT = 1 ) THEN
980: p_x_country_code := l_country_code;
981: ELSE

Line 982: x_return_status := FND_API.G_RET_STS_ERROR;

978: x_msg_data := 'AHL_FMP_INVALID_COUNTRY';
979: ELSIF ( get_rec_from_value%ROWCOUNT = 1 ) THEN
980: p_x_country_code := l_country_code;
981: ELSE
982: x_return_status := FND_API.G_RET_STS_ERROR;
983: x_msg_data := 'AHL_FMP_TOO_MANY_COUNTRIES';
984: END IF;
985:
986: CLOSE get_rec_from_value;

Line 1058: x_return_status := FND_API.G_RET_STS_SUCCESS;

1054: and nvl(org.operating_unit, mo_global.get_current_org_id()) = mo_global.get_current_org_id() );
1055:
1056:
1057: BEGIN
1058: x_return_status := FND_API.G_RET_STS_SUCCESS;
1059:
1060: IF ( ( p_manufacturer_name IS NULL OR
1061: p_manufacturer_name = FND_API.G_MISS_CHAR ) AND
1062: ( p_x_manufacturer_id IS NULL OR

Line 1061: p_manufacturer_name = FND_API.G_MISS_CHAR ) AND

1057: BEGIN
1058: x_return_status := FND_API.G_RET_STS_SUCCESS;
1059:
1060: IF ( ( p_manufacturer_name IS NULL OR
1061: p_manufacturer_name = FND_API.G_MISS_CHAR ) AND
1062: ( p_x_manufacturer_id IS NULL OR
1063: p_x_manufacturer_id = FND_API.G_MISS_NUM ) ) THEN
1064: x_return_status := FND_API.G_RET_STS_ERROR;
1065: x_msg_data := 'AHL_COM_INVALID_PROCEDURE_CALL';

Line 1063: p_x_manufacturer_id = FND_API.G_MISS_NUM ) ) THEN

1059:
1060: IF ( ( p_manufacturer_name IS NULL OR
1061: p_manufacturer_name = FND_API.G_MISS_CHAR ) AND
1062: ( p_x_manufacturer_id IS NULL OR
1063: p_x_manufacturer_id = FND_API.G_MISS_NUM ) ) THEN
1064: x_return_status := FND_API.G_RET_STS_ERROR;
1065: x_msg_data := 'AHL_COM_INVALID_PROCEDURE_CALL';
1066: RETURN;
1067: END IF;

Line 1064: x_return_status := FND_API.G_RET_STS_ERROR;

1060: IF ( ( p_manufacturer_name IS NULL OR
1061: p_manufacturer_name = FND_API.G_MISS_CHAR ) AND
1062: ( p_x_manufacturer_id IS NULL OR
1063: p_x_manufacturer_id = FND_API.G_MISS_NUM ) ) THEN
1064: x_return_status := FND_API.G_RET_STS_ERROR;
1065: x_msg_data := 'AHL_COM_INVALID_PROCEDURE_CALL';
1066: RETURN;
1067: END IF;
1068:

Line 1070: p_inventory_item_id = FND_API.G_MISS_NUM ) AND

1066: RETURN;
1067: END IF;
1068:
1069: IF ( ( p_inventory_item_id IS NULL OR
1070: p_inventory_item_id = FND_API.G_MISS_NUM ) AND
1071: ( p_relationship_id IS NULL OR
1072: p_relationship_id = FND_API.G_MISS_NUM ) ) THEN
1073: x_return_status := FND_API.G_RET_STS_ERROR;
1074: x_msg_data := 'AHL_COM_INVALID_PROCEDURE_CALL';

Line 1072: p_relationship_id = FND_API.G_MISS_NUM ) ) THEN

1068:
1069: IF ( ( p_inventory_item_id IS NULL OR
1070: p_inventory_item_id = FND_API.G_MISS_NUM ) AND
1071: ( p_relationship_id IS NULL OR
1072: p_relationship_id = FND_API.G_MISS_NUM ) ) THEN
1073: x_return_status := FND_API.G_RET_STS_ERROR;
1074: x_msg_data := 'AHL_COM_INVALID_PROCEDURE_CALL';
1075: RETURN;
1076: END IF;

Line 1073: x_return_status := FND_API.G_RET_STS_ERROR;

1069: IF ( ( p_inventory_item_id IS NULL OR
1070: p_inventory_item_id = FND_API.G_MISS_NUM ) AND
1071: ( p_relationship_id IS NULL OR
1072: p_relationship_id = FND_API.G_MISS_NUM ) ) THEN
1073: x_return_status := FND_API.G_RET_STS_ERROR;
1074: x_msg_data := 'AHL_COM_INVALID_PROCEDURE_CALL';
1075: RETURN;
1076: END IF;
1077:

Line 1079: p_manufacturer_name = FND_API.G_MISS_CHAR ) AND

1075: RETURN;
1076: END IF;
1077:
1078: IF ( ( p_manufacturer_name IS NULL OR
1079: p_manufacturer_name = FND_API.G_MISS_CHAR ) AND
1080: ( p_x_manufacturer_id IS NOT NULL AND
1081: p_x_manufacturer_id <> FND_API.G_MISS_NUM ) ) THEN
1082:
1083: OPEN get_rec_from_id( p_x_manufacturer_id );

Line 1081: p_x_manufacturer_id <> FND_API.G_MISS_NUM ) ) THEN

1077:
1078: IF ( ( p_manufacturer_name IS NULL OR
1079: p_manufacturer_name = FND_API.G_MISS_CHAR ) AND
1080: ( p_x_manufacturer_id IS NOT NULL AND
1081: p_x_manufacturer_id <> FND_API.G_MISS_NUM ) ) THEN
1082:
1083: OPEN get_rec_from_id( p_x_manufacturer_id );
1084:
1085: LOOP

Line 1093: p_inventory_item_id <> FND_API.G_MISS_NUM ) THEN

1089:
1090: EXIT WHEN get_rec_from_id%NOTFOUND;
1091:
1092: IF ( p_inventory_item_id IS NOT NULL AND
1093: p_inventory_item_id <> FND_API.G_MISS_NUM ) THEN
1094: IF ( p_inventory_item_id = l_inventory_item_id ) THEN
1095: CLOSE get_rec_from_id;
1096: RETURN;
1097: END IF;

Line 1099: p_relationship_id <> FND_API.G_MISS_NUM ) THEN

1095: CLOSE get_rec_from_id;
1096: RETURN;
1097: END IF;
1098: ELSIF ( p_relationship_id IS NOT NULL AND
1099: p_relationship_id <> FND_API.G_MISS_NUM ) THEN
1100:
1101: validate_position_item
1102: (
1103: x_return_status => l_return_status,

Line 1109: IF ( NVL( l_return_status, 'X' ) = FND_API.G_RET_STS_SUCCESS ) THEN

1105: p_inventory_item_id => l_inventory_item_id,
1106: p_relationship_id => p_relationship_id
1107: );
1108:
1109: IF ( NVL( l_return_status, 'X' ) = FND_API.G_RET_STS_SUCCESS ) THEN
1110: CLOSE get_rec_from_id;
1111: RETURN;
1112: END IF;
1113: END IF;

Line 1118: x_return_status := FND_API.G_RET_STS_ERROR;

1114:
1115: END LOOP;
1116:
1117: IF ( get_rec_from_id%ROWCOUNT = 0 ) THEN
1118: x_return_status := FND_API.G_RET_STS_ERROR;
1119: x_msg_data := 'AHL_FMP_INVALID_MF';
1120: ELSE
1121: x_return_status := FND_API.G_RET_STS_ERROR;
1122: IF ( p_inventory_item_id IS NOT NULL AND

Line 1121: x_return_status := FND_API.G_RET_STS_ERROR;

1117: IF ( get_rec_from_id%ROWCOUNT = 0 ) THEN
1118: x_return_status := FND_API.G_RET_STS_ERROR;
1119: x_msg_data := 'AHL_FMP_INVALID_MF';
1120: ELSE
1121: x_return_status := FND_API.G_RET_STS_ERROR;
1122: IF ( p_inventory_item_id IS NOT NULL AND
1123: p_inventory_item_id <> FND_API.G_MISS_NUM ) THEN
1124: x_msg_data := 'AHL_FMP_INVALID_MF_ITEM';
1125: ELSIF ( p_relationship_id IS NOT NULL AND

Line 1123: p_inventory_item_id <> FND_API.G_MISS_NUM ) THEN

1119: x_msg_data := 'AHL_FMP_INVALID_MF';
1120: ELSE
1121: x_return_status := FND_API.G_RET_STS_ERROR;
1122: IF ( p_inventory_item_id IS NOT NULL AND
1123: p_inventory_item_id <> FND_API.G_MISS_NUM ) THEN
1124: x_msg_data := 'AHL_FMP_INVALID_MF_ITEM';
1125: ELSIF ( p_relationship_id IS NOT NULL AND
1126: p_relationship_id <> FND_API.G_MISS_NUM ) THEN
1127: x_msg_data := 'AHL_FMP_INVALID_MF_POSITION';

Line 1126: p_relationship_id <> FND_API.G_MISS_NUM ) THEN

1122: IF ( p_inventory_item_id IS NOT NULL AND
1123: p_inventory_item_id <> FND_API.G_MISS_NUM ) THEN
1124: x_msg_data := 'AHL_FMP_INVALID_MF_ITEM';
1125: ELSIF ( p_relationship_id IS NOT NULL AND
1126: p_relationship_id <> FND_API.G_MISS_NUM ) THEN
1127: x_msg_data := 'AHL_FMP_INVALID_MF_POSITION';
1128: END IF;
1129: END IF;
1130:

Line 1137: p_manufacturer_name <> FND_API.G_MISS_CHAR ) THEN

1133:
1134: END IF;
1135:
1136: IF ( p_manufacturer_name IS NOT NULL AND
1137: p_manufacturer_name <> FND_API.G_MISS_CHAR ) THEN
1138:
1139: OPEN get_rec_from_value( p_manufacturer_name );
1140:
1141: LOOP

Line 1150: p_inventory_item_id <> FND_API.G_MISS_NUM ) THEN

1146:
1147: EXIT WHEN get_rec_from_value%NOTFOUND;
1148:
1149: IF ( p_inventory_item_id IS NOT NULL AND
1150: p_inventory_item_id <> FND_API.G_MISS_NUM ) THEN
1151: IF ( p_inventory_item_id = l_inventory_item_id ) THEN
1152: IF ( p_x_manufacturer_id IS NULL ) THEN
1153: p_x_manufacturer_id := l_manufacturer_id;
1154: CLOSE get_rec_from_value;

Line 1162: p_relationship_id <> FND_API.G_MISS_NUM ) THEN

1158: RETURN;
1159: END IF;
1160: END IF;
1161: ELSIF ( p_relationship_id IS NOT NULL AND
1162: p_relationship_id <> FND_API.G_MISS_NUM ) THEN
1163:
1164: validate_position_item
1165: (
1166: x_return_status => l_return_status,

Line 1172: IF ( NVL( l_return_status, 'X' ) = FND_API.G_RET_STS_SUCCESS ) THEN

1168: p_inventory_item_id => l_inventory_item_id,
1169: p_relationship_id => p_relationship_id
1170: );
1171:
1172: IF ( NVL( l_return_status, 'X' ) = FND_API.G_RET_STS_SUCCESS ) THEN
1173: IF ( p_x_manufacturer_id IS NULL ) THEN
1174: p_x_manufacturer_id := l_manufacturer_id;
1175: CLOSE get_rec_from_value;
1176: RETURN;

Line 1188: x_return_status := FND_API.G_RET_STS_ERROR;

1184:
1185: END LOOP;
1186:
1187: IF ( get_rec_from_value%ROWCOUNT = 0 ) THEN
1188: x_return_status := FND_API.G_RET_STS_ERROR;
1189: x_msg_data := 'AHL_FMP_INVALID_MF';
1190: ELSE
1191: IF ( p_inventory_item_id IS NOT NULL AND
1192: p_inventory_item_id <> FND_API.G_MISS_NUM ) THEN

Line 1192: p_inventory_item_id <> FND_API.G_MISS_NUM ) THEN

1188: x_return_status := FND_API.G_RET_STS_ERROR;
1189: x_msg_data := 'AHL_FMP_INVALID_MF';
1190: ELSE
1191: IF ( p_inventory_item_id IS NOT NULL AND
1192: p_inventory_item_id <> FND_API.G_MISS_NUM ) THEN
1193: x_return_status := FND_API.G_RET_STS_ERROR;
1194: x_msg_data := 'AHL_FMP_INVALID_MF_ITEM';
1195: ELSIF ( p_relationship_id IS NOT NULL AND
1196: p_relationship_id <> FND_API.G_MISS_NUM ) THEN

Line 1193: x_return_status := FND_API.G_RET_STS_ERROR;

1189: x_msg_data := 'AHL_FMP_INVALID_MF';
1190: ELSE
1191: IF ( p_inventory_item_id IS NOT NULL AND
1192: p_inventory_item_id <> FND_API.G_MISS_NUM ) THEN
1193: x_return_status := FND_API.G_RET_STS_ERROR;
1194: x_msg_data := 'AHL_FMP_INVALID_MF_ITEM';
1195: ELSIF ( p_relationship_id IS NOT NULL AND
1196: p_relationship_id <> FND_API.G_MISS_NUM ) THEN
1197: x_return_status := FND_API.G_RET_STS_ERROR;

Line 1196: p_relationship_id <> FND_API.G_MISS_NUM ) THEN

1192: p_inventory_item_id <> FND_API.G_MISS_NUM ) THEN
1193: x_return_status := FND_API.G_RET_STS_ERROR;
1194: x_msg_data := 'AHL_FMP_INVALID_MF_ITEM';
1195: ELSIF ( p_relationship_id IS NOT NULL AND
1196: p_relationship_id <> FND_API.G_MISS_NUM ) THEN
1197: x_return_status := FND_API.G_RET_STS_ERROR;
1198: x_msg_data := 'AHL_FMP_INVALID_MF_POSITION';
1199: END IF;
1200: END IF;

Line 1197: x_return_status := FND_API.G_RET_STS_ERROR;

1193: x_return_status := FND_API.G_RET_STS_ERROR;
1194: x_msg_data := 'AHL_FMP_INVALID_MF_ITEM';
1195: ELSIF ( p_relationship_id IS NOT NULL AND
1196: p_relationship_id <> FND_API.G_MISS_NUM ) THEN
1197: x_return_status := FND_API.G_RET_STS_ERROR;
1198: x_msg_data := 'AHL_FMP_INVALID_MF_POSITION';
1199: END IF;
1200: END IF;
1201:

Line 1234: x_return_status := FND_API.G_RET_STS_SUCCESS;

1230: FROM DUAL
1231: WHERE c_serial_number_to >= c_serial_number_from;
1232:
1233: BEGIN
1234: x_return_status := FND_API.G_RET_STS_SUCCESS;
1235:
1236: IF ( p_serial_number_from IS NULL OR
1237: p_serial_number_from = FND_API.G_MISS_CHAR OR
1238: p_serial_number_to IS NULL OR

Line 1237: p_serial_number_from = FND_API.G_MISS_CHAR OR

1233: BEGIN
1234: x_return_status := FND_API.G_RET_STS_SUCCESS;
1235:
1236: IF ( p_serial_number_from IS NULL OR
1237: p_serial_number_from = FND_API.G_MISS_CHAR OR
1238: p_serial_number_to IS NULL OR
1239: p_serial_number_to = FND_API.G_MISS_CHAR ) THEN
1240: x_return_status := FND_API.G_RET_STS_ERROR;
1241: x_msg_data := 'AHL_COM_INVALID_PROCEDURE_CALL';

Line 1239: p_serial_number_to = FND_API.G_MISS_CHAR ) THEN

1235:
1236: IF ( p_serial_number_from IS NULL OR
1237: p_serial_number_from = FND_API.G_MISS_CHAR OR
1238: p_serial_number_to IS NULL OR
1239: p_serial_number_to = FND_API.G_MISS_CHAR ) THEN
1240: x_return_status := FND_API.G_RET_STS_ERROR;
1241: x_msg_data := 'AHL_COM_INVALID_PROCEDURE_CALL';
1242: RETURN;
1243: END IF;

Line 1240: x_return_status := FND_API.G_RET_STS_ERROR;

1236: IF ( p_serial_number_from IS NULL OR
1237: p_serial_number_from = FND_API.G_MISS_CHAR OR
1238: p_serial_number_to IS NULL OR
1239: p_serial_number_to = FND_API.G_MISS_CHAR ) THEN
1240: x_return_status := FND_API.G_RET_STS_ERROR;
1241: x_msg_data := 'AHL_COM_INVALID_PROCEDURE_CALL';
1242: RETURN;
1243: END IF;
1244:

Line 1253: x_return_status := FND_API.G_RET_STS_ERROR;

1249: FETCH compare_numbers INTO
1250: l_dummy;
1251:
1252: IF compare_numbers%NOTFOUND THEN
1253: x_return_status := FND_API.G_RET_STS_ERROR;
1254: x_msg_data := 'AHL_FMP_INVALID_SERIAL_RANGE';
1255: END IF;
1256:
1257: CLOSE compare_numbers;

Line 1272: x_return_status := FND_API.G_RET_STS_ERROR;

1268: FETCH compare_chars INTO
1269: l_dummy;
1270:
1271: IF compare_chars%NOTFOUND THEN
1272: x_return_status := FND_API.G_RET_STS_ERROR;
1273: x_msg_data := 'AHL_FMP_INVALID_SERIAL_RANGE';
1274: END IF;
1275:
1276: CLOSE compare_chars;

Line 1296: x_return_status := FND_API.G_RET_STS_SUCCESS;

1292: WHERE mr_header_id = c_mr_header_id;
1293:
1294: l_mr_status_code varchar2(30);
1295: BEGIN
1296: x_return_status := FND_API.G_RET_STS_SUCCESS;
1297: IF ( G_DEBUG = 'Y' ) THEN
1298: AHL_DEBUG_PUB.enable_debug;
1299: AHL_DEBUG_PUB.debug('Step A' );
1300: END IF;

Line 1303: p_mr_header_id = FND_API.G_MISS_NUM ) THEN

1299: AHL_DEBUG_PUB.debug('Step A' );
1300: END IF;
1301:
1302: IF ( p_mr_header_id IS NULL OR
1303: p_mr_header_id = FND_API.G_MISS_NUM ) THEN
1304: x_return_status := FND_API.G_RET_STS_ERROR;
1305: x_msg_data := 'AHL_FMP_MR_HEADER_ID_INVALID';
1306: RETURN;
1307: END IF;

Line 1304: x_return_status := FND_API.G_RET_STS_ERROR;

1300: END IF;
1301:
1302: IF ( p_mr_header_id IS NULL OR
1303: p_mr_header_id = FND_API.G_MISS_NUM ) THEN
1304: x_return_status := FND_API.G_RET_STS_ERROR;
1305: x_msg_data := 'AHL_FMP_MR_HEADER_ID_INVALID';
1306: RETURN;
1307: END IF;
1308: AHL_DEBUG_PUB.debug('Step A3' );

Line 1314: x_return_status := FND_API.G_RET_STS_ERROR;

1310:
1311: FETCH check_mr_status INTO l_mr_status_code;
1312:
1313: IF check_mr_status%NOTFOUND THEN
1314: x_return_status := FND_API.G_RET_STS_ERROR;
1315: x_msg_data := 'AHL_FMP_INVALID_MR';
1316: CLOSE check_mr_status;
1317: RETURN;
1318: END IF;

Line 1322: x_return_status := FND_API.G_RET_STS_ERROR;

1318: END IF;
1319: AHL_DEBUG_PUB.debug('Step A6' );
1320: IF ( l_mr_status_code <> 'DRAFT' AND
1321: l_mr_status_code <> 'APPROVAL_REJECTED' ) THEN
1322: x_return_status := FND_API.G_RET_STS_ERROR;
1323: AHL_DEBUG_PUB.debug('Step 1' );
1324: x_msg_data := 'AHL_FMP_INVALID_MR_STATUS';
1325: AHL_DEBUG_PUB.debug('Step 2' );
1326: CLOSE check_mr_status;

Line 1353: x_return_status := FND_API.G_RET_STS_SUCCESS;

1349: FROM AHL_MR_EFFECTIVITIES_APP_V
1350: WHERE mr_effectivity_id = c_mr_effectivity_id;
1351:
1352: BEGIN
1353: x_return_status := FND_API.G_RET_STS_SUCCESS;
1354:
1355: IF ( p_mr_effectivity_id IS NULL OR
1356: p_mr_effectivity_id = FND_API.G_MISS_NUM ) THEN
1357: x_return_status := FND_API.G_RET_STS_ERROR;

Line 1356: p_mr_effectivity_id = FND_API.G_MISS_NUM ) THEN

1352: BEGIN
1353: x_return_status := FND_API.G_RET_STS_SUCCESS;
1354:
1355: IF ( p_mr_effectivity_id IS NULL OR
1356: p_mr_effectivity_id = FND_API.G_MISS_NUM ) THEN
1357: x_return_status := FND_API.G_RET_STS_ERROR;
1358: x_msg_data := 'AHL_COM_INVALID_PROCEDURE_CALL';
1359: RETURN;
1360: END IF;

Line 1357: x_return_status := FND_API.G_RET_STS_ERROR;

1353: x_return_status := FND_API.G_RET_STS_SUCCESS;
1354:
1355: IF ( p_mr_effectivity_id IS NULL OR
1356: p_mr_effectivity_id = FND_API.G_MISS_NUM ) THEN
1357: x_return_status := FND_API.G_RET_STS_ERROR;
1358: x_msg_data := 'AHL_COM_INVALID_PROCEDURE_CALL';
1359: RETURN;
1360: END IF;
1361:

Line 1368: x_return_status := FND_API.G_RET_STS_ERROR;

1364: FETCH check_mr_effectivity INTO
1365: l_object_version_number;
1366:
1367: IF check_mr_effectivity%NOTFOUND THEN
1368: x_return_status := FND_API.G_RET_STS_ERROR;
1369: x_msg_data := 'AHL_FMP_INVALID_MR_EFFECTIVITY';
1370: CLOSE check_mr_effectivity;
1371: RETURN;
1372: END IF;

Line 1375: p_object_version_number <> FND_API.G_MISS_NUM ) THEN

1371: RETURN;
1372: END IF;
1373:
1374: IF ( p_object_version_number IS NOT NULL OR
1375: p_object_version_number <> FND_API.G_MISS_NUM ) THEN
1376: IF ( p_object_version_number <> l_object_version_number ) THEN
1377: x_return_status := FND_API.G_RET_STS_ERROR;
1378: x_msg_data := 'AHL_FMP_INVALID_MR_EFFECTIVITY';
1379: END IF;

Line 1377: x_return_status := FND_API.G_RET_STS_ERROR;

1373:
1374: IF ( p_object_version_number IS NOT NULL OR
1375: p_object_version_number <> FND_API.G_MISS_NUM ) THEN
1376: IF ( p_object_version_number <> l_object_version_number ) THEN
1377: x_return_status := FND_API.G_RET_STS_ERROR;
1378: x_msg_data := 'AHL_FMP_INVALID_MR_EFFECTIVITY';
1379: END IF;
1380: END IF;
1381:

Line 1429: x_return_status := FND_API.G_RET_STS_SUCCESS;

1425: AND A.mr_effectivity_id = B.mr_effectivity_id
1426: AND B.mr_header_id = c_mr_header_id;
1427:
1428: BEGIN
1429: x_return_status := FND_API.G_RET_STS_SUCCESS;
1430:
1431: IF ( ( p_mr_header_id IS NULL OR
1432: p_mr_header_id = FND_API.G_MISS_NUM ) AND
1433: ( p_repetitive_flag IS NULL OR

Line 1432: p_mr_header_id = FND_API.G_MISS_NUM ) AND

1428: BEGIN
1429: x_return_status := FND_API.G_RET_STS_SUCCESS;
1430:
1431: IF ( ( p_mr_header_id IS NULL OR
1432: p_mr_header_id = FND_API.G_MISS_NUM ) AND
1433: ( p_repetitive_flag IS NULL OR
1434: p_repetitive_flag = FND_API.G_MISS_CHAR ) ) THEN
1435: x_return_status := FND_API.G_RET_STS_ERROR;
1436: x_msg_data := 'AHL_COM_INVALID_PROCEDURE_CALL';

Line 1434: p_repetitive_flag = FND_API.G_MISS_CHAR ) ) THEN

1430:
1431: IF ( ( p_mr_header_id IS NULL OR
1432: p_mr_header_id = FND_API.G_MISS_NUM ) AND
1433: ( p_repetitive_flag IS NULL OR
1434: p_repetitive_flag = FND_API.G_MISS_CHAR ) ) THEN
1435: x_return_status := FND_API.G_RET_STS_ERROR;
1436: x_msg_data := 'AHL_COM_INVALID_PROCEDURE_CALL';
1437: RETURN;
1438: END IF;

Line 1435: x_return_status := FND_API.G_RET_STS_ERROR;

1431: IF ( ( p_mr_header_id IS NULL OR
1432: p_mr_header_id = FND_API.G_MISS_NUM ) AND
1433: ( p_repetitive_flag IS NULL OR
1434: p_repetitive_flag = FND_API.G_MISS_CHAR ) ) THEN
1435: x_return_status := FND_API.G_RET_STS_ERROR;
1436: x_msg_data := 'AHL_COM_INVALID_PROCEDURE_CALL';
1437: RETURN;
1438: END IF;
1439:

Line 1448: IF ( NVL( l_return_status, 'X' ) <> FND_API.G_RET_STS_SUCCESS ) THEN

1444: x_msg_data => l_msg_data,
1445: p_mr_header_id => p_mr_header_id
1446: );
1447:
1448: IF ( NVL( l_return_status, 'X' ) <> FND_API.G_RET_STS_SUCCESS ) THEN
1449: x_return_status := FND_API.G_RET_STS_ERROR;
1450: x_msg_data := l_msg_data;
1451: RETURN;
1452: END IF;

Line 1449: x_return_status := FND_API.G_RET_STS_ERROR;

1445: p_mr_header_id => p_mr_header_id
1446: );
1447:
1448: IF ( NVL( l_return_status, 'X' ) <> FND_API.G_RET_STS_SUCCESS ) THEN
1449: x_return_status := FND_API.G_RET_STS_ERROR;
1450: x_msg_data := l_msg_data;
1451: RETURN;
1452: END IF;
1453:

Line 1461: x_return_status := FND_API.G_RET_STS_ERROR;

1457: FETCH get_threshold INTO
1458: l_dummy;
1459:
1460: IF get_threshold%FOUND THEN
1461: x_return_status := FND_API.G_RET_STS_ERROR;
1462: x_msg_data := 'AHL_FMP_INVALID_MR_THRESHOLD';
1463: END IF;
1464:
1465: CLOSE get_threshold;

Line 1475: x_return_status := FND_API.G_RET_STS_ERROR;

1471: l_mr_effectivity_id,
1472: l_counter_id;
1473:
1474: IF get_intervals%FOUND THEN
1475: x_return_status := FND_API.G_RET_STS_ERROR;
1476: x_msg_data := 'AHL_FMP_INVALID_MR_INTERVALS';
1477: CLOSE get_intervals;
1478: RETURN;
1479: END IF;

Line 1489: x_return_status := FND_API.G_RET_STS_ERROR;

1485: FETCH get_interval_range INTO
1486: l_dummy;
1487:
1488: IF get_interval_range%FOUND THEN
1489: x_return_status := FND_API.G_RET_STS_ERROR;
1490: x_msg_data := 'AHL_FMP_INVALID_MR_INT_RANGE';
1491: CLOSE get_interval_range;
1492: RETURN;
1493: END IF;

Line 1539: p_init_msg_list => FND_API.G_FALSE,

1535:
1536: -- call api to fetch all applicable mrs for ASO installation.
1537: AHL_FMP_PVT.get_applicable_mrs(
1538: p_api_version => l_api_version,
1539: p_init_msg_list => FND_API.G_FALSE,
1540: p_commit => FND_API.G_FALSE,
1541: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1542: x_return_status => x_return_status,
1543: x_msg_count => x_msg_count,

Line 1540: p_commit => FND_API.G_FALSE,

1536: -- call api to fetch all applicable mrs for ASO installation.
1537: AHL_FMP_PVT.get_applicable_mrs(
1538: p_api_version => l_api_version,
1539: p_init_msg_list => FND_API.G_FALSE,
1540: p_commit => FND_API.G_FALSE,
1541: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1542: x_return_status => x_return_status,
1543: x_msg_count => x_msg_count,
1544: x_msg_data => x_msg_data,

Line 1541: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

1537: AHL_FMP_PVT.get_applicable_mrs(
1538: p_api_version => l_api_version,
1539: p_init_msg_list => FND_API.G_FALSE,
1540: p_commit => FND_API.G_FALSE,
1541: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1542: x_return_status => x_return_status,
1543: x_msg_count => x_msg_count,
1544: x_msg_data => x_msg_data,
1545: p_item_instance_id => p_csi_ii_id,

Line 1552: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

1548: x_applicable_mr_tbl => l_appl_mrs_tbl);
1549:
1550:
1551: -- Raise errors if exceptions occur
1552: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1553: RAISE FND_API.G_EXC_ERROR;
1554: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1555: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1556: END IF;

Line 1553: RAISE FND_API.G_EXC_ERROR;

1549:
1550:
1551: -- Raise errors if exceptions occur
1552: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1553: RAISE FND_API.G_EXC_ERROR;
1554: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1555: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1556: END IF;
1557:

Line 1554: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN

1550:
1551: -- Raise errors if exceptions occur
1552: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1553: RAISE FND_API.G_EXC_ERROR;
1554: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1555: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1556: END IF;
1557:
1558: -- Populate temporary table ahl_applicable_mrs.

Line 1555: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1551: -- Raise errors if exceptions occur
1552: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1553: RAISE FND_API.G_EXC_ERROR;
1554: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1555: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1556: END IF;
1557:
1558: -- Populate temporary table ahl_applicable_mrs.
1559: IF (l_appl_mrs_tbl.COUNT > 0) THEN

Line 1617: x_return_status:=FND_API.G_RET_STS_SUCCESS;

1613: l_api_version CONSTANT NUMBER := 1.0;
1614: l_header_id NUMBER;
1615:
1616: BEGIN
1617: x_return_status:=FND_API.G_RET_STS_SUCCESS;
1618: OPEN header_id_csr_type(p_mr_title, p_mr_version_number);
1619: FETCH header_id_csr_type INTO l_header_id;
1620: CLOSE header_id_csr_type;
1621: IF l_header_id IS NULL THEN

Line 1622: x_return_status:=FND_API.G_RET_STS_ERROR;

1618: OPEN header_id_csr_type(p_mr_title, p_mr_version_number);
1619: FETCH header_id_csr_type INTO l_header_id;
1620: CLOSE header_id_csr_type;
1621: IF l_header_id IS NULL THEN
1622: x_return_status:=FND_API.G_RET_STS_ERROR;
1623: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_NOT_EXISTS');
1624: FND_MESSAGE.SET_TOKEN('TITLE', p_mr_title);
1625: FND_MESSAGE.SET_TOKEN('VERSION', p_mr_version_number);
1626: FND_MSG_PUB.ADD;

Line 1677: x_return_status:=FND_API.G_RET_STS_SUCCESS;

1673: l_api_version CONSTANT NUMBER := 1.0;
1674: l_mr_effectivity_id NUMBER;
1675:
1676: BEGIN
1677: x_return_status:=FND_API.G_RET_STS_SUCCESS;
1678:
1679: OPEN effectivity_id_csr_type(p_mr_effectivity_name,p_mr_header_id);
1680: FETCH effectivity_id_csr_type INTO l_mr_effectivity_id;
1681: CLOSE effectivity_id_csr_type;

Line 1683: x_return_status:=FND_API.G_RET_STS_ERROR;

1679: OPEN effectivity_id_csr_type(p_mr_effectivity_name,p_mr_header_id);
1680: FETCH effectivity_id_csr_type INTO l_mr_effectivity_id;
1681: CLOSE effectivity_id_csr_type;
1682: IF l_mr_effectivity_id IS NULL THEN
1683: x_return_status:=FND_API.G_RET_STS_ERROR;
1684: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_EFFEC_NOT_EXISTS');
1685: FND_MESSAGE.SET_TOKEN('RECORD', p_mr_effectivity_name);
1686: FND_MSG_PUB.ADD;
1687: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level) THEN

Line 1770: x_return_status := FND_API.G_RET_STS_SUCCESS;

1766: FROM AHL_MR_HEADERS_B
1767: WHERE mr_header_id = c_mr_header_id;
1768:
1769: BEGIN
1770: x_return_status := FND_API.G_RET_STS_SUCCESS;
1771:
1772: IF ( p_mr_header_id IS NULL OR
1773: p_mr_header_id = FND_API.G_MISS_NUM ) THEN
1774: x_return_status := FND_API.G_RET_STS_ERROR;

Line 1773: p_mr_header_id = FND_API.G_MISS_NUM ) THEN

1769: BEGIN
1770: x_return_status := FND_API.G_RET_STS_SUCCESS;
1771:
1772: IF ( p_mr_header_id IS NULL OR
1773: p_mr_header_id = FND_API.G_MISS_NUM ) THEN
1774: x_return_status := FND_API.G_RET_STS_ERROR;
1775: x_msg_data := 'AHL_COM_INVALID_PROCEDURE_CALL';
1776: RETURN;
1777: END IF;

Line 1774: x_return_status := FND_API.G_RET_STS_ERROR;

1770: x_return_status := FND_API.G_RET_STS_SUCCESS;
1771:
1772: IF ( p_mr_header_id IS NULL OR
1773: p_mr_header_id = FND_API.G_MISS_NUM ) THEN
1774: x_return_status := FND_API.G_RET_STS_ERROR;
1775: x_msg_data := 'AHL_COM_INVALID_PROCEDURE_CALL';
1776: RETURN;
1777: END IF;
1778:

Line 1785: x_return_status := FND_API.G_RET_STS_ERROR;

1781: FETCH check_mr_status INTO
1782: l_mr_status_code;
1783:
1784: IF check_mr_status%NOTFOUND THEN
1785: x_return_status := FND_API.G_RET_STS_ERROR;
1786: x_msg_data := 'AHL_FMP_INVALID_MR';
1787: CLOSE check_mr_status;
1788: RETURN;
1789: END IF;

Line 1795: x_return_status := FND_API.G_RET_STS_ERROR;

1791: IF ( l_mr_status_code <> 'DRAFT' AND
1792: l_mr_status_code <> 'APPROVAL_REJECTED' AND
1793: l_mr_status_code <> 'COMPLETE'
1794: ) THEN
1795: x_return_status := FND_API.G_RET_STS_ERROR;
1796: x_msg_data := 'AHL_FMP_INVALID_MR_STATUS';
1797: CLOSE check_mr_status;
1798: RETURN;
1799: END IF;

Line 1837: x_return_status := FND_API.G_RET_STS_SUCCESS;

1833: and eff.mr_effectivity_id =c_effectivity_id
1834: and eff.object_version_number =c_eff_obj ) ;
1835:
1836: BEGIN
1837: x_return_status := FND_API.G_RET_STS_SUCCESS;
1838:
1839: IF ( p_mr_header_id IS NULL OR
1840: p_mr_header_id = FND_API.G_MISS_NUM ) THEN
1841: x_return_status := FND_API.G_RET_STS_ERROR;

Line 1840: p_mr_header_id = FND_API.G_MISS_NUM ) THEN

1836: BEGIN
1837: x_return_status := FND_API.G_RET_STS_SUCCESS;
1838:
1839: IF ( p_mr_header_id IS NULL OR
1840: p_mr_header_id = FND_API.G_MISS_NUM ) THEN
1841: x_return_status := FND_API.G_RET_STS_ERROR;
1842: x_msg_data := 'AHL_COM_INVALID_PROCEDURE_CALL';
1843: RETURN;
1844: END IF;

Line 1841: x_return_status := FND_API.G_RET_STS_ERROR;

1837: x_return_status := FND_API.G_RET_STS_SUCCESS;
1838:
1839: IF ( p_mr_header_id IS NULL OR
1840: p_mr_header_id = FND_API.G_MISS_NUM ) THEN
1841: x_return_status := FND_API.G_RET_STS_ERROR;
1842: x_msg_data := 'AHL_COM_INVALID_PROCEDURE_CALL';
1843: RETURN;
1844: END IF;
1845:

Line 1850: x_return_status := FND_API.G_RET_STS_ERROR;

1846: OPEN mr_type_program( p_effectivity_id, p_eff_obj_version, p_mr_header_id );
1847: FETCH mr_type_program INTO l_record_exists;
1848:
1849: IF mr_type_program%FOUND THEN
1850: x_return_status := FND_API.G_RET_STS_ERROR;
1851: x_msg_data := 'AHL_FMP_EFFECTIVITY_ITEM_PM';
1852: END IF;
1853:
1854: CLOSE mr_type_program;

Line 1887: x_return_status := FND_API.G_RET_STS_SUCCESS;

1883: and eff.mr_effectivity_id =c_effectivity_id
1884: and eff.object_version_number=c_eff_obj) ;
1885:
1886: BEGIN
1887: x_return_status := FND_API.G_RET_STS_SUCCESS;
1888:
1889:
1890: OPEN mr_type_activity( p_effectivity_id, p_eff_obj_version);
1891: FETCH mr_type_activity INTO l_record_exists;

Line 1894: x_return_status := FND_API.G_RET_STS_ERROR;

1890: OPEN mr_type_activity( p_effectivity_id, p_eff_obj_version);
1891: FETCH mr_type_activity INTO l_record_exists;
1892:
1893: IF mr_type_activity%FOUND THEN
1894: x_return_status := FND_API.G_RET_STS_ERROR;
1895: x_msg_data := 'AHL_FMP_EFFECTIVITY_ITEM_PM';
1896: END IF;
1897:
1898: CLOSE mr_type_activity;