[Home] [Help]
12:
13: G_LEVEL_PROCEDURE NUMBER := FND_LOG.LEVEL_PROCEDURE;
14: G_RUNTIME_LEVEL NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
15:
16: G_RET_STS_SUCCESS VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
17: G_RET_STS_ERROR VARCHAR2(1) := FND_API.G_RET_STS_ERROR;
18:
19: TYPE selling_price_tbl IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
20: G_SELLING_PRICE_CACHE selling_price_tbl;
13: G_LEVEL_PROCEDURE NUMBER := FND_LOG.LEVEL_PROCEDURE;
14: G_RUNTIME_LEVEL NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
15:
16: G_RET_STS_SUCCESS VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
17: G_RET_STS_ERROR VARCHAR2(1) := FND_API.G_RET_STS_ERROR;
18:
19: TYPE selling_price_tbl IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
20: G_SELLING_PRICE_CACHE selling_price_tbl;
21:
43: );
44:
45: PROCEDURE get_warranty_status
46: (p_api_version IN NUMBER DEFAULT 1.0,
47: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_TRUE,
48: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
49: p_item_ids IN JTF_NUMBER_TABLE,
50: p_serial_nums IN JTF_VARCHAR2_TABLE_100,
51: p_customer_id IN NUMBER,
44:
45: PROCEDURE get_warranty_status
46: (p_api_version IN NUMBER DEFAULT 1.0,
47: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_TRUE,
48: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
49: p_item_ids IN JTF_NUMBER_TABLE,
50: p_serial_nums IN JTF_VARCHAR2_TABLE_100,
51: p_customer_id IN NUMBER,
52: p_account_id IN NUMBER,
71: Fnd_Log.STRING(G_LEVEL_PROCEDURE, lc_api_name,'Begin API');
72: END IF;
73:
74: -- standard check for API compatibility.
75: IF NOT Fnd_Api.Compatible_API_Call
76: (lc_api_version,
77: p_api_version,
78: lc_api_name,
79: G_PKG_NAME)
77: p_api_version,
78: lc_api_name,
79: G_PKG_NAME)
80: THEN
81: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
82: END IF;
83:
84: IF Fnd_Api.to_Boolean(p_init_msg_list) THEN
85: Fnd_Msg_Pub.initialize;
80: THEN
81: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
82: END IF;
83:
84: IF Fnd_Api.to_Boolean(p_init_msg_list) THEN
85: Fnd_Msg_Pub.initialize;
86: END IF;
87:
88: x_return_status := G_RET_STS_SUCCESS;
107: Fnd_Log.STRING(G_LEVEL_PROCEDURE, lc_api_name,'Calling csd_repairs_util.GET_ENTITLEMENTS for item_id = '||p_item_ids(i));
108: END IF;
109: csd_repairs_util.GET_ENTITLEMENTS
110: ( p_api_version_number => 1.0,
111: p_init_msg_list => fnd_api.g_true,
112: p_commit => fnd_api.g_false,
113: p_contract_number => NULL,
114: p_service_line_id => NULL,
115: p_customer_id => p_customer_id,
108: END IF;
109: csd_repairs_util.GET_ENTITLEMENTS
110: ( p_api_version_number => 1.0,
111: p_init_msg_list => fnd_api.g_true,
112: p_commit => fnd_api.g_false,
113: p_contract_number => NULL,
114: p_service_line_id => NULL,
115: p_customer_id => p_customer_id,
116: p_site_id => p_ship_to_site_use_id,
145: END get_warranty_status;
146:
147: PROCEDURE return_parameter_value
148: (p_api_version IN NUMBER DEFAULT 1.0,
149: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_TRUE,
150: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
151: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
152: p_param_code IN VARCHAR2,
153: p_return_type IN NUMBER,
146:
147: PROCEDURE return_parameter_value
148: (p_api_version IN NUMBER DEFAULT 1.0,
149: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_TRUE,
150: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
151: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
152: p_param_code IN VARCHAR2,
153: p_return_type IN NUMBER,
154: p_customer_id IN NUMBER,
147: PROCEDURE return_parameter_value
148: (p_api_version IN NUMBER DEFAULT 1.0,
149: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_TRUE,
150: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
151: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
152: p_param_code IN VARCHAR2,
153: p_return_type IN NUMBER,
154: p_customer_id IN NUMBER,
155: p_bill_to_site_use_id IN NUMBER,
173: Fnd_Log.STRING(G_LEVEL_PROCEDURE, lc_api_name,'Begin API');
174: END IF;
175:
176: -- standard check for API compatibility.
177: IF NOT Fnd_Api.Compatible_API_Call
178: (lc_api_version,
179: p_api_version,
180: lc_api_name,
181: G_PKG_NAME)
179: p_api_version,
180: lc_api_name,
181: G_PKG_NAME)
182: THEN
183: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
184: END IF;
185:
186: IF Fnd_Api.to_Boolean(p_init_msg_list) THEN
187: Fnd_Msg_Pub.initialize;
182: THEN
183: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
184: END IF;
185:
186: IF Fnd_Api.to_Boolean(p_init_msg_list) THEN
187: Fnd_Msg_Pub.initialize;
188: END IF;
189:
190: x_return_status := G_RET_STS_SUCCESS;
215: CSD_PARAMETER_EFFECTIVITY_PVT.PARAMETER_VALUE
216: (p_api_version => 1.0,
217: p_init_msg_list => p_init_msg_list,
218: p_commit => p_commit,
219: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
220: p_param_id => l_param_id,
221: p_rule_input_rec => l_rule_input_rec,
222: x_param_value => x_param_value,
223: x_return_status => x_return_status,
228: END return_parameter_value;
229:
230: PROCEDURE get_estimated_price
231: (p_api_version IN NUMBER DEFAULT 1.0,
232: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_TRUE,
233: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
234: p_item_ids IN JTF_NUMBER_TABLE,
235: p_contract_ids IN JTF_NUMBER_TABLE,
236: p_contract_line_ids IN JTF_NUMBER_TABLE,
229:
230: PROCEDURE get_estimated_price
231: (p_api_version IN NUMBER DEFAULT 1.0,
232: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_TRUE,
233: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
234: p_item_ids IN JTF_NUMBER_TABLE,
235: p_contract_ids IN JTF_NUMBER_TABLE,
236: p_contract_line_ids IN JTF_NUMBER_TABLE,
237: p_repair_type_ids IN JTF_NUMBER_TABLE,
362: Fnd_Log.STRING(G_LEVEL_PROCEDURE, lc_api_name,'Begin API');
363: END IF;
364:
365: -- standard check for API compatibility.
366: IF NOT Fnd_Api.Compatible_API_Call
367: (lc_api_version,
368: p_api_version,
369: lc_api_name,
370: G_PKG_NAME)
368: p_api_version,
369: lc_api_name,
370: G_PKG_NAME)
371: THEN
372: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
373: END IF;
374:
375: IF Fnd_Api.to_Boolean(p_init_msg_list) THEN
376: Fnd_Msg_Pub.initialize;
371: THEN
372: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
373: END IF;
374:
375: IF Fnd_Api.to_Boolean(p_init_msg_list) THEN
376: Fnd_Msg_Pub.initialize;
377: END IF;
378:
379: x_return_status := G_RET_STS_SUCCESS;
582: END get_estimated_price;
583:
584: PROCEDURE process_credit_card
585: (p_api_version IN NUMBER DEFAULT 1.0,
586: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_TRUE,
587: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
588: p_cc_number IN VARCHAR2,
589: p_cch_name IN VARCHAR2,
590: p_expiry_date IN DATE,
583:
584: PROCEDURE process_credit_card
585: (p_api_version IN NUMBER DEFAULT 1.0,
586: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_TRUE,
587: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
588: p_cc_number IN VARCHAR2,
589: p_cch_name IN VARCHAR2,
590: p_expiry_date IN DATE,
591: p_card_issuer_code IN VARCHAR2,
594: p_bill_to_site_use_id IN NUMBER,
595: p_ship_to_site_use_id IN NUMBER,
596: p_amount IN NUMBER,
597: p_currency_code IN VARCHAR2,
598: p_authorize_flag IN VARCHAR2 DEFAULT FND_API.G_FALSE,
599: p_create_txn_extn_flag IN VARCHAR2 DEFAULT FND_API.G_FALSE,
600: p_add_instr_asgn_flag IN VARCHAR2 DEFAULT FND_API.G_FALSE,
601: p_order_id IN VARCHAR2,
602: x_instr_id OUT NOCOPY NUMBER,
595: p_ship_to_site_use_id IN NUMBER,
596: p_amount IN NUMBER,
597: p_currency_code IN VARCHAR2,
598: p_authorize_flag IN VARCHAR2 DEFAULT FND_API.G_FALSE,
599: p_create_txn_extn_flag IN VARCHAR2 DEFAULT FND_API.G_FALSE,
600: p_add_instr_asgn_flag IN VARCHAR2 DEFAULT FND_API.G_FALSE,
601: p_order_id IN VARCHAR2,
602: x_instr_id OUT NOCOPY NUMBER,
603: x_txn_id OUT NOCOPY NUMBER,
596: p_amount IN NUMBER,
597: p_currency_code IN VARCHAR2,
598: p_authorize_flag IN VARCHAR2 DEFAULT FND_API.G_FALSE,
599: p_create_txn_extn_flag IN VARCHAR2 DEFAULT FND_API.G_FALSE,
600: p_add_instr_asgn_flag IN VARCHAR2 DEFAULT FND_API.G_FALSE,
601: p_order_id IN VARCHAR2,
602: x_instr_id OUT NOCOPY NUMBER,
603: x_txn_id OUT NOCOPY NUMBER,
604: x_authorized_flag OUT NOCOPY VARCHAR2,
636: Fnd_Log.STRING(G_LEVEL_PROCEDURE, lc_api_name,'Begin API');
637: END IF;
638:
639: -- standard check for API compatibility.
640: IF NOT Fnd_Api.Compatible_API_Call
641: (lc_api_version,
642: p_api_version,
643: lc_api_name,
644: G_PKG_NAME)
642: p_api_version,
643: lc_api_name,
644: G_PKG_NAME)
645: THEN
646: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
647: END IF;
648:
649: IF Fnd_Api.to_Boolean(p_init_msg_list) THEN
650: Fnd_Msg_Pub.initialize;
645: THEN
646: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
647: END IF;
648:
649: IF Fnd_Api.to_Boolean(p_init_msg_list) THEN
650: Fnd_Msg_Pub.initialize;
651: END IF;
652:
653: x_return_status := G_RET_STS_SUCCESS;
698: x_msg_count => x_msg_count,
699: x_msg_data => x_msg
700: );
701:
702: IF x_return_status <> fnd_api.g_ret_sts_success
703: THEN
704: IF (G_LEVEL_PROCEDURE >= G_RUNTIME_LEVEL) THEN
705: Fnd_Log.STRING(G_LEVEL_PROCEDURE, lc_api_name,'Error in creating default customer account site.');
706: END IF;
703: THEN
704: IF (G_LEVEL_PROCEDURE >= G_RUNTIME_LEVEL) THEN
705: Fnd_Log.STRING(G_LEVEL_PROCEDURE, lc_api_name,'Error in creating default customer account site.');
706: END IF;
707: RAISE fnd_api.g_exc_error;
708: END IF;
709: IF (G_LEVEL_PROCEDURE >= G_RUNTIME_LEVEL) THEN
710: Fnd_Log.STRING(G_LEVEL_PROCEDURE, lc_api_name,'Returned from hz_cust_account_site_v2pub.create_cust_acct_site.');
711: Fnd_Log.STRING(G_LEVEL_PROCEDURE, lc_api_name,'Status:'||x_return_status);
727: hz_cust_account_site_v2pub.create_cust_site_use
728: (p_init_msg_list => p_init_msg_list,
729: p_cust_site_use_rec => l_cust_site_use_rec,
730: p_customer_profile_rec => l_cust_profile_rec,
731: p_create_profile => fnd_api.g_false,
732: x_return_status => x_return_status,
733: x_msg_count => x_msg_count,
734: x_msg_data => x_msg,
735: x_site_use_id => x_acct_site_use_id
734: x_msg_data => x_msg,
735: x_site_use_id => x_acct_site_use_id
736: );
737:
738: IF x_return_status <> fnd_api.g_ret_sts_success
739: THEN
740: IF (G_LEVEL_PROCEDURE >= G_RUNTIME_LEVEL) THEN
741: Fnd_Log.STRING(G_LEVEL_PROCEDURE, lc_api_name,'Error in creating default customer account site use.');
742: END IF;
739: THEN
740: IF (G_LEVEL_PROCEDURE >= G_RUNTIME_LEVEL) THEN
741: Fnd_Log.STRING(G_LEVEL_PROCEDURE, lc_api_name,'Error in creating default customer account site use.');
742: END IF;
743: RAISE fnd_api.g_exc_error;
744: END IF;
745: l_payer_context_rec.account_site_id := x_acct_site_use_id;
746: END;
747:
760: x_payer_attribs_id => x_payer_attrib_id,
761: x_response => x_result_rec_type
762: );
763:
764: IF x_return_status <> fnd_api.g_ret_sts_success
765: THEN
766: x_msg := x_result_rec_type.result_message;
767: x_return_status := fnd_api.g_ret_sts_error;
768: IF (G_LEVEL_PROCEDURE >= G_RUNTIME_LEVEL) THEN
763:
764: IF x_return_status <> fnd_api.g_ret_sts_success
765: THEN
766: x_msg := x_result_rec_type.result_message;
767: x_return_status := fnd_api.g_ret_sts_error;
768: IF (G_LEVEL_PROCEDURE >= G_RUNTIME_LEVEL) THEN
769: Fnd_Log.STRING(G_LEVEL_PROCEDURE, lc_api_name,'Card registration failed. The message is:'||x_msg);
770: END IF;
771: RAISE fnd_api.g_exc_error;
767: x_return_status := fnd_api.g_ret_sts_error;
768: IF (G_LEVEL_PROCEDURE >= G_RUNTIME_LEVEL) THEN
769: Fnd_Log.STRING(G_LEVEL_PROCEDURE, lc_api_name,'Card registration failed. The message is:'||x_msg);
770: END IF;
771: RAISE fnd_api.g_exc_error;
772: END IF;
773:
774: -- register the credit card.
775: l_creditcard_rec.card_holder_name := p_cch_name;
786: -- authorization API, the IBY code requires us to commit the card details.
787: Create_Card
788: (p_api_version => 1.0,
789: p_init_msg_list => p_init_msg_list,
790: p_commit => fnd_api.g_true,
791: x_return_status => x_return_Status,
792: x_msg_count => x_msg_count,
793: x_msg_data => x_msg,
794: p_card_instrument => l_creditcard_rec,
795: x_card_id => x_instr_id,
796: x_response => x_result_rec_type
797: );
798:
799: IF x_return_status <> fnd_api.g_ret_sts_success
800: THEN
801: x_msg := x_result_rec_type.result_message;
802: x_return_status := fnd_api.g_ret_sts_error;
803: IF (G_LEVEL_PROCEDURE >= G_RUNTIME_LEVEL) THEN
798:
799: IF x_return_status <> fnd_api.g_ret_sts_success
800: THEN
801: x_msg := x_result_rec_type.result_message;
802: x_return_status := fnd_api.g_ret_sts_error;
803: IF (G_LEVEL_PROCEDURE >= G_RUNTIME_LEVEL) THEN
804: Fnd_Log.STRING(G_LEVEL_PROCEDURE, lc_api_name,'Card registration failed. Message:'||x_result_rec_type.result_message);
805: END IF;
806: RAISE fnd_api.g_exc_error;
802: x_return_status := fnd_api.g_ret_sts_error;
803: IF (G_LEVEL_PROCEDURE >= G_RUNTIME_LEVEL) THEN
804: Fnd_Log.STRING(G_LEVEL_PROCEDURE, lc_api_name,'Card registration failed. Message:'||x_result_rec_type.result_message);
805: END IF;
806: RAISE fnd_api.g_exc_error;
807: END IF;
808:
809: -- create an assignment between the instr and payer.
810: l_Instrument_rec.instrument_id := x_instr_id;
830: x_assign_id => x_assign_id,
831: x_response => x_result_rec_type
832: );
833:
834: IF x_return_status <> fnd_api.g_ret_sts_success
835: THEN
836: x_msg := x_result_rec_type.result_message;
837: x_return_status := fnd_api.g_ret_sts_error;
838: IF (G_LEVEL_PROCEDURE >= G_RUNTIME_LEVEL) THEN
833:
834: IF x_return_status <> fnd_api.g_ret_sts_success
835: THEN
836: x_msg := x_result_rec_type.result_message;
837: x_return_status := fnd_api.g_ret_sts_error;
838: IF (G_LEVEL_PROCEDURE >= G_RUNTIME_LEVEL) THEN
839: Fnd_Log.STRING(G_LEVEL_PROCEDURE, lc_api_name,'Error in adding instrument assignment. Message is:'||x_result_rec_type.result_message);
840: END IF;
841: RAISE fnd_api.g_exc_error;
837: x_return_status := fnd_api.g_ret_sts_error;
838: IF (G_LEVEL_PROCEDURE >= G_RUNTIME_LEVEL) THEN
839: Fnd_Log.STRING(G_LEVEL_PROCEDURE, lc_api_name,'Error in adding instrument assignment. Message is:'||x_result_rec_type.result_message);
840: END IF;
841: RAISE fnd_api.g_exc_error;
842: END IF;
843:
844: IF p_authorize_flag = fnd_api.g_true
845: THEN
840: END IF;
841: RAISE fnd_api.g_exc_error;
842: END IF;
843:
844: IF p_authorize_flag = fnd_api.g_true
845: THEN
846: -- create a transaction extension
847: l_TrxnExtension_rec.order_id := p_order_id;
848: l_TrxnExtension_rec.originating_application_id := 512;
865: x_entity_id => x_transaction_id,
866: x_response => x_result_rec_type
867: );
868:
869: IF x_return_status <> fnd_api.g_ret_sts_success
870: THEN
871: x_msg := x_result_rec_type.result_message;
872: x_return_status := fnd_api.g_ret_sts_error;
873: IF (G_LEVEL_PROCEDURE >= G_RUNTIME_LEVEL) THEN
868:
869: IF x_return_status <> fnd_api.g_ret_sts_success
870: THEN
871: x_msg := x_result_rec_type.result_message;
872: x_return_status := fnd_api.g_ret_sts_error;
873: IF (G_LEVEL_PROCEDURE >= G_RUNTIME_LEVEL) THEN
874: Fnd_Log.STRING(G_LEVEL_PROCEDURE, lc_api_name,'Error while creating the transaction extension. Message is:'||x_result_rec_type.result_message);
875: END IF;
876: RAISE fnd_api.g_exc_error;
872: x_return_status := fnd_api.g_ret_sts_error;
873: IF (G_LEVEL_PROCEDURE >= G_RUNTIME_LEVEL) THEN
874: Fnd_Log.STRING(G_LEVEL_PROCEDURE, lc_api_name,'Error while creating the transaction extension. Message is:'||x_result_rec_type.result_message);
875: END IF;
876: RAISE fnd_api.g_exc_error;
877: END IF;
878: -- we need to authorize the payment.
879: -- step 1. prepare the amount rec.
880: -- if the amount is zero, then we need to pass a minimum amount for the autorization API.
914: x_auth_result => x_authresult_rec,
915: x_response => x_result_rec_type
916: );
917:
918: IF x_return_status <> fnd_api.g_ret_sts_success
919: THEN
920: x_msg := x_authresult_rec.paymentsys_msg;
921: x_return_status := fnd_api.g_ret_sts_error;
922: IF (G_LEVEL_PROCEDURE >= G_RUNTIME_LEVEL) THEN
917:
918: IF x_return_status <> fnd_api.g_ret_sts_success
919: THEN
920: x_msg := x_authresult_rec.paymentsys_msg;
921: x_return_status := fnd_api.g_ret_sts_error;
922: IF (G_LEVEL_PROCEDURE >= G_RUNTIME_LEVEL) THEN
923: Fnd_Log.STRING(G_LEVEL_PROCEDURE, lc_api_name,'Error in creating the authorization. Message is:'||x_msg);
924: END IF;
925: RAISE fnd_api.g_exc_error;
921: x_return_status := fnd_api.g_ret_sts_error;
922: IF (G_LEVEL_PROCEDURE >= G_RUNTIME_LEVEL) THEN
923: Fnd_Log.STRING(G_LEVEL_PROCEDURE, lc_api_name,'Error in creating the authorization. Message is:'||x_msg);
924: END IF;
925: RAISE fnd_api.g_exc_error;
926: END IF;
927: x_authorized_flag := fnd_api.g_true;
928: INSERT INTO csd_cc_trxn_xref(instrument_id,transaction_id,creation_date,created_by,last_updated_by,last_update_date,last_update_login)
929: VALUES
923: Fnd_Log.STRING(G_LEVEL_PROCEDURE, lc_api_name,'Error in creating the authorization. Message is:'||x_msg);
924: END IF;
925: RAISE fnd_api.g_exc_error;
926: END IF;
927: x_authorized_flag := fnd_api.g_true;
928: INSERT INTO csd_cc_trxn_xref(instrument_id,transaction_id,creation_date,created_by,last_updated_by,last_update_date,last_update_login)
929: VALUES
930: (x_instr_id,
931: x_transaction_id,
936: fnd_global.login_id
937: );
938: END IF;
939: x_txn_id := x_transaction_id;
940: IF (fnd_api.to_boolean(p_commit))
941: THEN
942: COMMIT WORK;
943: END IF;
944:
942: COMMIT WORK;
943: END IF;
944:
945: EXCEPTION
946: WHEN fnd_api.g_exc_error THEN
947: ROLLBACK TO process_credit_card;
948: WHEN OTHERS THEN
949: x_return_status := g_ret_sts_error;
950: ROLLBACK TO process_credit_card;
951: END process_credit_card;
952:
953: PROCEDURE create_address
954: (p_api_version IN NUMBER DEFAULT 1.0,
955: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_TRUE,
956: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
957: p_party_id IN VARCHAR2,
958: p_site_use_type IN VARCHAR2,
959: p_country IN VARCHAR2,
952:
953: PROCEDURE create_address
954: (p_api_version IN NUMBER DEFAULT 1.0,
955: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_TRUE,
956: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
957: p_party_id IN VARCHAR2,
958: p_site_use_type IN VARCHAR2,
959: p_country IN VARCHAR2,
960: p_address1 IN VARCHAR2,
990: Fnd_Log.STRING(G_LEVEL_PROCEDURE, lc_api_name,'Begin API');
991: END IF;
992:
993: -- standard check for API compatibility.
994: IF NOT Fnd_Api.Compatible_API_Call
995: (lc_api_version,
996: p_api_version,
997: lc_api_name,
998: G_PKG_NAME)
996: p_api_version,
997: lc_api_name,
998: G_PKG_NAME)
999: THEN
1000: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1001: END IF;
1002:
1003: IF Fnd_Api.to_Boolean(p_init_msg_list) THEN
1004: Fnd_Msg_Pub.initialize;
999: THEN
1000: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1001: END IF;
1002:
1003: IF Fnd_Api.to_Boolean(p_init_msg_list) THEN
1004: Fnd_Msg_Pub.initialize;
1005: END IF;
1006:
1007: x_return_status := G_RET_STS_SUCCESS;
1044: IF (G_LEVEL_PROCEDURE >= G_RUNTIME_LEVEL) THEN
1045: Fnd_Log.STRING(G_LEVEL_PROCEDURE, lc_api_name,'Returned from HZ_LOCATION_V2PUB.create_location');
1046: END IF;
1047:
1048: IF x_return_status <> fnd_api.g_ret_sts_success
1049: THEN
1050: IF (G_LEVEL_PROCEDURE >= G_RUNTIME_LEVEL) THEN
1051: Fnd_Log.STRING(G_LEVEL_PROCEDURE, lc_api_name,'Error while creating the location. The error message is:'||x_msg_data);
1052: END IF;
1049: THEN
1050: IF (G_LEVEL_PROCEDURE >= G_RUNTIME_LEVEL) THEN
1051: Fnd_Log.STRING(G_LEVEL_PROCEDURE, lc_api_name,'Error while creating the location. The error message is:'||x_msg_data);
1052: END IF;
1053: RAISE fnd_api.g_exc_error;
1054: END IF;
1055: IF (G_LEVEL_PROCEDURE >= G_RUNTIME_LEVEL) THEN
1056: Fnd_Log.STRING(G_LEVEL_PROCEDURE, lc_api_name,'Successfully created the location. The location id is ='||x_location_id);
1057: END IF;
1086: IF (G_LEVEL_PROCEDURE >= G_RUNTIME_LEVEL) THEN
1087: Fnd_Log.STRING(G_LEVEL_PROCEDURE, lc_api_name,'Returned from HZ_PARTY_SITE_V2PUB.create_party_site');
1088: END IF;
1089:
1090: IF x_return_status <> fnd_api.g_ret_sts_success
1091: THEN
1092: IF (G_LEVEL_PROCEDURE >= G_RUNTIME_LEVEL) THEN
1093: Fnd_Log.STRING(G_LEVEL_PROCEDURE, lc_api_name,'Error while creating the party site. The error message is:'||x_msg_data);
1094: END IF;
1091: THEN
1092: IF (G_LEVEL_PROCEDURE >= G_RUNTIME_LEVEL) THEN
1093: Fnd_Log.STRING(G_LEVEL_PROCEDURE, lc_api_name,'Error while creating the party site. The error message is:'||x_msg_data);
1094: END IF;
1095: RAISE fnd_api.g_exc_error;
1096: END IF;
1097: IF (G_LEVEL_PROCEDURE >= G_RUNTIME_LEVEL) THEN
1098: Fnd_Log.STRING(G_LEVEL_PROCEDURE, lc_api_name,'Successfully created the party site. The site id is ='||x_party_site_id);
1099: END IF;
1121: x_msg_count => x_msg_count,
1122: x_msg_data => x_msg_data
1123: );
1124:
1125: IF x_return_status <> fnd_api.g_ret_sts_success
1126: THEN
1127: IF (G_LEVEL_PROCEDURE >= G_RUNTIME_LEVEL) THEN
1128: Fnd_Log.STRING(G_LEVEL_PROCEDURE, lc_api_name,'Error while creating the party site use. The error message is:'||x_msg_data);
1129: END IF;
1126: THEN
1127: IF (G_LEVEL_PROCEDURE >= G_RUNTIME_LEVEL) THEN
1128: Fnd_Log.STRING(G_LEVEL_PROCEDURE, lc_api_name,'Error while creating the party site use. The error message is:'||x_msg_data);
1129: END IF;
1130: RAISE fnd_api.g_exc_error;
1131: END IF;
1132: IF (G_LEVEL_PROCEDURE >= G_RUNTIME_LEVEL) THEN
1133: Fnd_Log.STRING(G_LEVEL_PROCEDURE, lc_api_name,'Successfully created the party site. The site use id is ='||x_party_site_use_id);
1134: END IF;
1133: Fnd_Log.STRING(G_LEVEL_PROCEDURE, lc_api_name,'Successfully created the party site. The site use id is ='||x_party_site_use_id);
1134: END IF;
1135: END IF;
1136:
1137: IF fnd_api.to_boolean(p_commit)
1138: THEN
1139: COMMIT WORK;
1140: END IF;
1141: EXCEPTION
1138: THEN
1139: COMMIT WORK;
1140: END IF;
1141: EXCEPTION
1142: WHEN fnd_api.g_exc_error THEN
1143: ROLLBACK TO create_address;
1144: x_return_status := fnd_api.g_ret_sts_error;
1145: END create_address;
1146:
1140: END IF;
1141: EXCEPTION
1142: WHEN fnd_api.g_exc_error THEN
1143: ROLLBACK TO create_address;
1144: x_return_status := fnd_api.g_ret_sts_error;
1145: END create_address;
1146:
1147: PROCEDURE process_returns
1148: (p_api_version IN NUMBER DEFAULT 1.0,
1145: END create_address;
1146:
1147: PROCEDURE process_returns
1148: (p_api_version IN NUMBER DEFAULT 1.0,
1149: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_TRUE,
1150: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1151: p_party_id IN NUMBER,
1152: p_account_id IN NUMBER,
1153: p_item_ids IN JTF_NUMBER_TABLE,
1146:
1147: PROCEDURE process_returns
1148: (p_api_version IN NUMBER DEFAULT 1.0,
1149: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_TRUE,
1150: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1151: p_party_id IN NUMBER,
1152: p_account_id IN NUMBER,
1153: p_item_ids IN JTF_NUMBER_TABLE,
1154: p_contract_ids IN JTF_NUMBER_TABLE,
1376: Fnd_Log.STRING(G_LEVEL_PROCEDURE, lc_api_name,'Begin process_returns API');
1377: END IF;
1378:
1379: -- standard check for API compatibility.
1380: IF NOT Fnd_Api.Compatible_API_Call
1381: (lc_api_version,
1382: p_api_version,
1383: lc_api_name,
1384: G_PKG_NAME)
1382: p_api_version,
1383: lc_api_name,
1384: G_PKG_NAME)
1385: THEN
1386: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1387: END IF;
1388:
1389: IF Fnd_Api.to_Boolean(p_init_msg_list)
1390: THEN
1385: THEN
1386: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1387: END IF;
1388:
1389: IF Fnd_Api.to_Boolean(p_init_msg_list)
1390: THEN
1391: Fnd_Msg_Pub.initialize;
1392: END IF;
1393:
1391: Fnd_Msg_Pub.initialize;
1392: END IF;
1393:
1394: -- init the return status.
1395: x_return_status := fnd_api.g_ret_sts_success;
1396:
1397: -- the API will create one service request per return request.
1398: IF (G_LEVEL_PROCEDURE >= G_RUNTIME_LEVEL) THEN
1399: Fnd_Log.STRING(G_LEVEL_PROCEDURE, lc_api_name,'Initializing the SR rec');
1527:
1528: -- call to user hook procedure.
1529: CSD_RETURNS_CUHK.before_sr_creation
1530: (p_api_version => 1.0,
1531: p_commit => fnd_api.g_false,
1532: p_init_msg_list => fnd_api.g_true,
1533: p_service_req_rec => l_service_request_rec,
1534: x_return_status => x_return_status,
1535: x_msg_count => x_msg_count,
1528: -- call to user hook procedure.
1529: CSD_RETURNS_CUHK.before_sr_creation
1530: (p_api_version => 1.0,
1531: p_commit => fnd_api.g_false,
1532: p_init_msg_list => fnd_api.g_true,
1533: p_service_req_rec => l_service_request_rec,
1534: x_return_status => x_return_status,
1535: x_msg_count => x_msg_count,
1536: x_msg_data => x_msg_data
1537: );
1538: -- Call the Service Request API
1539: CSD_PROCESS_PVT.process_service_request
1540: (p_api_version => 1.0,
1541: p_commit => fnd_api.g_false,
1542: p_init_msg_list => fnd_api.g_true,
1543: p_validation_level => fnd_api.g_valid_level_full,
1544: p_action => 'CREATE',
1545: p_incident_id => NULL,
1538: -- Call the Service Request API
1539: CSD_PROCESS_PVT.process_service_request
1540: (p_api_version => 1.0,
1541: p_commit => fnd_api.g_false,
1542: p_init_msg_list => fnd_api.g_true,
1543: p_validation_level => fnd_api.g_valid_level_full,
1544: p_action => 'CREATE',
1545: p_incident_id => NULL,
1546: p_service_request_rec => l_service_request_rec,
1539: CSD_PROCESS_PVT.process_service_request
1540: (p_api_version => 1.0,
1541: p_commit => fnd_api.g_false,
1542: p_init_msg_list => fnd_api.g_true,
1543: p_validation_level => fnd_api.g_valid_level_full,
1544: p_action => 'CREATE',
1545: p_incident_id => NULL,
1546: p_service_request_rec => l_service_request_rec,
1547: p_notes_tbl => l_sr_notes_tbl,
1551: x_msg_count => x_msg_count,
1552: x_msg_data => x_msg_data
1553: );
1554:
1555: IF NOT x_return_status = FND_API.G_RET_STS_SUCCESS
1556: THEN
1557: -- need to present a good error message to the web user. set it here. To do.
1558: IF (G_LEVEL_PROCEDURE >= G_RUNTIME_LEVEL) THEN
1559: Fnd_Log.STRING(G_LEVEL_PROCEDURE, lc_api_name,'Error in SR creation. Error msg is = '||x_msg_data);
1557: -- need to present a good error message to the web user. set it here. To do.
1558: IF (G_LEVEL_PROCEDURE >= G_RUNTIME_LEVEL) THEN
1559: Fnd_Log.STRING(G_LEVEL_PROCEDURE, lc_api_name,'Error in SR creation. Error msg is = '||x_msg_data);
1560: END IF;
1561: RAISE FND_API.G_EXC_ERROR;
1562: END IF;
1563: IF (G_LEVEL_PROCEDURE >= G_RUNTIME_LEVEL) THEN
1564: Fnd_Log.STRING(G_LEVEL_PROCEDURE, lc_api_name,'Created the SR, incident id = '||x_incident_id);
1565: END IF;
1565: END IF;
1566: -- call to user hook procedure.
1567: CSD_RETURNS_CUHK.after_sr_creation
1568: (p_api_version => 1.0,
1569: p_commit => fnd_api.g_false,
1570: p_init_msg_list => fnd_api.g_true,
1571: p_incident_id => x_incident_id,
1572: x_return_status => x_return_status,
1573: x_msg_count => x_msg_count,
1566: -- call to user hook procedure.
1567: CSD_RETURNS_CUHK.after_sr_creation
1568: (p_api_version => 1.0,
1569: p_commit => fnd_api.g_false,
1570: p_init_msg_list => fnd_api.g_true,
1571: p_incident_id => x_incident_id,
1572: x_return_status => x_return_status,
1573: x_msg_count => x_msg_count,
1574: x_msg_data => x_msg_data
1666: p_instance_id => x_instance_id,
1667: p_relationship_type => l_crt_inst_party_relation
1668: );
1669:
1670: IF x_return_status <> fnd_api.g_ret_sts_success
1671: THEN
1672: RAISE fnd_api.g_exc_error;
1673: END IF;
1674:
1668: );
1669:
1670: IF x_return_status <> fnd_api.g_ret_sts_success
1671: THEN
1672: RAISE fnd_api.g_exc_error;
1673: END IF;
1674:
1675: ELSIF l_current_party_id <> p_party_id AND (l_crt_inst_party_relation IS NULL AND l_relationship IS NULL)
1676: THEN
1708: x_msg_data => x_msg_data,
1709: x_tca_relation_id => x_tca_relation_id
1710: );
1711:
1712: IF x_return_status <> fnd_api.g_ret_sts_success
1713: THEN
1714: IF (G_LEVEL_PROCEDURE >= G_RUNTIME_LEVEL) THEN
1715: Fnd_Log.STRING(G_LEVEL_PROCEDURE, lc_api_name,'Error in change owner. Message is: '||x_msg_data);
1716: END IF;
1713: THEN
1714: IF (G_LEVEL_PROCEDURE >= G_RUNTIME_LEVEL) THEN
1715: Fnd_Log.STRING(G_LEVEL_PROCEDURE, lc_api_name,'Error in change owner. Message is: '||x_msg_data);
1716: END IF;
1717: RAISE fnd_api.g_exc_error;
1718: END IF;
1719: END IF;
1720: END IF;
1721: END IF;
1760: l_instance_rec.item_revision := NULL;
1761: l_instance_rec.external_reference := NULL;
1762: csd_mass_rcv_pvt.create_item_instance
1763: (p_api_version => 1.0,
1764: p_init_msg_list => fnd_api.g_false,
1765: p_commit => fnd_api.g_false,
1766: p_validation_level => fnd_api.g_valid_level_full,
1767: x_return_status => x_return_status,
1768: x_msg_count => x_msg_count,
1761: l_instance_rec.external_reference := NULL;
1762: csd_mass_rcv_pvt.create_item_instance
1763: (p_api_version => 1.0,
1764: p_init_msg_list => fnd_api.g_false,
1765: p_commit => fnd_api.g_false,
1766: p_validation_level => fnd_api.g_valid_level_full,
1767: x_return_status => x_return_status,
1768: x_msg_count => x_msg_count,
1769: x_msg_data => x_msg_data,
1762: csd_mass_rcv_pvt.create_item_instance
1763: (p_api_version => 1.0,
1764: p_init_msg_list => fnd_api.g_false,
1765: p_commit => fnd_api.g_false,
1766: p_validation_level => fnd_api.g_valid_level_full,
1767: x_return_status => x_return_status,
1768: x_msg_count => x_msg_count,
1769: x_msg_data => x_msg_data,
1770: px_instance_rec => l_instance_rec,
1770: px_instance_rec => l_instance_rec,
1771: x_instance_id => x_instance_id
1772: );
1773:
1774: IF x_return_status <> fnd_api.g_ret_sts_success
1775: THEN
1776: IF (G_LEVEL_PROCEDURE >= G_RUNTIME_LEVEL) THEN
1777: Fnd_Log.STRING(G_LEVEL_PROCEDURE, lc_api_name,'Error in csd_mass_rcv_pvt.create_item_instance. Message is: '||x_msg_data);
1778: END IF;
1775: THEN
1776: IF (G_LEVEL_PROCEDURE >= G_RUNTIME_LEVEL) THEN
1777: Fnd_Log.STRING(G_LEVEL_PROCEDURE, lc_api_name,'Error in csd_mass_rcv_pvt.create_item_instance. Message is: '||x_msg_data);
1778: END IF;
1779: RAISE fnd_api.g_exc_error;
1780: END IF;
1781:
1782: END IF;
1783: END IF;
1824: l_repln_rec.status := 'D';
1825: ELSE
1826: l_repln_rec.status := 'O';
1827: END IF;
1828: l_repln_rec.inventory_org_id := fnd_api.g_miss_num;
1829: l_repln_rec.resource_group := fnd_api.g_miss_num;
1830: l_repln_rec.ro_priority_code := fnd_api.g_miss_char;
1831: l_repln_rec.resource_id := fnd_api.g_miss_num;
1832: l_repln_rec.incident_id := x_incident_id;
1825: ELSE
1826: l_repln_rec.status := 'O';
1827: END IF;
1828: l_repln_rec.inventory_org_id := fnd_api.g_miss_num;
1829: l_repln_rec.resource_group := fnd_api.g_miss_num;
1830: l_repln_rec.ro_priority_code := fnd_api.g_miss_char;
1831: l_repln_rec.resource_id := fnd_api.g_miss_num;
1832: l_repln_rec.incident_id := x_incident_id;
1833: l_repln_rec.customer_product_id := x_instance_id;
1826: l_repln_rec.status := 'O';
1827: END IF;
1828: l_repln_rec.inventory_org_id := fnd_api.g_miss_num;
1829: l_repln_rec.resource_group := fnd_api.g_miss_num;
1830: l_repln_rec.ro_priority_code := fnd_api.g_miss_char;
1831: l_repln_rec.resource_id := fnd_api.g_miss_num;
1832: l_repln_rec.incident_id := x_incident_id;
1833: l_repln_rec.customer_product_id := x_instance_id;
1834: l_repln_rec.repair_type_id := p_repair_type_ids(i);
1827: END IF;
1828: l_repln_rec.inventory_org_id := fnd_api.g_miss_num;
1829: l_repln_rec.resource_group := fnd_api.g_miss_num;
1830: l_repln_rec.ro_priority_code := fnd_api.g_miss_char;
1831: l_repln_rec.resource_id := fnd_api.g_miss_num;
1832: l_repln_rec.incident_id := x_incident_id;
1833: l_repln_rec.customer_product_id := x_instance_id;
1834: l_repln_rec.repair_type_id := p_repair_type_ids(i);
1835: l_repln_rec.repair_group_id := null;
1897: CSD_REPAIRS_PVT.Create_Repair_Order
1898: (p_api_version_number => 1.0,
1899: p_commit => p_commit,
1900: p_init_msg_list => p_init_msg_list,
1901: p_validation_level => fnd_api.g_valid_level_full,
1902: p_repair_line_id => x_repair_line_id,
1903: p_Repln_Rec => l_repln_rec,
1904: x_repair_line_id => x_repair_line_id,
1905: x_repair_number => x_repair_number,
1907: x_msg_count => x_msg_count,
1908: x_msg_data => x_msg_data
1909: );
1910:
1911: IF x_return_status <> fnd_api.g_ret_sts_success
1912: THEN
1913: IF (G_LEVEL_PROCEDURE >= G_RUNTIME_LEVEL) THEN
1914: Fnd_Log.STRING(G_LEVEL_PROCEDURE, lc_api_name,'Error in CSD_REPAIRS_PVT.Create_Repair_Order. Message is: '||x_msg_data);
1915: END IF;
1912: THEN
1913: IF (G_LEVEL_PROCEDURE >= G_RUNTIME_LEVEL) THEN
1914: Fnd_Log.STRING(G_LEVEL_PROCEDURE, lc_api_name,'Error in CSD_REPAIRS_PVT.Create_Repair_Order. Message is: '||x_msg_data);
1915: END IF;
1916: RAISE fnd_api.g_exc_error;
1917: END IF;
1918:
1919: CSD_RETURNS_CUHK.after_repair_order
1920: (p_api_version => 1.0,
1931: CSD_RO_BULLETINS_PVT.LINK_BULLETINS_TO_RO
1932: (p_api_version_number => 1.0,
1933: p_init_msg_list => p_init_msg_list,
1934: p_commit => p_commit,
1935: p_validation_level => fnd_api.g_valid_level_full,
1936: p_repair_line_id => x_repair_line_id,
1937: px_ro_sc_ids_tbl => l_ro_sc_ids_tbl,
1938: x_return_status => x_return_status,
1939: x_msg_count => x_msg_count,
2026: x_msg_count => x_msg_count,
2027: x_msg_data => x_msg_data
2028: );
2029:
2030: IF x_return_status <> fnd_api.g_ret_sts_success
2031: THEN
2032: RAISE fnd_api.g_exc_error;
2033: END IF;
2034:
2028: );
2029:
2030: IF x_return_status <> fnd_api.g_ret_sts_success
2031: THEN
2032: RAISE fnd_api.g_exc_error;
2033: END IF;
2034:
2035: -- create the estimate lines.
2036: l_estimate_lines_rec.repair_line_id := x_repair_line_id;
2249: x_msg_count => x_msg_count,
2250: x_msg_data => x_msg_data
2251: );
2252:
2253: IF x_return_status <> fnd_api.g_ret_sts_success
2254: THEN
2255: RAISE fnd_api.g_exc_error;
2256: END IF;
2257: END IF;
2251: );
2252:
2253: IF x_return_status <> fnd_api.g_ret_sts_success
2254: THEN
2255: RAISE fnd_api.g_exc_error;
2256: END IF;
2257: END IF;
2258: IF l_first
2259: THEN
2285: argument2 => l_ret_reason,
2286: argument3 => l_bill_to_site_id,
2287: argument4 => l_ship_to_site_id
2288: );
2289: IF fnd_api.to_boolean(p_commit)
2290: THEN
2291: COMMIT WORK;
2292: END IF;
2293:
2291: COMMIT WORK;
2292: END IF;
2293:
2294: EXCEPTION
2295: WHEN fnd_api.g_exc_error THEN
2296: FOR j in 1 ..x_msg_count
2297: LOOP
2298: FND_MSG_PUB.Get(
2299: p_msg_index => j,
2304: THEN
2305: fnd_log.STRING (fnd_log.level_procedure,lc_api_name,'Error count '||x_msg_count||' Message '||x_msg_data);
2306: END IF;
2307: END LOOP;
2308: x_return_status := fnd_api.g_ret_sts_error;
2309:
2310: END process_returns;
2311:
2312: FUNCTION get_credit_card(p_incident_id IN NUMBER) RETURN VARCHAR2
2372: END IF;
2373:
2374: csd_process_pvt.create_default_prod_txn
2375: (p_api_version => 1.0,
2376: p_commit => fnd_api.g_false,
2377: p_init_msg_list => fnd_api.g_true,
2378: p_validation_level => 100,
2379: p_repair_line_id => l_repair_line_ids(i),
2380: p_return_reason_code => l_ret_reason,
2373:
2374: csd_process_pvt.create_default_prod_txn
2375: (p_api_version => 1.0,
2376: p_commit => fnd_api.g_false,
2377: p_init_msg_list => fnd_api.g_true,
2378: p_validation_level => 100,
2379: p_repair_line_id => l_repair_line_ids(i),
2380: p_return_reason_code => l_ret_reason,
2381: p_invoice_to_org_id => p_invoice_to_org_id,
2403: BEGIN
2404: iby_fndcpt_setup_pub.Create_Card
2405: (p_api_version => p_api_version,
2406: p_init_msg_list => p_init_msg_list,
2407: p_commit => fnd_api.g_true,
2408: x_return_status => x_return_Status,
2409: x_msg_count => x_msg_count,
2410: x_msg_data => x_msg_data,
2411: p_card_instrument => p_card_instrument,
2411: p_card_instrument => p_card_instrument,
2412: x_card_id => x_card_id,
2413: x_response => x_response
2414: );
2415: IF x_return_status = fnd_api.g_ret_sts_success
2416: THEN
2417: COMMIT WORK;
2418: ELSE
2419: ROLLBACK;