|
|
Peggy 0.01 (Default branch)
|
|
SQL::Translator::Producer::SQLServer(3pm) User Contributed Perl Documentation SQL::Translator::Producer::SQLServer(3pm) NAME
SQL::Translator::Producer::SQLServer - MS SQLServer producer for SQL::Translator SYNOPSIS
use SQL::Translator; my $t = SQL::Translator->new( parser => '...', producer => 'SQLServer' ); $t->translate; DESCRIPTION
This is currently a thin wrapper around the nextgen SQL::Translator::Generator::DDL::SQLServer DDL maker. Extra Attributes field.list List of values for an enum field. TODO
* !! Write some tests !! * Reserved words list needs updating to SQLServer. * Triggers, Procedures and Views DO NOT WORK # Text of view is already a 'create view' statement so no need to # be fancy foreach ( $schema->get_views ) { my $name = $_->name(); $output .= " "; $output .= "-- -- View: $name -- " unless $no_comments; my $text = $_->sql(); $text =~ s/ //g; $output .= "$text GO "; } # Text of procedure already has the 'create procedure' stuff # so there is no need to do anything fancy. However, we should # think about doing fancy stuff with granting permissions and # so on. foreach ( $schema->get_procedures ) { my $name = $_->name(); $output .= " "; $output .= "-- -- Procedure: $name -- " unless $no_comments; my $text = $_->sql(); $text =~ s/ //g; $output .= "$text GO "; } SEE ALSO
SQL::Translator AUTHORS
See the included AUTHORS file: http://search.cpan.org/dist/SQL-Translator/AUTHORS <http://search.cpan.org/dist/SQL-Translator/AUTHORS> COPYRIGHT
Copyright (c) 2012 the SQL::Translator "AUTHORS" as listed above. LICENSE
This code is free software and may be distributed under the same terms as Perl itself. perl v5.14.2 2012-05-10 SQL::Translator::Producer::SQLServer(3pm)
