Oracle_pl_for_1.java

/*
 * Copyright 1999-2017 Alibaba Group Holding Ltd.
 *
 * Licensed under the Apache License, Version 2.0 (the "License");
 * you may not use this file except in compliance with the License.
 * You may obtain a copy of the License at
 *
 *      http://www.apache.org/licenses/LICENSE-2.0
 *
 * Unless required by applicable law or agreed to in writing, software
 * distributed under the License is distributed on an "AS IS" BASIS,
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 * See the License for the specific language governing permissions and
 * limitations under the License.
 */
package com.alibaba.druid.bvt.sql.oracle.pl;

import com.alibaba.druid.sql.OracleTest;
import com.alibaba.druid.sql.SQLUtils;
import com.alibaba.druid.sql.ast.SQLStatement;
import com.alibaba.druid.sql.visitor.SchemaStatVisitor;
import com.alibaba.druid.util.JdbcConstants;

import java.util.List;

public class Oracle_pl_for_1 extends OracleTest {

    public void test_0() throws Exception {
        String sql = "DECLARE\n" +
				"  TYPE empcurtyp IS REF CURSOR;\n" +
				"  TYPE namelist IS TABLE OF employees.last_name%TYPE;\n" +
				"  TYPE sallist IS TABLE OF employees.salary%TYPE;\n" +
				"  emp_cv  empcurtyp;\n" +
				"  names   namelist;\n" +
				"  sals    sallist;\n" +
				"BEGIN\n" +
				"  OPEN emp_cv FOR\n" +
				"    SELECT last_name, salary FROM employees\n" +
				"    WHERE job_id = 'SA_REP'\n" +
				"    ORDER BY salary DESC;\n" +
				"\n" +
				"  FETCH emp_cv BULK COLLECT INTO names, sals;\n" +
				"  CLOSE emp_cv;\n" +
				"  -- loop through the names and sals collections\n" +
				"  FOR i IN names.FIRST .. names.LAST\n" +
				"  LOOP\n" +
				"    DBMS_OUTPUT.PUT_LINE\n" +
				"      ('Name = ' || names(i) || ', salary = ' || sals(i));\n" +
				"  END LOOP;\n" +
				"END;"; //

        List<SQLStatement> statementList = SQLUtils.parseStatements(sql, JdbcConstants.ORACLE);
		SQLStatement stmt = statementList.get(0);

        assertEquals(1, statementList.size());

        SchemaStatVisitor visitor = SQLUtils.createSchemaStatVisitor(JdbcConstants.ORACLE);
        for (SQLStatement statement : statementList) {
            statement.accept(visitor);
        }

//        System.out.println("Tables : " + visitor.getTables());
//        System.out.println("fields : " + visitor.getColumns());
//        System.out.println("coditions : " + visitor.getConditions());
//        System.out.println("relationships : " + visitor.getRelationships());
//        System.out.println("orderBy : " + visitor.getOrderByColumns());

        assertEquals(0, visitor.getTables().size());

//        Assert.assertTrue(visitor.getTables().containsKey(new TableStat.Name("employees")));
//        Assert.assertTrue(visitor.getTables().containsKey(new TableStat.Name("emp_name")));

//        Assert.assertEquals(7, visitor.getColumns().size());
//        Assert.assertEquals(3, visitor.getConditions().size());
//        Assert.assertEquals(1, visitor.getRelationships().size());

        // Assert.assertTrue(visitor.getColumns().contains(new TableStat.Column("employees", "salary")));

		{
			String output = SQLUtils.toOracleString(stmt);
			System.out.println(output);
			assertEquals("DECLARE\n" +
							"\tTYPE empcurtyp IS REF CURSOR;\n" +
							"\tTYPE employees.last_name IS TABLE OF employees.last_name%TYPE;\n" +
							"\tTYPE employees.salary IS TABLE OF employees.salary%TYPE;\n" +
							"\temp_cv empcurtyp;\n" +
							"\tnames namelist;\n" +
							"\tsals sallist;\n" +
							"BEGIN\n" +
							"\tOPEN emp_cv FOR \n" +
							"\t\tSELECT last_name, salary\n" +
							"\t\tFROM employees\n" +
							"\t\tWHERE job_id = 'SA_REP'\n" +
							"\t\tORDER BY salary DESC;\n" +
							"\tFETCH emp_cv BULK COLLECT INTO names, sals;\n" +
							"\tCLOSE emp_cv;\n" +
							"\tFOR i IN names.FIRST..names.LAST\n" +
							"\tLOOP\n" +
							"\t\tDBMS_OUTPUT.PUT_LINE('Name = ' || names(i) || ', salary = ' || sals(i));\n" +
							"\tEND LOOP;\n" +
							"END", //
					output);
		}
		{
			String output = SQLUtils.toOracleString(stmt, SQLUtils.DEFAULT_LCASE_FORMAT_OPTION);
			assertEquals("declare\n" +
							"\ttype empcurtyp is REF CURSOR;\n" +
							"\ttype employees.last_name is TABLE OF employees.last_name%TYPE;\n" +
							"\ttype employees.salary is TABLE OF employees.salary%TYPE;\n" +
							"\temp_cv empcurtyp;\n" +
							"\tnames namelist;\n" +
							"\tsals sallist;\n" +
							"begin\n" +
							"\topen emp_cvfor \n" +
							"\t\tselect last_name, salary\n" +
							"\t\tfrom employees\n" +
							"\t\twhere job_id = 'SA_REP'\n" +
							"\t\torder by salary desc;\n" +
							"\tfetch emp_cv bulk collect into names, sals;\n" +
							"\tclose emp_cv;\n" +
							"\tfor i in names.FIRST..names.LAST\n" +
							"\tloop\n" +
							"\t\tDBMS_OUTPUT.PUT_LINE('Name = ' || names(i) || ', salary = ' || sals(i));\n" +
							"\tend loop;\n" +
							"end", //
					output);
		}
	}
}