Win32::SqlServer::DTS::Assignment::Destination::Task - a subclass of Win32::SqlServer::DTS::Assignment::Destination for tasks
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"; } } }
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.
Win32::SqlServer::DTS::Assignment::Destination::GlobalVar
Win32::SqlServer::DTS::Assignment::Destination
The string returned by the get_string method has this format:
get_string
'Tasks';name of the task;'Properties';name of the property.
'Tasks';name of the task;'Properties';name of the property
Nothing.
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.
initialize
Win32::SqlServer::DTS::Assignment at perldoc.
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.
Alceu Rodrigues de Freitas Junior, <arfreitas@cpan.org>
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.
To install Win32::SqlServer::DTS, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Win32::SqlServer::DTS
CPAN shell
perl -MCPAN -e shell install Win32::SqlServer::DTS
For more information on module installation, please visit the detailed CPAN module installation guide.