DBA Data[Home] [Help]

APPS.HZ_CLASS_VALIDATE_V2PUB dependencies on DBMS_SQL

Line 1528: i := DBMS_SQL.OPEN_CURSOR;

1524: result VARCHAR2(1);
1525: row_proc INTEGER;
1526: row_fetch INTEGER;
1527: BEGIN
1528: i := DBMS_SQL.OPEN_CURSOR;
1529: DBMS_SQL.PARSE(i, i_str, DBMS_SQL.NATIVE);
1530: DBMS_SQL.DEFINE_COLUMN(i, 1, x_result, 1000 );
1531: row_proc := DBMS_SQL.EXECUTE(i);
1532: IF row_proc = 0 THEN

Line 1529: DBMS_SQL.PARSE(i, i_str, DBMS_SQL.NATIVE);

1525: row_proc INTEGER;
1526: row_fetch INTEGER;
1527: BEGIN
1528: i := DBMS_SQL.OPEN_CURSOR;
1529: DBMS_SQL.PARSE(i, i_str, DBMS_SQL.NATIVE);
1530: DBMS_SQL.DEFINE_COLUMN(i, 1, x_result, 1000 );
1531: row_proc := DBMS_SQL.EXECUTE(i);
1532: IF row_proc = 0 THEN
1533: row_fetch := DBMS_SQL.FETCH_ROWS(i);

Line 1530: DBMS_SQL.DEFINE_COLUMN(i, 1, x_result, 1000 );

1526: row_fetch INTEGER;
1527: BEGIN
1528: i := DBMS_SQL.OPEN_CURSOR;
1529: DBMS_SQL.PARSE(i, i_str, DBMS_SQL.NATIVE);
1530: DBMS_SQL.DEFINE_COLUMN(i, 1, x_result, 1000 );
1531: row_proc := DBMS_SQL.EXECUTE(i);
1532: IF row_proc = 0 THEN
1533: row_fetch := DBMS_SQL.FETCH_ROWS(i);
1534: IF row_fetch <> 0 THEN

Line 1531: row_proc := DBMS_SQL.EXECUTE(i);

1527: BEGIN
1528: i := DBMS_SQL.OPEN_CURSOR;
1529: DBMS_SQL.PARSE(i, i_str, DBMS_SQL.NATIVE);
1530: DBMS_SQL.DEFINE_COLUMN(i, 1, x_result, 1000 );
1531: row_proc := DBMS_SQL.EXECUTE(i);
1532: IF row_proc = 0 THEN
1533: row_fetch := DBMS_SQL.FETCH_ROWS(i);
1534: IF row_fetch <> 0 THEN
1535: DBMS_SQL.COLUMN_VALUE(i,1,x_result);

Line 1533: row_fetch := DBMS_SQL.FETCH_ROWS(i);

1529: DBMS_SQL.PARSE(i, i_str, DBMS_SQL.NATIVE);
1530: DBMS_SQL.DEFINE_COLUMN(i, 1, x_result, 1000 );
1531: row_proc := DBMS_SQL.EXECUTE(i);
1532: IF row_proc = 0 THEN
1533: row_fetch := DBMS_SQL.FETCH_ROWS(i);
1534: IF row_fetch <> 0 THEN
1535: DBMS_SQL.COLUMN_VALUE(i,1,x_result);
1536: result := 'Y';
1537: ELSE

Line 1535: DBMS_SQL.COLUMN_VALUE(i,1,x_result);

1531: row_proc := DBMS_SQL.EXECUTE(i);
1532: IF row_proc = 0 THEN
1533: row_fetch := DBMS_SQL.FETCH_ROWS(i);
1534: IF row_fetch <> 0 THEN
1535: DBMS_SQL.COLUMN_VALUE(i,1,x_result);
1536: result := 'Y';
1537: ELSE
1538: x_result := 'NON_VALUE';
1539: result := 'N';

Line 1542: DBMS_SQL.CLOSE_CURSOR(i);

1538: x_result := 'NON_VALUE';
1539: result := 'N';
1540: END IF;
1541: END IF;
1542: DBMS_SQL.CLOSE_CURSOR(i);
1543: RETURN(result);
1544: EXCEPTION
1545: WHEN OTHERS THEN
1546: x_result:= SUBSTRB(SQLERRM,1,100) ;

Line 1548: DBMS_SQL.CLOSE_CURSOR(i);

1544: EXCEPTION
1545: WHEN OTHERS THEN
1546: x_result:= SUBSTRB(SQLERRM,1,100) ;
1547: result := 'N';
1548: DBMS_SQL.CLOSE_CURSOR(i);
1549: RETURN(result);
1550: END sql_valid;
1551:
1552: FUNCTION sql_str_build