51 |
|
|
52 |
Loads B<Source>, B<ComesFrom>, B<SourceURL>. |
Loads B<Source>, B<ComesFrom>, B<SourceURL>. |
53 |
|
|
54 |
|
=item External |
55 |
|
|
56 |
|
Loads B<ExternalAliasOrg>, B<ExternalAliasFunc>. |
57 |
|
|
58 |
=item * |
=item * |
59 |
|
|
60 |
Loads all of the above tables. |
Loads all of the above tables. |
102 |
trace => 3 }, |
trace => 3 }, |
103 |
@ARGV); |
@ARGV); |
104 |
# Set up tracing. |
# Set up tracing. |
105 |
TSetup("$options->{trace} SproutLoad ERDBLoad ERDB Tracer Load", "+>$FIG_Config::temp/trace.log"); |
TSetup("$options->{trace} SproutLoad ERDBLoad ERDB Stats Tracer Load", "+>$FIG_Config::temp/trace.log"); |
106 |
# Create the sprout loader object. |
# Create the sprout loader object. |
107 |
my $fig = FIG->new(); |
my $fig = FIG->new(); |
108 |
my $sprout = SFXlate->new_sprout_only(); |
my $sprout = SFXlate->new_sprout_only(); |
136 |
if ($group eq 'BBH' || $group eq '*') { |
if ($group eq 'BBH' || $group eq '*') { |
137 |
$spl->LoadBBHData(); |
$spl->LoadBBHData(); |
138 |
} |
} |
139 |
if ($group eq 'Groups' || $group eq '*') { |
if ($group eq 'Group' || $group eq '*') { |
140 |
$spl->LoadGroupData(); |
$spl->LoadGroupData(); |
141 |
} |
} |
142 |
if ($group eq 'Source' || $group eq '*') { |
if ($group eq 'Source' || $group eq '*') { |
143 |
$spl->LoadSourceData(); |
$spl->LoadSourceData(); |
144 |
} |
} |
145 |
|
if ($group eq 'External' || $group eq '*') { |
146 |
|
$spl->LoadExternalData(); |
147 |
|
} |
148 |
|
|
149 |
} |
} |
150 |
Trace("Load complete.") if T(2); |
Trace("Load complete.") if T(2); |