Perl::DBI and TYPE of column

[Matthias Apitz <guru@xxxxxxxxxxx>]

Hello,

We unload Sybase and Oracle data to migrate the database to PostgreSQL.
The loading is done very fast with PostgreSQL's COPY command.

During unload trailing blanks in all columns are discarded, because they
would cause problems during loading for INT and DATE columns. The
discarding is done like this after fetching the row into the array
@row_ary:

    ...
    # SRP-25024: support for PostgreSQL: we remove on export trailing blanks
    foreach my $i (0..$#row_ary) {
        $row_ary[$i] =~ s/\s+$//;
        # but for CHAR columns we keep one
        # print $dba->{'sth'}->{NAME}->[$i] . " " . $dba->{'sth'}->{TYPE}->[$i] . "\n"; 
        # it seems that VARCHAR in Sybase is TYPE=1 and in Oracle TYPE=12
        # see also http://infocenter.sybase.com/help/index.jsp?topic=/com.sybase.infocenter.dc36273.1570/html/sprocs/CIHHGDBC.htm
        # and ftp://sqlstandards.org/SC32/SQL_Registry/
        #
        if ($dba->{'sth'}->{TYPE}->[$i] == 1 || $dba->{'sth'}->{TYPE}->[$i] == 12)  {
            $row_ary[$i] =~ s/^$/ /;
        }
    }

My question here is: How I could get a copy of the document 
ftp://sqlstandards.org/SC32/SQL_Registry/

Any copy available here in this list? Thanks

	matthias
-- 
Matthias Apitz, ✉ guru@xxxxxxxxxxx, http://www.unixarea.de/ +49-176-38902045
Public GnuPG key: http://www.unixarea.de/key.pub