NAME

Win32::SqlServer::DTS::Assignment::DestinationFactory - abstract class to generate Win32::SqlServer::DTS::Assignment::Destination subclasses depending on the Destination string.

SYNOPSIS

sub get_destination {

    my $self = shift;

    return Win32::SqlServer::DTS::Assignment::DestinationFactory->create( $self->{destination} );

}

DESCRIPTION

Win32::SqlServer::DTS::Assignment::DestinationFactory instantiates and return new Win32::SqlServer::DTS::Assigment::Destination subclasses depending on the Destination string passed as a reference.

EXPORT

Nothing.

METHODS

create

Expects a destination string as a parameter. Such string is usually obtained from the destination attribute in a Win32::SqlServer::DTS::Assignment object. Considering that there is no method to invoke such attribute value directly (although one could use the method get_properties to fetch that), such use is recomended to be left only internally by a Win32::SqlServer::DTS::Assignment object.

Returns a Win32::SqlServer::DTS::Assignment::Destination subclass depending on the string passed as a parameter. If it fails to identify the subclass, it generates a warning and returns undef.

SEE ALSO

• Win32::SqlServer::DTS::Assignment::Destination at perldoc, as well it's subclasses.

• MSDN on Microsoft website and MS SQL Server 2000 Books Online are a reference about using DTS' object hierarchy, but one will need to convert examples written in VBScript to Perl code.

AUTHOR

Alceu Rodrigues de Freitas Junior, <arfreitas@cpan.org>

COPYRIGHT AND LICENSE

Copyright (C) 2007 by Alceu Rodrigues de Freitas Junior

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.8 or, at your option, any later version of Perl 5 you may have available.