Pomóżcie mi proszę - zaktualizowałam Subiekta do najnowszej wersji i nie działa mi teraz programik do tworzenia FZ. Mam dane do utworzenia dokumentu w excelu i taki programik:
Private Sub DodajFZ()
On Error GoTo ErrHandler
'Deklaracja zmiennych obiektowych
Dim oSgt As InsERT.Subiekt
Dim oKh As InsERT.Kontrahent
Dim oDok As InsERT.SuDokument
Dim oPoz As InsERT.SuPozycja
Dim sSym As String
Dim towarID As Integer
Dim row As Integer
'Uruchomienie Subiekta GT
Set oSgt = UruchomSubiekta()
Set oDok = oSgt.Dokumenty.Dodaj(InsERT.SubiektDokumentEnum.gtaSubiektDokumentFZ) row = 2
Set oKh = oSgt.Kontrahenci.Wczytaj("XXX")
oDok.KontrahentId = oKh.Identyfikator
oDok.DataWystawienia = Cells(1, 6)
oDok.NumerOryginalny = Cells(1, 10)
oDok.DataZakonczeniaDostawy = Cells(1,
oDok.DataOtrzymania = Cells(1,
While row < 346
If Cells(row, 2).Text <> "" Then
sSym = Cells(row, 1)
Set oPoz = oDok.Pozycje.Dodaj(sSym)
oPoz.IloscJm = Cells(row, 2)
oPoz.CenaNettoPrzedRabatem = Cells(row, 3)
row = row + 1
Else
row = row + 1
End If
Wend
oDok.Zapisz
oDok.Zamknij
ErrHandler:
MsgBox Err.Number & " - " & Err.Description
End Sub
Wyskakuje błąd "Method od data member not found" i odnosi się do linijki na czerwono (chyba). W starszej wersji subiekta działało ok. Możecie mi powiedzieć co jest nie tak?