Revision 4eab0ccf
Von Moritz Bunkus vor fast 8 Jahren hinzugefügt
SL/DBUpgrade2/Base.pm | ||
---|---|---|
30 | 30 |
die $EVAL_ERROR; |
31 | 31 |
} |
32 | 32 |
|
33 |
my $auth = $file_name =~ m{/Pg-upgrade2-auth/} ? 'Auth::' : ''; |
|
33 | 34 |
my $package = delete $params{tag}; |
34 | 35 |
$package =~ s/[^a-zA-Z0-9_]+/_/g; |
35 |
$package = "SL::DBUpgrade2::${package}"; |
|
36 |
$package = "SL::DBUpgrade2::${auth}${package}";
|
|
36 | 37 |
|
37 | 38 |
$package->new(%params)->run; |
38 | 39 |
} |
sql/Pg-upgrade2-auth/auth_schema_normalization_1.pl | ||
---|---|---|
1 | 1 |
# @tag: auth_schema_normalization_1 |
2 | 2 |
# @description: Auth-Datenbankschema Normalisierungen Teil 1 |
3 | 3 |
# @depends: |
4 |
package SL::DBUpgrade2::auth_schema_normalization_1; |
|
4 |
package SL::DBUpgrade2::Auth::auth_schema_normalization_1;
|
|
5 | 5 |
|
6 | 6 |
use strict; |
7 | 7 |
use utf8; |
sql/Pg-upgrade2-auth/bank_transaction_rights.pl | ||
---|---|---|
1 | 1 |
# @tag: bank_transaction_rights |
2 | 2 |
# @description: Setzt das neue Recht die Bankerweiterung zu nutzen (für Gruppen die auch Recht Kontenabgleich haben) |
3 | 3 |
# @depends: release_3_2_0 |
4 |
package SL::DBUpgrade2::bank_transaction_rights; |
|
4 |
package SL::DBUpgrade2::Auth::bank_transaction_rights;
|
|
5 | 5 |
|
6 | 6 |
use strict; |
7 | 7 |
use utf8; |
sql/Pg-upgrade2-auth/clients.pl | ||
---|---|---|
2 | 2 |
# @description: Einführung von Mandanten |
3 | 3 |
# @depends: release_3_0_0 |
4 | 4 |
# @ignore: 0 |
5 |
package SL::DBUpgrade2::clients; |
|
5 |
package SL::DBUpgrade2::Auth::clients;
|
|
6 | 6 |
|
7 | 7 |
use strict; |
8 | 8 |
use utf8; |
sql/Pg-upgrade2-auth/clients_webdav.pl | ||
---|---|---|
2 | 2 |
# @description: WebDAV-Migration für Mandanten |
3 | 3 |
# @depends: clients |
4 | 4 |
# @ignore: 0 |
5 |
package SL::DBUpgrade2::clients_webdav; |
|
5 |
package SL::DBUpgrade2::Auth::clients_webdav;
|
|
6 | 6 |
|
7 | 7 |
use strict; |
8 | 8 |
use utf8; |
sql/Pg-upgrade2-auth/delivery_plan_rights.pl | ||
---|---|---|
1 | 1 |
# @tag: delivery_plan_rights |
2 | 2 |
# @description: Setzt das neue Recht den Lieferplan anzuzeigen |
3 | 3 |
# @depends: release_3_2_0 add_master_rights |
4 |
package SL::DBUpgrade2::delivery_plan_rights; |
|
4 |
package SL::DBUpgrade2::Auth::delivery_plan_rights;
|
|
5 | 5 |
|
6 | 6 |
use strict; |
7 | 7 |
use utf8; |
sql/Pg-upgrade2-auth/delivery_process_value.pl | ||
---|---|---|
1 | 1 |
# @tag: delivery_process_value |
2 | 2 |
# @description: Setzt das neue Recht den Lieferstatus mit Warenwert zu sehen |
3 | 3 |
# @depends: release_3_2_0 add_master_rights |
4 |
package SL::DBUpgrade2::delivery_process_value; |
|
4 |
package SL::DBUpgrade2::Auth::delivery_process_value;
|
|
5 | 5 |
|
6 | 6 |
use strict; |
7 | 7 |
use utf8; |
sql/Pg-upgrade2-auth/details_and_report_of_parts.pl | ||
---|---|---|
1 | 1 |
# @tag: details_and_report_of_parts |
2 | 2 |
# @description: Setzt das Recht zur Anzeige von Details und Berichten von Waren, Dienstleistungen und Erzeugnissen |
3 | 3 |
# @depends: release_3_2_0 add_master_rights |
4 |
package SL::DBUpgrade2::details_and_report_of_parts; |
|
4 |
package SL::DBUpgrade2::Auth::details_and_report_of_parts;
|
|
5 | 5 |
|
6 | 6 |
use strict; |
7 | 7 |
use utf8; |
sql/Pg-upgrade2-auth/foreign_key_constraints_on_delete.pl | ||
---|---|---|
2 | 2 |
# @description: Ändert "FOREIGN KEY" constraints auf "ON DELETE CASCADE" |
3 | 3 |
# @depends: clients |
4 | 4 |
# @ignore: 0 |
5 |
package SL::DBUpgrade2::foreign_key_constraints_on_delete; |
|
5 |
package SL::DBUpgrade2::Auth::foreign_key_constraints_on_delete;
|
|
6 | 6 |
|
7 | 7 |
use Data::Dumper; |
8 | 8 |
|
sql/Pg-upgrade2-auth/mail_journal_rights.pl | ||
---|---|---|
4 | 4 |
# @locales: E-Mail-Journal |
5 | 5 |
# @locales: Read all employee e-mails |
6 | 6 |
|
7 |
package SL::DBUpgrade2::mail_journal_rights; |
|
7 |
package SL::DBUpgrade2::Auth::mail_journal_rights;
|
|
8 | 8 |
|
9 | 9 |
use strict; |
10 | 10 |
use utf8; |
sql/Pg-upgrade2-auth/productivity_rights.pl | ||
---|---|---|
1 | 1 |
# @tag: productivity_rights |
2 | 2 |
# @description: Setzt das Recht die Produktivität einzusehen und das Recht den Link zum Admin-Menü anzuzeigen wieder wie vorher |
3 | 3 |
# @depends: release_3_2_0 add_master_rights |
4 |
package SL::DBUpgrade2::productivity_rights; |
|
4 |
package SL::DBUpgrade2::Auth::productivity_rights;
|
|
5 | 5 |
|
6 | 6 |
use strict; |
7 | 7 |
use utf8; |
sql/Pg-upgrade2-auth/purchase_letter_rights.pl | ||
---|---|---|
3 | 3 |
# @depends: release_3_2_0 sales_letter_rights |
4 | 4 |
# @locales: Edit purchase letters |
5 | 5 |
# @locales: Show purchase letters report |
6 |
package SL::DBUpgrade2::purchase_letter_rights; |
|
6 |
package SL::DBUpgrade2::Auth::purchase_letter_rights;
|
|
7 | 7 |
|
8 | 8 |
use strict; |
9 | 9 |
use utf8; |
sql/Pg-upgrade2-auth/record_links_rights.pl | ||
---|---|---|
1 | 1 |
# @tag: record_links_rights |
2 | 2 |
# @description: Setzt das Recht um den Tab verknüpfte Belege zu sehen, per Default erlaubt (wie vorher auch) |
3 | 3 |
# @depends: release_3_4_0 master_rights_position_gaps |
4 |
package SL::DBUpgrade2::record_links_rights; |
|
4 |
package SL::DBUpgrade2::Auth::record_links_rights;
|
|
5 | 5 |
|
6 | 6 |
use strict; |
7 | 7 |
use utf8; |
sql/Pg-upgrade2-auth/requirement_spec_rights.pl | ||
---|---|---|
1 | 1 |
# @tag: requirement_spec_rights |
2 | 2 |
# @description: Neues Gruppenrecht für Pflichtenhefte |
3 | 3 |
# @depends: release_3_2_0 add_master_rights |
4 |
package SL::DBUpgrade2::requirement_spec_rights; |
|
4 |
package SL::DBUpgrade2::Auth::requirement_spec_rights;
|
|
5 | 5 |
|
6 | 6 |
use strict; |
7 | 7 |
use utf8; |
sql/Pg-upgrade2-auth/rights_for_showing_ar_and_ap_transactions.pl | ||
---|---|---|
1 | 1 |
# @tag: rights_for_showing_ar_and_ap_transactions |
2 | 2 |
# @description: Setzt das Recht zur Anzeige von Debitoren- und Kreditorenbuchungen im Rechnungsbericht |
3 | 3 |
# @depends: release_3_2_0 add_master_rights |
4 |
package SL::DBUpgrade2::rights_for_showing_ar_and_ap_transactions; |
|
4 |
package SL::DBUpgrade2::Auth::rights_for_showing_ar_and_ap_transactions;
|
|
5 | 5 |
|
6 | 6 |
use strict; |
7 | 7 |
use utf8; |
sql/Pg-upgrade2-auth/sales_letter_rights.pl | ||
---|---|---|
1 | 1 |
# @tag: sales_letter_rights |
2 | 2 |
# @description: Setzt das neue Recht die Brieffunktion anzuzeigen |
3 | 3 |
# @depends: release_3_2_0 add_master_rights |
4 |
package SL::DBUpgrade2::sales_letter_rights; |
|
4 |
package SL::DBUpgrade2::Auth::sales_letter_rights;
|
|
5 | 5 |
|
6 | 6 |
use strict; |
7 | 7 |
use utf8; |
sql/Pg-upgrade2-auth/split_transaction_rights.pl | ||
---|---|---|
7 | 7 |
# @locales: AP Transactions |
8 | 8 |
|
9 | 9 |
|
10 |
package SL::DBUpgrade2::split_transaction_rights; |
|
10 |
package SL::DBUpgrade2::Auth::split_transaction_rights;
|
|
11 | 11 |
|
12 | 12 |
use strict; |
13 | 13 |
use utf8; |
... | ... | |
37 | 37 |
} # end run |
38 | 38 |
|
39 | 39 |
1; |
40 |
|
Auch abrufbar als: Unified diff
Auth-DB-Upgrades alle nach SL::DBUpgrade2::Auth verschieben
Das verhindert eine Warnung wegen Umdefinition der Funktion
»SL::DBUpgrade2::clients::run« während der Tests, weil es das Script
»clients.pl« sowohl für die Auth-DB als auch für die Haupt-DB gibt.