59: -- Initial version 1.0
60: -- End of comments
61: PROCEDURE create_negotiation_bulk
62: (
63: -- standard API params
64: p_api_version IN NUMBER,
65: x_result IN OUT NOCOPY NUMBER,
66: x_error_message IN OUT NOCOPY VARCHAR2,
67: -- input params
91: l_error_code VARCHAR2(2000);
92: -- l_req_lines_tbl REQ_LINES_TABLE_TYPE; --Bug5841426
93: l_num_lines NUMBER;
94: BEGIN
95: -- Standard start of API savepoint
96: SAVEPOINT create_negotiation_bulk_SP;
97: -- Standard call to check for call compatibility
98: IF NOT FND_API.Compatible_API_Call( l_api_version ,
99: p_api_version ,
93: l_num_lines NUMBER;
94: BEGIN
95: -- Standard start of API savepoint
96: SAVEPOINT create_negotiation_bulk_SP;
97: -- Standard call to check for call compatibility
98: IF NOT FND_API.Compatible_API_Call( l_api_version ,
99: p_api_version ,
100: l_api_name ,
101: G_PKG_NAME)
138: p_neg_outcome => p_neg_outcome,
139: p_document_org_id => p_document_org_id);
140:
141: -- End of API Body
142: -- Standard check to see if there is any error
143: IF(x_result = -1) THEN
144: RAISE FND_API.G_EXC_ERROR;
145: END IF;
146: EXCEPTION
1010: l_progress varchar2(3);
1011: BEGIN
1012: l_progress := '000';
1013:
1014: -- Standard call to check for call compatibility
1015: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME)
1016: THEN
1017: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1018: END IF;
1272: --
1273: BEGIN
1274: l_progress := '000';
1275:
1276: -- Standard start of API savepoint
1277: SAVEPOINT renegotiate_blanket_grp;
1278:
1279: -- Standard call to check for call compatibility
1280: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME)
1275:
1276: -- Standard start of API savepoint
1277: SAVEPOINT renegotiate_blanket_grp;
1278:
1279: -- Standard call to check for call compatibility
1280: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME)
1281: THEN
1282: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1283: END IF;