NAME

Win32::SqlServer::DTS::Assignment::Destination::Task - a subclass of Win32::SqlServer::DTS::Assignment::Destination for tasks

SYNOPSIS

    use warnings;
    use strict;
    use Win32::SqlServer::DTS::Application;
    my $xml = XML::Simple->new();
    my $config = $xml->XMLin('test-config.xml');

    my $app = Win32::SqlServer::DTS::Application->new($config->{credential});

    my $package =
      $app->get_db_package(
        { id => '', version_id => '', name => $config->{package}, package_password => '' } );

        my $iterator = $package->get_dynamic_props();

    while ( my $dyn_prop = $iterator->() ) {

        my $assign_iterator = $dyn_props->get_assignments();

        while ( my $assignment = $assign_iterator->() ) {

            my $dest = $assignment->get_destination();

                # checking all properties global variables being handled by Dynamic Properties task
            if ( $dest->changes('Task') ) {

                print $dest->get_string(), "\n";

            }

        }

    }

DESCRIPTION

Win32::SqlServer::DTS::Assignment::Destination::GlobalVar is a subclass of Win32::SqlServer::DTS::Assignment::Destination and represents the tasks properties as the assignments destinations of a DTS package.

The string returned by the get_string method has this format:

'Tasks';name of the task;'Properties';name of the property.

EXPORT

Nothing.

METHODS

initialize

initialize method sets the destination attribute as the DTS Package task property name. As an additional attribute, the method also sets taskname with the task name being targeted.

SEE ALSO

• Win32::SqlServer::DTS::Assignment at perldoc.

• Win32::SqlServer::DTS::Assignment::Destination at perldoc.

• 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.