3:
4:
5: PROCEDURE Raise_SubmitCharges_Event(
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_validation_level IN NUMBER DEFAULT fnd_api.g_valid_level_full,
10: p_Event_Code IN VARCHAR2,
11: p_estimate_detail_id IN VARCHAR2,
4:
5: PROCEDURE Raise_SubmitCharges_Event(
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_validation_level IN NUMBER DEFAULT fnd_api.g_valid_level_full,
10: p_Event_Code IN VARCHAR2,
11: p_estimate_detail_id IN VARCHAR2,
12: p_USER_ID IN NUMBER DEFAULT FND_GLOBAL.USER_ID,
5: PROCEDURE Raise_SubmitCharges_Event(
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_validation_level IN NUMBER DEFAULT fnd_api.g_valid_level_full,
10: p_Event_Code IN VARCHAR2,
11: p_estimate_detail_id IN VARCHAR2,
12: p_USER_ID IN NUMBER DEFAULT FND_GLOBAL.USER_ID,
13: p_RESP_ID IN NUMBER,
38: BEGIN
39:
40:
41: -- Initialize return status to SUCCESS
42: x_return_status := FND_API.G_RET_STS_SUCCESS;
43:
44: IF ( p_estimate_detail_id IS NULL) THEN
45:
46: RAISE l_INVALID_EVENT_ARGS;
154:
155: END IF;
156:
157: -- Standard check of p_commit
158: IF FND_API.To_Boolean(p_commit) THEN
159: COMMIT WORK;
160: END IF;
161:
162: END Raise_SubmitCharges_Event;