DBA Data[Home] [Help]

APPS.POS_MERGE_SUPPLIER_PKG dependencies on FND_API

Line 33: x_return_status := fnd_api.g_ret_sts_success;

29: l_classification_id NUMBER;
30: l_status VARCHAR2(100);
31: l_exception_msg VARCHAR2(100);
32: BEGIN
33: x_return_status := fnd_api.g_ret_sts_success;
34:
35: fnd_file.put_line(fnd_file.log,
36: 'Inside POS_MERGE_SUPPLIER_PKG.create_bus_attr ');
37: BEGIN

Line 63: x_return_status := fnd_api.g_ret_sts_unexp_error;

59: p_buss_class_rec.vendor_id);
60: END;
61: EXCEPTION
62: WHEN OTHERS THEN
63: x_return_status := fnd_api.g_ret_sts_unexp_error;
64:
65: fnd_msg_pub.count_and_get(p_count => x_msg_count,
66: p_data => x_msg_data);
67: END create_bus_attr;

Line 80: x_return_status := fnd_api.g_ret_sts_success;

76: x_msg_data OUT NOCOPY VARCHAR2
77: ) IS
78:
79: BEGIN
80: x_return_status := fnd_api.g_ret_sts_success;
81: fnd_file.put_line(fnd_file.log,
82: 'Inside POS_MERGE_SUPPLIER_PKG.get_bus_attr_rec ' ||
83: p_party_id);
84:

Line 125: x_return_status := fnd_api.g_ret_sts_unexp_error;

121: AND classification_id = p_classification_id;
122:
123: EXCEPTION
124: WHEN OTHERS THEN
125: x_return_status := fnd_api.g_ret_sts_unexp_error;
126:
127: fnd_msg_pub.count_and_get(p_count => x_msg_count,
128: p_data => x_msg_data);
129: END get_bus_attr_rec;

Line 151: x_return_status := fnd_api.g_ret_sts_success;

147: buss_class_rec pos_bus_class_attr%ROWTYPE;
148: l_to_vendor_id NUMBER;
149:
150: BEGIN
151: x_return_status := fnd_api.g_ret_sts_success;
152:
153: fnd_file.put_line(fnd_file.log,
154: 'Inside POS_MERGE_SUPPLIER_PKG.Buss_Class_Merge p_to_fk_id: ' ||
155: p_to_fk_id || ' p_from_fk_id: ' || p_from_fk_id ||

Line 226: IF x_return_status <> fnd_api.g_ret_sts_success THEN

222: x_return_status => x_return_status,
223: x_msg_count => l_msg_count,
224: x_msg_data => l_msg_data);
225:
226: IF x_return_status <> fnd_api.g_ret_sts_success THEN
227: fnd_message.set_name('AR', 'HZ_MERGE_SQL_ERROR');
228: fnd_message.set_token('ERROR',
229: 'Cannot get classification ID : ' ||
230: p_from_id);

Line 237: x_return_status := fnd_api.g_ret_sts_error;

233: fnd_file.put_line(fnd_file.log,
234: 'No. of Messages: ' || l_msg_count ||
235: ', Message: ' || l_msg_data ||
236: ' From get_bus_attr_rec API.');
237: x_return_status := fnd_api.g_ret_sts_error;
238:
239: RETURN;
240: END IF;
241:

Line 253: IF x_return_status <> fnd_api.g_ret_sts_success THEN

249: x_return_status => x_return_status,
250: x_msg_count => l_msg_count,
251: x_msg_data => l_msg_data);
252:
253: IF x_return_status <> fnd_api.g_ret_sts_success THEN
254: fnd_message.set_name('AR', 'HZ_MERGE_SQL_ERROR');
255: fnd_message.set_token('ERROR',
256: 'Cannot copy classification ID : ' ||
257: p_from_id);

Line 264: x_return_status := fnd_api.g_ret_sts_error;

260: fnd_file.put_line(fnd_file.log,
261: 'No. of Messages: ' || l_msg_count ||
262: ', Message: ' || l_msg_data ||
263: ' From create_bus_attr API.');
264: x_return_status := fnd_api.g_ret_sts_error;
265: RETURN;
266: END IF;
267: END;
268: END IF;

Line 273: x_return_status := fnd_api.g_ret_sts_unexp_error;

269:
270: EXCEPTION
271: WHEN OTHERS THEN
272: fnd_file.put_line(fnd_file.log, 'In others : ' || SQLERRM);
273: x_return_status := fnd_api.g_ret_sts_unexp_error;
274: END buss_class_merge;
275:
276: PROCEDURE create_prod_serv
277: (

Line 297: x_return_status := fnd_api.g_ret_sts_success;

293: l_mapping_id NUMBER;
294: l_req_id NUMBER := 0;
295:
296: BEGIN
297: x_return_status := fnd_api.g_ret_sts_success;
298:
299: -- Insert the data into the pos_product_service_requests table using the follwing API
300: pos_product_service_utl_pkg.add_new_ps_req(p_vendor_id => p_vendor_prodsrv_rec.vendor_id,
301: p_segment1 => p_vendor_prodsrv_rec.segment1,

Line 326: IF x_return_status <> fnd_api.g_ret_sts_success THEN

322: x_return_status => l_return_status,
323: x_msg_count => l_msg_count,
324: x_msg_data => l_msg_data);
325:
326: IF x_return_status <> fnd_api.g_ret_sts_success THEN
327: fnd_file.put_line(fnd_file.log,
328: 'No. of Messages: ' || l_msg_count || ', Message: ' ||
329: l_msg_data ||
330: ' From pos_product_service_utl_pkg.add_new_ps_req API.');

Line 421: IF x_return_status <> fnd_api.g_ret_sts_success THEN

417: x_return_status => l_return_status,
418: x_msg_count => l_msg_count,
419: x_msg_data => l_msg_data);
420:
421: IF x_return_status <> fnd_api.g_ret_sts_success THEN
422: fnd_file.put_line(fnd_file.log,
423: 'No. of Messages: ' || l_msg_count || ', Message: ' ||
424: l_msg_data ||
425: ' From pos_profile_change_request_pkg.approve_ps_req API.');

Line 432: x_return_status := fnd_api.g_ret_sts_unexp_error;

428: --END IF;
429:
430: EXCEPTION
431: WHEN OTHERS THEN
432: x_return_status := fnd_api.g_ret_sts_unexp_error;
433: fnd_msg_pub.count_and_get(p_count => x_msg_count,
434: p_data => x_msg_data);
435: END create_prod_serv;
436:

Line 448: x_return_status := fnd_api.g_ret_sts_success;

444: x_msg_data OUT NOCOPY VARCHAR2,
445: x_prod_services_rec OUT NOCOPY pos_sup_products_services%ROWTYPE
446: ) RETURN NUMBER IS
447: BEGIN
448: x_return_status := fnd_api.g_ret_sts_success;
449:
450: SELECT --classification_id,
451: p_to_vendor_id,
452: segment1,

Line 537: x_return_status := fnd_api.g_ret_sts_unexp_error;

533: EXCEPTION
534: WHEN no_data_found THEN
535: RETURN 0;
536: WHEN OTHERS THEN
537: x_return_status := fnd_api.g_ret_sts_unexp_error;
538:
539: fnd_msg_pub.count_and_get(p_count => x_msg_count,
540: p_data => x_msg_data);
541: RETURN 0;

Line 563: x_return_status := fnd_api.g_ret_sts_success;

559: l_msg_count NUMBER;
560: l_msg_data VARCHAR2(2000);
561: l_row_count NUMBER := 0;
562: BEGIN
563: x_return_status := fnd_api.g_ret_sts_success;
564:
565: fnd_file.put_line(fnd_file.log,
566: 'Inside POS_MERGE_SUPPLIER_PKG.prod_service_merge p_to_fk_id: ' ||
567: p_to_fk_id || ' p_from_fk_id: ' || p_from_fk_id ||

Line 616: IF x_return_status <> fnd_api.g_ret_sts_success THEN

612: l_msg_count,
613: l_msg_data,
614: l_prod_services_rec);
615:
616: IF x_return_status <> fnd_api.g_ret_sts_success THEN
617: fnd_message.set_name('AR', 'HZ_MERGE_SQL_ERROR');
618: fnd_message.set_token('ERROR',
619: 'Cannot get classification ID : ' || p_from_id);
620: fnd_msg_pub.add;

Line 625: x_return_status := fnd_api.g_ret_sts_error;

621:
622: fnd_file.put_line(fnd_file.log,
623: 'No. of Messages: ' || l_msg_count || ', Message: ' ||
624: l_msg_data || ' From get_prod_serv_rec API.');
625: x_return_status := fnd_api.g_ret_sts_error;
626:
627: RETURN;
628: END IF;
629:

Line 638: IF x_return_status <> fnd_api.g_ret_sts_success THEN

634: x_return_status,
635: l_msg_count,
636: l_msg_data);
637:
638: IF x_return_status <> fnd_api.g_ret_sts_success THEN
639: fnd_message.set_name('AR', 'HZ_MERGE_SQL_ERROR');
640: fnd_message.set_token('ERROR',
641: 'Cannot copy classification ID : ' ||
642: p_from_id);

Line 649: x_return_status := fnd_api.g_ret_sts_error;

645: fnd_file.put_line(fnd_file.log,
646: 'No. of Messages: ' || l_msg_count ||
647: ', Message: ' || l_msg_data ||
648: ' From create_prod_serv API.');
649: x_return_status := fnd_api.g_ret_sts_error;
650: RETURN;
651: END IF;
652: END IF;
653:

Line 656: x_return_status := fnd_api.g_ret_sts_unexp_error;

652: END IF;
653:
654: EXCEPTION
655: WHEN OTHERS THEN
656: x_return_status := fnd_api.g_ret_sts_unexp_error;
657: END prod_service_merge;
658:
659: PROCEDURE party_contact_merge
660: (

Line 678: x_return_status := fnd_api.g_ret_sts_success;

674: l_party_usg_rec hz_party_usg_assignment_pvt.party_usg_assignment_rec_type;
675: l_party_usg_validation_level NUMBER;
676:
677: BEGIN
678: x_return_status := fnd_api.g_ret_sts_success;
679:
680: fnd_file.put_line(fnd_file.log,
681: 'Inside POS_MERGE_SUPPLIER_PKG.party_contact_merge p_to_fk_id: ' ||
682: p_to_fk_id || ' p_from_fk_id: ' || p_from_fk_id ||

Line 700: IF x_return_status <> fnd_api.g_ret_sts_success THEN

696: x_return_status => x_return_status,
697: x_msg_count => l_msg_count,
698: x_msg_data => l_msg_data);
699:
700: IF x_return_status <> fnd_api.g_ret_sts_success THEN
701: fnd_file.put_line(fnd_file.log,
702: 'No. of Messages: ' || l_msg_count || ', Message: ' ||
703: l_msg_data ||
704: ' From hz_party_usg_assignment_pvt.assign_party_usage API.');

Line 709: x_return_status := fnd_api.g_ret_sts_unexp_error;

705: END IF;
706:
707: EXCEPTION
708: WHEN OTHERS THEN
709: x_return_status := fnd_api.g_ret_sts_unexp_error;
710: END party_contact_merge;
711:
712: PROCEDURE create_bank_dtls
713: (

Line 714: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,

710: END party_contact_merge;
711:
712: PROCEDURE create_bank_dtls
713: (
714: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
715: p_payee IN iby_disbursement_setup_pub.payeecontext_rec_type,
716: p_assignment_attribs IN iby_fndcpt_setup_pub.pmtinstrassignment_rec_type,
717: x_return_status OUT NOCOPY VARCHAR2,
718: x_msg_count OUT NOCOPY NUMBER,

Line 724: x_return_status := fnd_api.g_ret_sts_success;

720: ) IS
721: l_assign_id NUMBER;
722: l_response iby_fndcpt_common_pub.result_rec_type;
723: BEGIN
724: x_return_status := fnd_api.g_ret_sts_success;
725: BEGIN
726: iby_disbursement_setup_pub.set_payee_instr_assignment(p_api_version => '1.0',
727: x_return_status => x_return_status,
728: x_msg_count => x_msg_count,

Line 735: IF x_return_status <> fnd_api.g_ret_sts_success THEN

731: p_assignment_attribs => p_assignment_attribs,
732: x_assign_id => l_assign_id,
733: x_response => l_response);
734:
735: IF x_return_status <> fnd_api.g_ret_sts_success THEN
736: fnd_file.put_line(fnd_file.log,
737: 'No. of Messages: ' || x_msg_count ||
738: ', Message: ' || x_msg_data ||
739: ' From iby_disbursement_setup_pub.set_payee_instr_assignment API.');

Line 745: x_return_status := fnd_api.g_ret_sts_unexp_error;

741: END;
742:
743: EXCEPTION
744: WHEN OTHERS THEN
745: x_return_status := fnd_api.g_ret_sts_unexp_error;
746: fnd_msg_pub.count_and_get(p_count => x_msg_count,
747: p_data => x_msg_data);
748: END create_bank_dtls;
749:

Line 752: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,

748: END create_bank_dtls;
749:
750: PROCEDURE get_bank_dtls_rec
751: (
752: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
753: p_from_party IN hz_parties.party_id%TYPE,
754: p_to_party IN hz_parties.party_id%TYPE,
755: x_bank_dtls_rec_tbl OUT NOCOPY bank_dtls_tab_type,
756: x_return_status OUT NOCOPY VARCHAR2,

Line 794: x_return_status := fnd_api.g_ret_sts_success;

790: AND extpayee.ext_payee_id = ext_pmt_party_id
791: AND instr.instrument_type = 'BANKACCOUNT');
792:
793: BEGIN
794: x_return_status := fnd_api.g_ret_sts_success;
795:
796: OPEN bank_cur;
797: FETCH bank_cur BULK COLLECT
798: INTO x_bank_dtls_rec_tbl;

Line 803: x_return_status := fnd_api.g_ret_sts_unexp_error;

799: CLOSE bank_cur;
800:
801: EXCEPTION
802: WHEN OTHERS THEN
803: x_return_status := fnd_api.g_ret_sts_unexp_error;
804: fnd_msg_pub.count_and_get(p_count => x_msg_count,
805: p_data => x_msg_data);
806: END get_bank_dtls_rec;
807:

Line 828: x_return_status := fnd_api.g_ret_sts_success;

824: l_bank_dtls_rec_tbl bank_dtls_tab_type;
825: l_rec iby_disbursement_setup_pub.payeecontext_rec_type;
826: l_assign iby_fndcpt_setup_pub.pmtinstrassignment_rec_type;
827: BEGIN
828: x_return_status := fnd_api.g_ret_sts_success;
829:
830: fnd_file.put_line(fnd_file.log,
831: 'Inside POS_MERGE_SUPPLIER_PKG.bank_dtls_merge p_to_fk_id: ' ||
832: p_to_fk_id || ' p_to_fk_id: ' || p_from_fk_id);

Line 842: IF x_return_status <> fnd_api.g_ret_sts_success THEN

838: x_return_status => x_return_status,
839: x_msg_count => l_msg_count,
840: x_msg_data => l_msg_data);
841:
842: IF x_return_status <> fnd_api.g_ret_sts_success THEN
843: fnd_message.set_name('AR', 'HZ_MERGE_SQL_ERROR');
844: fnd_message.set_token('ERROR',
845: 'Cannot get Bank Details : ' || p_from_id);
846: fnd_msg_pub.add;

Line 851: x_return_status := fnd_api.g_ret_sts_error;

847:
848: fnd_file.put_line(fnd_file.log,
849: 'No. of Messages: ' || l_msg_count || ', Message: ' ||
850: l_msg_data || ' From get_bank_dtls_rec API.');
851: x_return_status := fnd_api.g_ret_sts_error;
852:
853: RETURN;
854: END IF;
855:

Line 879: IF x_return_status <> fnd_api.g_ret_sts_success THEN

875: x_return_status => x_return_status,
876: x_msg_count => l_msg_count,
877: x_msg_data => l_msg_data);
878:
879: IF x_return_status <> fnd_api.g_ret_sts_success THEN
880: fnd_message.set_name('AR', 'HZ_MERGE_SQL_ERROR');
881: fnd_message.set_token('ERROR',
882: 'Cannot copy Bank Details : ' || p_from_id);
883: fnd_msg_pub.add;

Line 889: x_return_status := fnd_api.g_ret_sts_error;

885: fnd_file.put_line(fnd_file.log,
886: 'No. of Messages: ' || l_msg_count ||
887: ', Message: ' || l_msg_data ||
888: ' From create_bank_dtls API.');
889: x_return_status := fnd_api.g_ret_sts_error;
890: RETURN;
891: END IF;
892: END LOOP;
893:

Line 896: x_return_status := fnd_api.g_ret_sts_unexp_error;

892: END LOOP;
893:
894: EXCEPTION
895: WHEN OTHERS THEN
896: x_return_status := fnd_api.g_ret_sts_unexp_error;
897: END bank_dtls_merge;
898:
899: PROCEDURE get_batch_user_attr_data
900: (

Line 944: x_return_status := fnd_api.g_ret_sts_success;

940: WHERE attr_group_id = p_attribute_group_id
941: AND data_level_id = p_data_level_id
942: AND party_id = p_to_party_id);
943: BEGIN
944: x_return_status := fnd_api.g_ret_sts_success;
945: /* If the attribute group is single row then we have to get the
946: data for the from as well as the to party.
947: For Multirow attribute we need to get the data only for the
948: from parties */

Line 972: x_return_status := fnd_api.g_ret_sts_unexp_error;

968: END IF;
969:
970: EXCEPTION
971: WHEN OTHERS THEN
972: x_return_status := fnd_api.g_ret_sts_unexp_error;
973: END get_batch_user_attr_data;
974:
975: PROCEDURE get_party_site_attr_data
976: (

Line 1043: x_return_status := fnd_api.g_ret_sts_success;

1039: WHERE attr_group_id = p_attribute_group_id
1040: AND data_level_id = p_data_level_id
1041: AND pk1_value = p_to_party_id;
1042: BEGIN
1043: x_return_status := fnd_api.g_ret_sts_success;
1044:
1045: IF (p_multirow_flag = 'Y') THEN
1046: OPEN multirow_cur;
1047: FETCH multirow_cur BULK COLLECT

Line 1059: x_return_status := fnd_api.g_ret_sts_unexp_error;

1055: END IF;
1056:
1057: EXCEPTION
1058: WHEN OTHERS THEN
1059: x_return_status := fnd_api.g_ret_sts_unexp_error;
1060: END get_party_site_attr_data;
1061:
1062: PROCEDURE get_supp_site_attr_data
1063: (

Line 1096: x_return_status := fnd_api.g_ret_sts_success;

1092: WHERE attr_group_id = p_attribute_group_id
1093: AND data_level_id = p_data_level_id
1094: AND pk2_value = p_to_party_id;
1095: BEGIN
1096: x_return_status := fnd_api.g_ret_sts_success;
1097:
1098: IF (p_multirow_flag = 'Y') THEN
1099: OPEN multirow_cur;
1100: FETCH multirow_cur BULK COLLECT

Line 1112: x_return_status := fnd_api.g_ret_sts_unexp_error;

1108: END IF;
1109:
1110: EXCEPTION
1111: WHEN OTHERS THEN
1112: x_return_status := fnd_api.g_ret_sts_unexp_error;
1113: END get_supp_site_attr_data;
1114:
1115: PROCEDURE build_uda_data_payload
1116: (

Line 2519: x_return_status := fnd_api.g_ret_sts_unexp_error;*/

2515: x_attributes_data_table.trim;
2516:
2517: /*EXCEPTION
2518: WHEN OTHERS THEN
2519: x_return_status := fnd_api.g_ret_sts_unexp_error;*/
2520: END build_uda_data_payload;
2521:
2522: PROCEDURE do_single_row_uda_merge
2523: (

Line 2532: x_return_status := fnd_api.g_ret_sts_success;

2528: x_msg_data OUT NOCOPY VARCHAR2
2529: ) IS
2530:
2531: BEGIN
2532: x_return_status := fnd_api.g_ret_sts_success;
2533:
2534: /* The collection contains the UDA data in the ascending
2535: order of the creation date. The idea is to have the
2536: latest data in the final merged record. So we would

Line 2768: x_return_status := fnd_api.g_ret_sts_unexp_error;

2764: x_uda_rec := p_uda_rec_tbl(1);
2765:
2766: EXCEPTION
2767: WHEN OTHERS THEN
2768: x_return_status := fnd_api.g_ret_sts_unexp_error;
2769: END do_single_row_uda_merge;
2770:
2771: PROCEDURE do_uda_row_dml
2772: (

Line 2839: x_return_status := fnd_api.g_ret_sts_success;

2835:
2836: key_combination_exists BOOLEAN := FALSE;
2837:
2838: BEGIN
2839: x_return_status := fnd_api.g_ret_sts_success;
2840: l_row_identifier := 1020;
2841:
2842: /* Build the Primary key Name value pairs */
2843: IF (p_data_level_id = 17701) THEN

Line 2859: x_return_status := fnd_api.g_ret_sts_error;

2855: WHEN no_data_found THEN
2856: fnd_file.put_line(fnd_file.log,
2857: 'No party id found for party site id : ' ||
2858: p_to_party_id);
2859: x_return_status := fnd_api.g_ret_sts_error;
2860: RETURN;
2861: END;
2862: l_pk_column_values := ego_col_name_value_pair_array(ego_col_name_value_pair_obj('PARTY_ID',
2863: to_char(l_party_id)));

Line 2877: x_return_status := fnd_api.g_ret_sts_error;

2873: WHEN no_data_found THEN
2874: fnd_file.put_line(fnd_file.log,
2875: 'No party id found for vendor id : ' ||
2876: p_vendor_id);
2877: x_return_status := fnd_api.g_ret_sts_error;
2878: RETURN;
2879: END;
2880:
2881: BEGIN

Line 2892: x_return_status := fnd_api.g_ret_sts_error;

2888: WHEN no_data_found THEN
2889: fnd_file.put_line(fnd_file.log,
2890: 'No party site id found for vendor site id : ' ||
2891: p_to_party_id);
2892: x_return_status := fnd_api.g_ret_sts_error;
2893: RETURN;
2894: END;
2895: l_pk_column_values := ego_col_name_value_pair_array(ego_col_name_value_pair_obj('PARTY_ID',
2896: to_char(l_party_id)));

Line 3449: p_commit => fnd_api.g_false,

3445: p_entity_id => NULL,
3446: p_entity_index => NULL,
3447: p_entity_code => NULL,
3448: p_debug_level => NULL, --p_debug_level,
3449: p_commit => fnd_api.g_false,
3450: p_init_error_handler => 'T',
3451: p_init_fnd_msg_list => 'T',
3452: x_failed_row_id_list => l_failed_row_id_buffer,
3453: x_return_status => l_return_status,

Line 3458: IF l_return_status <> fnd_api.g_ret_sts_success THEN

3454: x_errorcode => l_errorcode,
3455: x_msg_count => l_msg_count,
3456: x_msg_data => l_msg_data);
3457:
3458: IF l_return_status <> fnd_api.g_ret_sts_success THEN
3459: error_handler.get_message_list(l_error_msg_tbl);
3460: IF l_error_msg_tbl.first IS NOT NULL THEN
3461: l_msg_count := l_error_msg_tbl.first;
3462: WHILE l_msg_count IS NOT NULL LOOP

Line 3498: p_commit => fnd_api.g_false,

3494: p_entity_id => NULL,
3495: p_entity_index => NULL,
3496: p_entity_code => NULL,
3497: p_debug_level => NULL, --p_debug_level,
3498: p_commit => fnd_api.g_false,
3499: p_init_error_handler => 'T',
3500: p_init_fnd_msg_list => 'T',
3501: x_failed_row_id_list => l_failed_row_id_buffer,
3502: x_return_status => l_return_status,

Line 3507: IF l_return_status <> fnd_api.g_ret_sts_success THEN

3503: x_errorcode => l_errorcode,
3504: x_msg_count => l_msg_count,
3505: x_msg_data => l_msg_data);
3506:
3507: IF l_return_status <> fnd_api.g_ret_sts_success THEN
3508: error_handler.get_message_list(l_error_msg_tbl);
3509: IF l_error_msg_tbl.first IS NOT NULL THEN
3510: l_msg_count := l_error_msg_tbl.first;
3511: WHILE l_msg_count IS NOT NULL LOOP

Line 3523: x_return_status := fnd_api.g_ret_sts_unexp_error;

3519: END IF;
3520:
3521: EXCEPTION
3522: WHEN OTHERS THEN
3523: x_return_status := fnd_api.g_ret_sts_unexp_error;
3524: END do_uda_row_dml;
3525:
3526: PROCEDURE do_uda_row_dml
3527: (

Line 3560: x_return_status := fnd_api.g_ret_sts_success;

3556: l_class_code_name_value_pairs ego_col_name_value_pair_array := ego_col_name_value_pair_array(NULL);
3557: l_party_id NUMBER;
3558: l_party_site_id NUMBER;
3559: BEGIN
3560: x_return_status := fnd_api.g_ret_sts_success;
3561: l_row_identifier := 1030;
3562: /* This API works in 2 modes Insert and Update. If run in the update mode then
3563: it would update the UDA data for the to_party_id that is passed.
3564: If run in the insert mode, it would insert the data for the party */

Line 3584: x_return_status := fnd_api.g_ret_sts_error;

3580: WHEN no_data_found THEN
3581: fnd_file.put_line(fnd_file.log,
3582: 'No party id found for party site id : ' ||
3583: p_to_party_id);
3584: x_return_status := fnd_api.g_ret_sts_error;
3585: RETURN;
3586: END;
3587: l_pk_column_values := ego_col_name_value_pair_array(ego_col_name_value_pair_obj('PARTY_ID',
3588: to_char(l_party_id)));

Line 3602: x_return_status := fnd_api.g_ret_sts_error;

3598: WHEN no_data_found THEN
3599: fnd_file.put_line(fnd_file.log,
3600: 'No party id found for vendor id : ' ||
3601: p_vendor_id);
3602: x_return_status := fnd_api.g_ret_sts_error;
3603: RETURN;
3604: END;
3605:
3606: BEGIN

Line 3617: x_return_status := fnd_api.g_ret_sts_error;

3613: WHEN no_data_found THEN
3614: fnd_file.put_line(fnd_file.log,
3615: 'No party site id found for vendor site id : ' ||
3616: p_to_party_id);
3617: x_return_status := fnd_api.g_ret_sts_error;
3618: RETURN;
3619: END;
3620:
3621: l_pk_column_values := ego_col_name_value_pair_array(ego_col_name_value_pair_obj('PARTY_ID',

Line 3766: p_commit => fnd_api.g_false,

3762: p_entity_id => NULL,
3763: p_entity_index => NULL,
3764: p_entity_code => NULL,
3765: p_debug_level => NULL, --p_debug_level,
3766: p_commit => fnd_api.g_false,
3767: p_init_error_handler => 'T',
3768: p_init_fnd_msg_list => 'T',
3769: x_failed_row_id_list => l_failed_row_id_buffer,
3770: x_return_status => l_return_status,

Line 3775: IF l_return_status <> fnd_api.g_ret_sts_success THEN

3771: x_errorcode => l_errorcode,
3772: x_msg_count => l_msg_count,
3773: x_msg_data => l_msg_data);
3774:
3775: IF l_return_status <> fnd_api.g_ret_sts_success THEN
3776: error_handler.get_message_list(l_error_msg_tbl);
3777: IF l_error_msg_tbl.first IS NOT NULL THEN
3778: l_msg_count := l_error_msg_tbl.first;
3779: WHILE l_msg_count IS NOT NULL LOOP

Line 3791: x_return_status := fnd_api.g_ret_sts_unexp_error;

3787: END IF;
3788:
3789: EXCEPTION
3790: WHEN OTHERS THEN
3791: x_return_status := fnd_api.g_ret_sts_unexp_error;
3792: END do_uda_row_dml;
3793:
3794: PROCEDURE supplier_uda_merge
3795: (

Line 3835: x_return_status := fnd_api.g_ret_sts_success;

3831: TYPE attributes_group_tab IS TABLE OF get_supplier_attribute_groups%ROWTYPE INDEX BY BINARY_INTEGER;
3832: attributes_group_coll attributes_group_tab;
3833:
3834: BEGIN
3835: x_return_status := fnd_api.g_ret_sts_success;
3836:
3837: SELECT COUNT(1)
3838: INTO l_to_party_cntr
3839: FROM pos_supplier_uda_merge_gtt

Line 3993: x_return_status := fnd_api.g_ret_sts_unexp_error;

3989: END LOOP; -- end of attribute group loop
3990:
3991: EXCEPTION
3992: WHEN OTHERS THEN
3993: x_return_status := fnd_api.g_ret_sts_unexp_error;
3994: END supplier_uda_merge;
3995:
3996: PROCEDURE supplier_site_uda_merge
3997: (

Line 4032: x_return_status := fnd_api.g_ret_sts_success;

4028: TYPE attributes_group_tab IS TABLE OF get_supplier_attribute_groups%ROWTYPE INDEX BY BINARY_INTEGER;
4029: attributes_group_coll attributes_group_tab;
4030:
4031: BEGIN
4032: x_return_status := fnd_api.g_ret_sts_success;
4033:
4034: fnd_file.put_line(fnd_file.log,
4035: 'Inside POS_MERGE_SUPPLIER_PKG.supplier_site_uda_merge p_to_fk_id: ' ||
4036: p_to_fk_id || ' p_to_fk_id: ' || p_from_fk_id ||

Line 4178: x_return_status := fnd_api.g_ret_sts_unexp_error;

4174: END LOOP; -- end of attribute group loop
4175:
4176: EXCEPTION
4177: WHEN OTHERS THEN
4178: x_return_status := fnd_api.g_ret_sts_unexp_error;
4179: END supplier_site_uda_merge;
4180:
4181: PROCEDURE party_site_uda_merge
4182: (

Line 4223: x_return_status := fnd_api.g_ret_sts_success;

4219: TYPE attributes_group_tab IS TABLE OF get_supplier_attribute_groups%ROWTYPE INDEX BY BINARY_INTEGER;
4220: attributes_group_coll attributes_group_tab;
4221:
4222: BEGIN
4223: x_return_status := fnd_api.g_ret_sts_success;
4224:
4225: SELECT COUNT(1)
4226: INTO l_to_party_cntr
4227: FROM pos_supplier_uda_merge_gtt

Line 4385: x_return_status := fnd_api.g_ret_sts_unexp_error;

4381: END LOOP; -- end of attribute group loop
4382:
4383: EXCEPTION
4384: WHEN OTHERS THEN
4385: x_return_status := fnd_api.g_ret_sts_unexp_error;
4386: END party_site_uda_merge;
4387:
4388: PROCEDURE enable_party_as_supplier
4389: (

Line 4411: x_return_status := fnd_api.g_ret_sts_success;

4407: l_ven_num_code financials_system_parameters.user_defined_vendor_num_code%TYPE;
4408: l_party_orig_system_ref VARCHAR2(500);
4409:
4410: BEGIN
4411: x_return_status := fnd_api.g_ret_sts_success;
4412:
4413: fnd_file.put_line(fnd_file.log,
4414: 'Inside POS_MERGE_SUPPLIER_PKG.enable_party_as_supplier p_to_fk_id: ' ||
4415: p_to_fk_id || ' p_to_fk_id: ' || p_from_fk_id);

Line 4449: fnd_api.g_false,

4445:
4446: vendor_rec.party_id := p_to_fk_id;
4447:
4448: ap_vendor_pub_pkg.create_vendor(1.0,
4449: fnd_api.g_false,
4450: fnd_api.g_false,
4451: fnd_api.g_valid_level_full,
4452: x_return_status,
4453: l_msg_count,

Line 4450: fnd_api.g_false,

4446: vendor_rec.party_id := p_to_fk_id;
4447:
4448: ap_vendor_pub_pkg.create_vendor(1.0,
4449: fnd_api.g_false,
4450: fnd_api.g_false,
4451: fnd_api.g_valid_level_full,
4452: x_return_status,
4453: l_msg_count,
4454: l_msg_data,

Line 4451: fnd_api.g_valid_level_full,

4447:
4448: ap_vendor_pub_pkg.create_vendor(1.0,
4449: fnd_api.g_false,
4450: fnd_api.g_false,
4451: fnd_api.g_valid_level_full,
4452: x_return_status,
4453: l_msg_count,
4454: l_msg_data,
4455: vendor_rec,

Line 4463: IF x_return_status <> fnd_api.g_ret_sts_success THEN

4459: fnd_file.put_line(fnd_file.log,
4460: 'x_return_status from ap_vendor_pub_pkg.create_vendor: ' ||
4461: x_return_status || ' l_vendor_id: ' || l_vendor_id);
4462:
4463: IF x_return_status <> fnd_api.g_ret_sts_success THEN
4464: fnd_file.put_line(fnd_file.log,
4465: 'No. of Messages: ' || l_msg_count ||
4466: ', Message: ' || l_msg_data ||
4467: ' From ap_vendor_pub_pkg.create_vendor API.');

Line 4476: x_return_status := fnd_api.g_ret_sts_unexp_error;

4472: END IF;
4473:
4474: EXCEPTION
4475: WHEN OTHERS THEN
4476: x_return_status := fnd_api.g_ret_sts_unexp_error;
4477: END enable_party_as_supplier;
4478:
4479: END pos_merge_supplier_pkg;