25:
26: -- Hint: Primary key needs to be returned.
27: PROCEDURE Create_camp_reason(
28: P_Api_Version_Number IN NUMBER,
29: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
30: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
31: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
32: P_camp_reason_Rec IN camp_reason_Rec_Type := G_MISS_camp_reason_REC,
33: --Hint: Add detail tables as parameter lists if it's master-detail relationship.
26: -- Hint: Primary key needs to be returned.
27: PROCEDURE Create_camp_reason(
28: P_Api_Version_Number IN NUMBER,
29: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
30: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
31: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
32: P_camp_reason_Rec IN camp_reason_Rec_Type := G_MISS_camp_reason_REC,
33: --Hint: Add detail tables as parameter lists if it's master-detail relationship.
34: X_Return_Status OUT VARCHAR2,
27: PROCEDURE Create_camp_reason(
28: P_Api_Version_Number IN NUMBER,
29: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
30: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
31: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
32: P_camp_reason_Rec IN camp_reason_Rec_Type := G_MISS_camp_reason_REC,
33: --Hint: Add detail tables as parameter lists if it's master-detail relationship.
34: X_Return_Status OUT VARCHAR2,
35: X_Msg_Count OUT NUMBER,
55: -- Standard Start of API savepoint
56: SAVEPOINT CREATE_camp_reason_PVT;
57:
58: -- Standard call to check for call compatibility.
59: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
60: p_api_version_number,
61: l_api_name,
62: G_PKG_NAME)
63: THEN
60: p_api_version_number,
61: l_api_name,
62: G_PKG_NAME)
63: THEN
64: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
65: END IF;
66:
67: -- Initialize message list if p_init_msg_list is set to TRUE.
68: IF FND_API.to_Boolean( p_init_msg_list )
64: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
65: END IF;
66:
67: -- Initialize message list if p_init_msg_list is set to TRUE.
68: IF FND_API.to_Boolean( p_init_msg_list )
69: THEN
70: FND_MSG_PUB.initialize;
71: END IF;
72:
75: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'AST', 'Private API: ' || l_api_name || 'start');
76:
77:
78: -- Initialize API return status to SUCCESS
79: x_return_status := FND_API.G_RET_STS_SUCCESS;
80:
81: --
82: -- API body
83: --
92: FND_MESSAGE.Set_Name(' + appShortName +', 'UT_CANNOT_GET_PROFILE_VALUE');
93: FND_MESSAGE.Set_Token('PROFILE', 'USER_ID', FALSE);
94: FND_MSG_PUB.ADD;
95: END IF;
96: RAISE FND_API.G_EXC_ERROR;
97: END IF;
98:
99:
100: OPEN cur_source;
136: -- End of API body
137: --
138:
139: -- Standard check for p_commit
140: IF FND_API.to_Boolean( p_commit )
141: THEN
142: COMMIT WORK;
143: END IF;
144:
152: p_data => x_msg_data
153: );
154:
155: EXCEPTION
156: WHEN FND_API.G_EXC_ERROR THEN
157: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
158: P_API_NAME => L_API_NAME
159: ,P_PKG_NAME => G_PKG_NAME
160: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
162: ,X_MSG_COUNT => X_MSG_COUNT
163: ,X_MSG_DATA => X_MSG_DATA
164: ,X_RETURN_STATUS => X_RETURN_STATUS);
165:
166: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
167: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
168: P_API_NAME => L_API_NAME
169: ,P_PKG_NAME => G_PKG_NAME
170: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
188: -- Hint: Add corresponding delete detail table procedures if it's master-detail relationship.
189: -- The Master delete procedure may not be needed depends on different business requirements.
190: PROCEDURE Delete_camp_reason(
191: P_Api_Version_Number IN NUMBER,
192: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
193: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
194: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
195: P_camp_reason_Rec IN camp_reason_Rec_Type,
196: X_Return_Status OUT VARCHAR2,
189: -- The Master delete procedure may not be needed depends on different business requirements.
190: PROCEDURE Delete_camp_reason(
191: P_Api_Version_Number IN NUMBER,
192: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
193: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
194: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
195: P_camp_reason_Rec IN camp_reason_Rec_Type,
196: X_Return_Status OUT VARCHAR2,
197: X_Msg_Count OUT NUMBER,
190: PROCEDURE Delete_camp_reason(
191: P_Api_Version_Number IN NUMBER,
192: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
193: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
194: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
195: P_camp_reason_Rec IN camp_reason_Rec_Type,
196: X_Return_Status OUT VARCHAR2,
197: X_Msg_Count OUT NUMBER,
198: X_Msg_Data OUT VARCHAR2
206: -- Standard Start of API savepoint
207: SAVEPOINT DELETE_camp_reason_PVT;
208:
209: -- Standard call to check for call compatibility.
210: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
211: p_api_version_number,
212: l_api_name,
213: G_PKG_NAME)
214: THEN
211: p_api_version_number,
212: l_api_name,
213: G_PKG_NAME)
214: THEN
215: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
216: END IF;
217:
218:
219: -- Initialize message list if p_init_msg_list is set to TRUE.
216: END IF;
217:
218:
219: -- Initialize message list if p_init_msg_list is set to TRUE.
220: IF FND_API.to_Boolean( p_init_msg_list )
221: THEN
222: FND_MSG_PUB.initialize;
223: END IF;
224:
228:
229:
230:
231: -- Initialize API return status to SUCCESS
232: x_return_status := FND_API.G_RET_STS_SUCCESS;
233:
234: --
235: -- Api body
236: --
240: AND source_code = l_camp_reason_Rec.source_code
241: AND object_id = l_camp_reason_Rec.object_id;
242:
243: -- Standard check for p_commit
244: IF FND_API.to_Boolean( p_commit )
245: THEN
246: COMMIT WORK;
247: END IF;
248:
258: p_data => x_msg_data
259: );
260:
261: EXCEPTION
262: WHEN FND_API.G_EXC_ERROR THEN
263: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
264: P_API_NAME => L_API_NAME
265: ,P_PKG_NAME => G_PKG_NAME
266: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
268: ,X_MSG_COUNT => X_MSG_COUNT
269: ,X_MSG_DATA => X_MSG_DATA
270: ,X_RETURN_STATUS => X_RETURN_STATUS);
271:
272: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
273: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
274: P_API_NAME => L_API_NAME
275: ,P_PKG_NAME => G_PKG_NAME
276: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR