Author: spadkins
Date: Tue Aug 7 12:09:46 2007
New Revision: 9825
Modified:
p5ee/trunk/App-Repository/lib/App/Repository.pm
Log:
add get_phys_column_names() method
Modified: p5ee/trunk/App-Repository/lib/App/Repository.pm
==============================================================================
--- p5ee/trunk/App-Repository/lib/App/Repository.pm (original)
+++ p5ee/trunk/App-Repository/lib/App/Repository.pm Tue Aug 7 12:09:46 2007
@@ -2399,6 +2399,13 @@
return($columns);
}
+sub get_phys_column_names {
+ my ($self, $table) = @_;
+ my $table_def = $self->get_table_def($table);
+ my $columns = $table_def->{phys_columns};
+ return($columns);
+}
+
#############################################################################
# get_column_labels()
#############################################################################
