Forum Użytkownikow Subiekt GT

InsERT GT => Dodatki - zestawienia - sfera => Wątek zaczęty przez: damkop w Listopad 28, 2019, 12:17:48

Tytuł: Sfera dodanie adresu dostawy kontrahenta innego niż podstawowy, nie dodaje
Wiadomość wysłana przez: damkop w Listopad 28, 2019, 12:17:48

Dzień dobry,
SugiektGT wersja 1.5900.04590
aktywowany próbny PLUS czerwony i niebieski
aktywowana próbna Sfera
świeża instalacja bazy danych z wpisaniem danych przykładowych
VB.Net
podpięta "GTA64.dll", wersja pliku zgodna z wersją programu

Kod: [Zaznacz]

            Dim subiektContractor As InsERT.Kontrahent
            Dim subAdresWysylki As InsERT.KhAdresDostawy
            subiektContractor = Subiekt.KontrahenciManager.WczytajKontrahenta(symbol)
            subAdresWysylki = subiektContractor.AdresyDostaw.Dodaj($"testowy")
            subAdresWysylki.Nazwa = "testowy"
            subAdresWysylki.Faks = "552481234"
            subAdresWysylki.KodPocztowy = "82-300"
            subAdresWysylki.Miejscowosc = "Elblag"
            subAdresWysylki.Ulica = "tstUlica"
            subAdresWysylki.NrDomu = "nrd"
            subAdresWysylki.NrLokalu = "nrl"
            subAdresWysylki.Telefon = "500123456"
            subAdresWysylki.Wojewodztwo = 14
            subAdresWysylki.Panstwo = 1
            'subAdresWysylki.UstawJakoDomyslny = True
            subiektContractor.Zapisz()
            subiektContractor.Zamknij()
Niestety kod wykonywany jest bez błędów, jednak bez efektu. W danych kontrahenta adresów dostawy brak (Kontrahent > Adresy > Zarządzaj adresami dostaw)
W bazie też brak zmian, SELECT * FROM adr_Historia; Gdy dodamy adres ręcznie z poziomu UI nie ma problemu.

Czy ktoś potrafi mi powiedzieć co robię źle?

W dokumentacji niestety brak info na ten temat, w składowych obiektu Kontrahent brak nawet pola AdresyDostaw (nie mylić z polem AdresDostawy, który odpowiada za "ptaszka" aktywującego domyślny adres dostawy Kontrahenta)
Ustawianie "UstawJakoDomyslny" czy w kolejnej linii ponowna próba dodania adresu w taki sposób

Kod: [Zaznacz]

subiektContractor.AdresyDostaw.Dodaj(subAdresWysylki.Id)nic nie daje. Również brak efektu przy ustawianiu wyłącznie pól wymaganych przez graficzny UI.
Bez różnicy czy kontrahent posiadał wcześniej domyślny adres dostawy czy nie...(odnośnie http://www.forumsubiekta.pl/subiekt/problem-z-zapisaniem-adresow-dostawy-dla-kontrahentow-(subiekt-i-sfera-subiekta)/)

Tytuł: Odp: Sfera dodanie adresu dostawy kontrahenta innego niż podstawowy, nie dodaje
Wiadomość wysłana przez: damkop w Listopad 28, 2019, 14:33:59

Oto odpowiedź... nie wystarczy wykonać zmian na kontrahencie i je zapisać, wcześniej należy wykonać

Kod: [Zaznacz]

subiektContractor.AdresyDostaw.ZapiszAle żeby nie było zbyt różowo nowy kontrahent musi najpierw zostać zapisany, w przeciwnym razie AdresyDostaw.Zapisz spowoduje błąd