Tworzenie korekty magazynowej z nową pozycją
Muszę stworzyć dokument magazynowy korekty i dodać nową pozycję. O ile stworzenie korekty nie jest problemem, o tyle gorzej już idzie z dodaniem pozycji w dokumencie magazynowym.
Próby uczynienie tego za pomocą IOrec:
Kod:
long idmg = 12345
dispatch xMg = xFactory.NewObject("BDokumentMg")
IOrec dIN
dIN.SetField("idDokKoryg",using "%l",idmg)
dIN.BeginSection("Pozycja dokumentu")
dIN.SetField("lp","0")
dIN.SetField("kod","1000005")
dIN.SetField("ilosc","2")
dIN.EndSection()
idmg = dIN.ImportMG()
Niestety nie działa, choć w przypadku dokumentu handlowego analogiczna sekwencja działa.
Próbowałem też po przez obiekty:
Kod:
long idmg = 12345
dispatch xMg = xFactory.NewObject("BDokumentMg")
dispatch xPoz
IOrec dIN
xMg.Load(using "id = %l",idmg)
xMg.Edit()
xPoz = xMg.pozycje
xPoz.AddNew()
xPoz.kod = '100008'
xPoz.Ilosc = 5
xPoz.jednostkaMiary = "szt"
Tu jednak wykładam się przy podaniu wartości 'xPoz.kod = ' nie działa zapisy typu xPoz.kod('100008') też jest błędny. Jednostki miary i ilości nawet nie sprawdzałem w drugim kodzie.
Czy ktoś takie rozwiązanie dla dokumentów magazynowych popełnił i mógł by mi podpowiedzieć jak to zrobić ?
