| commit | author | age | ||
| 7f5b23 | 1 | --liquibase formatted sql |
| MH | 2 | |
| 3 | ||
| 4 | -- ============================================================================ | |
| 5 | --changeset hs-office-sepaMandate-TEST-DATA-GENERATOR:1 endDelimiter:--// | |
| 6 | -- ---------------------------------------------------------------------------- | |
| 7 | ||
| 8 | /* | |
| 9 | Creates a single sepaMandate test record. | |
| 10 | */ | |
| 11 | create or replace procedure createHsOfficeSepaMandateTestData( tradeNameAndHolderName varchar ) | |
| 12 | language plpgsql as $$ | |
| 13 | declare | |
| 14 | currentTask varchar; | |
| 15 | idName varchar; | |
| 16 | relatedDebitor hs_office_debitor; | |
| 17 | relatedBankAccount hs_office_bankAccount; | |
| 18 | begin | |
| 19 | idName := cleanIdentifier( tradeNameAndHolderName); | |
| 20 | currentTask := 'creating SEPA-mandate test-data ' || idName; | |
| 21 | call defineContext(currentTask, null, 'superuser-alex@hostsharing.net', 'global#global.admin'); | |
| 22 | execute format('set local hsadminng.currentTask to %L', currentTask); | |
| 23 | ||
| 24 | select debitor.* from hs_office_debitor debitor | |
| 25 | join hs_office_partner parter on parter.uuid = debitor.partnerUuid | |
| 26 | join hs_office_person person on person.uuid = parter.personUuid | |
| 27 | where person.tradeName = tradeNameAndHolderName into relatedDebitor; | |
| 28 | select c.* from hs_office_bankAccount c where c.holder = tradeNameAndHolderName into relatedBankAccount; | |
| 29 | ||
| 30 | raise notice 'creating test SEPA-mandate: %', idName; | |
| 31 | raise notice '- using debitor (%): %', relatedDebitor.uuid, relatedDebitor; | |
| 32 | raise notice '- using bankAccount (%): %', relatedBankAccount.uuid, relatedBankAccount; | |
| 33 | insert | |
| 64461f | 34 | into hs_office_sepamandate (uuid, debitoruuid, bankAccountuuid, reference, agreement, validity) |
| MH | 35 | values (uuid_generate_v4(), relatedDebitor.uuid, relatedBankAccount.uuid, 'ref'||idName, '20220930', daterange('20221001' , '20261231', '[]')); |
| 7f5b23 | 36 | end; $$; |
| MH | 37 | --// |
| 38 | ||
| 39 | ||
| 40 | -- ============================================================================ | |
| 41 | --changeset hs-office-sepaMandate-TEST-DATA-GENERATION:1 –context=dev,tc endDelimiter:--// | |
| 42 | -- ---------------------------------------------------------------------------- | |
| 43 | ||
| 44 | do language plpgsql $$ | |
| 45 | begin | |
| 46 | call createHsOfficeSepaMandateTestData('First GmbH'); | |
| 47 | call createHsOfficeSepaMandateTestData('Second e.K.'); | |
| 48 | call createHsOfficeSepaMandateTestData('Third OHG'); | |
| 49 | end; | |
| 50 | $$; | |
| 51 | --// | |
