long lId = 3811 //id zamówienia
dispatch xDokument = xFactory.NewObject("BDokumentZw")
xDokument.Load(using "id=%l", lId)
dispatch xPozycja = xDokument.pozycje.item(1)
dispatch PropPoz = xPozycja.wlasciwosci
message PropPoz.towar.kod //wyświetlenie kodu towaru

// co dalej ???

long lId = 3811 //id zamówienia
dispatch xDokument = xFactory.NewObject("BDokumentZw")
xDokument.Load(using "id=%l", lId)
dispatch xOperacja = xFactory.NewObject("BOperacjaZm")
xOperacja.Load(using "ownerId=%l, ownerBase=30", xDokument.pozycje.item(1).id)
message using "%f", xOperacja.iloscRozl