content: /*
   * 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());
  
  //        assertTrue(visitor.getTables().containsKey(new TableStat.Name("employees")));
  //        assertTrue(visitor.getTables().containsKey(new TableStat.Name("emp_name")));
  
  //        assertEquals(7, visitor.getColumns().size());
  //        assertEquals(3, visitor.getConditions().size());
  //        assertEquals(1, visitor.getRelationships().size());
  
          // 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 namelist IS TABLE OF employees.last_name%TYPE;\n" +
                              "\tTYPE sallist 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 namelist is TABLE OF employees.last_name%TYPE;\n" +
                              "\ttype sallist 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);
          }
      }
  }
  