jordi fita mas
20827b2cfb
These two fields are just for information purposes, as Numerus does not have any way to wire transfer using these, but people might want to keep these in the contact’s info as a convenience. Since not every contact should have an IBAN, e.g., customers, and inside SEPA (European Union and some more countries) the BIC is not required, they are in two different relations in order to be optional without using NULL. For the IBAN i found an already made PostgreSQL module, but for BIC i had to write a regular expression based on the information i gathered from Wikipedia, because the ISO standard is not free. These two parameters for the add_contact and edit_contact functions are TEXT because i realized that these functions are intended to be used from the web application, that only deals with texts, so the ValueOrNil() function was unnecessarily complex and PostreSQL’s functions were better suited to “convert” from TEXT to IBAN or BIC. The same is true for EMAIL and URI domains, so i changed their parameter types to TEXT too. Closes #54.
163 lines
6.4 KiB
PL/PgSQL
163 lines
6.4 KiB
PL/PgSQL
-- Test edit_contact
|
||
set client_min_messages to warning;
|
||
create extension if not exists pgtap;
|
||
reset client_min_messages;
|
||
|
||
begin;
|
||
|
||
select plan(19);
|
||
|
||
set search_path to auth, numerus, public;
|
||
|
||
select has_function('numerus', 'edit_contact', array ['uuid', 'text', 'text', 'text', 'text', 'tax_details', 'text', 'text', 'tag_name[]']);
|
||
select function_lang_is('numerus', 'edit_contact', array ['uuid', 'text', 'text', 'text', 'text', 'tax_details', 'text', 'text', 'tag_name[]'], 'plpgsql');
|
||
select function_returns('numerus', 'edit_contact', array ['uuid', 'text', 'text', 'text', 'text', 'tax_details', 'text', 'text', 'tag_name[]'], 'uuid');
|
||
select isnt_definer('numerus', 'edit_contact', array ['uuid', 'text', 'text', 'text', 'text', 'tax_details', 'text', 'text', 'tag_name[]']);
|
||
select volatility_is('numerus', 'edit_contact', array ['uuid', 'text', 'text', 'text', 'text', 'tax_details', 'text', 'text', 'tag_name[]'], 'volatile');
|
||
select function_privs_are('numerus', 'edit_contact', array ['uuid', 'text', 'text', 'text', 'text', 'tax_details', 'text', 'text', 'tag_name[]'], 'guest', array []::text[]);
|
||
select function_privs_are('numerus', 'edit_contact', array ['uuid', 'text', 'text', 'text', 'text', 'tax_details', 'text', 'text', 'tag_name[]'], 'invoicer', array ['EXECUTE']);
|
||
select function_privs_are('numerus', 'edit_contact', array ['uuid', 'text', 'text', 'text', 'text', 'tax_details', 'text', 'text', 'tag_name[]'], 'admin', array ['EXECUTE']);
|
||
select function_privs_are('numerus', 'edit_contact', array ['uuid', 'text', 'text', 'text', 'text', 'tax_details', 'text', 'text', 'tag_name[]'], 'authenticator', array []::text[]);
|
||
|
||
|
||
set client_min_messages to warning;
|
||
truncate contact_swift cascade;
|
||
truncate contact_iban cascade;
|
||
truncate contact_web cascade;
|
||
truncate contact_email cascade;
|
||
truncate contact_phone cascade;
|
||
truncate contact_tax_details cascade;
|
||
truncate contact cascade;
|
||
truncate payment_method cascade;
|
||
truncate company cascade;
|
||
reset client_min_messages;
|
||
|
||
|
||
set constraints "company_default_payment_method_id_fkey" deferred;
|
||
|
||
insert into company (company_id, business_name, vatin, trade_name, phone, email, web, address, city, province, postal_code, country_code, currency_code, default_payment_method_id)
|
||
values (1, 'Company 2', 'XX123', '', '555-555-555', 'a@a', '', '', '', '', '', 'ES', 'EUR', 111)
|
||
;
|
||
|
||
insert into payment_method (payment_method_id, company_id, name, instructions)
|
||
values (111, 1, 'cash', 'cash')
|
||
, (112, 1, 'bank', 'send money to my bank account')
|
||
;
|
||
|
||
set constraints "company_default_payment_method_id_fkey" immediate;
|
||
|
||
insert into contact (contact_id, company_id, slug, name, tags)
|
||
values (12, 1, '7ac3ae0e-b0c1-4206-a19b-0be20835edd4', 'Contact 1', '{tag1}')
|
||
, (13, 1, 'b57b980b-247b-4be4-a0b7-03a7819c53ae', 'Contact 2', '{tag2}')
|
||
, (14, 1, '12fd031b-8f4d-4ac1-9dde-7df336dc6d52', 'Contact 3', '{tag3}')
|
||
;
|
||
|
||
insert into contact_tax_details (contact_id, business_name, vatin, address, city, province, postal_code, country_code)
|
||
values (12, 'Contact 1 Ltd', 'XX555', '', '', '', '', 'ES')
|
||
, (13, 'Contact 2 Ltd', 'XX666', '', '', '', '', 'ES')
|
||
;
|
||
|
||
insert into contact_phone (contact_id, phone)
|
||
values (12, '777-777-777')
|
||
, (13, '888-888-888')
|
||
;
|
||
|
||
insert into contact_email (contact_id, email)
|
||
values (12, 'c@c')
|
||
, (13, 'd@d')
|
||
;
|
||
|
||
insert into contact_web (contact_id, uri)
|
||
values (12, 'https://1/')
|
||
, (13, 'https://2/')
|
||
;
|
||
|
||
insert into contact_iban (contact_id, iban)
|
||
values (12, 'NL04RABO9373475770')
|
||
, (13, 'NL17RABO4416709382')
|
||
;
|
||
|
||
insert into contact_swift (contact_id, bic)
|
||
values (12, 'ABNANL2A')
|
||
, (13, 'ARBNNL22')
|
||
;
|
||
|
||
|
||
select lives_ok(
|
||
$$ select edit_contact('7ac3ae0e-b0c1-4206-a19b-0be20835edd4', 'Contact 2.1', '999-999-999', 'c1@c1', 'https://c', '(Contact 2.1 Ltd,40404040D,"Fake St., 123",City 2.1,Province 2.1,19486,ES)', 'NL68RABO7792285766', '', array['tag1']) $$,
|
||
'Should be able to edit the first contact'
|
||
);
|
||
|
||
select lives_ok(
|
||
$$ select edit_contact('b57b980b-247b-4be4-a0b7-03a7819c53ae', 'Contact 2.2', '', '', '', null, '', 'ASNBNL21', array['tag1', 'tag3']) $$,
|
||
'Should be able to edit the second contact'
|
||
);
|
||
|
||
select lives_ok(
|
||
$$ select edit_contact('12fd031b-8f4d-4ac1-9dde-7df336dc6d52', 'Contact 2.3', '111-111-111', 'd2@d2', 'https://d', '(Contact 2.3 Ltd,41414141L,"Another Fake St., 123",City 2.2,Province 2.2,17417,ES)', 'NL48RABO6482008283', 'BOFSNL21002', array['tag2']) $$,
|
||
'Should be able to edit the third contact'
|
||
);
|
||
|
||
select bag_eq(
|
||
$$ select company_id, name, tags, created_at from contact $$,
|
||
$$ values (1, 'Contact 2.1', '{tag1}'::tag_name[], CURRENT_TIMESTAMP)
|
||
, (1, 'Contact 2.2', '{tag1,tag3}'::tag_name[], CURRENT_TIMESTAMP)
|
||
, (1, 'Contact 2.3', '{tag2}'::tag_name[], CURRENT_TIMESTAMP)
|
||
$$,
|
||
'Should have updated all contacts'
|
||
);
|
||
|
||
select bag_eq(
|
||
$$ select name, business_name, vatin::text, address, city, province, postal_code, country_code::text from contact join contact_tax_details using (contact_id) $$,
|
||
$$ values ('Contact 2.1', 'Contact 2.1 Ltd', 'ES40404040D', 'Fake St., 123', 'City 2.1', 'Province 2.1', '19486', 'ES')
|
||
, ('Contact 2.3', 'Contact 2.3 Ltd', 'ES41414141L', 'Another Fake St., 123', 'City 2.2', 'Province 2.2', '17417', 'ES')
|
||
$$,
|
||
'Should have updated all contacts’ tax details'
|
||
);
|
||
|
||
select bag_eq(
|
||
$$ select name, phone::text from contact join contact_phone using (contact_id) $$,
|
||
$$ values ('Contact 2.1', '+34 999 99 99 99')
|
||
, ('Contact 2.3', '+34 111111111')
|
||
$$,
|
||
'Should have updated all contacts’ phone'
|
||
);
|
||
|
||
select bag_eq(
|
||
$$ select name, email::text from contact join contact_email using (contact_id) $$,
|
||
$$ values ('Contact 2.1', 'c1@c1')
|
||
, ('Contact 2.3', 'd2@d2')
|
||
$$,
|
||
'Should have updated all contacts’ email'
|
||
);
|
||
|
||
select bag_eq(
|
||
$$ select name, uri::text from contact join contact_web using (contact_id) $$,
|
||
$$ values ('Contact 2.1', 'https://c')
|
||
, ('Contact 2.3', 'https://d')
|
||
$$,
|
||
'Should have updated all contacts’ web'
|
||
);
|
||
|
||
select bag_eq(
|
||
$$ select name, iban::text from contact join contact_iban using (contact_id) $$,
|
||
$$ values ('Contact 2.1', 'NL68RABO7792285766')
|
||
, ('Contact 2.3', 'NL48RABO6482008283')
|
||
$$,
|
||
'Should have updated all contacts’ IBAN'
|
||
);
|
||
|
||
select bag_eq(
|
||
$$ select name, bic::text from contact join contact_swift using (contact_id) $$,
|
||
$$ values ('Contact 2.2', 'ASNBNL21')
|
||
, ('Contact 2.3', 'BOFSNL21002')
|
||
$$,
|
||
'Should have updated all contacts’ BIC'
|
||
);
|
||
|
||
|
||
select *
|
||
from finish();
|
||
|
||
rollback;
|