sql::translator::producer::sqlserver(3pm) [debian man page]

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)

SQL::Translator::Parser::DBIx::Class(3) 		User Contributed Perl Documentation		   SQL::Translator::Parser::DBIx::Class(3)

NAME

       SQL::Translator::Parser::DBIx::Class - Create a SQL::Translator schema from a DBIx::Class::Schema instance

SYNOPSIS

	## Via DBIx::Class
	use MyApp::Schema;
	my $schema = MyApp::Schema->connect("dbi:SQLite:something.db");
	$schema->create_ddl_dir();
	## or
	$schema->deploy();

	## Standalone
	use MyApp::Schema;
	use SQL::Translator;

	my $schema = MyApp::Schema->connect;
	my $trans  = SQL::Translator->new (
	     parser	 => 'SQL::Translator::Parser::DBIx::Class',
	     parser_args => {
		 dbic_schema => $schema,
		 add_fk_index => 0,
		 sources => [qw/
		   Artist
		   CD
		 /],
	     },
	     producer	 => 'SQLite',
	    ) or die SQL::Translator->error;
	my $out = $trans->translate() or die $trans->error;

DESCRIPTION

       This class requires SQL::Translator installed to work.

       "SQL::Translator::Parser::DBIx::Class" reads a DBIx::Class schema, interrogates the columns, and stuffs it all in an $sqlt_schema object.

       Its primary use is in deploying database layouts described as a set of DBIx::Class classes, to a database. To do this, see "deploy" in
       DBIx::Class::Schema.

       This can also be achieved by having DBIx::Class export the schema as a set of SQL files ready for import into your database, or passed to
       other machines that need to have your application installed but don't have SQL::Translator installed. To do this see "create_ddl_dir" in
       DBIx::Class::Schema.

PARSER OPTIONS

   dbic_schema
       The DBIx::Class schema (either an instance or a class name) to be parsed.  This argument is in fact optional - instead one can supply it
       later at translation time as an argument to "translate" in SQL::Translator. In other words both of the following invocations are valid and
       will produce conceptually identical output:

	 my $yaml = SQL::Translator->new(
	   parser => 'SQL::Translator::Parser::DBIx::Class',
	   parser_args => {
	     dbic_schema => $schema,
	   },
	   producer => 'SQL::Translator::Producer::YAML',
	 )->translate;

	 my $yaml = SQL::Translator->new(
	   parser => 'SQL::Translator::Parser::DBIx::Class',
	   producer => 'SQL::Translator::Producer::YAML',
	 )->translate(data => $schema);

   add_fk_index
       Create an index for each foreign key.  Enabled by default, as having indexed foreign key columns is normally the sensible thing to do.

   sources
       Arguments: @class_names

       Limit the amount of parsed sources by supplying an explicit list of source names.

SEE ALSO

       SQL::Translator, DBIx::Class::Schema

AUTHORS

       See "CONTRIBUTORS" in DBIx::Class.

LICENSE

       You may distribute this code under the same terms as Perl itself.

perl v5.18.2							    2014-01-22				   SQL::Translator::Parser::DBIx::Class(3)