Re: FKP17 Tworzenie kontrahenta programistycznie
Użyj SyncroSubject.
Kod:
Dispatch s = "MXDokFK.SyncroSubject"
s.Open(dbFK,2)
s.ClearRecord()
s.Value("nazwa") = nazwa
s.Value("skrot") = Trim(skrot)
s.Value("nip") = nip
s.Value("miejscowosc") = miejscowosc
s.Value("kod") = kod
s.Value("ulica") = ulica
s.Insert()
Plus walidacja czy w ogóle można zapisać kontrahenta.
Jak kiedyś coś pisałem to sama funkcja CheckIfExists nie wystarczała. Trzeba było jeszcze sprawdzić czy skrót nie jest pusty i czy nie dłuższy niż 41 znaków.
Dodatkowo budowałem MapValue ze skrótami kontrahentów i po dodaniu dodawał wpis również do niej i tam sprawdzałem czy kontrahent o podanym skrócie istnieje, ponieważ CheckIfExists zwracało brak kontrahenta, a w rzeczywistości kontrahent był. Może to wina jakiejś starej wersji integracji - nie pamiętam na jakiej wersji FK miałem ten problem., ale metodą prób i błędów się udało.