Select Code to Download

#### Class dbi instance script ######
use strict;
...
while (my $chart = $it->next) {
    ***********   $chart->items; ***************
}

#### module #######
package CCopy;
...
CCopy::Chart_Item_XREF->columns(Primary => qw/ chart_id item_id /);
CCopy::Chart_Item_XREF->columns(All => qw/ insert_dtime update_dtime /
+);
################################

########### CHART ##################
chart_id      insert_dtime      update_dtime
...
feature_flag    priority_level   insert_dtime
update_dtime    locked_flag     special_flag
mandatory_flag