17: -- Parameters :
18: --
19: -- Standard IN Parameters :
20: -- p_api_version IN NUMBER Default 1.0
21: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_TRUE
22: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
23: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
24: -- Standard OUT Parameters :
25: -- x_return_status OUT VARCHAR2 Required
18: --
19: -- Standard IN Parameters :
20: -- p_api_version IN NUMBER Default 1.0
21: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_TRUE
22: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
23: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
24: -- Standard OUT Parameters :
25: -- x_return_status OUT VARCHAR2 Required
26: -- x_msg_count OUT NUMBER Required
19: -- Standard IN Parameters :
20: -- p_api_version IN NUMBER Default 1.0
21: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_TRUE
22: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
23: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
24: -- Standard OUT Parameters :
25: -- x_return_status OUT VARCHAR2 Required
26: -- x_msg_count OUT NUMBER Required
27: -- x_msg_data OUT VARCHAR2 Required
47: -- End of Comments.
48:
49: PROCEDURE process_osp_order(
50: p_api_version IN NUMBER := 1.0,
51: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
52: p_commit IN VARCHAR2 := FND_API.G_FALSE,
53: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
54: p_module_type IN VARCHAR2 := NULL,
55: p_x_osp_order_rec IN OUT NOCOPY AHL_OSP_ORDERS_PVT.osp_order_rec_type,
48:
49: PROCEDURE process_osp_order(
50: p_api_version IN NUMBER := 1.0,
51: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
52: p_commit IN VARCHAR2 := FND_API.G_FALSE,
53: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
54: p_module_type IN VARCHAR2 := NULL,
55: p_x_osp_order_rec IN OUT NOCOPY AHL_OSP_ORDERS_PVT.osp_order_rec_type,
56: p_x_osp_order_lines_tbl IN OUT NOCOPY AHL_OSP_ORDERS_PVT.osp_order_lines_tbl_type,
49: PROCEDURE process_osp_order(
50: p_api_version IN NUMBER := 1.0,
51: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
52: p_commit IN VARCHAR2 := FND_API.G_FALSE,
53: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
54: p_module_type IN VARCHAR2 := NULL,
55: p_x_osp_order_rec IN OUT NOCOPY AHL_OSP_ORDERS_PVT.osp_order_rec_type,
56: p_x_osp_order_lines_tbl IN OUT NOCOPY AHL_OSP_ORDERS_PVT.osp_order_lines_tbl_type,
57: p_org_id IN NUMBER := NULL,
69: -- Standard start of API savepoint
70: SAVEPOINT process_osp_order_pub;
71:
72: -- Standard call to check for call compatibility
73: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name,
74: G_PKG_NAME) THEN
75: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
76: END IF;
77:
71:
72: -- Standard call to check for call compatibility
73: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name,
74: G_PKG_NAME) THEN
75: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
76: END IF;
77:
78: -- Initialize message list if p_init_msg_list is set to TRUE
79: IF FND_API.To_Boolean(p_init_msg_list) THEN
75: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
76: END IF;
77:
78: -- Initialize message list if p_init_msg_list is set to TRUE
79: IF FND_API.To_Boolean(p_init_msg_list) THEN
80: FND_MSG_PUB.Initialize;
81: END IF;
82:
83: -- Initialize API return status to success
80: FND_MSG_PUB.Initialize;
81: END IF;
82:
83: -- Initialize API return status to success
84: x_return_status := FND_API.G_RET_STS_SUCCESS;
85:
86: /*
87: * R12 MOAC Related Changes
88: * Made by jaramana on 9/9/05
114: x_msg_data => x_msg_data );
115:
116:
117:
118: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
119: RAISE FND_API.G_EXC_ERROR;
120: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
121: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
122: END IF;
115:
116:
117:
118: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
119: RAISE FND_API.G_EXC_ERROR;
120: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
121: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
122: END IF;
123:
116:
117:
118: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
119: RAISE FND_API.G_EXC_ERROR;
120: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
121: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
122: END IF;
123:
124: -- Standard check of p_commit
117:
118: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
119: RAISE FND_API.G_EXC_ERROR;
120: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
121: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
122: END IF;
123:
124: -- Standard check of p_commit
125: IF FND_API.To_Boolean(p_commit) THEN
121: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
122: END IF;
123:
124: -- Standard check of p_commit
125: IF FND_API.To_Boolean(p_commit) THEN
126: COMMIT WORK;
127: END IF;
128:
129: -- Standard call to get message count and if count is 1, get message
129: -- Standard call to get message count and if count is 1, get message
130: FND_MSG_PUB.Count_And_Get
131: ( p_count => x_msg_count,
132: p_data => x_msg_data,
133: p_encoded => fnd_api.g_false);
134:
135: --
136: EXCEPTION
137: WHEN FND_API.G_EXC_ERROR THEN
133: p_encoded => fnd_api.g_false);
134:
135: --
136: EXCEPTION
137: WHEN FND_API.G_EXC_ERROR THEN
138: x_return_status := FND_API.G_RET_STS_ERROR;
139: -- TCHIMIRA :: Bug 8847465 :: 17-SEP-2009
140: -- Changed the roll-back from process_uf_Pub to process_osp_order_pub
141: Rollback to process_osp_order_pub;
134:
135: --
136: EXCEPTION
137: WHEN FND_API.G_EXC_ERROR THEN
138: x_return_status := FND_API.G_RET_STS_ERROR;
139: -- TCHIMIRA :: Bug 8847465 :: 17-SEP-2009
140: -- Changed the roll-back from process_uf_Pub to process_osp_order_pub
141: Rollback to process_osp_order_pub;
142: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
140: -- Changed the roll-back from process_uf_Pub to process_osp_order_pub
141: Rollback to process_osp_order_pub;
142: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
143: p_data => x_msg_data,
144: p_encoded => fnd_api.g_false);
145: --AHL_UTIL_PKG.Err_Mesg_To_Table(x_err_mesg_tbl);
146:
147:
148: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
144: p_encoded => fnd_api.g_false);
145: --AHL_UTIL_PKG.Err_Mesg_To_Table(x_err_mesg_tbl);
146:
147:
148: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
149: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
150: -- TCHIMIRA :: Bug 8847465 :: 17-SEP-2009
151: -- Changed the roll-back from process_uf_Pub to process_osp_order_pub
152: Rollback to process_osp_order_pub;
145: --AHL_UTIL_PKG.Err_Mesg_To_Table(x_err_mesg_tbl);
146:
147:
148: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
149: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
150: -- TCHIMIRA :: Bug 8847465 :: 17-SEP-2009
151: -- Changed the roll-back from process_uf_Pub to process_osp_order_pub
152: Rollback to process_osp_order_pub;
153: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
151: -- Changed the roll-back from process_uf_Pub to process_osp_order_pub
152: Rollback to process_osp_order_pub;
153: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
154: p_data => x_msg_data,
155: p_encoded => fnd_api.g_false);
156: --AHL_UTIL_PKG.Err_Mesg_To_Table(x_err_mesg_tbl);
157:
158: WHEN OTHERS THEN
159: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
155: p_encoded => fnd_api.g_false);
156: --AHL_UTIL_PKG.Err_Mesg_To_Table(x_err_mesg_tbl);
157:
158: WHEN OTHERS THEN
159: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
160: Rollback to process_osp_order_pub;
161: --IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
162: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
163: p_procedure_name => 'process_osp_order',
164: p_error_text => SQLERRM);
165: --END IF;
166: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
167: p_data => x_msg_data,
168: p_encoded => fnd_api.g_false);
169: --AHL_UTIL_PKG.Err_Mesg_To_Table(x_err_mesg_tbl);
170:
171:
172: END process_osp_order;