DBA Data[Home] [Help]

APPS.ASO_PRICING_INT dependencies on FND_API

Line 90: if l_ship_to_cust_account_id is not null OR l_ship_to_cust_account_id <> fnd_api.G_MISS_NUM then

86: return x_ship_to_org_id;
87: END IF;
88: CLOSE C_get_quote_info;
89:
90: if l_ship_to_cust_account_id is not null OR l_ship_to_cust_account_id <> fnd_api.G_MISS_NUM then
91: l_cust_account_id := l_ship_to_cust_account_id;
92: end if;
93:
94: IF l_cust_account_id is not NULL

Line 106: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

102: ,x_msg_count => l_msg_count
103: ,x_msg_data => l_msg_data
104: ,x_site_use_id => x_ship_to_org_id
105: );
106: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
107: x_ship_to_org_id := NULL;
108: END IF;
109:
110: END IF; -- not null

Line 147: OR l_ship_to_cust_account_id <> fnd_api.G_MISS_NUM then

143: END IF;
144: CLOSE C_get_quote_info;
145:
146: if l_ship_to_cust_account_id is not null
147: OR l_ship_to_cust_account_id <> fnd_api.G_MISS_NUM then
148: l_cust_account_id := l_ship_to_cust_account_id;
149: end if;
150:
151: IF l_cust_account_id is not NULL

Line 163: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

159: ,x_msg_count => l_msg_count
160: ,x_msg_data => l_msg_data
161: ,x_site_use_id => x_ship_to_org_id
162: );
163: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
164: x_ship_to_org_id := NULL;
165: END IF;
166:
167: END IF; -- not null

Line 205: OR l_invoice_to_cust_account_id <> fnd_api.G_MISS_NUM then

201: END IF;
202: CLOSE C_get_quote_info;
203:
204: if l_invoice_to_cust_account_id is not null
205: OR l_invoice_to_cust_account_id <> fnd_api.G_MISS_NUM then
206: l_cust_account_id := l_invoice_to_cust_account_id;
207: end if;
208:
209: IF l_cust_account_id is not NULL

Line 221: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

217: ,x_msg_count => l_msg_count
218: ,x_msg_data => l_msg_data
219: ,x_site_use_id => x_invoice_to_org_id
220: );
221: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
222: x_invoice_to_org_id := NULL;
223: END IF;
224:
225: END IF; -- not null

Line 262: OR l_invoice_to_cust_account_id <> fnd_api.G_MISS_NUM then

258: END IF;
259: CLOSE C_get_quote_info;
260:
261: if l_invoice_to_cust_account_id is not null
262: OR l_invoice_to_cust_account_id <> fnd_api.G_MISS_NUM then
263: l_cust_account_id := l_invoice_to_cust_account_id;
264: end if;
265:
266: IF l_cust_account_id is not NULL

Line 278: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

274: ,x_msg_count => l_msg_count
275: ,x_msg_data => l_msg_data
276: ,x_site_use_id => x_invoice_to_org_id
277: );
278: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
279: x_invoice_to_org_id := NULL;
280: END IF;
281:
282: END IF; -- not null

Line 544: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

540:
541: --wli_end
542: PROCEDURE Pricing_Item (
543: P_Api_Version_Number IN NUMBER,
544: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
545: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
546: p_control_rec IN PRICING_CONTROL_REC_TYPE,
547: p_qte_header_rec IN ASO_QUOTE_PUB.Qte_Header_Rec_Type,
548: p_hd_shipment_rec IN ASO_QUOTE_PUB.Shipment_Rec_Type

Line 545: P_Commit IN VARCHAR2 := FND_API.G_FALSE,

541: --wli_end
542: PROCEDURE Pricing_Item (
543: P_Api_Version_Number IN NUMBER,
544: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
545: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
546: p_control_rec IN PRICING_CONTROL_REC_TYPE,
547: p_qte_header_rec IN ASO_QUOTE_PUB.Qte_Header_Rec_Type,
548: p_hd_shipment_rec IN ASO_QUOTE_PUB.Shipment_Rec_Type
549: := ASO_QUOTE_PUB.G_Miss_Shipment_Rec,

Line 603: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

599: -- Standard Start of API savepoint
600: SAVEPOINT PRICING_ITEM_PVT;
601:
602: -- Standard call to check for call compatibility.
603: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
604: p_api_version_number,
605: l_api_name,
606: G_PKG_NAME)
607: THEN

Line 608: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

604: p_api_version_number,
605: l_api_name,
606: G_PKG_NAME)
607: THEN
608: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
609: END IF;
610:
611: -- Initialize message list if p_init_msg_list is set to TRUE.
612: IF FND_API.to_Boolean(p_init_msg_list)

Line 612: IF FND_API.to_Boolean(p_init_msg_list)

608: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
609: END IF;
610:
611: -- Initialize message list if p_init_msg_list is set to TRUE.
612: IF FND_API.to_Boolean(p_init_msg_list)
613: THEN
614: FND_MSG_PUB.initialize;
615: END IF;
616:

Line 619: x_return_status := FND_API.G_RET_STS_SUCCESS;

615: END IF;
616:
617: aso_debug_pub.g_debug_flag := nvl(fnd_profile.value('ASO_ENABLE_DEBUG'),'N');
618:
619: x_return_status := FND_API.G_RET_STS_SUCCESS;
620: l_request_type := NVL(p_control_rec.request_type,'ASO');
621: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
622: aso_debug_pub.add('ASO_PRICING_INT:In Pricing Item: p_qte_header_rec.quote_status_id'
623: ||p_qte_header_rec.quote_status_id,1,'Y');

Line 631: IF NVL(p_qte_header_rec.quote_status_id,FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM THEN

627: ASO_PRICING_INT.G_HEADER_REC := ASO_PRICING_CORE_PVT.Set_Global_Rec (
628: p_qte_header_rec => p_qte_header_rec,
629: p_shipment_rec => p_hd_shipment_rec);
630:
631: IF NVL(p_qte_header_rec.quote_status_id,FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM THEN
632: l_pricing_event := 'BATCH'; --p_control_rec.pricing_event;
633: -- commented for bug no 6510202
634: /* ASO_PRICING_INT.G_HEADER_REC := ASO_PRICING_CORE_PVT.Set_Global_Rec (
635: p_qte_header_rec => p_qte_header_rec,

Line 762: IF ((p_qte_header_rec.org_id IS NULL) OR (p_qte_header_rec.org_id = FND_API.G_MISS_NUM)) THEN

758:
759:
760: /* Change for populating QP_PREQ_GRP.CONTROL_RECORD_TYPE.ORG_ID Yogeshwar (MOAC) */
761:
762: IF ((p_qte_header_rec.org_id IS NULL) OR (p_qte_header_rec.org_id = FND_API.G_MISS_NUM)) THEN
763: IF fnd_msg_pub.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
764: FND_MESSAGE.Set_Name('ASO', 'ASO_MISSING_OU');
765: FND_MSG_PUB.ADD;
766: END IF;

Line 768: RAISE FND_API.G_EXC_ERROR;

764: FND_MESSAGE.Set_Name('ASO', 'ASO_MISSING_OU');
765: FND_MSG_PUB.ADD;
766: END IF;
767:
768: RAISE FND_API.G_EXC_ERROR;
769: END IF;
770:
771: l_control_rec.ORG_ID := p_qte_header_rec.org_id;
772:

Line 808: fnd_api.g_ret_sts_unexp_error,fnd_api.g_ret_sts_error,

804: lx_req_line_rec := lx_req_line_tbl(i);
805: If lx_req_line_rec.status_code in(QP_PREQ_GRP.g_status_invalid_price_list,
806: QP_PREQ_GRP.g_sts_lhs_not_found,
807: QP_PREQ_GRP.g_status_formula_error,QP_PREQ_GRP.g_status_other_errors,
808: fnd_api.g_ret_sts_unexp_error,fnd_api.g_ret_sts_error,
809: QP_PREQ_GRP.g_status_calc_error,QP_PREQ_GRP.g_status_uom_failure,
810: QP_PREQ_GRP.g_status_invalid_uom,QP_PREQ_GRP.g_status_dup_price_list,
811: QP_PREQ_GRP.g_status_invalid_uom_conv,QP_PREQ_GRP.g_status_invalid_incomp,
812: QP_PREQ_GRP.g_status_best_price_eval_error,

Line 814: x_return_status := FND_API.G_RET_STS_ERROR;

810: QP_PREQ_GRP.g_status_invalid_uom,QP_PREQ_GRP.g_status_dup_price_list,
811: QP_PREQ_GRP.g_status_invalid_uom_conv,QP_PREQ_GRP.g_status_invalid_incomp,
812: QP_PREQ_GRP.g_status_best_price_eval_error,
813: QP_PREQ_PUB.g_back_calculation_sts) THEN
814: x_return_status := FND_API.G_RET_STS_ERROR;
815: END IF;
816:
817: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
818: aso_debug_pub.add('ASO_PRICING_INT:Fnd_Profile Value for GSA:'

Line 824: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

820: aso_debug_pub.add('ASO_PRICING_INT:After price request in pricing_item for line id '
821: ||lx_req_line_rec.line_id ||'status code '||lx_req_line_rec.status_code, 1, 'N');
822: END IF;
823:
824: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
825: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
826: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
827: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
828: FND_MESSAGE.Set_Name('ASO', 'ASO_API_UNEXP_ERROR');

Line 825: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN

821: ||lx_req_line_rec.line_id ||'status code '||lx_req_line_rec.status_code, 1, 'N');
822: END IF;
823:
824: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
825: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
826: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
827: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
828: FND_MESSAGE.Set_Name('ASO', 'ASO_API_UNEXP_ERROR');
829: FND_MESSAGE.Set_Token('ROW', 'ASO_PRICING_INT AFTER PRICING CALL', TRUE);

Line 826: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

822: END IF;
823:
824: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
825: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
826: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
827: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
828: FND_MESSAGE.Set_Name('ASO', 'ASO_API_UNEXP_ERROR');
829: FND_MESSAGE.Set_Token('ROW', 'ASO_PRICING_INT AFTER PRICING CALL', TRUE);
830: FND_MSG_PUB.ADD;

Line 832: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

828: FND_MESSAGE.Set_Name('ASO', 'ASO_API_UNEXP_ERROR');
829: FND_MESSAGE.Set_Token('ROW', 'ASO_PRICING_INT AFTER PRICING CALL', TRUE);
830: FND_MSG_PUB.ADD;
831: END IF;
832: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
833: ELSE
834: l_message_text := lx_req_line_rec.status_code || ': '||lx_req_line_rec.status_text;
835: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
836: FND_MESSAGE.Set_Name('ASO', 'ASO_OM_ERROR');

Line 868: IF FND_API.to_Boolean( p_commit )

864: aso_debug_pub.add('ASO_PRICING_INT:after Copy_Request_To_Line in pricing_item', 1, 'Y');
865: END IF;
866:
867: -- Standard check for p_commit
868: IF FND_API.to_Boolean( p_commit )
869: THEN
870: COMMIT WORK;
871: END IF;
872:

Line 877: IF lv_return_status <> FND_API.G_RET_STS_SUCCESS THEN

873: FND_MSG_PUB.Count_And_Get
874: ( p_count => x_msg_count,
875: p_data => x_msg_data
876: );
877: IF lv_return_status <> FND_API.G_RET_STS_SUCCESS THEN
878: RAISE FND_API.G_EXC_ERROR;
879: End If;
880:
881:

Line 878: RAISE FND_API.G_EXC_ERROR;

874: ( p_count => x_msg_count,
875: p_data => x_msg_data
876: );
877: IF lv_return_status <> FND_API.G_RET_STS_SUCCESS THEN
878: RAISE FND_API.G_EXC_ERROR;
879: End If;
880:
881:
882: EXCEPTION

Line 883: WHEN FND_API.G_EXC_ERROR THEN

879: End If;
880:
881:
882: EXCEPTION
883: WHEN FND_API.G_EXC_ERROR THEN
884: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
885: P_API_NAME => L_API_NAME
886: ,P_PKG_NAME => G_PKG_NAME
887: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR

Line 895: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

891: ,X_MSG_COUNT => X_MSG_COUNT
892: ,X_MSG_DATA => X_MSG_DATA
893: ,X_RETURN_STATUS => X_RETURN_STATUS);
894:
895: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
896: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
897: P_API_NAME => L_API_NAME
898: ,P_PKG_NAME => G_PKG_NAME
899: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR

Line 924: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

920:
921:
922: PROCEDURE Pricing_Order(
923: P_Api_Version_Number IN NUMBER,
924: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
925: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
926: p_control_rec IN PRICING_CONTROL_REC_TYPE,
927: p_qte_header_rec IN ASO_QUOTE_PUB.Qte_Header_Rec_Type,
928: p_hd_shipment_rec IN ASO_QUOTE_PUB.Shipment_Rec_Type

Line 925: P_Commit IN VARCHAR2 := FND_API.G_FALSE,

921:
922: PROCEDURE Pricing_Order(
923: P_Api_Version_Number IN NUMBER,
924: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
925: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
926: p_control_rec IN PRICING_CONTROL_REC_TYPE,
927: p_qte_header_rec IN ASO_QUOTE_PUB.Qte_Header_Rec_Type,
928: p_hd_shipment_rec IN ASO_QUOTE_PUB.Shipment_Rec_Type
929: := ASO_QUOTE_PUB.G_Miss_Shipment_Rec,

Line 964: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

960: -- Standard Start of API savepoint
961: SAVEPOINT PRICING_ORDER_PVT;
962:
963: -- Standard call to check for call compatibility.
964: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
965: p_api_version_number,
966: l_api_name,
967: G_PKG_NAME)
968: THEN

Line 969: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

965: p_api_version_number,
966: l_api_name,
967: G_PKG_NAME)
968: THEN
969: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
970: END IF;
971:
972: aso_debug_pub.g_debug_flag := nvl(fnd_profile.value('ASO_ENABLE_DEBUG'),'N');
973:

Line 979: IF FND_API.to_Boolean( p_init_msg_list )

975: aso_debug_pub.add('ASO_PRICING_INT:Start of Pricing Order.....',1,'Y');
976: END IF;
977:
978: -- Initialize message list if p_init_msg_list is set to TRUE.
979: IF FND_API.to_Boolean( p_init_msg_list )
980: THEN
981: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
982: aso_debug_pub.add('ASO_PRICING_INT:Begin FND_API.to_Boolean'||p_init_msg_list, 1, 'Y');
983: END IF;

Line 982: aso_debug_pub.add('ASO_PRICING_INT:Begin FND_API.to_Boolean'||p_init_msg_list, 1, 'Y');

978: -- Initialize message list if p_init_msg_list is set to TRUE.
979: IF FND_API.to_Boolean( p_init_msg_list )
980: THEN
981: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
982: aso_debug_pub.add('ASO_PRICING_INT:Begin FND_API.to_Boolean'||p_init_msg_list, 1, 'Y');
983: END IF;
984: FND_MSG_PUB.initialize;
985: END IF;
986:

Line 987: x_return_status := FND_API.G_RET_STS_SUCCESS;

983: END IF;
984: FND_MSG_PUB.initialize;
985: END IF;
986:
987: x_return_status := FND_API.G_RET_STS_SUCCESS;
988:
989: ASO_PRICING_CORE_PVT.Initialize_Global_Tables;
990:
991: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN

Line 1010: P_Init_Msg_List => FND_API.G_FALSE,

1006: END IF;
1007:
1008: ASO_PRICING_CALLBACK_PVT.Config_Callback_Pricing_Order(
1009: P_Api_Version_Number => P_Api_Version_Number,
1010: P_Init_Msg_List => FND_API.G_FALSE,
1011: P_Commit => FND_API.G_FALSE,
1012: p_control_rec => p_control_rec,
1013: p_qte_header_rec => p_qte_header_rec,
1014: p_hd_shipment_rec => p_hd_shipment_rec,

Line 1011: P_Commit => FND_API.G_FALSE,

1007:
1008: ASO_PRICING_CALLBACK_PVT.Config_Callback_Pricing_Order(
1009: P_Api_Version_Number => P_Api_Version_Number,
1010: P_Init_Msg_List => FND_API.G_FALSE,
1011: P_Commit => FND_API.G_FALSE,
1012: p_control_rec => p_control_rec,
1013: p_qte_header_rec => p_qte_header_rec,
1014: p_hd_shipment_rec => p_hd_shipment_rec,
1015: p_hd_price_attr_tbl => p_hd_price_attr_tbl,

Line 1031: IF x_return_status = FND_API.G_RET_STS_ERROR THEN

1027: x_return_status => x_return_status,
1028: x_msg_count => x_msg_count,
1029: x_msg_data => x_msg_data);
1030:
1031: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1032: RAISE FND_API.G_EXC_ERROR;
1033: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1034: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1035: END IF;

Line 1032: RAISE FND_API.G_EXC_ERROR;

1028: x_msg_count => x_msg_count,
1029: x_msg_data => x_msg_data);
1030:
1031: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1032: RAISE FND_API.G_EXC_ERROR;
1033: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1034: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1035: END IF;
1036:

Line 1033: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1029: x_msg_data => x_msg_data);
1030:
1031: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1032: RAISE FND_API.G_EXC_ERROR;
1033: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1034: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1035: END IF;
1036:
1037: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN

Line 1034: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1030:
1031: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1032: RAISE FND_API.G_EXC_ERROR;
1033: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1034: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1035: END IF;
1036:
1037: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
1038: aso_debug_pub.add('ASO_PRICING_INT:After Config_Callback_Pricing_Order:x_qte_line_tbl.count:'||nvl(x_qte_line_tbl.count,0),1,'Y');

Line 1060: P_Init_Msg_List => FND_API.G_FALSE,

1056: If NVL(p_control_rec.price_mode,'ENTIRE_QUOTE') = 'ENTIRE_QUOTE' then
1057:
1058: ASO_PRICING_FLOWS_PVT.Price_Entire_Quote(
1059: P_Api_Version_Number => P_Api_Version_Number,
1060: P_Init_Msg_List => FND_API.G_FALSE,
1061: P_Commit => FND_API.G_FALSE,
1062: p_control_rec => p_control_rec,
1063: p_qte_header_rec => p_qte_header_rec,
1064: p_hd_shipment_rec => p_hd_shipment_rec,

Line 1061: P_Commit => FND_API.G_FALSE,

1057:
1058: ASO_PRICING_FLOWS_PVT.Price_Entire_Quote(
1059: P_Api_Version_Number => P_Api_Version_Number,
1060: P_Init_Msg_List => FND_API.G_FALSE,
1061: P_Commit => FND_API.G_FALSE,
1062: p_control_rec => p_control_rec,
1063: p_qte_header_rec => p_qte_header_rec,
1064: p_hd_shipment_rec => p_hd_shipment_rec,
1065: p_qte_line_tbl => p_qte_line_tbl,

Line 1071: IF x_return_status = FND_API.G_RET_STS_ERROR THEN

1067: x_return_status => x_return_status,
1068: x_msg_count => x_msg_count,
1069: x_msg_data => x_msg_data);
1070:
1071: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1072: RAISE FND_API.G_EXC_ERROR;
1073: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1074: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1075: END IF;

Line 1072: RAISE FND_API.G_EXC_ERROR;

1068: x_msg_count => x_msg_count,
1069: x_msg_data => x_msg_data);
1070:
1071: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1072: RAISE FND_API.G_EXC_ERROR;
1073: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1074: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1075: END IF;
1076:

Line 1073: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1069: x_msg_data => x_msg_data);
1070:
1071: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1072: RAISE FND_API.G_EXC_ERROR;
1073: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1074: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1075: END IF;
1076:
1077: ELSIF (p_control_rec.price_mode = 'CHANGE_LINE') then

Line 1074: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1070:
1071: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1072: RAISE FND_API.G_EXC_ERROR;
1073: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1074: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1075: END IF;
1076:
1077: ELSIF (p_control_rec.price_mode = 'CHANGE_LINE') then
1078: -- Change Line logic code path

Line 1082: P_Init_Msg_List => FND_API.G_FALSE,

1078: -- Change Line logic code path
1079:
1080: ASO_PRICING_FLOWS_PVT.Price_Quote_With_Change_Lines(
1081: P_Api_Version_Number => P_Api_Version_Number,
1082: P_Init_Msg_List => FND_API.G_FALSE,
1083: P_Commit => FND_API.G_FALSE,
1084: p_control_rec => p_control_rec,
1085: p_qte_header_rec => p_qte_header_rec,
1086: p_hd_shipment_rec => p_hd_shipment_rec,

Line 1083: P_Commit => FND_API.G_FALSE,

1079:
1080: ASO_PRICING_FLOWS_PVT.Price_Quote_With_Change_Lines(
1081: P_Api_Version_Number => P_Api_Version_Number,
1082: P_Init_Msg_List => FND_API.G_FALSE,
1083: P_Commit => FND_API.G_FALSE,
1084: p_control_rec => p_control_rec,
1085: p_qte_header_rec => p_qte_header_rec,
1086: p_hd_shipment_rec => p_hd_shipment_rec,
1087: p_qte_line_tbl => p_qte_line_tbl,

Line 1093: IF x_return_status = FND_API.G_RET_STS_ERROR THEN

1089: x_return_status => x_return_status,
1090: x_msg_count => x_msg_count,
1091: x_msg_data => x_msg_data);
1092:
1093: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1094: RAISE FND_API.G_EXC_ERROR;
1095: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1096: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1097: END IF;

Line 1094: RAISE FND_API.G_EXC_ERROR;

1090: x_msg_count => x_msg_count,
1091: x_msg_data => x_msg_data);
1092:
1093: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1094: RAISE FND_API.G_EXC_ERROR;
1095: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1096: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1097: END IF;
1098:

Line 1095: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1091: x_msg_data => x_msg_data);
1092:
1093: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1094: RAISE FND_API.G_EXC_ERROR;
1095: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1096: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1097: END IF;
1098:
1099: Else

Line 1096: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1092:
1093: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1094: RAISE FND_API.G_EXC_ERROR;
1095: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1096: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1097: END IF;
1098:
1099: Else
1100: --p_control_rec.price_mode = 'QUOTE_LINE'

Line 1104: P_Init_Msg_List => FND_API.G_FALSE,

1100: --p_control_rec.price_mode = 'QUOTE_LINE'
1101:
1102: ASO_PRICING_FLOWS_PVT.Price_Quote_Line(
1103: P_Api_Version_Number => P_Api_Version_Number,
1104: P_Init_Msg_List => FND_API.G_FALSE,
1105: P_Commit => FND_API.G_FALSE,
1106: p_control_rec => p_control_rec,
1107: p_qte_header_rec => p_qte_header_rec,
1108: p_hd_shipment_rec => p_hd_shipment_rec,

Line 1105: P_Commit => FND_API.G_FALSE,

1101:
1102: ASO_PRICING_FLOWS_PVT.Price_Quote_Line(
1103: P_Api_Version_Number => P_Api_Version_Number,
1104: P_Init_Msg_List => FND_API.G_FALSE,
1105: P_Commit => FND_API.G_FALSE,
1106: p_control_rec => p_control_rec,
1107: p_qte_header_rec => p_qte_header_rec,
1108: p_hd_shipment_rec => p_hd_shipment_rec,
1109: p_qte_line_tbl => p_qte_line_tbl,

Line 1114: IF x_return_status = FND_API.G_RET_STS_ERROR THEN

1110: x_return_status => x_return_status,
1111: x_msg_count => x_msg_count,
1112: x_msg_data => x_msg_data);
1113:
1114: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1115: RAISE FND_API.G_EXC_ERROR;
1116: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1117: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1118: END IF;

Line 1115: RAISE FND_API.G_EXC_ERROR;

1111: x_msg_count => x_msg_count,
1112: x_msg_data => x_msg_data);
1113:
1114: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1115: RAISE FND_API.G_EXC_ERROR;
1116: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1117: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1118: END IF;
1119:

Line 1116: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1112: x_msg_data => x_msg_data);
1113:
1114: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1115: RAISE FND_API.G_EXC_ERROR;
1116: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1117: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1118: END IF;
1119:
1120: End If;--NVL(p_control_rec.price_mode,'ENTIRE_QUOTE') = 'ENTIRE_QUOTE'

Line 1117: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1113:
1114: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1115: RAISE FND_API.G_EXC_ERROR;
1116: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1117: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1118: END IF;
1119:
1120: End If;--NVL(p_control_rec.price_mode,'ENTIRE_QUOTE') = 'ENTIRE_QUOTE'
1121:

Line 1155: WHEN FND_API.G_EXC_ERROR THEN

1151: END IF;
1152: end loop;
1153:
1154: EXCEPTION
1155: WHEN FND_API.G_EXC_ERROR THEN
1156: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
1157: aso_debug_pub.add('ASO_PRICING_INT:after inside EXCEPTION return status'||x_return_status, 1, 'Y');
1158: END IF;
1159: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(

Line 1170: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1166: ,X_MSG_COUNT => X_MSG_COUNT
1167: ,X_MSG_DATA => X_MSG_DATA
1168: ,X_RETURN_STATUS => X_RETURN_STATUS);
1169:
1170: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1171: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1172: P_API_NAME => L_API_NAME
1173: ,P_PKG_NAME => G_PKG_NAME
1174: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR

Line 1200: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

1196:
1197:
1198: PROCEDURE Pricing_Item (
1199: P_Api_Version_Number IN NUMBER,
1200: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1201: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
1202: p_control_rec IN PRICING_CONTROL_REC_TYPE,
1203: p_qte_line_id IN NUMBER,
1204: x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2,

Line 1201: P_Commit IN VARCHAR2 := FND_API.G_FALSE,

1197:
1198: PROCEDURE Pricing_Item (
1199: P_Api_Version_Number IN NUMBER,
1200: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1201: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
1202: p_control_rec IN PRICING_CONTROL_REC_TYPE,
1203: p_qte_line_id IN NUMBER,
1204: x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
1205: x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER,

Line 1247: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

1243: -- Standard Start of API savepoint
1244: SAVEPOINT PRICING_ITEM_PVT;
1245:
1246: -- Standard call to check for call compatibility.
1247: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1248: p_api_version_number,
1249: l_api_name,
1250: G_PKG_NAME)
1251: THEN

Line 1252: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1248: p_api_version_number,
1249: l_api_name,
1250: G_PKG_NAME)
1251: THEN
1252: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1253: END IF;
1254:
1255:
1256: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 1257: IF FND_API.to_Boolean( p_init_msg_list )

1253: END IF;
1254:
1255:
1256: -- Initialize message list if p_init_msg_list is set to TRUE.
1257: IF FND_API.to_Boolean( p_init_msg_list )
1258: THEN
1259: FND_MSG_PUB.initialize;
1260: END IF;
1261:

Line 1264: x_return_status := FND_API.G_RET_STS_SUCCESS;

1260: END IF;
1261:
1262: aso_debug_pub.g_debug_flag := nvl(fnd_profile.value('ASO_ENABLE_DEBUG'),'N');
1263:
1264: x_return_status := FND_API.G_RET_STS_SUCCESS;
1265: l_qte_line_rec := ASO_UTILITY_PVT.Query_Qte_Line_Row(p_qte_line_id);
1266: l_qte_header_id := l_qte_line_rec.QUOTE_HEADER_ID;
1267: l_qte_header_rec := ASO_UTILITY_PVT.Query_Header_Row(l_qte_header_id);
1268: l_hd_shipment_tbl := ASO_UTILITY_PVT.Query_Shipment_Rows(l_qte_header_id, NULL);

Line 1295: IF l_qte_line_rec.price_list_id is NULL or l_qte_line_rec.price_list_id = FND_API.G_MISS_NUM THEN

1291: OPEN c_list_id (l_qte_header_id);
1292: FETCH c_list_id INTO l_price_list_id,l_CURRENCY_CODE;
1293: CLOSE c_list_id;
1294:
1295: IF l_qte_line_rec.price_list_id is NULL or l_qte_line_rec.price_list_id = FND_API.G_MISS_NUM THEN
1296: l_qte_line_rec.price_list_id := l_price_list_id ;
1297: ELSE
1298: l_qte_header_rec.price_list_id := NULL;
1299: END IF;

Line 1301: IF l_qte_line_rec.CURRENCY_CODE is NULL or l_qte_line_rec.CURRENCY_CODE = FND_API.G_MISS_CHAR THEN

1297: ELSE
1298: l_qte_header_rec.price_list_id := NULL;
1299: END IF;
1300:
1301: IF l_qte_line_rec.CURRENCY_CODE is NULL or l_qte_line_rec.CURRENCY_CODE = FND_API.G_MISS_CHAR THEN
1302: l_qte_line_rec.CURRENCY_CODE := l_CURRENCY_CODE ;
1303: END IF;
1304:
1305: Pricing_Item (

Line 1307: P_Init_Msg_List => FND_API.G_FALSE,

1303: END IF;
1304:
1305: Pricing_Item (
1306: P_Api_Version_Number => 1,
1307: P_Init_Msg_List => FND_API.G_FALSE,
1308: P_Commit => FND_API.G_FALSE,
1309: p_control_rec => p_control_rec,
1310: p_qte_header_rec => l_qte_header_rec,
1311: p_hd_shipment_rec => l_hd_shipment_rec,

Line 1308: P_Commit => FND_API.G_FALSE,

1304:
1305: Pricing_Item (
1306: P_Api_Version_Number => 1,
1307: P_Init_Msg_List => FND_API.G_FALSE,
1308: P_Commit => FND_API.G_FALSE,
1309: p_control_rec => p_control_rec,
1310: p_qte_header_rec => l_qte_header_rec,
1311: p_hd_shipment_rec => l_hd_shipment_rec,
1312: p_hd_price_attr_tbl => l_hd_price_attr_tbl,

Line 1326: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1322: x_return_status => x_return_status,
1323: x_msg_data => x_msg_data,
1324: x_msg_count => x_msg_count);
1325:
1326: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1327: RAISE FND_API.G_EXC_ERROR;
1328: END IF;
1329:
1330: /* Changed the delete statement as per bug 1874082 */

Line 1327: RAISE FND_API.G_EXC_ERROR;

1323: x_msg_data => x_msg_data,
1324: x_msg_count => x_msg_count);
1325:
1326: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1327: RAISE FND_API.G_EXC_ERROR;
1328: END IF;
1329:
1330: /* Changed the delete statement as per bug 1874082 */
1331: /*Removed the Complex Delete Statement with UNION bug 2585468 */

Line 1362: IF FND_API.to_Boolean( p_commit )

1358: aso_debug_pub.add('ASO_PRICING_INT:Pricing Item Ends if the second Pricing Item was called...',1,'Y');
1359: END IF;
1360:
1361: -- Standard check for p_commit
1362: IF FND_API.to_Boolean( p_commit )
1363: THEN
1364: COMMIT WORK;
1365: END IF;
1366:

Line 1368: WHEN FND_API.G_EXC_ERROR THEN

1364: COMMIT WORK;
1365: END IF;
1366:
1367: EXCEPTION
1368: WHEN FND_API.G_EXC_ERROR THEN
1369: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1370: P_API_NAME => L_API_NAME
1371: ,P_PKG_NAME => G_PKG_NAME
1372: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR

Line 1380: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1376: ,X_MSG_COUNT => X_MSG_COUNT
1377: ,X_MSG_DATA => X_MSG_DATA
1378: ,X_RETURN_STATUS => X_RETURN_STATUS);
1379:
1380: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1381: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1382: P_API_NAME => L_API_NAME
1383: ,P_PKG_NAME => G_PKG_NAME
1384: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR

Line 1410: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

1406:
1407:
1408: PROCEDURE Pricing_Order (
1409: P_Api_Version_Number IN NUMBER,
1410: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1411: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
1412: p_control_rec IN PRICING_CONTROL_REC_TYPE,
1413: p_qte_line_tbl IN ASO_QUOTE_PUB.Qte_Line_Tbl_Type,
1414: p_qte_header_id IN NUMBER,

Line 1411: P_Commit IN VARCHAR2 := FND_API.G_FALSE,

1407:
1408: PROCEDURE Pricing_Order (
1409: P_Api_Version_Number IN NUMBER,
1410: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1411: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
1412: p_control_rec IN PRICING_CONTROL_REC_TYPE,
1413: p_qte_line_tbl IN ASO_QUOTE_PUB.Qte_Line_Tbl_Type,
1414: p_qte_header_id IN NUMBER,
1415: x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2,

Line 1474: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

1470: -- Standard Start of API savepoint
1471: SAVEPOINT PRICING_ORDER_PVT;
1472:
1473: -- Standard call to check for call compatibility.
1474: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1475: p_api_version_number,
1476: l_api_name,
1477: G_PKG_NAME)
1478: THEN

Line 1479: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1475: p_api_version_number,
1476: l_api_name,
1477: G_PKG_NAME)
1478: THEN
1479: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1480: END IF;
1481:
1482:
1483: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 1484: IF FND_API.to_Boolean( p_init_msg_list )

1480: END IF;
1481:
1482:
1483: -- Initialize message list if p_init_msg_list is set to TRUE.
1484: IF FND_API.to_Boolean( p_init_msg_list )
1485: THEN
1486: FND_MSG_PUB.initialize;
1487: END IF;
1488:

Line 1495: x_return_status := FND_API.G_RET_STS_SUCCESS;

1491: END IF;
1492:
1493: aso_debug_pub.g_debug_flag := nvl(fnd_profile.value('ASO_ENABLE_DEBUG'),'N');
1494:
1495: x_return_status := FND_API.G_RET_STS_SUCCESS;
1496: l_request_type := p_control_rec.request_type;
1497: l_pricing_event := p_control_rec.pricing_event;
1498:
1499: l_qte_header_rec := ASO_UTILITY_PVT.Query_Header_Row(p_qte_header_id);

Line 1507: P_Init_Msg_List => FND_API.G_FALSE,

1503: END IF;
1504: l_price_attr_tbl := ASO_UTILITY_PVT.Query_Price_Attr_Rows(p_qte_header_id, null);
1505: ASO_PRICING_INT.Pricing_Order(
1506: P_Api_Version_Number => 1.0,
1507: P_Init_Msg_List => FND_API.G_FALSE,
1508: P_Commit => FND_API.G_FALSE,
1509: p_control_rec => p_control_rec,
1510: p_qte_header_rec => l_qte_header_rec,
1511: p_hd_shipment_rec => l_shipment_rec,

Line 1508: P_Commit => FND_API.G_FALSE,

1504: l_price_attr_tbl := ASO_UTILITY_PVT.Query_Price_Attr_Rows(p_qte_header_id, null);
1505: ASO_PRICING_INT.Pricing_Order(
1506: P_Api_Version_Number => 1.0,
1507: P_Init_Msg_List => FND_API.G_FALSE,
1508: P_Commit => FND_API.G_FALSE,
1509: p_control_rec => p_control_rec,
1510: p_qte_header_rec => l_qte_header_rec,
1511: p_hd_shipment_rec => l_shipment_rec,
1512: p_hd_price_attr_tbl => l_price_attr_tbl,

Line 1529: IF FND_API.to_Boolean( p_commit )

1525: x_msg_count => x_msg_count,
1526: x_msg_data => x_msg_data );
1527:
1528: -- Standard check for p_commit
1529: IF FND_API.to_Boolean( p_commit )
1530: THEN
1531: COMMIT WORK;
1532: END IF;
1533:

Line 1540: WHEN FND_API.G_EXC_ERROR THEN

1536: p_data => x_msg_data
1537: );
1538:
1539: EXCEPTION
1540: WHEN FND_API.G_EXC_ERROR THEN
1541: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1542: P_API_NAME => L_API_NAME
1543: ,P_PKG_NAME => G_PKG_NAME
1544: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR

Line 1552: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1548: ,X_MSG_COUNT => X_MSG_COUNT
1549: ,X_MSG_DATA => X_MSG_DATA
1550: ,X_RETURN_STATUS => X_RETURN_STATUS);
1551:
1552: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1553: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1554: P_API_NAME => L_API_NAME
1555: ,P_PKG_NAME => G_PKG_NAME
1556: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR

Line 1581: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

1577:
1578:
1579: Procedure Delete_Promotion (
1580: P_Api_Version_Number IN NUMBER,
1581: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1582: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
1583: p_price_attr_tbl IN ASO_QUOTE_PUB.Price_Attributes_Tbl_Type,
1584: x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
1585: x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER,

Line 1582: P_Commit IN VARCHAR2 := FND_API.G_FALSE,

1578:
1579: Procedure Delete_Promotion (
1580: P_Api_Version_Number IN NUMBER,
1581: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1582: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
1583: p_price_attr_tbl IN ASO_QUOTE_PUB.Price_Attributes_Tbl_Type,
1584: x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
1585: x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER,
1586: x_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2)