APPS.IEM_TAG_RUN_PROC_PVT dependencies on IEM_TAG_RUN_PROC_PVT

Line 1: PACKAGE BODY IEM_TAG_RUN_PROC_PVT AS

1: PACKAGE BODY IEM_TAG_RUN_PROC_PVT AS
2: /* $Header: iemvrprb.pls 120.1 2005/06/23 18:32:24 appldev shipped $ */
3: --
4: --
5: -- Purpose: Assistant api to dynamically run procedure.

Line 15: G_PKG_NAME CONSTANT varchar2(30) :='IEM_TAG_RUN_PROC_PVT ';

11: -- Liang Xia 11/1/2004 Fixed bug 3982076. Valid procedure name for 'TEST'
12: -- Liang Xia 04/06/2005 Fixed GSCC sql.46 ( bug 4256769 )
13: -- --------- ------ ------------------------------------------
14:
15: G_PKG_NAME CONSTANT varchar2(30) :='IEM_TAG_RUN_PROC_PVT ';
16:
17: G_created_updated_by NUMBER:=TO_NUMBER (FND_PROFILE.VALUE('USER_ID')) ;
18:
19: G_LAST_UPDATE_LOGIN NUMBER:=TO_NUMBER (FND_PROFILE.VALUE('LOGIN_ID') ) ;

Line 280: IEM_TAG_RUN_PROC_PVT.validProcedure(

276: l_proc_name := LTRIM(RTRIM(p_procedure_name));
277:
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,

Line 309: l_ProcCall := 'Begin '|| l_proc_name || '(IEM_TAG_RUN_PROC_PVT.G_key_value, :' ||l_para_out_name||'); END;';

305: if v_ArgumentName(6) is not null then
306: l_para_out_name := v_ArgumentName(6);
307: end if;
308:
309: l_ProcCall := 'Begin '|| l_proc_name || '(IEM_TAG_RUN_PROC_PVT.G_key_value, :' ||l_para_out_name||'); END;';
310:
311: --Open the cursor and parse the statement.
312: l_Cursor := DBMS_SQL.OPEN_CURSOR;
313: DBMS_SQL.PARSE(l_Cursor, l_ProcCall, DBMS_SQL.native);

Line 433: END IEM_TAG_RUN_PROC_PVT;

429: exception
430: when others then
431: null;
432: end;
433: END IEM_TAG_RUN_PROC_PVT;