Changeset 1824 for trunk/LATMOS-Accounts/lib/LATMOS/Accounts
- Timestamp:
- 07/11/16 14:43:44 (8 years ago)
- Location:
- trunk/LATMOS-Accounts/lib/LATMOS/Accounts
- Files:
-
- 5 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/LATMOS-Accounts/lib/LATMOS/Accounts/SyncManager.pm
r1742 r1824 121 121 } 122 122 123 =head2 process_module($module) 124 125 Process C<$module>. 126 127 =cut 128 129 # TODO what is $dbrev, why is it need here ?? 130 131 sub process_module { 132 my ($self, $module) = @_; 133 134 eval { 135 if (!$self->ini->SectionExists($module)) { 136 la_log LA_ERR, "Cannot run inexistant module %s", $module; 137 return; 138 } 139 123 124 =head2 listSortedModules 125 126 List configured module ordered for running 127 128 =cut 129 130 sub listSortedModules { 131 my ($self) = @_; 132 133 my %modules = (); 134 135 foreach my $module ($self->list_modules) { 136 $modules{$module} = 1; 140 137 my $modtype = $self->ini->val($module, 'type', $module); 141 138 my $task = LATMOS::Accounts::Task->new( … … 147 144 or do { 148 145 la_log(LA_ERR, 'Cannot load module %s', $modtype); 146 next; 147 }; 148 149 $modules{$module} = $task->order; 150 } 151 152 return sort { $modules{$a} <=> $modules{$b} } keys %modules; 153 } 154 155 =head2 process_module($module) 156 157 Process C<$module>. 158 159 =cut 160 161 # TODO what is $dbrev, why is it need here ?? 162 163 sub process_module { 164 my ($self, $module) = @_; 165 166 eval { 167 if (!$self->ini->SectionExists($module)) { 168 la_log LA_ERR, "Cannot run inexistant module %s", $module; 169 return; 170 } 171 172 my $modtype = $self->ini->val($module, 'type', $module); 173 my $task = LATMOS::Accounts::Task->new( 174 $modtype, 175 config => $self->{config}, 176 name => $module, 177 syncm => $self, 178 ) 179 or do { 180 la_log(LA_ERR, 'Cannot load module %s', $modtype); 149 181 return; 150 182 }; -
trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Task.pm
r1740 r1824 48 48 return $self->{syncm}->ini->val($self->{name}, $value, $default) 49 49 } 50 51 =head2 order 52 53 Return the priority for the module: 0, 1 or 3 (0 = first) 54 55 =cut 56 57 sub order { 1 } 50 58 51 59 =head2 init -
trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Task/Basessynchro.pm
r1206 r1824 16 16 17 17 =cut 18 19 sub order { 2 } 18 20 19 21 sub run { -
trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Task/Employment.pm
r1789 r1824 16 16 17 17 =cut 18 19 sub order { 0 } 18 20 19 21 sub init { -
trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Task/Refreshexpired.pm
r1802 r1824 25 25 26 26 =cut 27 28 sub order { 0 } 27 29 28 30 # Every 10 minutes
Note: See TracChangeset
for help on using the changeset viewer.