6 use Test::SQL::Translator;
10 use SQL::Translator::Schema::Constants;
13 maybe_plan(2, 'SQL::Translator::Parser::YAML',
14 'SQL::Translator::Producer::Oracle');
17 my $yamlfile = "$Bin/data/oracle/schema_with_options.yaml";
20 $sqlt = SQL::Translator->new(
23 producer_args => { 'delay_constraints' => 1 },
24 quote_table_names => 1,
25 quote_field_names => 1,
28 my $sql_string = $sqlt->translate(
31 filename => $yamlfile,
34 ok($sql_string, 'Translation successfull');
35 ok($sql_string =~ /ADD CONSTRAINT "pk_d_operator" PRIMARY KEY/, 'constraints delayed');