Witam,
mam problem z dodaniem kontrahenta z adresem email,
dodawanie samego kontrahenta działa ale jak chcę mu przypisać adres email to wykonuje się czterokrotnie "WypiszBledy" ale nie wyświetla żadnego komunikatu

Sam kod który jest poniżej jest są to połączone dwa przykłady z dokumentacji


jak usunę podmiot.Dane.Kontakty.Add(email); to dodaje się prawidłowo

using (Uchwyt sfera = UruchomSfere())
{
IPodmioty podmioty = sfera.PodajObiektTypu<IPodmioty>();
ITypyAdresu typyAdresu = sfera.PodajObiektTypu<ITypyAdresu>();
IRodzajeKontaktu rodzajeKontaktu = sfera.PodajObiektTypu<IRodzajeKontaktu>();

using (IPodmiot podmiot = podmioty.UtworzFirme())
{
AdresPodmiotu adresGlowny = null;
podmiot.AutoSymbol();

podmiot.Dane.NazwaSkrocona = "test";
if (podmiot.Dane.AdresPodstawowy == null)
{
adresGlowny = podmiot.DodajAdres(typyAdresu.DaneDomyslne.Glowny);
}
else
{
adresGlowny = podmiot.Dane.AdresPodstawowy;
}
adresGlowny.Szczegoly.Ulica = "ulica";
adresGlowny.Szczegoly.NrDomu = "1";
adresGlowny.Szczegoly.NrLokalu = "2";
adresGlowny.Szczegoly.KodPocztowy = "55-999";
adresGlowny.Szczegoly.Miejscowosc = "Miasteczko";

Kontakt email = new Kontakt();
email.Rodzaj = rodzajeKontaktu.DaneDomyslne.Email;
email.Wartosc = "test@test.pl";
email.Podstawowy = true;

podmiot.Dane.Kontakty.Add(email);


if (podmiot.Zapisz())
{
Console.WriteLine("Poprawnie zapisano nowego klienta z dodatkowymi adresami.");

}
else
{
podmiot.WypiszBledy();
}
}
}

edit:
Nie wiem czy to błąd ale zrobiłem,
trzeba zapisać kontrahenta, wyszukać go np. po id i wyedytować adres email