DBA Data[Home] [Help]

APPS.IEM_TAG_RUN_PROC_PVT dependencies on FND_API

Line 41: P_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

37:
38:
39: PROCEDURE validProcedure
40: ( p_api_version_number IN NUMBER,
41: P_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
42: p_commit IN VARCHAR2 := FND_API.G_FALSE,
43: p_ProcName IN VARCHAR2,
44: x_return_status OUT NOCOPY VARCHAR2,
45: x_msg_count OUT NOCOPY NUMBER,

Line 42: p_commit IN VARCHAR2 := FND_API.G_FALSE,

38:
39: PROCEDURE validProcedure
40: ( p_api_version_number IN NUMBER,
41: P_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
42: p_commit IN VARCHAR2 := FND_API.G_FALSE,
43: p_ProcName IN VARCHAR2,
44: x_return_status OUT NOCOPY VARCHAR2,
45: x_msg_count OUT NOCOPY NUMBER,
46: x_msg_data OUT NOCOPY VARCHAR2)

Line 81: IF NOT FND_API.Compatible_API_Call (l_api_version_number,

77: --Standard Savepoint
78: SAVEPOINT validProcedure;
79:
80: -- Standard call to check for call compatibility.
81: IF NOT FND_API.Compatible_API_Call (l_api_version_number,
82: p_api_version_number,
83: l_api_name,
84: G_PKG_NAME)
85: THEN

Line 86: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

82: p_api_version_number,
83: l_api_name,
84: G_PKG_NAME)
85: THEN
86: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
87: END IF;
88:
89: --Initialize the message list if p_init_msg_list is set to TRUE
90: If FND_API.to_Boolean(p_init_msg_list) THEN

Line 90: If FND_API.to_Boolean(p_init_msg_list) THEN

86: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
87: END IF;
88:
89: --Initialize the message list if p_init_msg_list is set to TRUE
90: If FND_API.to_Boolean(p_init_msg_list) THEN
91: FND_MSG_PUB.initialize;
92: END IF;
93:
94: --Initialize API status return

Line 95: x_return_status := FND_API.G_RET_STS_SUCCESS;

91: FND_MSG_PUB.initialize;
92: END IF;
93:
94: --Initialize API status return
95: x_return_status := FND_API.G_RET_STS_SUCCESS;
96:
97:
98: if UPPER(p_ProcName) = UPPER('test') then
99: raise IEM_TAG_PROC_WRONG_SIGNATURE ;

Line 144: x_return_status := FND_API.G_RET_STS_ERROR;

140:
141: EXCEPTION
142: WHEN IEM_TAG_PROC_INVALID THEN
143: ROLLBACK TO validProcedure;
144: x_return_status := FND_API.G_RET_STS_ERROR;
145: FND_MESSAGE.SET_NAME('IEM', 'IEM_TAG_PROC_INVALID');
146:
147: FND_MSG_PUB.ADD;
148: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);

Line 152: x_return_status := FND_API.G_RET_STS_ERROR;

148: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
149:
150: WHEN IEM_TAG_PROC_NOT_EXIST THEN
151: ROLLBACK TO validProcedure;
152: x_return_status := FND_API.G_RET_STS_ERROR;
153: FND_MESSAGE.SET_NAME('IEM', 'IEM_TAG_PROC_NOT_EXIST');
154:
155: FND_MSG_PUB.ADD;
156: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);

Line 160: x_return_status := FND_API.G_RET_STS_ERROR;

156: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
157:
158: WHEN IEM_TAG_PROC_NOT_EXIST_PACK THEN
159: ROLLBACK TO validProcedure;
160: x_return_status := FND_API.G_RET_STS_ERROR;
161: FND_MESSAGE.SET_NAME('IEM', 'IEM_TAG_PROC_NOT_EXIST');
162: FND_MSG_PUB.ADD;
163: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
164:

Line 167: x_return_status := FND_API.G_RET_STS_ERROR;

163: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
164:
165: WHEN IEM_TAG_PROC_SYNTAX_ERR THEN
166: ROLLBACK TO validProcedure;
167: x_return_status := FND_API.G_RET_STS_ERROR;
168: FND_MESSAGE.SET_NAME('IEM', 'IEM_TAG_PROC_SYNTAX_ERR');
169: FND_MSG_PUB.ADD;
170: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
171:

Line 174: x_return_status := FND_API.G_RET_STS_ERROR;

170: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
171:
172: WHEN IEM_TAG_PROC_NOT_EXIST_PACK_1 THEN
173: ROLLBACK TO validProcedure;
174: x_return_status := FND_API.G_RET_STS_ERROR;
175: FND_MESSAGE.SET_NAME('IEM', 'IEM_TAG_PROC_NOT_EXIST');
176: FND_MSG_PUB.ADD;
177: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
178:

Line 181: x_return_status := FND_API.G_RET_STS_ERROR;

177: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
178:
179: WHEN IEM_TAG_PROC_INVALID_1 THEN
180: ROLLBACK TO validProcedure;
181: x_return_status := FND_API.G_RET_STS_ERROR;
182: FND_MESSAGE.SET_NAME('IEM', 'IEM_TAG_PROC_INVALID');
183: FND_MSG_PUB.ADD;
184: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
185:

Line 188: x_return_status := FND_API.G_RET_STS_ERROR;

184: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
185:
186: WHEN IEM_TAG_PROC_WRONG_SIGNATURE THEN
187: ROLLBACK TO validProcedure;
188: x_return_status := FND_API.G_RET_STS_ERROR;
189: FND_MESSAGE.SET_NAME('IEM', 'IEM_TAG_PROC_WRONG_SIGNATURE');
190:
191: FND_MSG_PUB.ADD;
192: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);

Line 194: WHEN FND_API.G_EXC_ERROR THEN

190:
191: FND_MSG_PUB.ADD;
192: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
193:
194: WHEN FND_API.G_EXC_ERROR THEN
195: ROLLBACK TO validProcedure;
196: x_return_status := FND_API.G_RET_STS_ERROR ;
197: FND_MSG_PUB.Count_And_Get
198: ( p_count => x_msg_count,p_data => x_msg_data);

Line 196: x_return_status := FND_API.G_RET_STS_ERROR ;

192: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
193:
194: WHEN FND_API.G_EXC_ERROR THEN
195: ROLLBACK TO validProcedure;
196: x_return_status := FND_API.G_RET_STS_ERROR ;
197: FND_MSG_PUB.Count_And_Get
198: ( p_count => x_msg_count,p_data => x_msg_data);
199:
200:

Line 201: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

197: FND_MSG_PUB.Count_And_Get
198: ( p_count => x_msg_count,p_data => x_msg_data);
199:
200:
201: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
202: ROLLBACK TO validProcedure;
203: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
204: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,p_data => x_msg_data);
205:

Line 203: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

199:
200:
201: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
202: ROLLBACK TO validProcedure;
203: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
204: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,p_data => x_msg_data);
205:
206:
207: WHEN OTHERS THEN

Line 209: x_return_status := FND_API.G_RET_STS_ERROR;

205:
206:
207: WHEN OTHERS THEN
208: ROLLBACK TO validProcedure;
209: x_return_status := FND_API.G_RET_STS_ERROR;
210: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
211: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME , l_api_name);
212: END IF;
213:

Line 221: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

217:
218:
219: PROCEDURE run_Procedure (
220: p_api_version_number IN NUMBER,
221: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
222: p_commit IN VARCHAR2 := FND_API.G_FALSE,
223: p_procedure_name IN VARCHAR2,
224: p_key_value IN IEM_TAGPROCESS_PUB.keyVals_tbl_type,
225: x_result OUT NOCOPY VARCHAR2,

Line 222: p_commit IN VARCHAR2 := FND_API.G_FALSE,

218:
219: PROCEDURE run_Procedure (
220: p_api_version_number IN NUMBER,
221: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
222: p_commit IN VARCHAR2 := FND_API.G_FALSE,
223: p_procedure_name IN VARCHAR2,
224: p_key_value IN IEM_TAGPROCESS_PUB.keyVals_tbl_type,
225: x_result OUT NOCOPY VARCHAR2,
226: x_return_status OUT NOCOPY VARCHAR2,

Line 234: l_return_status VARCHAR2(20) := FND_API.G_RET_STS_SUCCESS;

230: l_api_name VARCHAR2(255):='run_Procedure';
231: l_api_version_number NUMBER:=1.0;
232: l_seq_id NUMBER;
233:
234: l_return_status VARCHAR2(20) := FND_API.G_RET_STS_SUCCESS;
235: l_msg_count NUMBER := 0;
236: l_msg_data VARCHAR2(2000);
237:
238: l_proc_name VARCHAR2(256);

Line 254: IF NOT FND_API.Compatible_API_Call (l_api_version_number,

250: -- Standard Start of API savepoint
251: SAVEPOINT run_Procedure_PVT;
252:
253: -- Standard call to check for call compatibility.
254: IF NOT FND_API.Compatible_API_Call (l_api_version_number,
255: p_api_version_number,
256: l_api_name,
257: G_PKG_NAME)
258: THEN

Line 259: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

255: p_api_version_number,
256: l_api_name,
257: G_PKG_NAME)
258: THEN
259: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
260: END IF;
261:
262:
263: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 264: IF FND_API.to_Boolean( p_init_msg_list )

260: END IF;
261:
262:
263: -- Initialize message list if p_init_msg_list is set to TRUE.
264: IF FND_API.to_Boolean( p_init_msg_list )
265: THEN
266: FND_MSG_PUB.initialize;
267: END IF;
268:

Line 271: x_return_status := FND_API.G_RET_STS_SUCCESS;

267: END IF;
268:
269:
270: -- Initialize API return status to SUCCESS
271: x_return_status := FND_API.G_RET_STS_SUCCESS;
272:
273: -- Actual API begins here
274:
275: -- Valid procedure first

Line 282: p_init_msg_list => FND_API.G_FALSE,

278: IF l_proc_name is NOT NULL THEN
279:
280: IEM_TAG_RUN_PROC_PVT.validProcedure(
281: p_api_version_number => P_Api_Version_Number,
282: p_init_msg_list => FND_API.G_FALSE,
283: p_commit => P_Commit,
284: p_ProcName => l_proc_name,
285: x_return_status => l_return_status,
286: x_msg_count => l_msg_count,

Line 289: if (l_return_status <> FND_API.G_RET_STS_SUCCESS) then

285: x_return_status => l_return_status,
286: x_msg_count => l_msg_count,
287: x_msg_data => l_msg_data
288: );
289: if (l_return_status <> FND_API.G_RET_STS_SUCCESS) then
290: raise l_IEM_INVALID_PROCEDURE;
291: end if;
292:
293: END IF;

Line 328: IF FND_API.To_Boolean(p_commit) THEN

324:
325: DBMS_SQL.close_cursor( l_Cursor );
326:
327: -- Standard Check Of p_commit.
328: IF FND_API.To_Boolean(p_commit) THEN
329: COMMIT WORK;
330: END IF;
331:
332: -- Standard callto get message count and if count is 1, get message info.

Line 346: x_return_status := FND_API.G_RET_STS_ERROR ;

342: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
343: logMessage := '[Invalid procedure: ' || l_proc_name|| ']';
344: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'IEM.PLSQL.IEM_TAG_RUNPROC_PVT.RUN_PROCEDURE', logMessage);
345: end if;
346: x_return_status := FND_API.G_RET_STS_ERROR ;
347:
348: WHEN FND_API.G_EXC_ERROR THEN
349: ROLLBACK TO run_Procedure_PVT;
350: x_return_status := FND_API.G_RET_STS_ERROR ;

Line 348: WHEN FND_API.G_EXC_ERROR THEN

344: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'IEM.PLSQL.IEM_TAG_RUNPROC_PVT.RUN_PROCEDURE', logMessage);
345: end if;
346: x_return_status := FND_API.G_RET_STS_ERROR ;
347:
348: WHEN FND_API.G_EXC_ERROR THEN
349: ROLLBACK TO run_Procedure_PVT;
350: x_return_status := FND_API.G_RET_STS_ERROR ;
351: FND_MSG_PUB.Count_And_Get
352: ( p_count => x_msg_count,

Line 350: x_return_status := FND_API.G_RET_STS_ERROR ;

346: x_return_status := FND_API.G_RET_STS_ERROR ;
347:
348: WHEN FND_API.G_EXC_ERROR THEN
349: ROLLBACK TO run_Procedure_PVT;
350: x_return_status := FND_API.G_RET_STS_ERROR ;
351: FND_MSG_PUB.Count_And_Get
352: ( p_count => x_msg_count,
353: p_data => x_msg_data
354: );

Line 356: logMessage := '[FND_API.G_EXC_ERROR happened in RUN_PROCEDURE - ' || l_proc_name|| ' error:'||sqlerrm||']';

352: ( p_count => x_msg_count,
353: p_data => x_msg_data
354: );
355: if( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
356: logMessage := '[FND_API.G_EXC_ERROR happened in RUN_PROCEDURE - ' || l_proc_name|| ' error:'||sqlerrm||']';
357: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'IEM.PLSQL.IEM_TAG_RUNPROC_PVT.RUN_PROCEDURE', logMessage);
358: end if;
359: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
360: ROLLBACK TO run_Procedure_PVT;

Line 359: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

355: if( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
356: logMessage := '[FND_API.G_EXC_ERROR happened in RUN_PROCEDURE - ' || l_proc_name|| ' error:'||sqlerrm||']';
357: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'IEM.PLSQL.IEM_TAG_RUNPROC_PVT.RUN_PROCEDURE', logMessage);
358: end if;
359: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
360: ROLLBACK TO run_Procedure_PVT;
361: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
362: FND_MSG_PUB.Count_And_Get
363: ( p_count => x_msg_count,

Line 361: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

357: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'IEM.PLSQL.IEM_TAG_RUNPROC_PVT.RUN_PROCEDURE', logMessage);
358: end if;
359: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
360: ROLLBACK TO run_Procedure_PVT;
361: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
362: FND_MSG_PUB.Count_And_Get
363: ( p_count => x_msg_count,
364: p_data => x_msg_data
365: );

Line 367: logMessage := '[FND_API.G_EXC_UNEXPECTED_ERROR happened in RUN_PROCEDURE - ' || l_proc_name|| ' error:'||sqlerrm||']';

363: ( p_count => x_msg_count,
364: p_data => x_msg_data
365: );
366: if( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
367: logMessage := '[FND_API.G_EXC_UNEXPECTED_ERROR happened in RUN_PROCEDURE - ' || l_proc_name|| ' error:'||sqlerrm||']';
368: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'IEM.PLSQL.IEM_TAG_RUNPROC_PVT.RUN_PROCEDURE', logMessage);
369: end if;
370: WHEN OTHERS THEN
371: ROLLBACK TO run_Procedure_PVT;

Line 372: x_return_status := FND_API.G_RET_STS_ERROR;

368: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'IEM.PLSQL.IEM_TAG_RUNPROC_PVT.RUN_PROCEDURE', logMessage);
369: end if;
370: WHEN OTHERS THEN
371: ROLLBACK TO run_Procedure_PVT;
372: x_return_status := FND_API.G_RET_STS_ERROR;
373:
374: IF FND_MSG_PUB.Check_Msg_Level
375: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
376: THEN