2022-10-13 13:35:50 +02:00
|
|
|
|
--liquibase formatted sql
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
-- ============================================================================
|
|
|
|
|
--changeset hs-office-sepaMandate-TEST-DATA-GENERATOR:1 endDelimiter:--//
|
|
|
|
|
-- ----------------------------------------------------------------------------
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
|
Creates a single sepaMandate test record.
|
|
|
|
|
*/
|
2024-03-28 12:15:13 +01:00
|
|
|
|
create or replace procedure createHsOfficeSepaMandateTestData(
|
|
|
|
|
forPartnerNumber numeric(5),
|
|
|
|
|
forDebitorSuffix numeric(2),
|
|
|
|
|
forIban varchar,
|
|
|
|
|
withReference varchar)
|
2022-10-13 13:35:50 +02:00
|
|
|
|
language plpgsql as $$
|
|
|
|
|
declare
|
|
|
|
|
currentTask varchar;
|
|
|
|
|
relatedDebitor hs_office_debitor;
|
|
|
|
|
relatedBankAccount hs_office_bankAccount;
|
|
|
|
|
begin
|
2024-03-28 12:15:13 +01:00
|
|
|
|
currentTask := 'creating SEPA-mandate test-data ' || forPartnerNumber::text || forDebitorSuffix::text;
|
2022-10-13 13:35:50 +02:00
|
|
|
|
call defineContext(currentTask, null, 'superuser-alex@hostsharing.net', 'global#global.admin');
|
|
|
|
|
execute format('set local hsadminng.currentTask to %L', currentTask);
|
|
|
|
|
|
2024-03-28 12:15:13 +01:00
|
|
|
|
select debitor.* into relatedDebitor
|
|
|
|
|
from hs_office_debitor debitor
|
|
|
|
|
join hs_office_relation debitorRel on debitorRel.uuid = debitor.debitorRelUuid
|
|
|
|
|
join hs_office_relation partnerRel on partnerRel.holderUuid = debitorRel.anchorUuid
|
|
|
|
|
join hs_office_partner partner on partner.partnerRelUuid = partnerRel.uuid
|
|
|
|
|
where partner.partnerNumber = forPartnerNumber and debitor.debitorNumberSuffix = forDebitorSuffix;
|
|
|
|
|
select b.* into relatedBankAccount
|
|
|
|
|
from hs_office_bankAccount b where b.iban = forIban;
|
2022-10-13 13:35:50 +02:00
|
|
|
|
|
2024-03-28 12:15:13 +01:00
|
|
|
|
raise notice 'creating test SEPA-mandate: %', forPartnerNumber::text || forDebitorSuffix::text;
|
2022-10-13 13:35:50 +02:00
|
|
|
|
raise notice '- using debitor (%): %', relatedDebitor.uuid, relatedDebitor;
|
|
|
|
|
raise notice '- using bankAccount (%): %', relatedBankAccount.uuid, relatedBankAccount;
|
|
|
|
|
insert
|
2022-10-28 13:44:48 +02:00
|
|
|
|
into hs_office_sepamandate (uuid, debitoruuid, bankAccountuuid, reference, agreement, validity)
|
2024-03-28 12:15:13 +01:00
|
|
|
|
values (uuid_generate_v4(), relatedDebitor.uuid, relatedBankAccount.uuid, withReference, '20220930', daterange('20221001' , '20261231', '[]'));
|
2022-10-13 13:35:50 +02:00
|
|
|
|
end; $$;
|
|
|
|
|
--//
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
-- ============================================================================
|
|
|
|
|
--changeset hs-office-sepaMandate-TEST-DATA-GENERATION:1 –context=dev,tc endDelimiter:--//
|
|
|
|
|
-- ----------------------------------------------------------------------------
|
|
|
|
|
|
|
|
|
|
do language plpgsql $$
|
|
|
|
|
begin
|
2024-03-28 12:15:13 +01:00
|
|
|
|
call createHsOfficeSepaMandateTestData(10001, 11, 'DE02120300000000202051', 'ref-10001-11');
|
|
|
|
|
call createHsOfficeSepaMandateTestData(10002, 12, 'DE02100500000054540402', 'ref-10002-12');
|
|
|
|
|
call createHsOfficeSepaMandateTestData(10003, 13, 'DE02300209000106531065', 'ref-10003-13');
|
2022-10-13 13:35:50 +02:00
|
|
|
|
end;
|
|
|
|
|
$$;
|
|
|
|
|
--//
|