DBA Data[Home] [Help]

APPS.CSI_T_VLDN_ROUTINES_PVT dependencies on FND_API

Line 17: IF (NVL(p_value,FND_API.g_miss_num) = FND_API.g_miss_num) THEN

13: p_api_name IN VARCHAR2)
14: IS
15: BEGIN
16:
17: IF (NVL(p_value,FND_API.g_miss_num) = FND_API.g_miss_num) THEN
18:
19: FND_MESSAGE.set_name('CSI','CSI_API_REQD_PARAM_MISSING');
20: FND_MESSAGE.set_token('API_NAME',p_api_name);
21: FND_MESSAGE.set_token('MISSING_PARAM',p_param_name);

Line 23: RAISE FND_API.g_exc_error;

19: FND_MESSAGE.set_name('CSI','CSI_API_REQD_PARAM_MISSING');
20: FND_MESSAGE.set_token('API_NAME',p_api_name);
21: FND_MESSAGE.set_token('MISSING_PARAM',p_param_name);
22: FND_MSG_PUB.add;
23: RAISE FND_API.g_exc_error;
24:
25: END IF;
26:
27: END Check_Reqd_Param;

Line 36: IF (NVL(p_value,FND_API.g_miss_char) = FND_API.g_miss_char) THEN

32: p_api_name IN VARCHAR2)
33: IS
34: BEGIN
35:
36: IF (NVL(p_value,FND_API.g_miss_char) = FND_API.g_miss_char) THEN
37:
38: FND_MESSAGE.set_name('CSI','CSI_API_REQD_PARAM_MISSING');
39: FND_MESSAGE.set_token('API_NAME',p_api_name);
40: FND_MESSAGE.set_token('MISSING_PARAM',p_param_name);

Line 42: RAISE FND_API.g_exc_error;

38: FND_MESSAGE.set_name('CSI','CSI_API_REQD_PARAM_MISSING');
39: FND_MESSAGE.set_token('API_NAME',p_api_name);
40: FND_MESSAGE.set_token('MISSING_PARAM',p_param_name);
41: FND_MSG_PUB.add;
42: RAISE FND_API.g_exc_error;
43:
44: END IF;
45:
46: END Check_Reqd_Param;

Line 55: IF (NVL(p_value,FND_API.g_miss_date) = FND_API.g_miss_date) THEN

51: p_api_name IN VARCHAR2)
52: IS
53: BEGIN
54:
55: IF (NVL(p_value,FND_API.g_miss_date) = FND_API.g_miss_date) THEN
56:
57: FND_MESSAGE.set_name('CSI','CSI_API_REQD_PARAM_MISSING');
58: FND_MESSAGE.set_token('API_NAME',p_api_name);
59: FND_MESSAGE.set_token('MISSING_PARAM',p_param_name);

Line 61: RAISE FND_API.g_exc_error;

57: FND_MESSAGE.set_name('CSI','CSI_API_REQD_PARAM_MISSING');
58: FND_MESSAGE.set_token('API_NAME',p_api_name);
59: FND_MESSAGE.set_token('MISSING_PARAM',p_param_name);
60: FND_MSG_PUB.add;
61: RAISE FND_API.g_exc_error;
62:
63: END IF;
64:
65: END Check_Reqd_Param;

Line 93: x_return_status := fnd_api.g_ret_sts_success;

89: where transaction_line_id = p_txn_line_id;
90:
91: l_txn_line_rec txn_line_cur%rowtype;
92: BEGIN
93: x_return_status := fnd_api.g_ret_sts_success;
94:
95: Open txn_line_cur(p_transaction_line_id) ;
96: Fetch txn_line_cur Into l_txn_line_rec;
97:

Line 99: x_return_status := fnd_api.g_ret_sts_error;

95: Open txn_line_cur(p_transaction_line_id) ;
96: Fetch txn_line_cur Into l_txn_line_rec;
97:
98: IF NOT txn_line_cur%FOUND THEN
99: x_return_status := fnd_api.g_ret_sts_error;
100: END IF;
101:
102: Close txn_line_cur;
103:

Line 119: x_return_status := fnd_api.g_ret_sts_error;

115: x_transaction_line_rec.config_valid_status := l_txn_line_rec.config_valid_status;
116:
117: EXCEPTION
118: WHEN others THEN
119: x_return_status := fnd_api.g_ret_sts_error;
120: END validate_transaction_line_id;
121:
122:
123: /* Validate txn_line_detail_id */

Line 136: x_return_status := fnd_api.g_ret_sts_success;

132: INTO l_found
133: FROM csi_t_txn_line_details
134: WHERE txn_line_detail_id = p_txn_line_detail_id;
135:
136: x_return_status := fnd_api.g_ret_sts_success;
137:
138: EXCEPTION
139: WHEN no_data_found THEN
140: x_return_status := fnd_api.g_ret_sts_error;

Line 140: x_return_status := fnd_api.g_ret_sts_error;

136: x_return_status := fnd_api.g_ret_sts_success;
137:
138: EXCEPTION
139: WHEN no_data_found THEN
140: x_return_status := fnd_api.g_ret_sts_error;
141: END validate_txn_line_detail_id;
142:
143: /* Validate txn_line_detail_id */ -- Added this overloaded routine for M-M
144: PROCEDURE validate_txn_line_detail_id(

Line 169: x_return_status := fnd_api.g_ret_sts_success;

165: WHERE txn_line_detail_id = p_txn_line_dtl_id;
166:
167: l_txn_line_detail_rec txn_line_dtl_cur%rowtype;
168: BEGIN
169: x_return_status := fnd_api.g_ret_sts_success;
170:
171: Open txn_line_dtl_cur (p_txn_line_detail_id);
172: Fetch txn_line_dtl_cur into l_txn_line_detail_rec;
173:

Line 175: x_return_status := fnd_api.g_ret_sts_error;

171: Open txn_line_dtl_cur (p_txn_line_detail_id);
172: Fetch txn_line_dtl_cur into l_txn_line_detail_rec;
173:
174: IF NOT txn_line_dtl_cur%FOUND THEN
175: x_return_status := fnd_api.g_ret_sts_error;
176: END IF;
177:
178: Close txn_line_dtl_cur;
179:

Line 197: x_return_status := fnd_api.g_ret_sts_error;

193: x_txn_line_detail_rec.config_inst_item_id := l_txn_line_detail_rec.config_inst_item_id;
194:
195: EXCEPTION
196: WHEN others THEN
197: x_return_status := fnd_api.g_ret_sts_error;
198: END validate_txn_line_detail_id;
199:
200: /* Validate txn_party_detail_id */
201: PROCEDURE validate_txn_party_detail_id(

Line 213: x_return_status := fnd_api.g_ret_sts_success;

209: INTO l_found
210: FROM csi_t_party_details
211: WHERE txn_party_detail_id = p_txn_party_detail_id;
212:
213: x_return_status := fnd_api.g_ret_sts_success;
214:
215: EXCEPTION
216: WHEN no_data_found THEN
217: x_return_status := fnd_api.g_ret_sts_error;

Line 217: x_return_status := fnd_api.g_ret_sts_error;

213: x_return_status := fnd_api.g_ret_sts_success;
214:
215: EXCEPTION
216: WHEN no_data_found THEN
217: x_return_status := fnd_api.g_ret_sts_error;
218: WHEN others then
219: x_return_status := fnd_api.g_ret_sts_error;
220: END validate_txn_party_detail_id;
221:

Line 219: x_return_status := fnd_api.g_ret_sts_error;

215: EXCEPTION
216: WHEN no_data_found THEN
217: x_return_status := fnd_api.g_ret_sts_error;
218: WHEN others then
219: x_return_status := fnd_api.g_ret_sts_error;
220: END validate_txn_party_detail_id;
221:
222:
223: /* validate transaction party account detail id */

Line 236: x_return_status := fnd_api.g_ret_sts_success;

232: INTO l_found
233: FROM csi_t_party_accounts
234: WHERE txn_account_detail_id = p_txn_acct_detail_id;
235:
236: x_return_status := fnd_api.g_ret_sts_success;
237:
238: EXCEPTION
239: WHEN no_data_found THEN
240: x_return_status := fnd_api.g_ret_sts_error;

Line 240: x_return_status := fnd_api.g_ret_sts_error;

236: x_return_status := fnd_api.g_ret_sts_success;
237:
238: EXCEPTION
239: WHEN no_data_found THEN
240: x_return_status := fnd_api.g_ret_sts_error;
241: WHEN others then
242: x_return_status := fnd_api.g_ret_sts_error;
243: END validate_txn_acct_detail_id;
244:

Line 242: x_return_status := fnd_api.g_ret_sts_error;

238: EXCEPTION
239: WHEN no_data_found THEN
240: x_return_status := fnd_api.g_ret_sts_error;
241: WHEN others then
242: x_return_status := fnd_api.g_ret_sts_error;
243: END validate_txn_acct_detail_id;
244:
245:
246: /* validate relationship id */

Line 259: x_return_status := fnd_api.g_ret_sts_success;

255: INTO l_found
256: FROM csi_t_ii_relationships
257: WHERE txn_relationship_id = p_txn_relationship_id;
258:
259: x_return_status := fnd_api.g_ret_sts_success;
260:
261: EXCEPTION
262: WHEN no_data_found THEN
263: x_return_status := fnd_api.g_ret_sts_error;

Line 263: x_return_status := fnd_api.g_ret_sts_error;

259: x_return_status := fnd_api.g_ret_sts_success;
260:
261: EXCEPTION
262: WHEN no_data_found THEN
263: x_return_status := fnd_api.g_ret_sts_error;
264:
265: END validate_txn_relationship_id;
266:
267: /* validate transaction operating unit_id */

Line 280: x_return_status := fnd_api.g_ret_sts_success;

276: INTO l_found
277: FROM csi_t_org_assignments
278: WHERE txn_operating_unit_id = p_txn_operating_unit_id;
279:
280: x_return_status := fnd_api.g_ret_sts_success;
281:
282: EXCEPTION
283: WHEN no_data_found THEN
284: x_return_status := fnd_api.g_ret_sts_error;

Line 284: x_return_status := fnd_api.g_ret_sts_error;

280: x_return_status := fnd_api.g_ret_sts_success;
281:
282: EXCEPTION
283: WHEN no_data_found THEN
284: x_return_status := fnd_api.g_ret_sts_error;
285:
286: END validate_txn_ou_id;
287:
288:

Line 302: x_return_status := fnd_api.g_ret_sts_success;

298: INTO l_found
299: FROM csi_t_extend_attribs
300: WHERE txn_attrib_detail_id = p_txn_attrib_detail_id;
301:
302: x_return_status := fnd_api.g_ret_sts_success;
303:
304: EXCEPTION
305: WHEN no_data_found THEN
306: x_return_status := fnd_api.g_ret_sts_error;

Line 306: x_return_status := fnd_api.g_ret_sts_error;

302: x_return_status := fnd_api.g_ret_sts_success;
303:
304: EXCEPTION
305: WHEN no_data_found THEN
306: x_return_status := fnd_api.g_ret_sts_error;
307:
308: END validate_txn_attrib_detail_id;
309:
310: /* Validate the txn_source_id */

Line 326: x_return_status := fnd_api.g_ret_sts_success;

322: INTO l_found
323: FROM oe_order_lines_all
324: WHERE line_id = p_txn_source_id;
325:
326: x_return_status := fnd_api.g_ret_sts_success;
327:
328: END IF;
329:
330: EXCEPTION

Line 332: x_return_status := fnd_api.g_ret_sts_error;

328: END IF;
329:
330: EXCEPTION
331: WHEN no_data_found THEN
332: x_return_status := fnd_api.g_ret_sts_error;
333: WHEN others THEN
334: x_return_status := fnd_api.g_ret_sts_error;
335:
336: END validate_txn_source_id;

Line 334: x_return_status := fnd_api.g_ret_sts_error;

330: EXCEPTION
331: WHEN no_data_found THEN
332: x_return_status := fnd_api.g_ret_sts_error;
333: WHEN others THEN
334: x_return_status := fnd_api.g_ret_sts_error;
335:
336: END validate_txn_source_id;
337:
338:

Line 369: x_return_status := fnd_api.g_true;

365: l_processed_found := TRUE;
366: END LOOP;
367:
368: IF (l_processing_status = 'PROCESSED') OR (l_processed_found = TRUE) THEN
369: x_return_status := fnd_api.g_true;
370: ELSE
371: x_return_status := fnd_api.g_false;
372: END IF;
373:

Line 371: x_return_status := fnd_api.g_false;

367:
368: IF (l_processing_status = 'PROCESSED') OR (l_processed_found = TRUE) THEN
369: x_return_status := fnd_api.g_true;
370: ELSE
371: x_return_status := fnd_api.g_false;
372: END IF;
373:
374: END check_ib_creation;
375:

Line 393: x_return_status := fnd_api.g_ret_sts_success;

389: l_subject_id NUMBER;
390:
391: BEGIN
392:
393: x_return_status := fnd_api.g_ret_sts_success;
394:
395: SELECT instance_exists_flag,
396: instance_id,
397: inventory_item_id,

Line 413: x_return_status := fnd_api.g_ret_sts_error;

409: l_subject_id := l_inventory_item_id;
410: END IF;
411:
412: IF p_subject_id <> l_subject_id THEN
413: x_return_status := fnd_api.g_ret_sts_error;
414: END IF;
415:
416: EXCEPTION
417: WHEN no_data_found THEN

Line 418: x_return_status := fnd_api.g_ret_sts_error;

414: END IF;
415:
416: EXCEPTION
417: WHEN no_data_found THEN
418: x_return_status := fnd_api.g_ret_sts_error;
419: END validate_subject_id;
420:
421:
422: PROCEDURE validate_object_id(

Line 434: x_return_status := fnd_api.g_ret_sts_success;

430: INTO l_found
431: FROM csi_item_instances
432: WHERE instance_id = p_object_id;
433:
434: x_return_status := fnd_api.g_ret_sts_success;
435:
436: EXCEPTION
437: WHEN no_data_found THEN
438: x_return_status := fnd_api.g_ret_sts_error;

Line 438: x_return_status := fnd_api.g_ret_sts_error;

434: x_return_status := fnd_api.g_ret_sts_success;
435:
436: EXCEPTION
437: WHEN no_data_found THEN
438: x_return_status := fnd_api.g_ret_sts_error;
439: END validate_object_id;
440:
441: /* validate relationship type code for item instances */
442: PROCEDURE validate_ii_rltns_type_code(

Line 454: x_return_status := fnd_api.g_ret_sts_success;

450: INTO v_found
451: FROM csi_ii_relation_types
452: WHERE relationship_type_code = p_rltns_type_code;
453:
454: x_return_status := fnd_api.g_ret_sts_success;
455:
456: EXCEPTION
457: WHEN no_data_found THEN
458: x_return_status := fnd_api.g_ret_sts_error;

Line 458: x_return_status := fnd_api.g_ret_sts_error;

454: x_return_status := fnd_api.g_ret_sts_success;
455:
456: EXCEPTION
457: WHEN no_data_found THEN
458: x_return_status := fnd_api.g_ret_sts_error;
459:
460: END validate_ii_rltns_type_code;
461:
462: /* validate instance party id from csi_i_parties */

Line 477: x_return_status := fnd_api.g_ret_sts_success;

473: FROM csi_i_parties
474: WHERE instance_id = p_instance_id
475: AND instance_party_id = p_instance_party_id;
476:
477: x_return_status := fnd_api.g_ret_sts_success;
478:
479: EXCEPTION
480: WHEN no_data_found THEN
481: x_return_status := fnd_api.g_ret_sts_error;

Line 481: x_return_status := fnd_api.g_ret_sts_error;

477: x_return_status := fnd_api.g_ret_sts_success;
478:
479: EXCEPTION
480: WHEN no_data_found THEN
481: x_return_status := fnd_api.g_ret_sts_error;
482:
483: END validate_instance_party_id;
484:
485: PROCEDURE validate_ip_account_id(

Line 497: x_return_status := fnd_api.g_ret_sts_success;

493: INTO l_found
494: FROM csi_ip_accounts
495: WHERE ip_account_id = p_ip_account_id;
496:
497: x_return_status := fnd_api.g_ret_sts_success;
498:
499: EXCEPTION
500: WHEN no_data_found THEN
501: x_return_status := fnd_api.g_ret_sts_error;

Line 501: x_return_status := fnd_api.g_ret_sts_error;

497: x_return_status := fnd_api.g_ret_sts_success;
498:
499: EXCEPTION
500: WHEN no_data_found THEN
501: x_return_status := fnd_api.g_ret_sts_error;
502: END validate_ip_account_id;
503:
504: PROCEDURE validate_instance_ou_id(
505: p_instance_id IN number,

Line 518: x_return_status := fnd_api.g_ret_sts_success;

514: FROM csi_i_org_assignments
515: WHERE instance_id = p_instance_id
516: AND instance_ou_id = p_instance_ou_id;
517:
518: x_return_status := fnd_api.g_ret_sts_success;
519:
520: EXCEPTION
521: WHEN no_data_found THEN
522: x_return_status := fnd_api.g_ret_sts_error;

Line 522: x_return_status := fnd_api.g_ret_sts_error;

518: x_return_status := fnd_api.g_ret_sts_success;
519:
520: EXCEPTION
521: WHEN no_data_found THEN
522: x_return_status := fnd_api.g_ret_sts_error;
523: END validate_instance_ou_id;
524:
525: PROCEDURE validate_instance_rltns_id(
526: p_csi_inst_rltns_id IN number,

Line 537: x_return_status := fnd_api.g_ret_sts_success;

533: INTO x_object_id
534: FROM csi_ii_relationships
535: WHERE relationship_id = p_csi_inst_rltns_id;
536:
537: x_return_status := fnd_api.g_ret_sts_success;
538:
539: EXCEPTION
540: WHEN no_data_found THEN
541: x_return_status := fnd_api.g_ret_sts_error;

Line 541: x_return_status := fnd_api.g_ret_sts_error;

537: x_return_status := fnd_api.g_ret_sts_success;
538:
539: EXCEPTION
540: WHEN no_data_found THEN
541: x_return_status := fnd_api.g_ret_sts_error;
542:
543: END validate_instance_rltns_id;
544:
545: /* integrity check for the source transaction */

Line 581: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;

577: l_line_dtl_tbl csi_t_datastructures_grp.txn_line_detail_tbl;
578: l_pty_dtl_tbl csi_t_datastructures_grp.txn_party_detail_tbl;
579: l_pty_acct_tbl csi_t_datastructures_grp.txn_pty_acct_detail_tbl;
580: l_org_assgn_tbl csi_t_datastructures_grp.txn_org_assgn_tbl;
581: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
582:
583: BEGIN
584:
585: l_total_quantity := 0;

Line 603: IF l_return_status <> fnd_api.g_ret_sts_success THEN

599: x_txn_pty_acct_detail_tbl => l_pty_acct_tbl,
600: x_txn_org_assgn_tbl => l_org_assgn_tbl,
601: x_return_status => l_return_status);
602:
603: IF l_return_status <> fnd_api.g_ret_sts_success THEN
604: RAISE fnd_api.g_exc_error;
605: END IF;
606:
607: l_src_organization_id := l_src_rec.organization_id;

Line 604: RAISE fnd_api.g_exc_error;

600: x_txn_org_assgn_tbl => l_org_assgn_tbl,
601: x_return_status => l_return_status);
602:
603: IF l_return_status <> fnd_api.g_ret_sts_success THEN
604: RAISE fnd_api.g_exc_error;
605: END IF;
606:
607: l_src_organization_id := l_src_rec.organization_id;
608: l_src_item_id := l_src_rec.inventory_item_id;

Line 669: RAISE fnd_api.g_exc_error;

665: fnd_message.set_name('CSI', 'CSI_API_INVALID_INSTANCE_ID');
666: fnd_message.set_token('INSTANCE_ID',
667: p_txn_line_dtl_tbl(l_index).instance_id);
668: fnd_msg_pub.add;
669: RAISE fnd_api.g_exc_error;
670: END;
671:
672: END IF;
673:

Line 687: RAISE fnd_api.g_exc_error;

683: FND_MESSAGE.set_token('DTL_ITEM_ID',l_dtl_item_id);
684: FND_MESSAGE.set_token('SRC_NAME',p_txn_line_rec.source_transaction_table);
685: FND_MESSAGE.set_token('SRC_LINE_ID',p_txn_line_rec.source_transaction_id);
686: FND_MSG_PUB.add;
687: RAISE fnd_api.g_exc_error;
688: END IF;
689: END IF ;
690: ---Added (End) for m-to-m enhancements
691:

Line 723: IF nvl(p_txn_line_dtl_tbl(l_index).location_id , fnd_api.g_miss_num) <>

719:
720: /* check the location_type_code for the source */
721: IF p_txn_line_rec.source_transaction_table = 'OE_ORDER_LINES_ALL' THEN
722:
723: IF nvl(p_txn_line_dtl_tbl(l_index).location_id , fnd_api.g_miss_num) <>
724: fnd_api.g_miss_num
725: THEN
726:
727: IF p_txn_line_dtl_tbl(l_index).location_type_code <> 'HZ_PARTY_SITES'

Line 724: fnd_api.g_miss_num

720: /* check the location_type_code for the source */
721: IF p_txn_line_rec.source_transaction_table = 'OE_ORDER_LINES_ALL' THEN
722:
723: IF nvl(p_txn_line_dtl_tbl(l_index).location_id , fnd_api.g_miss_num) <>
724: fnd_api.g_miss_num
725: THEN
726:
727: IF p_txn_line_dtl_tbl(l_index).location_type_code <> 'HZ_PARTY_SITES'
728: THEN

Line 736: RAISE fnd_api.g_exc_error;

732: FND_MESSAGE.set_token('LOC_code', p_txn_line_dtl_tbl(l_index).
733: location_type_code);
734:
735: FND_MSG_PUB.add;
736: RAISE fnd_api.g_exc_error;
737:
738: END IF;
739: END IF;
740: ELSE

Line 741: IF nvl(p_txn_line_dtl_tbl(l_index).location_id, fnd_api.g_miss_num)<>

737:
738: END IF;
739: END IF;
740: ELSE
741: IF nvl(p_txn_line_dtl_tbl(l_index).location_id, fnd_api.g_miss_num)<>
742: fnd_api.g_miss_num THEN
743: FND_MESSAGE.set_name('CSI','CSI_TXN_PARAM_IGNORED_WARN');
744: FND_MESSAGE.set_token('VALUE', p_txn_line_dtl_tbl(l_index).
745: location_id);

Line 742: fnd_api.g_miss_num THEN

738: END IF;
739: END IF;
740: ELSE
741: IF nvl(p_txn_line_dtl_tbl(l_index).location_id, fnd_api.g_miss_num)<>
742: fnd_api.g_miss_num THEN
743: FND_MESSAGE.set_name('CSI','CSI_TXN_PARAM_IGNORED_WARN');
744: FND_MESSAGE.set_token('VALUE', p_txn_line_dtl_tbl(l_index).
745: location_id);
746: FND_MESSAGE.set_token('PARAM','LOCATION_ID');

Line 763: IF p_validation_level = fnd_api.g_valid_level_full THEN

759: FND_MESSAGE.set_token('SRC_NAME',p_txn_line_rec.source_transaction_table);
760: FND_MESSAGE.set_token('SRC_QTY',l_src_quantity);
761: FND_MESSAGE.set_token('DTL_QTY',l_total_quantity);
762: FND_MSG_PUB.add;
763: IF p_validation_level = fnd_api.g_valid_level_full THEN
764: RAISE fnd_api.g_exc_error;
765: END IF;
766: END IF;
767:

Line 764: RAISE fnd_api.g_exc_error;

760: FND_MESSAGE.set_token('SRC_QTY',l_src_quantity);
761: FND_MESSAGE.set_token('DTL_QTY',l_total_quantity);
762: FND_MSG_PUB.add;
763: IF p_validation_level = fnd_api.g_valid_level_full THEN
764: RAISE fnd_api.g_exc_error;
765: END IF;
766: END IF;
767:
768: END IF;

Line 770: WHEN fnd_api.g_exc_error THEN

766: END IF;
767:
768: END IF;
769: EXCEPTION
770: WHEN fnd_api.g_exc_error THEN
771: x_return_status := fnd_api.g_ret_sts_error;
772: END check_source_integrity;
773:
774: /* This procedure checks for the validity of the party details supplied */

Line 771: x_return_status := fnd_api.g_ret_sts_error;

767:
768: END IF;
769: EXCEPTION
770: WHEN fnd_api.g_exc_error THEN
771: x_return_status := fnd_api.g_ret_sts_error;
772: END check_source_integrity;
773:
774: /* This procedure checks for the validity of the party details supplied */
775: /* Only one owner should be defined for a txn detail record (Instance) */

Line 784: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;

780: p_txn_line_dtl_tbl IN csi_t_datastructures_grp.txn_line_detail_tbl,
781: p_party_dtl_tbl IN csi_t_datastructures_grp.txn_party_detail_tbl,
782: x_return_status OUT NOCOPY VARCHAR2)
783: IS
784: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
785: l_owner_count number;
786: l_sub_type_rec csi_txn_sub_types%rowtype;
787: BEGIN
788:

Line 789: x_return_status := fnd_api.g_ret_sts_success;

785: l_owner_count number;
786: l_sub_type_rec csi_txn_sub_types%rowtype;
787: BEGIN
788:
789: x_return_status := fnd_api.g_ret_sts_success;
790:
791: --loop thru line detail table
792: IF p_txn_line_dtl_tbl.COUNT > 0 THEN
793: FOR l_td_ind IN p_txn_line_dtl_tbl.FIRST.. p_txn_line_dtl_tbl.LAST

Line 817: RAISE FND_API.g_exc_error;

813:
814: FND_MESSAGE.set_name('CSI','CSI_TXN_SUB_TYPE_ID_INVALID');
815: FND_MESSAGE.set_token('SUB_TYPE_ID',p_txn_line_dtl_tbl(l_td_ind).sub_type_id);
816: FND_MSG_PUB.add;
817: RAISE FND_API.g_exc_error;
818:
819: END;
820:
821: l_owner_count := 0;

Line 842: RAISE fnd_api.g_exc_error;

838: FND_MESSAGE.set_token('INDEX',l_td_ind);
839: FND_MESSAGE.set_token('ITEM_ID', p_txn_line_dtl_tbl(l_td_ind).
840: inventory_item_id);
841: FND_MSG_PUB.add;
842: RAISE fnd_api.g_exc_error;
843: END IF;
844:
845: IF p_txn_line_dtl_tbl(l_td_ind).source_transaction_flag = 'Y' THEN
846: IF l_sub_type_rec.src_change_owner = 'Y' THEN

Line 854: RAISE fnd_api.g_exc_error;

850: FND_MESSAGE.set_token('INDEX',l_td_ind);
851: FND_MESSAGE.set_token('ITEM_ID', p_txn_line_dtl_tbl(l_td_ind).
852: inventory_item_id);
853: FND_MSG_PUB.add;
854: RAISE fnd_api.g_exc_error;
855: END IF;
856:
857: END IF;
858: ELSE

Line 867: RAISE fnd_api.g_exc_error;

863: FND_MESSAGE.set_token('INDEX',l_td_ind);
864: FND_MESSAGE.set_token('ITEM_ID', p_txn_line_dtl_tbl(l_td_ind).
865: inventory_item_id);
866: FND_MSG_PUB.add;
867: RAISE fnd_api.g_exc_error;
868: END IF;
869:
870: END IF;
871: END IF;

Line 877: WHEN fnd_api.g_exc_error THEN

873: END LOOP;
874: END IF;
875:
876: EXCEPTION
877: WHEN fnd_api.g_exc_error THEN
878: x_return_status := fnd_api.g_ret_sts_error;
879:
880: END check_party_integrity;
881:

Line 878: x_return_status := fnd_api.g_ret_sts_error;

874: END IF;
875:
876: EXCEPTION
877: WHEN fnd_api.g_exc_error THEN
878: x_return_status := fnd_api.g_ret_sts_error;
879:
880: END check_party_integrity;
881:
882: /* private routine used within check_rltns_integrity */ -- Modified this routine to address M-M changes

Line 898: x_return_status := fnd_api.g_ret_sts_success;

894: BEGIN
895: l_loc_ind := 0;
896: l_comp_of_count := 0;
897: x_src_dtl_count := 0;
898: x_return_status := fnd_api.g_ret_sts_success;
899:
900: IF p_iir_tbl.COUNT > 0 THEN
901: FOR l_ind IN p_iir_tbl.FIRST .. p_iir_tbl.LAST
902: LOOP

Line 912: x_return_status := fnd_api.g_ret_sts_error;

908:
909: FND_MESSAGE.set_name('CSI','CSI_TXN_INVALID_SUB_OBJ_TYPES');
910: FND_MESSAGE.set_token('TXN_DTL_ID',p_sub_obj_id);
911: FND_MSG_PUB.add;
912: x_return_status := fnd_api.g_ret_sts_error;
913: exit;
914: END IF;
915:
916: IF p_iir_tbl(l_ind).relationship_type_code = 'COMPONENT-OF' THEN

Line 950: x_return_status := fnd_api.g_ret_sts_error;

946: ( p_iir_tbl(l_ind).object_type not in ('T','I') ) ) THEN
947: FND_MESSAGE.set_name('CSI','CSI_TXN_INVALID_SUB_OBJ_TYPES');
948: FND_MESSAGE.set_token('TXN_DTL_ID',p_sub_obj_id);
949: FND_MSG_PUB.add;
950: x_return_status := fnd_api.g_ret_sts_error;
951: exit;
952: ELSIF ( ( p_iir_tbl(l_ind).subject_type = p_iir_tbl(l_ind).object_type) AND
953: (p_iir_tbl(l_ind).object_type = 'I' ) ) THEN --atleast one of them should be 'T'
954:

Line 958: x_return_status := fnd_api.g_ret_sts_error;

954:
955: FND_MESSAGE.set_name('CSI','CSI_TXN_INVALID_SUB_OBJ_TYPES');
956: FND_MESSAGE.set_token('TXN_DTL_ID',p_sub_obj_id);
957: FND_MSG_PUB.add;
958: x_return_status := fnd_api.g_ret_sts_error;
959: exit;
960: END IF;
961:
962: IF p_iir_tbl(l_ind).relationship_type_code = 'COMPONENT-OF' THEN

Line 992: x_return_status := fnd_api.g_ret_sts_error; -- this status is then used to determine the multiple comp-of condition

988: END IF; --object_yn = 'N'
989: END LOOP;
990:
991: IF l_comp_of_count > 1 THEN
992: x_return_status := fnd_api.g_ret_sts_error; -- this status is then used to determine the multiple comp-of condition
993: END IF;
994:
995: END IF;
996: END get_iir_details;

Line 1019: l_sub_obj_id NUMBER := fnd_api.g_miss_num;

1015: l_subject_id NUMBER ;
1016: l_object_id NUMBER ;
1017: l_object_type VARCHAR2(30);
1018: l_subject_type VARCHAR2(30);
1019: l_sub_obj_id NUMBER := fnd_api.g_miss_num;
1020: l_object_yn VARCHAR2(1);
1021: l_line_id1 NUMBER;
1022: l_line_id2 NUMBER;
1023: l_src_flag1 VARCHAR2(1);

Line 1043: IF ( l_sub_obj_id = fnd_api.g_miss_num OR l_sub_obj_id = NULL ) THEN

1039: LOOP
1040: l_object_yn := 'N';
1041: l_sub_obj_id := l_line_dtl_tbl(l_td_ind).txn_line_detail_id;
1042:
1043: IF ( l_sub_obj_id = fnd_api.g_miss_num OR l_sub_obj_id = NULL ) THEN
1044: FND_MESSAGE.set_name('CSI','CSI_TXN_INVALID_TXN_DTL_REF');
1045: FND_MESSAGE.set_token('SUBJECT_ID',l_sub_obj_id);
1046: FND_MESSAGE.set_token('OBJECT_ID', NULL);
1047: FND_MSG_PUB.add;

Line 1048: RAISE FND_API.g_exc_error;

1044: FND_MESSAGE.set_name('CSI','CSI_TXN_INVALID_TXN_DTL_REF');
1045: FND_MESSAGE.set_token('SUBJECT_ID',l_sub_obj_id);
1046: FND_MESSAGE.set_token('OBJECT_ID', NULL);
1047: FND_MSG_PUB.add;
1048: RAISE FND_API.g_exc_error;
1049: END IF;
1050: -- get the corresponding ii_rltns (where subject_id = line detail index / id)
1051:
1052: get_iir_details(

Line 1080: RAISE FND_API.g_exc_error;

1076: FND_MESSAGE.set_token('INDEX',l_sub_obj_id);
1077: FND_MESSAGE.set_token('ITEM_ID',
1078: l_line_dtl_tbl(l_td_ind).inventory_item_id);
1079: FND_MSG_PUB.add;
1080: RAISE FND_API.g_exc_error;
1081: END IF;
1082: END IF; -- source flag chk = 'N'
1083:
1084: IF l_iir_tbl.COUNT > 1 THEN

Line 1085: IF l_return_status <> fnd_api.g_ret_sts_success THEN -- status set to error in the get iir routine when Multiple comp - of relationships are found for a given TLD

1081: END IF;
1082: END IF; -- source flag chk = 'N'
1083:
1084: IF l_iir_tbl.COUNT > 1 THEN
1085: IF l_return_status <> fnd_api.g_ret_sts_success THEN -- status set to error in the get iir routine when Multiple comp - of relationships are found for a given TLD
1086: FND_MESSAGE.set_name('CSI','CSI_TXN_MULTIPLE_PARENT');
1087: FND_MESSAGE.set_token('INDEX',l_td_ind);
1088: FND_MESSAGE.set_token('ITEM_ID',
1089: l_line_dtl_tbl(l_td_ind).inventory_item_id);

Line 1091: RAISE FND_API.g_exc_error;

1087: FND_MESSAGE.set_token('INDEX',l_td_ind);
1088: FND_MESSAGE.set_token('ITEM_ID',
1089: l_line_dtl_tbl(l_td_ind).inventory_item_id);
1090: FND_MSG_PUB.add;
1091: RAISE FND_API.g_exc_error;
1092: END IF;
1093: ELSIF l_return_status <> fnd_api.g_ret_sts_success THEN
1094: RAISE FND_API.g_exc_error;
1095: END IF;

Line 1093: ELSIF l_return_status <> fnd_api.g_ret_sts_success THEN

1089: l_line_dtl_tbl(l_td_ind).inventory_item_id);
1090: FND_MSG_PUB.add;
1091: RAISE FND_API.g_exc_error;
1092: END IF;
1093: ELSIF l_return_status <> fnd_api.g_ret_sts_success THEN
1094: RAISE FND_API.g_exc_error;
1095: END IF;
1096:
1097: END LOOP;

Line 1094: RAISE FND_API.g_exc_error;

1090: FND_MSG_PUB.add;
1091: RAISE FND_API.g_exc_error;
1092: END IF;
1093: ELSIF l_return_status <> fnd_api.g_ret_sts_success THEN
1094: RAISE FND_API.g_exc_error;
1095: END IF;
1096:
1097: END LOOP;
1098: END IF ; --- p_txn_ii_rltns_tbl.count > 0

Line 1102: WHEN fnd_api.g_exc_error THEN

1098: END IF ; --- p_txn_ii_rltns_tbl.count > 0
1099: END IF;
1100:
1101: EXCEPTION
1102: WHEN fnd_api.g_exc_error THEN
1103:
1104: x_return_status := fnd_api.g_ret_sts_error;
1105:
1106: END check_rltns_integrity;

Line 1104: x_return_status := fnd_api.g_ret_sts_error;

1100:
1101: EXCEPTION
1102: WHEN fnd_api.g_exc_error THEN
1103:
1104: x_return_status := fnd_api.g_ret_sts_error;
1105:
1106: END check_rltns_integrity;
1107:
1108:

Line 1116: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;

1112: x_return_status OUT NOCOPY varchar2)
1113: IS
1114: l_line_dtl_rec csi_t_datastructures_grp.txn_line_detail_rec;
1115: l_ii_rltns_tbl csi_t_datastructures_grp.txn_ii_rltns_tbl;
1116: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
1117:
1118: BEGIN
1119: IF p_line_dtl_tbl.COUNT > 0 THEN
1120: FOR l_td_ind IN p_line_dtl_tbl.FIRST..p_line_dtl_tbl.LAST

Line 1127: IF nvl(px_ii_rltns_tbl(l_ii_ind).subject_index_flag,fnd_api.g_miss_char) = fnd_api.g_miss_char THEN

1123: FOR l_ii_ind IN px_ii_rltns_tbl.FIRST..px_ii_rltns_tbl.LAST
1124: LOOP
1125: /* Added the defaulting of values to the index flags for M-M */
1126:
1127: IF nvl(px_ii_rltns_tbl(l_ii_ind).subject_index_flag,fnd_api.g_miss_char) = fnd_api.g_miss_char THEN
1128: px_ii_rltns_tbl(l_ii_ind).subject_index_flag := 'Y';
1129: END IF;
1130:
1131: IF nvl(px_ii_rltns_tbl(l_ii_ind).object_index_flag,fnd_api.g_miss_char) = fnd_api.g_miss_char THEN

Line 1131: IF nvl(px_ii_rltns_tbl(l_ii_ind).object_index_flag,fnd_api.g_miss_char) = fnd_api.g_miss_char THEN

1127: IF nvl(px_ii_rltns_tbl(l_ii_ind).subject_index_flag,fnd_api.g_miss_char) = fnd_api.g_miss_char THEN
1128: px_ii_rltns_tbl(l_ii_ind).subject_index_flag := 'Y';
1129: END IF;
1130:
1131: IF nvl(px_ii_rltns_tbl(l_ii_ind).object_index_flag,fnd_api.g_miss_char) = fnd_api.g_miss_char THEN
1132: px_ii_rltns_tbl(l_ii_ind).object_index_flag := 'Y';
1133: END IF;
1134:
1135: IF px_ii_rltns_tbl(l_ii_ind).subject_type = 'T'

Line 1145: IF l_return_status <> fnd_api.g_ret_sts_success THEN

1141: p_txn_line_detail_tbl => p_line_dtl_tbl,
1142: x_txn_line_detail_rec => l_line_dtl_rec,
1143: x_return_status => l_return_status);
1144:
1145: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1146: FND_MESSAGE.set_name('CSI','CSI_TXN_SUBJECT_INDEX_INVALID');
1147: FND_MESSAGE.set_token('INDEX_ID',px_ii_rltns_tbl(l_ii_ind).
1148: subject_id);
1149: FND_MSG_PUB.add;

Line 1150: RAISE FND_API.g_exc_error;

1146: FND_MESSAGE.set_name('CSI','CSI_TXN_SUBJECT_INDEX_INVALID');
1147: FND_MESSAGE.set_token('INDEX_ID',px_ii_rltns_tbl(l_ii_ind).
1148: subject_id);
1149: FND_MSG_PUB.add;
1150: RAISE FND_API.g_exc_error;
1151: END IF;
1152:
1153: l_ii_rltns_tbl(l_ii_ind).subject_id :=
1154: l_line_dtl_rec.txn_line_detail_id;

Line 1169: IF l_return_status <> fnd_api.g_ret_sts_success THEN

1165: x_txn_line_detail_rec => l_line_dtl_rec,
1166: x_return_status => l_return_status);
1167:
1168:
1169: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1170: FND_MESSAGE.set_name('CSI','CSI_TXN_OBJECT_INDEX_INVALID');
1171: FND_MESSAGE.set_token('INDEX_ID',px_ii_rltns_tbl(l_ii_ind).
1172: object_id);
1173: FND_MSG_PUB.add;

Line 1174: RAISE FND_API.g_exc_error;

1170: FND_MESSAGE.set_name('CSI','CSI_TXN_OBJECT_INDEX_INVALID');
1171: FND_MESSAGE.set_token('INDEX_ID',px_ii_rltns_tbl(l_ii_ind).
1172: object_id);
1173: FND_MSG_PUB.add;
1174: RAISE FND_API.g_exc_error;
1175: END IF;
1176:
1177: l_ii_rltns_tbl(l_ii_ind).object_id :=
1178: l_line_dtl_rec.txn_line_detail_id;

Line 1216: WHEN fnd_api.g_exc_error THEN

1212: END IF;
1213:
1214: END IF;
1215: EXCEPTION
1216: WHEN fnd_api.g_exc_error THEN
1217: x_return_status := fnd_api.g_ret_sts_error;
1218: END convert_rltns_index_to_ids;
1219:
1220:

Line 1217: x_return_status := fnd_api.g_ret_sts_error;

1213:
1214: END IF;
1215: EXCEPTION
1216: WHEN fnd_api.g_exc_error THEN
1217: x_return_status := fnd_api.g_ret_sts_error;
1218: END convert_rltns_index_to_ids;
1219:
1220:
1221: PROCEDURE is_valid_owner_for_create(

Line 1239: x_return_status := fnd_api.g_ret_sts_success;

1235: AND relationship_type_code = 'OWNER';
1236:
1237: BEGIN
1238:
1239: x_return_status := fnd_api.g_ret_sts_success;
1240:
1241: SELECT instance_exists_flag,
1242: instance_id
1243: INTO l_instance_exists_flag,

Line 1253: IF nvl(p_instance_party_id ,fnd_api.g_miss_num) = fnd_api.g_miss_num

1249: if the instance party is referred then skip the chk.
1250: */
1251: IF NVL(l_instance_exists_flag,'N') = 'Y' THEN
1252:
1253: IF nvl(p_instance_party_id ,fnd_api.g_miss_num) = fnd_api.g_miss_num
1254: THEN
1255:
1256: FOR csi_pty_rec in csi_pty_cur(l_csi_instance_id)
1257: LOOP

Line 1258: x_return_status := fnd_api.g_ret_sts_error;

1254: THEN
1255:
1256: FOR csi_pty_rec in csi_pty_cur(l_csi_instance_id)
1257: LOOP
1258: x_return_status := fnd_api.g_ret_sts_error;
1259: exit;
1260: END LOOP;
1261:
1262: /* we might have to put the logic if the caller is trying to change the

Line 1277: x_return_status := fnd_api.g_ret_sts_error;

1273: FROM csi_t_party_details
1274: WHERE txn_line_detail_id = p_txn_line_detail_id
1275: AND relationship_type_code = 'OWNER';
1276:
1277: x_return_status := fnd_api.g_ret_sts_error;
1278:
1279: EXCEPTION
1280: WHEN no_data_found THEN
1281: x_return_status := fnd_api.g_ret_sts_success;

Line 1281: x_return_status := fnd_api.g_ret_sts_success;

1277: x_return_status := fnd_api.g_ret_sts_error;
1278:
1279: EXCEPTION
1280: WHEN no_data_found THEN
1281: x_return_status := fnd_api.g_ret_sts_success;
1282:
1283: END;
1284:
1285: END IF;

Line 1314: x_return_status := fnd_api.g_ret_sts_success;

1310:
1311: END IF;
1312:
1313: IF l_found THEN
1314: x_return_status := fnd_api.g_ret_sts_success;
1315: ELSE
1316: x_return_status := fnd_api.g_ret_sts_error;
1317: END IF;
1318:

Line 1316: x_return_status := fnd_api.g_ret_sts_error;

1312:
1313: IF l_found THEN
1314: x_return_status := fnd_api.g_ret_sts_success;
1315: ELSE
1316: x_return_status := fnd_api.g_ret_sts_error;
1317: END IF;
1318:
1319: END get_txn_line_dtl_rec;
1320:

Line 1359: x_return_status := fnd_api.g_ret_sts_success;

1355: FROM csi_t_transaction_lines
1356: WHERE transaction_line_id = l_transaction_line_id;
1357:
1358: x_processing_status := l_processing_status;
1359: x_return_status := fnd_api.g_ret_sts_success;
1360:
1361: EXCEPTION
1362: WHEN no_data_found THEN
1363: x_return_status := fnd_api.g_ret_sts_error;

Line 1363: x_return_status := fnd_api.g_ret_sts_error;

1359: x_return_status := fnd_api.g_ret_sts_success;
1360:
1361: EXCEPTION
1362: WHEN no_data_found THEN
1363: x_return_status := fnd_api.g_ret_sts_error;
1364:
1365: END get_processing_status ;
1366:
1367: PROCEDURE validate_attrib_source_id(

Line 1395: RAISE FND_API.g_exc_error;

1391:
1392: FND_MESSAGE.set_name('CSI','CSI_TXN_ATT_SRC_TBL_INVALID');
1393: FND_MESSAGE.set_token('ATT_SRC_TBL',p_attrib_source_table);
1394: FND_MSG_PUB.add;
1395: RAISE FND_API.g_exc_error;
1396:
1397: END IF;
1398:
1399: x_return_status := fnd_api.g_ret_sts_success;

Line 1399: x_return_status := fnd_api.g_ret_sts_success;

1395: RAISE FND_API.g_exc_error;
1396:
1397: END IF;
1398:
1399: x_return_status := fnd_api.g_ret_sts_success;
1400:
1401: EXCEPTION
1402: WHEN no_data_found THEN
1403:

Line 1408: x_return_status := fnd_api.g_ret_sts_error;

1404: FND_MESSAGE.set_name('CSI','CSI_TXN_ATT_SRC_ID_INVALID');
1405: FND_MESSAGE.set_token('ATT_SRC_TBL',p_attrib_source_table);
1406: FND_MESSAGE.set_token('ATT_SRC_ID',p_attrib_source_id);
1407: FND_MSG_PUB.add;
1408: x_return_status := fnd_api.g_ret_sts_error;
1409:
1410: WHEN fnd_api.g_exc_error THEN
1411:
1412: x_return_status := fnd_api.g_ret_sts_error;

Line 1410: WHEN fnd_api.g_exc_error THEN

1406: FND_MESSAGE.set_token('ATT_SRC_ID',p_attrib_source_id);
1407: FND_MSG_PUB.add;
1408: x_return_status := fnd_api.g_ret_sts_error;
1409:
1410: WHEN fnd_api.g_exc_error THEN
1411:
1412: x_return_status := fnd_api.g_ret_sts_error;
1413:
1414: END validate_attrib_source_id;

Line 1412: x_return_status := fnd_api.g_ret_sts_error;

1408: x_return_status := fnd_api.g_ret_sts_error;
1409:
1410: WHEN fnd_api.g_exc_error THEN
1411:
1412: x_return_status := fnd_api.g_ret_sts_error;
1413:
1414: END validate_attrib_source_id;
1415:
1416: PROCEDURE validate_party_account_id(

Line 1424: x_return_status := fnd_api.g_ret_sts_success;

1420: IS
1421: l_found varchar2(1);
1422: BEGIN
1423:
1424: x_return_status := fnd_api.g_ret_sts_success;
1425:
1426: SELECT 'X'
1427: INTO l_found
1428: FROM hz_cust_accounts

Line 1435: x_return_status := fnd_api.g_ret_sts_error;

1431:
1432: EXCEPTION
1433: WHEN no_data_found THEN
1434:
1435: x_return_status := fnd_api.g_ret_sts_error;
1436:
1437: END validate_party_account_id;
1438:
1439: PROCEDURE get_instance_ref_info(

Line 1471: x_return_status := fnd_api.g_ret_sts_success;

1467: x_instance_exists_flag
1468: FROM csi_t_txn_line_details
1469: WHERE txn_line_detail_id = l_txn_line_dtl_id;
1470:
1471: x_return_status := fnd_api.g_ret_sts_success;
1472:
1473: EXCEPTION
1474: WHEN no_data_found THEN
1475: x_return_status := fnd_api.g_ret_sts_error;

Line 1475: x_return_status := fnd_api.g_ret_sts_error;

1471: x_return_status := fnd_api.g_ret_sts_success;
1472:
1473: EXCEPTION
1474: WHEN no_data_found THEN
1475: x_return_status := fnd_api.g_ret_sts_error;
1476:
1477: END get_instance_ref_info;
1478:
1479: PROCEDURE get_party_detail_rec(

Line 1491: x_return_status := fnd_api.g_ret_sts_success;

1487: INTO x_party_detail_rec
1488: FROM csi_t_party_details
1489: WHERE txn_party_detail_id = p_party_detail_id;
1490:
1491: x_return_status := fnd_api.g_ret_sts_success;
1492:
1493: EXCEPTION
1494: WHEN no_data_found THEN
1495: x_return_status := fnd_api.g_ret_sts_error;

Line 1495: x_return_status := fnd_api.g_ret_sts_error;

1491: x_return_status := fnd_api.g_ret_sts_success;
1492:
1493: EXCEPTION
1494: WHEN no_data_found THEN
1495: x_return_status := fnd_api.g_ret_sts_error;
1496: END get_party_detail_rec;
1497:
1498:
1499: PROCEDURE validate_instance_id(

Line 1512: x_return_status := fnd_api.g_ret_sts_success;

1508: FROM csi_item_instances
1509: WHERE instance_id = p_instance_id;
1510: -- AND unexpired condition
1511:
1512: x_return_status := fnd_api.g_ret_sts_success;
1513:
1514: EXCEPTION
1515: WHEN no_data_found THEN
1516: x_return_status := fnd_api.g_ret_sts_error;

Line 1516: x_return_status := fnd_api.g_ret_sts_error;

1512: x_return_status := fnd_api.g_ret_sts_success;
1513:
1514: EXCEPTION
1515: WHEN no_data_found THEN
1516: x_return_status := fnd_api.g_ret_sts_error;
1517:
1518: END validate_instance_id;
1519:
1520: procedure validate_instance_reference(

Line 1528: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;

1524: x_return_status OUT NOCOPY varchar2)
1525: IS
1526: l_instance_id csi_t_txn_line_details.instance_id%TYPE;
1527: l_instance_exists_flag csi_t_txn_line_details.instance_exists_flag%TYPE;
1528: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
1529:
1530: l_td_object_id number;
1531: l_inst_object_id number;
1532: BEGIN

Line 1541: IF l_return_status = fnd_api.g_ret_sts_success THEN

1537: x_instance_id => l_instance_id,
1538: x_instance_exists_flag => l_instance_exists_flag,
1539: x_return_status => l_return_status);
1540:
1541: IF l_return_status = fnd_api.g_ret_sts_success THEN
1542:
1543: --IF nvl(l_instance_exists_flag,'N') <> 'Y' THEN
1544: IF l_instance_id is null THEN -- instance is not refernced
1545:

Line 1553: raise fnd_api.g_exc_error;

1549: fnd_message.set_token('LVL',p_level);
1550: fnd_message.set_token('LVL_DTL_ID',p_level_inst_ref_id);
1551: fnd_msg_pub.add;
1552:
1553: raise fnd_api.g_exc_error;
1554: END IF;
1555:
1556: END IF;
1557:

Line 1565: IF l_return_status <> fnd_api.g_ret_sts_success THEN

1561: p_instance_id => l_instance_id,
1562: p_instance_party_id => p_level_inst_ref_id,
1563: x_return_status => l_return_status);
1564:
1565: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1566:
1567: fnd_message.set_name('CSI','CSI_TXN_INST_PARTY_REF_INVALID');
1568: fnd_message.set_token('INST_ID',l_instance_id);
1569: fnd_message.set_token('INST_PTY_ID',p_level_inst_ref_id);

Line 1572: RAISE fnd_api.g_exc_error;

1568: fnd_message.set_token('INST_ID',l_instance_id);
1569: fnd_message.set_token('INST_PTY_ID',p_level_inst_ref_id);
1570: fnd_msg_pub.add;
1571:
1572: RAISE fnd_api.g_exc_error;
1573: END IF;
1574:
1575: ELSIF p_level = 'ORG_ASSGN' THEN
1576:

Line 1582: IF l_return_status <> fnd_api.g_ret_sts_success THEN

1578: p_instance_id => l_instance_id,
1579: p_instance_ou_id => p_level_inst_ref_id,
1580: x_return_status => l_return_status);
1581:
1582: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1583: fnd_message.set_name('CSI','CSI_TXN_INST_OU_REF_INVALID');
1584: fnd_message.set_token('INST_ID',l_instance_id);
1585: fnd_message.set_token('INST_OU_ID',p_level_inst_ref_id);
1586: fnd_msg_pub.add;

Line 1587: raise fnd_api.g_exc_error;

1583: fnd_message.set_name('CSI','CSI_TXN_INST_OU_REF_INVALID');
1584: fnd_message.set_token('INST_ID',l_instance_id);
1585: fnd_message.set_token('INST_OU_ID',p_level_inst_ref_id);
1586: fnd_msg_pub.add;
1587: raise fnd_api.g_exc_error;
1588: END IF;
1589:
1590: ELSIF p_level = 'ORG_ATTRIB' THEN
1591: null;

Line 1603: IF nvl(l_instance_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN

1599: -- compare both the instances
1600:
1601: -- if both are not same then raise exception
1602:
1603: IF nvl(l_instance_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
1604:
1605: l_td_object_id := l_instance_id;
1606:
1607: validate_instance_rltns_id(

Line 1612: IF l_return_status <> fnd_api.g_ret_sts_success THEN

1608: p_csi_inst_rltns_id => p_level_inst_ref_id,
1609: x_object_id => l_inst_object_id,
1610: x_return_status => l_return_status);
1611:
1612: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1613: null;
1614: -- invalid csi_inst_relation_id
1615: RAISE fnd_api.g_exc_error;
1616: END IF;

Line 1615: RAISE fnd_api.g_exc_error;

1611:
1612: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1613: null;
1614: -- invalid csi_inst_relation_id
1615: RAISE fnd_api.g_exc_error;
1616: END IF;
1617:
1618: IF l_td_object_id <> l_inst_object_id THEN
1619: null;

Line 1621: RAISE fnd_api.g_exc_error;

1617:
1618: IF l_td_object_id <> l_inst_object_id THEN
1619: null;
1620: -- cannot change the parent (object id) in IB
1621: RAISE fnd_api.g_exc_error;
1622:
1623: END IF;
1624:
1625: END IF;

Line 1632: WHEN fnd_api.g_exc_error THEN

1628:
1629: END IF;
1630:
1631: EXCEPTION
1632: WHEN fnd_api.g_exc_error THEN
1633: x_return_status := fnd_api.g_ret_sts_error;
1634: END validate_instance_reference;
1635:
1636: PROCEDURE validate_account_id(

Line 1633: x_return_status := fnd_api.g_ret_sts_error;

1629: END IF;
1630:
1631: EXCEPTION
1632: WHEN fnd_api.g_exc_error THEN
1633: x_return_status := fnd_api.g_ret_sts_error;
1634: END validate_instance_reference;
1635:
1636: PROCEDURE validate_account_id(
1637: p_account_id in number,

Line 1647: x_return_status := fnd_api.g_ret_sts_success;

1643: SELECT 'X' INTO l_found
1644: FROM hz_cust_accounts
1645: WHERE cust_account_id = p_account_id;
1646:
1647: x_return_status := fnd_api.g_ret_sts_success;
1648:
1649: EXCEPTION
1650: when no_data_found then
1651: x_return_status := fnd_api.g_ret_sts_error;

Line 1651: x_return_status := fnd_api.g_ret_sts_error;

1647: x_return_status := fnd_api.g_ret_sts_success;
1648:
1649: EXCEPTION
1650: when no_data_found then
1651: x_return_status := fnd_api.g_ret_sts_error;
1652:
1653: END validate_account_id;
1654:
1655: PROCEDURE validate_site_use_id(

Line 1691: x_return_status := fnd_api.g_ret_sts_success;

1687: exit;
1688: END LOOP;
1689:
1690: IF l_found THEN
1691: x_return_status := fnd_api.g_ret_sts_success;
1692: ELSE
1693: x_return_status := fnd_api.g_ret_sts_error;
1694: END IF;
1695:

Line 1693: x_return_status := fnd_api.g_ret_sts_error;

1689:
1690: IF l_found THEN
1691: x_return_status := fnd_api.g_ret_sts_success;
1692: ELSE
1693: x_return_status := fnd_api.g_ret_sts_error;
1694: END IF;
1695:
1696: END validate_site_use_id;
1697:

Line 1706: x_txn_system_id := fnd_api.g_miss_num;

1702: x_return_status OUT NOCOPY varchar2)
1703: IS
1704: BEGIN
1705:
1706: x_txn_system_id := fnd_api.g_miss_num;
1707:
1708: IF nvl(p_txn_systems_index,fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
1709: IF p_txn_systems_tbl.COUNT > 0 THEN
1710: FOR l_ind in p_txn_systems_tbl.FIRST .. p_txn_systems_tbl.LAST

Line 1708: IF nvl(p_txn_systems_index,fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN

1704: BEGIN
1705:
1706: x_txn_system_id := fnd_api.g_miss_num;
1707:
1708: IF nvl(p_txn_systems_index,fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
1709: IF p_txn_systems_tbl.COUNT > 0 THEN
1710: FOR l_ind in p_txn_systems_tbl.FIRST .. p_txn_systems_tbl.LAST
1711: LOOP
1712:

Line 1731: x_txn_systems_index := fnd_api.g_miss_num;

1727: x_return_status OUT NOCOPY varchar2)
1728: IS
1729: BEGIN
1730:
1731: x_txn_systems_index := fnd_api.g_miss_num;
1732:
1733: IF nvl(p_txn_system_id,fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
1734: IF p_txn_systems_tbl.COUNT > 0 THEN
1735: FOR l_ind in p_txn_systems_tbl.FIRST .. p_txn_systems_tbl.LAST

Line 1733: IF nvl(p_txn_system_id,fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN

1729: BEGIN
1730:
1731: x_txn_systems_index := fnd_api.g_miss_num;
1732:
1733: IF nvl(p_txn_system_id,fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
1734: IF p_txn_systems_tbl.COUNT > 0 THEN
1735: FOR l_ind in p_txn_systems_tbl.FIRST .. p_txn_systems_tbl.LAST
1736: LOOP
1737:

Line 1754: x_return_status := fnd_api.g_ret_sts_success;

1750: p_contact_flag in varchar2,
1751: x_return_status OUT NOCOPY varchar2)
1752: IS
1753: BEGIN
1754: x_return_status := fnd_api.g_ret_sts_success;
1755: IF p_contact_flag not in ('Y','N') THEN
1756: x_return_status := fnd_api.g_ret_sts_error;
1757: END IF;
1758: END validate_contact_flag;

Line 1756: x_return_status := fnd_api.g_ret_sts_error;

1752: IS
1753: BEGIN
1754: x_return_status := fnd_api.g_ret_sts_success;
1755: IF p_contact_flag not in ('Y','N') THEN
1756: x_return_status := fnd_api.g_ret_sts_error;
1757: END IF;
1758: END validate_contact_flag;
1759:
1760: /* validtion routine for sub_type_id */

Line 1777: x_return_status := fnd_api.g_ret_sts_error;

1773: AND transaction_type_id = nvl(p_txn_type_id, transaction_type_id);
1774:
1775: BEGIN
1776:
1777: x_return_status := fnd_api.g_ret_sts_error;
1778:
1779: SELECT source_transaction_type_id
1780: INTO l_txn_type_id
1781: FROM csi_t_transaction_lines

Line 1786: x_return_status := fnd_api.g_ret_sts_success;

1782: WHERE transaction_line_id = p_transaction_line_id;
1783:
1784: FOR sub_type_rec in sub_type_cur(l_txn_type_id)
1785: LOOP
1786: x_return_status := fnd_api.g_ret_sts_success;
1787: exit;
1788: END LOOP;
1789:
1790:

Line 1793: x_return_status := fnd_api.g_ret_sts_error;

1789:
1790:
1791: EXCEPTION
1792: WHEN no_data_found THEN
1793: x_return_status := fnd_api.g_ret_sts_error;
1794: END validate_sub_type_id;
1795:
1796: PROCEDURE check_duplicate(
1797: p_txn_line_rec IN csi_t_datastructures_grp.txn_line_rec,

Line 1809: x_return_status := fnd_api.g_ret_sts_error;

1805: FROM csi_t_transaction_lines
1806: WHERE source_transaction_table = p_txn_line_rec.source_transaction_table
1807: AND source_transaction_id = p_txn_line_rec.source_transaction_id;
1808:
1809: x_return_status := fnd_api.g_ret_sts_error;
1810:
1811: EXCEPTION
1812: WHEN no_data_found THEN
1813: x_return_status := fnd_api.g_ret_sts_success;

Line 1813: x_return_status := fnd_api.g_ret_sts_success;

1809: x_return_status := fnd_api.g_ret_sts_error;
1810:
1811: EXCEPTION
1812: WHEN no_data_found THEN
1813: x_return_status := fnd_api.g_ret_sts_success;
1814: END check_duplicate;
1815:
1816: PROCEDURE validate_lot_number(
1817: p_inventory_item_id IN number,

Line 1827: x_return_status := fnd_api.g_ret_sts_success;

1823: l_item_name mtl_system_items.segment1%TYPE;
1824: l_found char;
1825: BEGIN
1826:
1827: x_return_status := fnd_api.g_ret_sts_success;
1828:
1829: -- check whether the item is under lot control or not...
1830:
1831: -- 1 - No Control

Line 1850: RAISE fnd_api.g_exc_error;

1846: fnd_message.set_token('INVENTORY_ITEM_ID',p_inventory_item_id);
1847: fnd_message.set_token('INV_ORGANIZATION_ID',p_organization_id);
1848: fnd_msg_pub.add;
1849:
1850: RAISE fnd_api.g_exc_error;
1851: END;
1852:
1853: IF l_lot_control_code = 2 THEN
1854:

Line 1873: RAISE fnd_api.g_exc_error;

1869: WHEN no_data_found THEN
1870: fnd_message.set_name('CSI','CSI_API_INVALID_LOT_NUM');
1871: fnd_message.set_token('LOT_NUMBER',p_lot_number);
1872: fnd_msg_pub.add;
1873: RAISE fnd_api.g_exc_error;
1874:
1875: -- adding this because I took of the organization check
1876: WHEN too_many_rows THEN
1877: null;

Line 1887: WHEN fnd_api.g_exc_error THEN

1883: fnd_msg_pub.add;
1884: END IF;
1885:
1886: EXCEPTION
1887: WHEN fnd_api.g_exc_error THEN
1888: x_return_status := fnd_api.g_ret_sts_error;
1889: END validate_lot_number;
1890:
1891: PROCEDURE validate_serial_number(

Line 1888: x_return_status := fnd_api.g_ret_sts_error;

1884: END IF;
1885:
1886: EXCEPTION
1887: WHEN fnd_api.g_exc_error THEN
1888: x_return_status := fnd_api.g_ret_sts_error;
1889: END validate_lot_number;
1890:
1891: PROCEDURE validate_serial_number(
1892: p_inventory_item_id IN number,

Line 1902: x_return_status := fnd_api.g_ret_sts_success;

1898: l_item_name mtl_system_items.segment1%TYPE;
1899: l_found char;
1900: BEGIN
1901:
1902: x_return_status := fnd_api.g_ret_sts_success;
1903:
1904: -- check whether the item is serial controlled or not
1905:
1906: -- '1' No serial number control

Line 1928: RAISE fnd_api.g_exc_error;

1924: fnd_message.set_token('INVENTORY_ITEM_ID',p_inventory_item_id);
1925: fnd_message.set_token('INV_ORGANIZATION_ID',p_organization_id);
1926: fnd_msg_pub.add;
1927:
1928: RAISE fnd_api.g_exc_error;
1929: END;
1930:
1931: IF l_serial_control_code <> 1 THEN
1932:

Line 1951: RAISE fnd_api.g_exc_error;

1947:
1948: fnd_message.set_name('CSI','CSI_API_INVALID_SERIAL_NUM');
1949: fnd_message.set_token('SERIAL_NUMBER',p_serial_number);
1950: fnd_msg_pub.add;
1951: RAISE fnd_api.g_exc_error;
1952:
1953: -- adding this because I took of the organization check
1954: WHEN too_many_rows THEN
1955: null;

Line 1961: WHEN fnd_api.g_exc_error THEN

1957:
1958: END IF;
1959:
1960: EXCEPTION
1961: WHEN fnd_api.g_exc_error THEN
1962: x_return_status := fnd_api.g_ret_sts_error;
1963: END validate_serial_number;
1964:
1965: /* Added this new routine for M-M Changes */

Line 1962: x_return_status := fnd_api.g_ret_sts_error;

1958: END IF;
1959:
1960: EXCEPTION
1961: WHEN fnd_api.g_exc_error THEN
1962: x_return_status := fnd_api.g_ret_sts_error;
1963: END validate_serial_number;
1964:
1965: /* Added this new routine for M-M Changes */
1966:

Line 1986: l_return_status VARCHAR2(1) := fnd_api.g_ret_sts_success;

1982: l_sub_obj_id NUMBER;
1983: l_object_yn VARCHAR2(1);
1984: l_csi_rel_id NUMBER;
1985: l_rel_type VARCHAR2(30);
1986: l_return_status VARCHAR2(1) := fnd_api.g_ret_sts_success;
1987:
1988:
1989: CURSOR txn_ii_rltns_cur (c_subject_id IN NUMBER,
1990: c_object_id IN NUMBER ,

Line 2022: x_return_status := fnd_api.g_ret_sts_success ;

2018: l_subject_type := l_ii_rltns_rec.subject_type;
2019: l_subject_id := l_ii_rltns_rec.subject_id;
2020: l_csi_rel_id := l_ii_rltns_rec.csi_inst_relationship_id;
2021: l_rel_type := l_ii_rltns_rec.relationship_type_code;
2022: x_return_status := fnd_api.g_ret_sts_success ;
2023:
2024: IF l_line_dtl_rec1.txn_line_detail_id = fnd_api.g_miss_num THEN
2025: -- call validate_inst_details to validate it in instance context
2026:

Line 2024: IF l_line_dtl_rec1.txn_line_detail_id = fnd_api.g_miss_num THEN

2020: l_csi_rel_id := l_ii_rltns_rec.csi_inst_relationship_id;
2021: l_rel_type := l_ii_rltns_rec.relationship_type_code;
2022: x_return_status := fnd_api.g_ret_sts_success ;
2023:
2024: IF l_line_dtl_rec1.txn_line_detail_id = fnd_api.g_miss_num THEN
2025: -- call validate_inst_details to validate it in instance context
2026:
2027: validate_inst_details (
2028: p_iir_rec => l_ii_rltns_rec,

Line 2032: IF l_return_status <> fnd_api.g_ret_sts_success THEN

2028: p_iir_rec => l_ii_rltns_rec,
2029: p_txn_dtl_rec => l_line_dtl_rec2,
2030: x_return_status => l_return_status );
2031:
2032: IF l_return_status <> fnd_api.g_ret_sts_success THEN
2033: RAISE fnd_api.g_exc_error;
2034: END IF;
2035:
2036: ELSIF l_line_dtl_rec2.txn_line_detail_id = fnd_api.g_miss_num THEN

Line 2033: RAISE fnd_api.g_exc_error;

2029: p_txn_dtl_rec => l_line_dtl_rec2,
2030: x_return_status => l_return_status );
2031:
2032: IF l_return_status <> fnd_api.g_ret_sts_success THEN
2033: RAISE fnd_api.g_exc_error;
2034: END IF;
2035:
2036: ELSIF l_line_dtl_rec2.txn_line_detail_id = fnd_api.g_miss_num THEN
2037:

Line 2036: ELSIF l_line_dtl_rec2.txn_line_detail_id = fnd_api.g_miss_num THEN

2032: IF l_return_status <> fnd_api.g_ret_sts_success THEN
2033: RAISE fnd_api.g_exc_error;
2034: END IF;
2035:
2036: ELSIF l_line_dtl_rec2.txn_line_detail_id = fnd_api.g_miss_num THEN
2037:
2038: validate_inst_details (
2039: p_iir_rec => l_ii_rltns_rec,
2040: p_txn_dtl_rec => l_line_dtl_rec1,

Line 2043: IF l_return_status <> fnd_api.g_ret_sts_success THEN

2039: p_iir_rec => l_ii_rltns_rec,
2040: p_txn_dtl_rec => l_line_dtl_rec1,
2041: x_return_status => l_return_status );
2042:
2043: IF l_return_status <> fnd_api.g_ret_sts_success THEN
2044: RAISE fnd_api.g_exc_error;
2045: END IF;
2046: ELSE
2047: /* validate the source txn hdr ID */

Line 2044: RAISE fnd_api.g_exc_error;

2040: p_txn_dtl_rec => l_line_dtl_rec1,
2041: x_return_status => l_return_status );
2042:
2043: IF l_return_status <> fnd_api.g_ret_sts_success THEN
2044: RAISE fnd_api.g_exc_error;
2045: END IF;
2046: ELSE
2047: /* validate the source txn hdr ID */
2048: ---Bypass this check if the source is Configurator

Line 2050: IF (NVL(l_line_dtl_rec1.config_inst_hdr_id , fnd_api.g_miss_num)

2046: ELSE
2047: /* validate the source txn hdr ID */
2048: ---Bypass this check if the source is Configurator
2049: -- Added for CZ Integration
2050: IF (NVL(l_line_dtl_rec1.config_inst_hdr_id , fnd_api.g_miss_num)
2051: = fnd_api.g_miss_num AND
2052: NVL(l_line_dtl_rec2.config_inst_hdr_id , fnd_api.g_miss_num)
2053: = fnd_api.g_miss_num )
2054: THEN

Line 2051: = fnd_api.g_miss_num AND

2047: /* validate the source txn hdr ID */
2048: ---Bypass this check if the source is Configurator
2049: -- Added for CZ Integration
2050: IF (NVL(l_line_dtl_rec1.config_inst_hdr_id , fnd_api.g_miss_num)
2051: = fnd_api.g_miss_num AND
2052: NVL(l_line_dtl_rec2.config_inst_hdr_id , fnd_api.g_miss_num)
2053: = fnd_api.g_miss_num )
2054: THEN
2055: validate_src_header (

Line 2052: NVL(l_line_dtl_rec2.config_inst_hdr_id , fnd_api.g_miss_num)

2048: ---Bypass this check if the source is Configurator
2049: -- Added for CZ Integration
2050: IF (NVL(l_line_dtl_rec1.config_inst_hdr_id , fnd_api.g_miss_num)
2051: = fnd_api.g_miss_num AND
2052: NVL(l_line_dtl_rec2.config_inst_hdr_id , fnd_api.g_miss_num)
2053: = fnd_api.g_miss_num )
2054: THEN
2055: validate_src_header (
2056: p_txn_line_id1 => l_line_dtl_rec1.transaction_line_id,

Line 2053: = fnd_api.g_miss_num )

2049: -- Added for CZ Integration
2050: IF (NVL(l_line_dtl_rec1.config_inst_hdr_id , fnd_api.g_miss_num)
2051: = fnd_api.g_miss_num AND
2052: NVL(l_line_dtl_rec2.config_inst_hdr_id , fnd_api.g_miss_num)
2053: = fnd_api.g_miss_num )
2054: THEN
2055: validate_src_header (
2056: p_txn_line_id1 => l_line_dtl_rec1.transaction_line_id,
2057: p_txn_line_id2 => l_line_dtl_rec2.transaction_line_id,

Line 2060: IF l_return_status <> fnd_api.g_ret_sts_success THEN

2056: p_txn_line_id1 => l_line_dtl_rec1.transaction_line_id,
2057: p_txn_line_id2 => l_line_dtl_rec2.transaction_line_id,
2058: p_rel_type_code => l_ii_rltns_rec.relationship_type_code,
2059: x_return_status => l_return_status);
2060: IF l_return_status <> fnd_api.g_ret_sts_success THEN
2061: FND_MESSAGE.set_name('CSI','CSI_TXN_INVALID_TXN_REL');
2062: FND_MESSAGE.set_token('TXN_DTL_ID1', l_line_dtl_rec1.txn_line_detail_id);
2063: FND_MESSAGE.set_token('TXN_DTL_ID2', l_line_dtl_rec2.txn_line_detail_id);
2064: FND_MSG_PUB.add;

Line 2065: RAISE fnd_api.g_exc_error;

2061: FND_MESSAGE.set_name('CSI','CSI_TXN_INVALID_TXN_REL');
2062: FND_MESSAGE.set_token('TXN_DTL_ID1', l_line_dtl_rec1.txn_line_detail_id);
2063: FND_MESSAGE.set_token('TXN_DTL_ID2', l_line_dtl_rec2.txn_line_detail_id);
2064: FND_MSG_PUB.add;
2065: RAISE fnd_api.g_exc_error;
2066: END IF;
2067: END IF ;
2068:
2069: IF ( l_line_dtl_rec1.transaction_line_id = l_line_dtl_rec2.transaction_line_id )

Line 2076: RAISE fnd_api.g_exc_error;

2072: FND_MESSAGE.set_name('CSI','CSI_TXN_INVALID_TXN_REL');
2073: FND_MESSAGE.set_token('TXN_DTL_ID1', l_line_dtl_rec1.txn_line_detail_id);
2074: FND_MESSAGE.set_token('TXN_DTL_ID2', l_line_dtl_rec2.txn_line_detail_id);
2075: FND_MSG_PUB.add;
2076: RAISE fnd_api.g_exc_error;
2077: END IF;
2078: END IF;
2079:
2080: END IF;

Line 2091: IF nvl(l_ii_rltns_rec.txn_relationship_id,fnd_api.g_miss_num) = fnd_api.g_miss_num THEN

2087: FETCH txn_ii_rltns_cur INTO l_txn_relationship_id ,
2088: l_obj_type,
2089: l_sub_type;
2090: CLOSE txn_ii_rltns_cur ;
2091: IF nvl(l_ii_rltns_rec.txn_relationship_id,fnd_api.g_miss_num) = fnd_api.g_miss_num THEN
2092: IF ( l_ii_rltns_rec.object_type = l_obj_type
2093: AND l_ii_rltns_rec.subject_type = l_sub_type) THEN
2094: IF l_txn_relationship_id IS NOT NULL
2095: AND l_ii_rltns_rec.txn_relationship_id <> l_txn_relationship_id

Line 2099: RAISE fnd_api.g_exc_error;

2095: AND l_ii_rltns_rec.txn_relationship_id <> l_txn_relationship_id
2096: THEN
2097: FND_MESSAGE.set_name('CSI','CSI_TXN_DUP_RLTNS');
2098: FND_MSG_PUB.add;
2099: RAISE fnd_api.g_exc_error;
2100: END IF ;
2101: END IF;
2102: END IF;
2103:

Line 2105: WHEN fnd_api.g_exc_error THEN

2101: END IF;
2102: END IF;
2103:
2104: EXCEPTION
2105: WHEN fnd_api.g_exc_error THEN
2106: x_return_status := fnd_api.g_ret_sts_error;
2107: END validate_txn_rltnshp ;
2108:
2109: /* Added new routine for M-M Changes */

Line 2106: x_return_status := fnd_api.g_ret_sts_error;

2102: END IF;
2103:
2104: EXCEPTION
2105: WHEN fnd_api.g_exc_error THEN
2106: x_return_status := fnd_api.g_ret_sts_error;
2107: END validate_txn_rltnshp ;
2108:
2109: /* Added new routine for M-M Changes */
2110:

Line 2142: x_return_status := fnd_api.g_ret_sts_success ;

2138: l_subject_type := l_txn_rltns_rec.subject_type;
2139: l_subject_id := l_txn_rltns_rec.subject_id;
2140: l_csi_rel_id := l_txn_rltns_rec.csi_inst_relationship_id;
2141: l_rel_type := l_txn_rltns_rec.relationship_type_code;
2142: x_return_status := fnd_api.g_ret_sts_success ;
2143:
2144: IF l_txn_rltns_rec.subject_type = 'I' THEN
2145: l_instance_id := l_subject_id;
2146: ELSIF l_txn_rltns_rec.object_type = 'I' THEN

Line 2149: l_instance_id := fnd_api.g_miss_num;

2145: l_instance_id := l_subject_id;
2146: ELSIF l_txn_rltns_rec.object_type = 'I' THEN
2147: l_instance_id := l_object_id;
2148: ELSE
2149: l_instance_id := fnd_api.g_miss_num;
2150: END IF;
2151: IF l_txn_rltns_rec.csi_inst_relationship_id = NULL THEN
2152: l_csi_rel_id := fnd_api.g_miss_num;
2153: END IF;

Line 2152: l_csi_rel_id := fnd_api.g_miss_num;

2148: ELSE
2149: l_instance_id := fnd_api.g_miss_num;
2150: END IF;
2151: IF l_txn_rltns_rec.csi_inst_relationship_id = NULL THEN
2152: l_csi_rel_id := fnd_api.g_miss_num;
2153: END IF;
2154: IF l_txn_rltns_rec.active_end_date = NULL THEN
2155: l_active_end_date := fnd_api.g_miss_date;
2156: END IF;

Line 2155: l_active_end_date := fnd_api.g_miss_date;

2151: IF l_txn_rltns_rec.csi_inst_relationship_id = NULL THEN
2152: l_csi_rel_id := fnd_api.g_miss_num;
2153: END IF;
2154: IF l_txn_rltns_rec.active_end_date = NULL THEN
2155: l_active_end_date := fnd_api.g_miss_date;
2156: END IF;
2157:
2158: IF l_csi_rel_id <> fnd_api.g_miss_num THEN
2159:

Line 2158: IF l_csi_rel_id <> fnd_api.g_miss_num THEN

2154: IF l_txn_rltns_rec.active_end_date = NULL THEN
2155: l_active_end_date := fnd_api.g_miss_date;
2156: END IF;
2157:
2158: IF l_csi_rel_id <> fnd_api.g_miss_num THEN
2159:
2160: BEGIN
2161:
2162: SELECT subject_id,

Line 2173: x_return_status := fnd_api.g_ret_sts_error;

2169: WHERE relationship_id = l_csi_rel_id
2170: AND sysdate between nvl(active_start_date, sysdate) and nvl(active_end_date,sysdate);
2171: EXCEPTION
2172: WHEN no_data_found THEN
2173: x_return_status := fnd_api.g_ret_sts_error;
2174: END ;
2175: IF l_iir_rec.relationship_type_code = 'COMPONENT-OF' THEN
2176: IF l_iir_rec.object_id <> l_object_id THEN
2177: FND_MESSAGE.set_name('CSI','CSI_TXN_INVALID_OPERATION');

Line 2181: x_return_status := fnd_api.g_ret_sts_error; -- cannot swap parent in IB

2177: FND_MESSAGE.set_name('CSI','CSI_TXN_INVALID_OPERATION');
2178: FND_MESSAGE.set_token('SUBJECT_ID', l_subject_id);
2179: FND_MESSAGE.set_token('OBJECT_ID' , l_object_id);
2180: FND_MSG_PUB.add;
2181: x_return_status := fnd_api.g_ret_sts_error; -- cannot swap parent in IB
2182: ELSIF (( l_iir_rec.subject_id <> l_subject_id ) OR
2183: ( l_line_dtl_rec.instance_id <> l_subject_id) OR
2184: ( l_active_end_date <> fnd_api.g_miss_date) ) THEN
2185: BEGIN

Line 2184: ( l_active_end_date <> fnd_api.g_miss_date) ) THEN

2180: FND_MSG_PUB.add;
2181: x_return_status := fnd_api.g_ret_sts_error; -- cannot swap parent in IB
2182: ELSIF (( l_iir_rec.subject_id <> l_subject_id ) OR
2183: ( l_line_dtl_rec.instance_id <> l_subject_id) OR
2184: ( l_active_end_date <> fnd_api.g_miss_date) ) THEN
2185: BEGIN
2186:
2187: SELECT location_type_code
2188: INTO l_loc_type

Line 2194: x_return_status := fnd_api.g_ret_sts_error; -- unexpected error

2190: WHERE instance_id = l_iir_rec.subject_id -- either one should not be in Inventory
2191: AND sysdate between nvl(active_start_date, sysdate) and nvl(active_end_date,sysdate);
2192: EXCEPTION
2193: WHEN OTHERS THEN
2194: x_return_status := fnd_api.g_ret_sts_error; -- unexpected error
2195: END;
2196: IF l_loc_type = 'INVENTORY' THEN
2197: FND_MESSAGE.set_name('CSI','CSI_TXN_INVALID_OPERATION');
2198: FND_MESSAGE.set_token('SUBJECT_ID', l_subject_id);

Line 2201: x_return_status := fnd_api.g_ret_sts_error; -- this txn is not allowed when in Inventory

2197: FND_MESSAGE.set_name('CSI','CSI_TXN_INVALID_OPERATION');
2198: FND_MESSAGE.set_token('SUBJECT_ID', l_subject_id);
2199: FND_MESSAGE.set_token('OBJECT_ID' , l_object_id);
2200: FND_MSG_PUB.add;
2201: x_return_status := fnd_api.g_ret_sts_error; -- this txn is not allowed when in Inventory
2202: END IF;
2203: END IF;
2204: END IF;
2205: ELSIF l_instance_id <> fnd_api.g_miss_num THEN

Line 2205: ELSIF l_instance_id <> fnd_api.g_miss_num THEN

2201: x_return_status := fnd_api.g_ret_sts_error; -- this txn is not allowed when in Inventory
2202: END IF;
2203: END IF;
2204: END IF;
2205: ELSIF l_instance_id <> fnd_api.g_miss_num THEN
2206:
2207: BEGIN
2208:
2209: SELECT 'Y'

Line 2219: x_return_status := fnd_api.g_ret_sts_error;

2215: WHEN no_data_found THEN
2216: FND_MESSAGE.set_name('CSI','CSI_TXN_INVALID_INST_REF');
2217: FND_MESSAGE.set_token('INSTANCE_ID', l_instance_id);
2218: FND_MSG_PUB.add;
2219: x_return_status := fnd_api.g_ret_sts_error;
2220: END;
2221:
2222: BEGIN
2223: SELECT 'Y'

Line 2235: x_return_status := fnd_api.g_ret_sts_error; -- Multiple parents not allowed for 'COMPONENT-OF'

2231: END;
2232:
2233: IF l_found = 'Y' THEN
2234: IF l_rel_type = 'COMPONENT-OF' THEN
2235: x_return_status := fnd_api.g_ret_sts_error; -- Multiple parents not allowed for 'COMPONENT-OF'
2236: END IF;
2237: END IF;
2238: END IF; -- l_csi_rel_id <> g_miss / null
2239: EXCEPTION

Line 2240: WHEN fnd_api.g_exc_error THEN

2236: END IF;
2237: END IF;
2238: END IF; -- l_csi_rel_id <> g_miss / null
2239: EXCEPTION
2240: WHEN fnd_api.g_exc_error THEN
2241: x_return_status := fnd_api.g_ret_sts_error;
2242: END validate_inst_details;
2243:
2244: /* Added new routine for M-M Changes */

Line 2241: x_return_status := fnd_api.g_ret_sts_error;

2237: END IF;
2238: END IF; -- l_csi_rel_id <> g_miss / null
2239: EXCEPTION
2240: WHEN fnd_api.g_exc_error THEN
2241: x_return_status := fnd_api.g_ret_sts_error;
2242: END validate_inst_details;
2243:
2244: /* Added new routine for M-M Changes */
2245:

Line 2265: x_return_status := fnd_api.g_ret_sts_success ;

2261:
2262: BEGIN
2263:
2264: csi_t_gen_utility_pvt.add('Begin : '||l_routine_name);
2265: x_return_status := fnd_api.g_ret_sts_success ;
2266: l_query := 'Select source_txn_header_id, source_transaction_type_id '||
2267: 'from csi_t_transaction_lines where transaction_line_id = :line_id';
2268: EXECUTE IMMEDIATE l_query
2269: INTO l_txn_hdr_id1 , l_txn_type_id1

Line 2279: l_txn_hdr_id1 := fnd_api.g_miss_num;

2275:
2276: csi_t_gen_utility_pvt.add('In Validate_src_header :'||'header id1'||l_txn_hdr_id1||'header id2'||l_txn_hdr_id2||'relationship type'||p_rel_type_code);
2277:
2278: IF l_txn_hdr_id1 is NULL THEN
2279: l_txn_hdr_id1 := fnd_api.g_miss_num;
2280: END IF;
2281: IF l_txn_hdr_id2 is NULL THEN
2282: l_txn_hdr_id2 := fnd_api.g_miss_num;
2283: END IF;

Line 2282: l_txn_hdr_id2 := fnd_api.g_miss_num;

2278: IF l_txn_hdr_id1 is NULL THEN
2279: l_txn_hdr_id1 := fnd_api.g_miss_num;
2280: END IF;
2281: IF l_txn_hdr_id2 is NULL THEN
2282: l_txn_hdr_id2 := fnd_api.g_miss_num;
2283: END IF;
2284: IF ( p_rel_type_code = 'CONNECTED-TO' AND
2285: (l_txn_hdr_id1 = fnd_api.g_miss_num OR l_txn_hdr_id2 = fnd_api.g_miss_num) ) THEN
2286: FND_MESSAGE.set_name('CSI','CSI_TXN_SRC_HDR_ID_REQD');

Line 2285: (l_txn_hdr_id1 = fnd_api.g_miss_num OR l_txn_hdr_id2 = fnd_api.g_miss_num) ) THEN

2281: IF l_txn_hdr_id2 is NULL THEN
2282: l_txn_hdr_id2 := fnd_api.g_miss_num;
2283: END IF;
2284: IF ( p_rel_type_code = 'CONNECTED-TO' AND
2285: (l_txn_hdr_id1 = fnd_api.g_miss_num OR l_txn_hdr_id2 = fnd_api.g_miss_num) ) THEN
2286: FND_MESSAGE.set_name('CSI','CSI_TXN_SRC_HDR_ID_REQD');
2287: FND_MESSAGE.set_token('TXN_LINE_ID1',p_txn_line_id1);
2288: FND_MESSAGE.set_token('TXN_LINE_ID2',p_txn_line_id2);
2289: FND_MSG_PUB.add;

Line 2290: Raise fnd_api.g_exc_error;

2286: FND_MESSAGE.set_name('CSI','CSI_TXN_SRC_HDR_ID_REQD');
2287: FND_MESSAGE.set_token('TXN_LINE_ID1',p_txn_line_id1);
2288: FND_MESSAGE.set_token('TXN_LINE_ID2',p_txn_line_id2);
2289: FND_MSG_PUB.add;
2290: Raise fnd_api.g_exc_error;
2291: END IF;
2292:
2293: IF ((l_txn_hdr_id1 <> l_txn_hdr_id2 ) AND (l_txn_type_id1 = l_txn_type_id2) ) THEN
2294: FND_MESSAGE.set_name('CSI','CSI_TXN_RLT_XSO_NOT_ALLOWED');

Line 2296: Raise fnd_api.g_exc_error;

2292:
2293: IF ((l_txn_hdr_id1 <> l_txn_hdr_id2 ) AND (l_txn_type_id1 = l_txn_type_id2) ) THEN
2294: FND_MESSAGE.set_name('CSI','CSI_TXN_RLT_XSO_NOT_ALLOWED');
2295: FND_MSG_PUB.add;
2296: Raise fnd_api.g_exc_error;
2297: END IF;
2298:
2299: EXCEPTION
2300: WHEN fnd_api.g_exc_error THEN

Line 2300: WHEN fnd_api.g_exc_error THEN

2296: Raise fnd_api.g_exc_error;
2297: END IF;
2298:
2299: EXCEPTION
2300: WHEN fnd_api.g_exc_error THEN
2301: x_return_status := fnd_api.g_ret_sts_error;
2302: END validate_src_header;
2303:
2304: -- Added for CZ Integration (Begin)

Line 2301: x_return_status := fnd_api.g_ret_sts_error;

2297: END IF;
2298:
2299: EXCEPTION
2300: WHEN fnd_api.g_exc_error THEN
2301: x_return_status := fnd_api.g_ret_sts_error;
2302: END validate_src_header;
2303:
2304: -- Added for CZ Integration (Begin)
2305: PROCEDURE check_exists_in_cz(

Line 2323: x_return_status := fnd_api.g_ret_sts_success;

2319: AND instance_rev_nbr = c_config_inst_rev_num
2320: AND config_item_id = c_config_inst_item_id ;
2321: BEGIN
2322:
2323: x_return_status := fnd_api.g_ret_sts_success;
2324:
2325: IF p_txn_line_dtl_tbl.COUNT > 0
2326: THEN
2327: FOR i IN p_txn_line_dtl_tbl.FIRST .. p_txn_line_dtl_tbl.LAST

Line 2345: RAISE fnd_api.g_exc_error;

2341: fnd_message.set_token('INST_HDR_ID',l_td_rec.config_inst_hdr_id);
2342: fnd_message.set_token('INST_REV_NBR',l_td_rec.config_inst_rev_num);
2343: fnd_message.set_token('CONFIG_ITEM_ID',l_td_rec.config_inst_item_id);
2344: fnd_msg_pub.add;
2345: RAISE fnd_api.g_exc_error;
2346: END IF ;
2347: END LOOP ;
2348: END IF ; ---p_txn_line_dtl_tbl.COUNT
2349: EXCEPTION

Line 2350: WHEN fnd_api.g_exc_error

2346: END IF ;
2347: END LOOP ;
2348: END IF ; ---p_txn_line_dtl_tbl.COUNT
2349: EXCEPTION
2350: WHEN fnd_api.g_exc_error
2351: THEN
2352: x_return_status := fnd_api.g_ret_sts_error;
2353: WHEN OTHERS
2354: THEN

Line 2352: x_return_status := fnd_api.g_ret_sts_error;

2348: END IF ; ---p_txn_line_dtl_tbl.COUNT
2349: EXCEPTION
2350: WHEN fnd_api.g_exc_error
2351: THEN
2352: x_return_status := fnd_api.g_ret_sts_error;
2353: WHEN OTHERS
2354: THEN
2355: x_return_status := fnd_api.g_ret_sts_error ;
2356: END check_exists_in_cz ;

Line 2355: x_return_status := fnd_api.g_ret_sts_error ;

2351: THEN
2352: x_return_status := fnd_api.g_ret_sts_error;
2353: WHEN OTHERS
2354: THEN
2355: x_return_status := fnd_api.g_ret_sts_error ;
2356: END check_exists_in_cz ;
2357:
2358:
2359: PROCEDURE get_cz_inst_or_tld_id (

Line 2393: x_return_status := fnd_api.g_ret_sts_success ;

2389: csi_t_gen_utility_pvt.add('p_config_inst_hdr_id :'||p_config_inst_hdr_id
2390: ||' p_config_inst_rev_num :'|| p_config_inst_rev_num ||
2391: ' p_config_inst_item_id :'|| p_config_inst_item_id);
2392:
2393: x_return_status := fnd_api.g_ret_sts_success ;
2394: x_instance_id := NULL ;
2395: x_txn_line_detail_id := NULL ;
2396:
2397: --SELECT TRUNC(sysdate) INTO l_sysdate from dual ;

Line 2417: RAISE fnd_api.g_exc_error;

2413: fnd_message.set_token('INST_HDR_ID',p_config_inst_hdr_id);
2414: fnd_message.set_token('INST_REV_NBR',p_config_inst_rev_num);
2415: fnd_message.set_token('CONFIG_ITEM_ID',p_config_inst_item_id);
2416: fnd_msg_pub.add;
2417: RAISE fnd_api.g_exc_error;
2418: END IF ;
2419:
2420: EXCEPTION
2421: WHEN fnd_api.g_exc_error

Line 2421: WHEN fnd_api.g_exc_error

2417: RAISE fnd_api.g_exc_error;
2418: END IF ;
2419:
2420: EXCEPTION
2421: WHEN fnd_api.g_exc_error
2422: THEN
2423: x_return_status := fnd_api.g_ret_sts_error ;
2424: WHEN OTHERS
2425: THEN

Line 2423: x_return_status := fnd_api.g_ret_sts_error ;

2419:
2420: EXCEPTION
2421: WHEN fnd_api.g_exc_error
2422: THEN
2423: x_return_status := fnd_api.g_ret_sts_error ;
2424: WHEN OTHERS
2425: THEN
2426: x_return_status := fnd_api.g_ret_sts_error ;
2427: END get_cz_inst_or_tld_id ;

Line 2426: x_return_status := fnd_api.g_ret_sts_error ;

2422: THEN
2423: x_return_status := fnd_api.g_ret_sts_error ;
2424: WHEN OTHERS
2425: THEN
2426: x_return_status := fnd_api.g_ret_sts_error ;
2427: END get_cz_inst_or_tld_id ;
2428:
2429:
2430: PROCEDURE get_cz_txn_line_id (

Line 2449: x_return_status := fnd_api.g_ret_sts_success ;

2445:
2446: BEGIN
2447: csi_t_gen_utility_pvt.add('Begin : in get_cz_txn_line_id ');
2448: x_txn_line_id := NULL ;
2449: x_return_status := fnd_api.g_ret_sts_success ;
2450:
2451: OPEN cz_txn_line_cur ;
2452: FETCH cz_txn_line_cur INTO x_txn_line_id ;
2453: CLOSE cz_txn_line_cur ;

Line 2459: x_return_status := fnd_api.g_ret_sts_error ;

2455:
2456: EXCEPTION
2457: WHEN OTHERS
2458: THEN
2459: x_return_status := fnd_api.g_ret_sts_error ;
2460: END get_cz_txn_line_id;
2461:
2462:
2463: PROCEDURE check_cz_session_keys (

Line 2479: x_return_status := fnd_api.g_ret_sts_success ;

2475: AND config_rev_nbr = p_config_session_rev_num
2476: AND config_item_id = p_config_session_item_id ;
2477: BEGIN
2478:
2479: x_return_status := fnd_api.g_ret_sts_success ;
2480: l_config_session_hdr_id := NULL ;
2481: OPEN cz_config_cur ;
2482: FETCH cz_config_cur INTO l_config_session_hdr_id;
2483: CLOSE cz_config_cur ;

Line 2492: RAISE fnd_api.g_exc_error;

2488: fnd_message.set_token('CONFIG_SESSION_HDR_ID',p_config_session_hdr_id);
2489: fnd_message.set_token('CONFIG_SESSION_REV_NUM',p_config_session_rev_num);
2490: fnd_message.set_token('CONFIG_SESSION_ITEM_ID',p_config_session_item_id);
2491: fnd_msg_pub.add;
2492: RAISE fnd_api.g_exc_error;
2493: END IF ;
2494: EXCEPTION
2495: WHEN fnd_api.g_exc_error
2496: THEN

Line 2495: WHEN fnd_api.g_exc_error

2491: fnd_msg_pub.add;
2492: RAISE fnd_api.g_exc_error;
2493: END IF ;
2494: EXCEPTION
2495: WHEN fnd_api.g_exc_error
2496: THEN
2497: x_return_status := fnd_api.g_ret_sts_error ;
2498: WHEN OTHERS
2499: THEN

Line 2497: x_return_status := fnd_api.g_ret_sts_error ;

2493: END IF ;
2494: EXCEPTION
2495: WHEN fnd_api.g_exc_error
2496: THEN
2497: x_return_status := fnd_api.g_ret_sts_error ;
2498: WHEN OTHERS
2499: THEN
2500: x_return_status := fnd_api.g_ret_sts_error ;
2501: END check_cz_session_keys ;

Line 2500: x_return_status := fnd_api.g_ret_sts_error ;

2496: THEN
2497: x_return_status := fnd_api.g_ret_sts_error ;
2498: WHEN OTHERS
2499: THEN
2500: x_return_status := fnd_api.g_ret_sts_error ;
2501: END check_cz_session_keys ;
2502:
2503:
2504: -- Added for CZ Integration (End)