[svn:p5ee] r12570 - p5ee/trunk/App-Repository/lib/App/Repository

[spadkins]

Author: spadkins
Date: Thu Mar  5 11:32:28 2009
New Revision: 12570

Modified:
   p5ee/trunk/App-Repository/lib/App/Repository/Oracle.pm

Log:
added import_datatype to impor_rows for Oracle

Modified: p5ee/trunk/App-Repository/lib/App/Repository/Oracle.pm
==============================================================================
--- p5ee/trunk/App-Repository/lib/App/Repository/Oracle.pm      (original)
+++ p5ee/trunk/App-Repository/lib/App/Repository/Oracle.pm      Thu Mar  5 
11:32:28 2009
@@ -648,9 +648,13 @@
     for (my $i = 0; $i <= $#$columns; $i++) {
         $column = $columns->[$i];
         my $expr = $table_def->{column}{$column}{import_expr} || 
$context_options->{"app.Repository.$dbname.$table.column.$column.import_expr"};
+        my $datatype = $table_def->{column}{$column}{import_datatype} || 
$context_options->{"app.Repository.$dbname.$table.column.$column.import_datatype"};
 
         print FILE "   $column";
         $type = $table_def->{column}{$column}{type};
+        if ($datatype) {
+            print FILE " $datatype";
+        }
         if ($expr) {
             print FILE " \"$expr\"";
         }