Revert "WIP single context in test-data"

This reverts commit af2b67b2ee.

src/main/resources/db/changelog/2-test/203-test-domain/2038-test-domain-test-data.sql

@@ -11,6 +11,7 @@ create or replace procedure createdomainTestData( packageName varchar, domainCou
 declare
     pac         record;
     pacAdmin    varchar;
+    currentTask varchar;
 begin
     select p.uuid, p.name, c.prefix as custPrefix
         from test_package p
@@ -20,8 +21,10 @@ begin
 
     for t in 0..(domainCount-1)
         loop
+            currentTask = 'creating RBAC test domain #' || t || ' for package ' || pac.name || ' #' || pac.uuid;
+            raise notice 'task: %', currentTask;
             pacAdmin = 'pac-admin-' || pac.name || '@' || pac.custPrefix || '.example.com';
-            call defineContext('creating RBAC test domain', null, pacAdmin, null);
+            call defineContext(currentTask, null, pacAdmin, null);
 
             insert
                 into test_domain (name, packageUuid)

src/main/resources/db/changelog/5-hs-office/501-contact/5018-hs-office-contact-test-data.sql

@@ -11,13 +11,17 @@
 create or replace procedure createHsOfficeContactTestData(contCaption varchar)
     language plpgsql as $$
 declare
+    currentTask     varchar;
     postalAddr      varchar;
     emailAddr       varchar;
 begin
+    currentTask = 'creating contact test-data ' || contCaption;
+    execute format('set local hsadminng.currentTask to %L', currentTask);
+
     emailAddr = 'contact-admin@' || cleanIdentifier(contCaption) || '.example.com';
-    call defineContext('creating contact test-data');
+    call defineContext(currentTask);
     perform createRbacUser(emailAddr);
-    call defineContext('creating contact test-data', null, emailAddr);
+    call defineContext(currentTask, null, emailAddr);
 
     postalAddr := E'Vorname Nachname\nStraße Hnr\nPLZ Stadt';
 

src/main/resources/db/changelog/5-hs-office/502-person/5028-hs-office-person-test-data.sql

@@ -17,13 +17,15 @@ create or replace procedure createHsOfficePersonTestData(
     language plpgsql as $$
 declare
     fullName    varchar;
+    currentTask varchar;
     emailAddr   varchar;
 begin
     fullName := concat_ws(', ', newTradeName, newFamilyName, newGivenName);
+    currentTask = 'creating person test-data ' || fullName;
     emailAddr = 'person-' || left(cleanIdentifier(fullName), 32) || '@example.com';
-    call defineContext('creating person test-data');
+    call defineContext(currentTask);
     perform createRbacUser(emailAddr);
-    call defineContext('creating person test-data', null, emailAddr);
+    call defineContext(currentTask, null, emailAddr);
     execute format('set local hsadminng.currentTask to %L', currentTask);
 
     raise notice 'creating test person: % by %', fullName, emailAddr;

src/main/resources/db/changelog/5-hs-office/503-relation/5038-hs-office-relation-test-data.sql

@@ -12,9 +12,11 @@ create or replace procedure createHsOfficeRelationTestData(
         holderPersonName varchar,
         relationType HsOfficeRelationType,
         anchorPersonName varchar,
-        contactCaption varchar)
+        contactCaption varchar,
+        mark varchar default null)
     language plpgsql as $$
 declare
+    currentTask     varchar;
     idName          varchar;
     anchorPerson    hs_office_person;
     holderPerson    hs_office_person;
@@ -22,6 +24,9 @@ declare
 
 begin
     idName := cleanIdentifier( anchorPersonName || '-' || holderPersonName);
+    currentTask := 'creating relation test-data ' || idName;
+    call defineContext(currentTask, null, 'superuser-alex@hostsharing.net', 'global#global:ADMIN');
+    execute format('set local hsadminng.currentTask to %L', currentTask);
 
     select p.*
             into anchorPerson
@@ -84,8 +89,6 @@ end; $$;
 
 do language plpgsql $$
     begin
-        call defineContext('creating relation test-data', null, 'superuser-alex@hostsharing.net', 'global#global:ADMIN');
-
         call createHsOfficeRelationTestData('First GmbH', 'PARTNER', 'Hostsharing eG', 'first contact');
         call createHsOfficeRelationTestData('Firby', 'REPRESENTATIVE', 'First GmbH', 'first contact');
         call createHsOfficeRelationTestData('First GmbH', 'DEBITOR', 'First GmbH', 'first contact');

src/main/resources/db/changelog/5-hs-office/504-partner/5048-hs-office-partner-test-data.sql

@@ -15,6 +15,7 @@ create or replace procedure createHsOfficePartnerTestData(
         contactCaption      varchar )
     language plpgsql as $$
 declare
+    currentTask         varchar;
     idName              varchar;
     mandantPerson       hs_office_person;
     partnerRel         hs_office_relation;
@@ -22,6 +23,9 @@ declare
     relatedDetailsUuid  uuid;
 begin
     idName := cleanIdentifier( partnerPersonName|| '-' || contactCaption);
+    currentTask := 'creating partner test-data ' || idName;
+    call defineContext(currentTask, null, 'superuser-alex@hostsharing.net', 'global#global:ADMIN');
+    execute format('set local hsadminng.currentTask to %L', currentTask);
 
     select p.* from hs_office_person p
                where p.tradeName = mandantTradeName
@@ -65,14 +69,13 @@ end; $$;
 --//
 
 
+
 -- ============================================================================
 --changeset hs-office-partner-TEST-DATA-GENERATION:1 –context=dev,tc endDelimiter:--//
 -- ----------------------------------------------------------------------------
 
 do language plpgsql $$
     begin
-        call defineContext('creating partner test-data ', null, 'superuser-alex@hostsharing.net', 'global#global:ADMIN');
-
         call createHsOfficePartnerTestData('Hostsharing eG', 10001, 'First GmbH', 'first contact');
         call createHsOfficePartnerTestData('Hostsharing eG', 10002, 'Second e.K.', 'second contact');
         call createHsOfficePartnerTestData('Hostsharing eG', 10003, 'Third OHG', 'third contact');

src/main/resources/db/changelog/5-hs-office/505-bankaccount/5058-hs-office-bankaccount-test-data.sql

@@ -11,11 +11,16 @@
 create or replace procedure createHsOfficeBankAccountTestData(givenHolder varchar, givenIBAN varchar, givenBIC varchar)
     language plpgsql as $$
 declare
+    currentTask   varchar;
     emailAddr varchar;
 begin
+    currentTask = 'creating bankaccount test-data ' || givenHolder;
+    execute format('set local hsadminng.currentTask to %L', currentTask);
+
     emailAddr = 'bankaccount-admin@' || cleanIdentifier(givenHolder) || '.example.com';
+    call defineContext(currentTask);
     perform createRbacUser(emailAddr);
-    call defineContext('creating bankaccount test-data', null, emailAddr);
+    call defineContext(currentTask, null, emailAddr);
 
     raise notice 'creating test bankaccount: %', givenHolder;
     insert
@@ -31,8 +36,6 @@ end; $$;
 
 do language plpgsql $$
     begin
-        call defineContext('creating bankaccount test-data');
-
         -- IBANs+BICs taken from https://ibanvalidieren.de/beispiele.html
         call createHsOfficeBankAccountTestData('First GmbH', 'DE02120300000000202051', 'BYLADEM1001');
         call createHsOfficeBankAccountTestData('Peter Smith', 'DE02500105170137075030', 'INGDDEFF');

src/main/resources/db/changelog/5-hs-office/506-debitor/5068-hs-office-debitor-test-data.sql

@@ -16,11 +16,15 @@ create or replace procedure createHsOfficeDebitorTestData(
     )
     language plpgsql as $$
 declare
+    currentTask             varchar;
     idName                  varchar;
     relatedDebitorRelUuid   uuid;
     relatedBankAccountUuid  uuid;
 begin
     idName := cleanIdentifier( forPartnerPersonName|| '-' || forBillingContactCaption);
+    currentTask := 'creating debitor test-data ' || idName;
+    call defineContext(currentTask, null, 'superuser-alex@hostsharing.net', 'global#global:ADMIN');
+    execute format('set local hsadminng.currentTask to %L', currentTask);
 
     select debitorRel.uuid
             into relatedDebitorRelUuid
@@ -50,8 +54,6 @@ end; $$;
 
 do language plpgsql $$
     begin
-        call defineContext('creating debitor test-data', null, 'superuser-alex@hostsharing.net', 'global#global:ADMIN');
-
         call createHsOfficeDebitorTestData(11, 'First GmbH', 'first contact', 'fir');
         call createHsOfficeDebitorTestData(12, 'Second e.K.', 'second contact', 'sec');
         call createHsOfficeDebitorTestData(13, 'Third OHG', 'third contact', 'thi');

src/main/resources/db/changelog/5-hs-office/507-sepamandate/5078-hs-office-sepamandate-test-data.sql

@@ -15,9 +15,14 @@ create or replace procedure createHsOfficeSepaMandateTestData(
         withReference varchar)
     language plpgsql as $$
 declare
+    currentTask         varchar;
     relatedDebitor      hs_office_debitor;
     relatedBankAccount  hs_office_bankAccount;
 begin
+    currentTask := 'creating SEPA-mandate test-data ' || forPartnerNumber::text || forDebitorSuffix::text;
+    call defineContext(currentTask, null, 'superuser-alex@hostsharing.net', 'global#global:ADMIN');
+    execute format('set local hsadminng.currentTask to %L', currentTask);
+
     select debitor.* into relatedDebitor
         from hs_office_debitor debitor
         join hs_office_relation debitorRel on debitorRel.uuid = debitor.debitorRelUuid
@@ -43,8 +48,6 @@ end; $$;
 
 do language plpgsql $$
     begin
-        call defineContext('creating SEPA-mandate test-data', null, 'superuser-alex@hostsharing.net', 'global#global:ADMIN');
-
         call createHsOfficeSepaMandateTestData(10001, '11', 'DE02120300000000202051', 'ref-10001-11');
         call createHsOfficeSepaMandateTestData(10002, '12', 'DE02100500000054540402', 'ref-10002-12');
         call createHsOfficeSepaMandateTestData(10003, '13', 'DE02300209000106531065', 'ref-10003-13');

src/main/resources/db/changelog/5-hs-office/510-membership/5108-hs-office-membership-test-data.sql

@@ -13,8 +13,15 @@ create or replace procedure createHsOfficeMembershipTestData(
         newMemberNumberSuffix char(2) )
     language plpgsql as $$
 declare
+    currentTask             varchar;
     relatedPartner          hs_office_partner;
 begin
+    currentTask := 'creating Membership test-data ' ||
+                    'P-' || forPartnerNumber::text ||
+                    'M-...' || newMemberNumberSuffix;
+    call defineContext(currentTask, null, 'superuser-alex@hostsharing.net', 'global#global:ADMIN');
+    execute format('set local hsadminng.currentTask to %L', currentTask);
+
     select partner.* from hs_office_partner partner
                      where partner.partnerNumber = forPartnerNumber into relatedPartner;
 
@@ -33,8 +40,6 @@ end; $$;
 
 do language plpgsql $$
     begin
-        call defineContext('creating Membership test-data', null, 'superuser-alex@hostsharing.net', 'global#global:ADMIN');
-
         call createHsOfficeMembershipTestData(10001, '01');
         call createHsOfficeMembershipTestData(10002, '02');
         call createHsOfficeMembershipTestData(10003, '03');

src/main/resources/db/changelog/5-hs-office/511-coopshares/5118-hs-office-coopshares-test-data.sql

@@ -14,9 +14,15 @@ create or replace procedure createHsOfficeCoopSharesTransactionTestData(
 )
     language plpgsql as $$
 declare
+    currentTask             varchar;
     membership              hs_office_membership;
     subscriptionEntryUuid   uuid;
 begin
+    currentTask = 'creating coopSharesTransaction test-data ' || givenPartnerNumber::text || givenMemberNumberSuffix;
+    execute format('set local hsadminng.currentTask to %L', currentTask);
+    SET CONSTRAINTS ALL DEFERRED;
+
+    call defineContext(currentTask);
     select m.uuid
         from hs_office_membership m
         join hs_office_partner p on p.uuid = m.partneruuid
@@ -43,9 +49,6 @@ end; $$;
 
 do language plpgsql $$
     begin
-        call defineContext('creating coopSharesTransaction test-data');
-        SET CONSTRAINTS ALL DEFERRED;
-
         call createHsOfficeCoopSharesTransactionTestData(10001, '01');
         call createHsOfficeCoopSharesTransactionTestData(10002, '02');
         call createHsOfficeCoopSharesTransactionTestData(10003, '03');

src/main/resources/db/changelog/5-hs-office/512-coopassets/5128-hs-office-coopassets-test-data.sql

@@ -14,9 +14,15 @@ create or replace procedure createHsOfficeCoopAssetsTransactionTestData(
     )
     language plpgsql as $$
 declare
+    currentTask             varchar;
     membership              hs_office_membership;
     lossEntryUuid           uuid;
 begin
+    currentTask = 'creating coopAssetsTransaction test-data ' || givenPartnerNumber || givenMemberNumberSuffix;
+    execute format('set local hsadminng.currentTask to %L', currentTask);
+    SET CONSTRAINTS ALL DEFERRED;
+
+    call defineContext(currentTask);
     select m.uuid
         from hs_office_membership m
                  join hs_office_partner p on p.uuid = m.partneruuid
@@ -43,9 +49,6 @@ end; $$;
 
 do language plpgsql $$
     begin
-        call defineContext('creating coopAssetsTransaction test-data');
-        SET CONSTRAINTS ALL DEFERRED;
-
         call createHsOfficeCoopAssetsTransactionTestData(10001, '01');
         call createHsOfficeCoopAssetsTransactionTestData(10002, '02');
         call createHsOfficeCoopAssetsTransactionTestData(10003, '03');

src/main/resources/db/changelog/6-hs-booking/620-booking-project/6208-hs-booking-project-test-data.sql

@@ -14,8 +14,12 @@ create or replace procedure createHsBookingProjectTransactionTestData(
     )
     language plpgsql as $$
 declare
+    currentTask         varchar;
     relatedDebitor      hs_office_debitor;
 begin
+    currentTask := 'creating booking-project test-data ' || givenPartnerNumber::text || givenDebitorSuffix;
+    call defineContext(currentTask, null, 'superuser-alex@hostsharing.net', 'global#global:ADMIN');
+    execute format('set local hsadminng.currentTask to %L', currentTask);
 
     select debitor.* into relatedDebitor
                      from hs_office_debitor debitor
@@ -39,8 +43,6 @@ end; $$;
 
 do language plpgsql $$
     begin
-        call defineContext('creating booking-project test-data', null, 'superuser-alex@hostsharing.net', 'global#global:ADMIN');
-
         call createHsBookingProjectTransactionTestData(10001, '11');
         call createHsBookingProjectTransactionTestData(10002, '12');
         call createHsBookingProjectTransactionTestData(10003, '13');

src/main/resources/db/changelog/6-hs-booking/630-booking-item/6208-hs-booking-item-test-data.sql

@@ -14,10 +14,15 @@ create or replace procedure createHsBookingItemTransactionTestData(
     )
     language plpgsql as $$
 declare
+    currentTask         varchar;
     relatedProject      hs_booking_project;
     privateCloudUuid    uuid;
     managedServerUuid   uuid;
 begin
+    currentTask := 'creating booking-item test-data ' || givenPartnerNumber::text || givenDebitorSuffix;
+    call defineContext(currentTask, null, 'superuser-alex@hostsharing.net', 'global#global:ADMIN');
+    execute format('set local hsadminng.currentTask to %L', currentTask);
+
     select project.* into relatedProject
                      from hs_booking_project project
                      where project.caption = 'D-' || givenPartnerNumber || givenDebitorSuffix || ' default project';
@@ -44,11 +49,7 @@ end; $$;
 -- ----------------------------------------------------------------------------
 
 do language plpgsql $$
-    declare
-        currentTask text;
     begin
-        call defineContext('creating booking-item test-data', null, 'superuser-alex@hostsharing.net', 'global#global:ADMIN');
-
         call createHsBookingItemTransactionTestData(10001, '11');
         call createHsBookingItemTransactionTestData(10002, '12');
         call createHsBookingItemTransactionTestData(10003, '13');

src/main/resources/db/changelog/7-hs-hosting/701-hosting-asset/7018-hs-hosting-asset-test-data.sql

@@ -11,6 +11,7 @@
 create or replace procedure createHsHostingAssetTestData(givenProjectCaption varchar)
     language plpgsql as $$
 declare
+    currentTask                         varchar;
     relatedProject                      hs_booking_project;
     relatedDebitor                      hs_office_debitor;
     privateCloudBI                      hs_booking_item;
@@ -30,7 +31,9 @@ declare
     pgSqlInstanceUuid                   uuid;
     PgSqlUserUuid                       uuid;
 begin
-    call defineContext('creating hosting-asset test-data', null, 'superuser-alex@hostsharing.net', 'global#global:ADMIN');
+    currentTask := 'creating hosting-asset test-data ' || givenProjectCaption;
+    call defineContext(currentTask, null, 'superuser-alex@hostsharing.net', 'global#global:ADMIN');
+    execute format('set local hsadminng.currentTask to %L', currentTask);
 
     select project.* into relatedProject
                   from hs_booking_project project
@@ -110,8 +113,6 @@ end; $$;
 
 do language plpgsql $$
     begin
-        call defineContext('creating hosting-asset test-data', null, 'superuser-alex@hostsharing.net', 'global#global:ADMIN');
-
         call createHsHostingAssetTestData('D-1000111 default project');
         call createHsHostingAssetTestData('D-1000212 default project');
         call createHsHostingAssetTestData('D-1000313 default project');

src/test/java/net/hostsharing/hsadminng/hs/booking/item/HsBookingItemRepositoryIntegrationTest.java

@@ -68,7 +68,7 @@ class HsBookingItemRepositoryIntegrationTest extends ContextBasedTestWithCleanup
     public void auditJournalLogIsAvailable() {
         // given
         final var query = em.createNativeQuery("""
-                select currentTask, targetTable, targetOp, targetdelta->>'caption'
+                select currentTask, targetTable, targetOp
                     from tx_journal_v
                     where targettable = 'hs_booking_item';
                 """);
@@ -78,13 +78,9 @@ class HsBookingItemRepositoryIntegrationTest extends ContextBasedTestWithCleanup
 
         // then
         assertThat(customerLogEntries).map(Arrays::toString).contains(
-                "[creating booking-item test-data, hs_booking_item, INSERT, prod CloudServer]",
+                "[creating booking-item test-data 1000111, hs_booking_item, INSERT]",
-                "[creating booking-item test-data, hs_booking_item, INSERT, separate ManagedServer]",
+                "[creating booking-item test-data 1000212, hs_booking_item, INSERT]",
-                "[creating booking-item test-data, hs_booking_item, INSERT, separate ManagedWebspace]",
+                "[creating booking-item test-data 1000313, hs_booking_item, INSERT]");
-                "[creating booking-item test-data, hs_booking_item, INSERT, some ManagedServer]",
-                "[creating booking-item test-data, hs_booking_item, INSERT, some ManagedWebspace]",
-                "[creating booking-item test-data, hs_booking_item, INSERT, some PrivateCloud]",
-                "[creating booking-item test-data, hs_booking_item, INSERT, test CloudServer]");
     }
 
     @Test