Win32::SqlServer::DTS::Assignment::DataFile - a class to represent a DTS DynamicPropertiesTaskAssignment object

    use warnings;
    use strict;
    use Win32::SqlServer::DTS::Application;
    use Test::More;
    use XML::Simple;

    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->() ) {

        foreach my $assignment_prop ( @{ $dyn_prop->get_properties() } ) {

            if ( $assignment_prop->get_type() eq 'DataFile' ) {

			    print $assignment_prop->to_string(), "\n";

            }

        }
    }

Win32::SqlServer::DTS::Assignment::DataFile is a subclass of Win32::SqlServer::DTS::Assignment superclass. It represents a DTS DynamicPropertiesTaskAssignment object that has a SourceDataFileFileName property defined.

Unless you want to extend the DTS API is quite probably that you're going to use Win32::SqlServer::DTS::Assignment::DataFile returned by the get_properties method from Win32::SqlServer::DTS::Task::DynamicProperty class.

Nothing.

Inherits all methods from Win32::SqlServer::DTS::Assignment.

Extends superclass method new by modifying the source attribute.

Overrided method from Win32::SqlServer::DTS::Assignment class. Returns a string containing the complete pathname plus filename from where the value will be fetched to set a destination. See Win32::SqlServer::DTS::Assignment (get_destination in Win32::SqlServer::DTS::Assigment) method for more information.

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

* Win32::OLE 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) 2006 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.