APPS.IEM_TAG_KEY_PVT dependencies on DBMS_SQL

Line 361: l_cursorid := DBMS_SQL.OPEN_CURSOR;

357: -- Valid 'QUERY' type and 'PROCEDURE' type
358: if p_type_type_code = 'QUERY' then
359: IF p_value is NOT NULL THEN
360: BEGIN
361: l_cursorid := DBMS_SQL.OPEN_CURSOR;
362: DBMS_SQL.PARSE(l_cursorid, l_value, DBMS_SQL.V7);
363:
364: EXCEPTION
365: WHEN OTHERS THEN

Line 362: DBMS_SQL.PARSE(l_cursorid, l_value, DBMS_SQL.V7);

358: if p_type_type_code = 'QUERY' then
359: IF p_value is NOT NULL THEN
360: BEGIN
361: l_cursorid := DBMS_SQL.OPEN_CURSOR;
362: DBMS_SQL.PARSE(l_cursorid, l_value, DBMS_SQL.V7);
363:
364: EXCEPTION
365: WHEN OTHERS THEN
366: fnd_message.set_name ('IEM', 'IEM_TAG_INVALID_QUERY');

Line 370: DBMS_SQL.CLOSE_CURSOR(l_cursorid);

366: fnd_message.set_name ('IEM', 'IEM_TAG_INVALID_QUERY');
367: l_error_text := SUBSTR (SQLERRM , 1 , 240);
368: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',l_error_text);
369: FND_MSG_PUB.add;
370: DBMS_SQL.CLOSE_CURSOR(l_cursorid);
371: RAISE l_invalid_query;
372: END;
373: END IF;
374: elsif p_type_type_code = 'PROCEDURE' then

Line 956: l_cursorid := DBMS_SQL.OPEN_CURSOR;

952: -- Valid 'QUERY' type and 'PROCEDURE' type
953: if p_type_type_code = 'QUERY' then
954: IF p_value is NOT NULL THEN
955: BEGIN
956: l_cursorid := DBMS_SQL.OPEN_CURSOR;
957: DBMS_SQL.PARSE(l_cursorid, p_value, DBMS_SQL.V7);
958:
959: EXCEPTION
960: WHEN OTHERS THEN

Line 957: DBMS_SQL.PARSE(l_cursorid, p_value, DBMS_SQL.V7);

953: if p_type_type_code = 'QUERY' then
954: IF p_value is NOT NULL THEN
955: BEGIN
956: l_cursorid := DBMS_SQL.OPEN_CURSOR;
957: DBMS_SQL.PARSE(l_cursorid, p_value, DBMS_SQL.V7);
958:
959: EXCEPTION
960: WHEN OTHERS THEN
961: fnd_message.set_name ('IEM', 'IEM_TAG_INVALID_QUERY');

Line 965: DBMS_SQL.CLOSE_CURSOR(l_cursorid);

961: fnd_message.set_name ('IEM', 'IEM_TAG_INVALID_QUERY');
962: l_error_text := SUBSTR (SQLERRM , 1 , 240);
963: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',l_error_text);
964: FND_MSG_PUB.add;
965: DBMS_SQL.CLOSE_CURSOR(l_cursorid);
966: RAISE l_invalid_query;
967: END;
968: END IF;
969: elsif p_type_type_code = 'PROCEDURE' then