3: --Procedure to Create a Sales Methodology
4: Procedure CREATE_SALES_METH_TASK_MAP
5: (
6: P_API_VERSION IN NUMBER,
7: P_INIT_MSG_LIST IN VARCHAR2 DEFAULT fnd_api.g_false,
8: P_COMMIT IN VARCHAR2 DEFAULT fnd_api.g_false,
9: P_VALIDATE_LEVEL IN VARCHAR2 DEFAULT fnd_api.g_valid_level_full,
10: P_SALES_STAGE_ID IN NUMBER,
11: P_SALES_METHODOLOGY_ID IN NUMBER ,
4: Procedure CREATE_SALES_METH_TASK_MAP
5: (
6: P_API_VERSION IN NUMBER,
7: P_INIT_MSG_LIST IN VARCHAR2 DEFAULT fnd_api.g_false,
8: P_COMMIT IN VARCHAR2 DEFAULT fnd_api.g_false,
9: P_VALIDATE_LEVEL IN VARCHAR2 DEFAULT fnd_api.g_valid_level_full,
10: P_SALES_STAGE_ID IN NUMBER,
11: P_SALES_METHODOLOGY_ID IN NUMBER ,
12: P_SOURCE_OBJECT_ID IN NUMBER ,
5: (
6: P_API_VERSION IN NUMBER,
7: P_INIT_MSG_LIST IN VARCHAR2 DEFAULT fnd_api.g_false,
8: P_COMMIT IN VARCHAR2 DEFAULT fnd_api.g_false,
9: P_VALIDATE_LEVEL IN VARCHAR2 DEFAULT fnd_api.g_valid_level_full,
10: P_SALES_STAGE_ID IN NUMBER,
11: P_SALES_METHODOLOGY_ID IN NUMBER ,
12: P_SOURCE_OBJECT_ID IN NUMBER ,
13: P_SOURCE_OBJECT_TYPE_CODE IN VARCHAR2 ,
26: l_task_template_group_id NUMBER := p_task_template_group_id;
27: l_task_template_id NUMBER := p_task_template_id;
28: l_source_object_type_code VARCHAR2(30) := p_source_object_type_code;
29: BEGIN
30: x_return_status := fnd_api.g_ret_sts_success;
31: SAVEPOINT create_sales_meth_task_pvt;
32: -- call table handler to insert into as_sales_methodology_b
33: INSERT INTO AS_SALES_METH_TASK_MAP ( sales_stage_id,
34: sales_methodology_id,
53: SYSDATE,
54: fnd_global.user_id,
55: SYSDATE,
56: fnd_global.login_id);
57: IF (fnd_api.to_boolean (p_commit)) THEN
58: COMMIT WORK;
59: END IF;
60: EXCEPTION
61: WHEN fnd_api.g_exc_error
57: IF (fnd_api.to_boolean (p_commit)) THEN
58: COMMIT WORK;
59: END IF;
60: EXCEPTION
61: WHEN fnd_api.g_exc_error
62: THEN
63: ROLLBACK TO create_sales_meth_task_pvt;
64: x_return_status := fnd_api.g_ret_sts_error;
65: fnd_msg_pub.count_and_get ( p_count => x_msg_count,
60: EXCEPTION
61: WHEN fnd_api.g_exc_error
62: THEN
63: ROLLBACK TO create_sales_meth_task_pvt;
64: x_return_status := fnd_api.g_ret_sts_error;
65: fnd_msg_pub.count_and_get ( p_count => x_msg_count,
66: p_data => x_msg_data );
67: WHEN fnd_api.g_exc_unexpected_error
68: THEN
63: ROLLBACK TO create_sales_meth_task_pvt;
64: x_return_status := fnd_api.g_ret_sts_error;
65: fnd_msg_pub.count_and_get ( p_count => x_msg_count,
66: p_data => x_msg_data );
67: WHEN fnd_api.g_exc_unexpected_error
68: THEN
69: ROLLBACK TO create_sales_meth_task_pvt;
70: x_return_status := fnd_api.g_ret_sts_unexp_error;
71: fnd_msg_pub.count_and_get ( p_count => x_msg_count,
66: p_data => x_msg_data );
67: WHEN fnd_api.g_exc_unexpected_error
68: THEN
69: ROLLBACK TO create_sales_meth_task_pvt;
70: x_return_status := fnd_api.g_ret_sts_unexp_error;
71: fnd_msg_pub.count_and_get ( p_count => x_msg_count,
72: p_data => x_msg_data );
73: WHEN OTHERS
74: THEN
72: p_data => x_msg_data );
73: WHEN OTHERS
74: THEN
75: ROLLBACK TO create_sales_meth_task_pvt;
76: x_return_status := fnd_api.g_ret_sts_unexp_error;
77: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
78: THEN
79: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
80: END IF;
85: -------------------------------------------
86: Procedure UPDATE_SALES_METH_TASK_MAP
87: (
88: P_API_VERSION IN NUMBER,
89: P_INIT_MSG_LIST IN VARCHAR2 DEFAULT fnd_api.g_false,
90: P_COMMIT IN VARCHAR2 DEFAULT fnd_api.g_false,
91: P_VALIDATE_LEVEL IN VARCHAR2 DEFAULT fnd_api.g_valid_level_full,
92: P_SALES_STAGE_ID IN NUMBER,
93: P_SALES_METHODOLOGY_ID IN NUMBER ,
86: Procedure UPDATE_SALES_METH_TASK_MAP
87: (
88: P_API_VERSION IN NUMBER,
89: P_INIT_MSG_LIST IN VARCHAR2 DEFAULT fnd_api.g_false,
90: P_COMMIT IN VARCHAR2 DEFAULT fnd_api.g_false,
91: P_VALIDATE_LEVEL IN VARCHAR2 DEFAULT fnd_api.g_valid_level_full,
92: P_SALES_STAGE_ID IN NUMBER,
93: P_SALES_METHODOLOGY_ID IN NUMBER ,
94: P_SOURCE_OBJECT_ID IN NUMBER ,
87: (
88: P_API_VERSION IN NUMBER,
89: P_INIT_MSG_LIST IN VARCHAR2 DEFAULT fnd_api.g_false,
90: P_COMMIT IN VARCHAR2 DEFAULT fnd_api.g_false,
91: P_VALIDATE_LEVEL IN VARCHAR2 DEFAULT fnd_api.g_valid_level_full,
92: P_SALES_STAGE_ID IN NUMBER,
93: P_SALES_METHODOLOGY_ID IN NUMBER ,
94: P_SOURCE_OBJECT_ID IN NUMBER ,
95: P_SOURCE_OBJECT_TYPE_CODE IN VARCHAR2 ,
107: l_source_object_id NUMBER := p_source_object_id;
108: l_task_template_group_id NUMBER := p_task_template_group_id;
109: l_task_template_id NUMBER := p_task_template_id;
110: BEGIN
111: x_return_status := fnd_api.g_ret_sts_success;
112: SAVEPOINT update_sales_meth_task_pvt;
113: -- call table handler to insert into as_sales_methodology_b
114: UPDATE AS_SALES_METH_TASK_MAP SET
115: sales_methodology_id = l_sales_methodology_id,
122: AND task_template_group_id = l_task_template_group_id ;
123: IF (SQL%NOTFOUND) THEN
124: RAISE no_data_found;
125: END IF;
126: IF (fnd_api.to_boolean (p_commit))
127: THEN
128: COMMIT WORK;
129: END IF;
130: EXCEPTION
127: THEN
128: COMMIT WORK;
129: END IF;
130: EXCEPTION
131: WHEN fnd_api.g_exc_error
132: THEN
133: ROLLBACK TO delete_sm_stage_map_pvt;
134: x_return_status := fnd_api.g_ret_sts_error;
135: fnd_msg_pub.count_and_get (
130: EXCEPTION
131: WHEN fnd_api.g_exc_error
132: THEN
133: ROLLBACK TO delete_sm_stage_map_pvt;
134: x_return_status := fnd_api.g_ret_sts_error;
135: fnd_msg_pub.count_and_get (
136: p_count => x_msg_count,
137: p_data => x_msg_data
138: );
135: fnd_msg_pub.count_and_get (
136: p_count => x_msg_count,
137: p_data => x_msg_data
138: );
139: WHEN fnd_api.g_exc_unexpected_error
140: THEN
141: ROLLBACK TO delete_sm_stage_map_pvt;
142: x_return_status := fnd_api.g_ret_sts_unexp_error;
143: fnd_msg_pub.count_and_get (
138: );
139: WHEN fnd_api.g_exc_unexpected_error
140: THEN
141: ROLLBACK TO delete_sm_stage_map_pvt;
142: x_return_status := fnd_api.g_ret_sts_unexp_error;
143: fnd_msg_pub.count_and_get (
144: p_count => x_msg_count,
145: p_data => x_msg_data
146: );
146: );
147: WHEN OTHERS
148: THEN
149: ROLLBACK TO delete_sm_stage_map_pvt;
150: x_return_status := fnd_api.g_ret_sts_unexp_error;
151: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
152: THEN
153: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
154: END IF;
160: -----------------------------------------------
161: -----------------------------------------------
162: Procedure DELETE_SALES_METH_TASK_MAP
163: ( P_API_VERSION IN NUMBER,
164: P_INIT_MSG_LIST IN VARCHAR2 default fnd_api.g_false,
165: P_COMMIT IN VARCHAR2 default fnd_api.g_false,
166: P_VALIDATE_LEVEL IN VARCHAR2 default fnd_api.g_valid_level_full,
167: P_SALES_METHODOLOGY_ID IN NUMBER,
168: P_SOURCE_OBJECT_ID IN NUMBER ,
161: -----------------------------------------------
162: Procedure DELETE_SALES_METH_TASK_MAP
163: ( P_API_VERSION IN NUMBER,
164: P_INIT_MSG_LIST IN VARCHAR2 default fnd_api.g_false,
165: P_COMMIT IN VARCHAR2 default fnd_api.g_false,
166: P_VALIDATE_LEVEL IN VARCHAR2 default fnd_api.g_valid_level_full,
167: P_SALES_METHODOLOGY_ID IN NUMBER,
168: P_SOURCE_OBJECT_ID IN NUMBER ,
169: P_SOURCE_OBJECT_TYPE_CODE IN VARCHAR2 ,
162: Procedure DELETE_SALES_METH_TASK_MAP
163: ( P_API_VERSION IN NUMBER,
164: P_INIT_MSG_LIST IN VARCHAR2 default fnd_api.g_false,
165: P_COMMIT IN VARCHAR2 default fnd_api.g_false,
166: P_VALIDATE_LEVEL IN VARCHAR2 default fnd_api.g_valid_level_full,
167: P_SALES_METHODOLOGY_ID IN NUMBER,
168: P_SOURCE_OBJECT_ID IN NUMBER ,
169: P_SOURCE_OBJECT_TYPE_CODE IN VARCHAR2 ,
170: P_SOURCE_OBJECT_NAME IN VARCHAR2 ,
181: l_source_object_id NUMBER := p_source_object_id;
182: l_task_template_group_id NUMBER := p_task_template_group_id;
183: l_task_template_id NUMBER := p_task_template_id;
184: BEGIN
185: x_return_status := fnd_api.g_ret_sts_success;
186: SAVEPOINT update_sales_meth_task_pvt;
187: DELETE FROM AS_SALES_METH_TASK_MAP
188: WHERE object_id = l_source_object_id
189: AND sales_stage_id = l_sales_stage_id
190: AND task_template_group_id = l_task_template_group_id ;
191: IF (SQL%NOTFOUND) THEN
192: RAISE no_data_found;
193: END IF;
194: IF (fnd_api.to_boolean (p_commit))
195: THEN
196: COMMIT WORK;
197: END IF;
198: EXCEPTION
195: THEN
196: COMMIT WORK;
197: END IF;
198: EXCEPTION
199: WHEN fnd_api.g_exc_error
200: THEN
201: ROLLBACK TO delete_sm_stage_map_pvt;
202: x_return_status := fnd_api.g_ret_sts_error;
203: fnd_msg_pub.count_and_get (
198: EXCEPTION
199: WHEN fnd_api.g_exc_error
200: THEN
201: ROLLBACK TO delete_sm_stage_map_pvt;
202: x_return_status := fnd_api.g_ret_sts_error;
203: fnd_msg_pub.count_and_get (
204: p_count => x_msg_count,
205: p_data => x_msg_data
206: );
203: fnd_msg_pub.count_and_get (
204: p_count => x_msg_count,
205: p_data => x_msg_data
206: );
207: WHEN fnd_api.g_exc_unexpected_error
208: THEN
209: ROLLBACK TO delete_sm_stage_map_pvt;
210: x_return_status := fnd_api.g_ret_sts_unexp_error;
211: fnd_msg_pub.count_and_get (
206: );
207: WHEN fnd_api.g_exc_unexpected_error
208: THEN
209: ROLLBACK TO delete_sm_stage_map_pvt;
210: x_return_status := fnd_api.g_ret_sts_unexp_error;
211: fnd_msg_pub.count_and_get (
212: p_count => x_msg_count,
213: p_data => x_msg_data
214: );
214: );
215: WHEN OTHERS
216: THEN
217: ROLLBACK TO delete_sm_stage_map_pvt;
218: x_return_status := fnd_api.g_ret_sts_unexp_error;
219: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
220: THEN
221: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
222: END IF;