Re: Perl::DBI and TYPE of column

On 3/3/20 6:02 AM, Matthias Apitz wrote:
> 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

All I could find:

https://grokbase.com/t/perl/dbi-users/074q99ddsn/registry-of-values-for-ansi-x3-135-and-iso-iec-9075-sql-standards


> 
>     matthias
> 


-- 
Adrian Klaver
adrian.klaver@aklaver.com