BL.EC.Common,Prod.Product,BL.Derde.Kennis 1 %RegisteredObject AX.Uitgaand.EC.Data.impl.HelperLeveringenOphalen 1 AX.Uitgaand.EC.Data.impl.ProductValidator 1 %String 1 WS.Vhisie4.KlantDocument.dto.LeveringHoofding list 1 %String %String WS.Vhisie4.KlantDocument.GeefLeveringenRequest WS.Vhisie4.KlantDocument.GeefLeveringenResponse Request:WS.Vhisie4.KlantDocument.GeefLeveringenRequest %Status WS.Vhisie4.KlantDocument.GeefLeveringenResponse Hoofding ^||ECCache("D",HoofdingVolgNr) = $LB(Type,OrderNr,BONNr,FAKNr,OrderHfdData, LeveringHfdData, FaktuurHfdData, LevAdresData) waar Type = O,L,F,P (order, levering, factuur, proforma) Lijn (product of tekst) ^||ECCache("D",HoofdingVolgNr,LijnVolgNr) = $LB(Type,OrderlijnData, Tekst, VoorraadStatus) waar Type = P of T (Product of Tekst) de lijnData kan van zowel KOD, KUL, KFA als KFAP komen Index ^||ECCache("IO",OrderNr,VolgNr)=HoofdingVolgNr ^||ECCache("IF",FactuurNr,VolgNr)=HoofdingVolgNr Hoofding ^||ECCache("ORD",ORDNr) = $LB(Oorsprong,OrderDatum, HfdData, LevAdresData) waar Oorsprong = O,L,F,P (order, levering, factuur, proforma) waar HfdData oorsprong afhankelijk (Order hfdData '= Levering en Factuur Lijn (product of tekst) ^||ECCache("ORD",ORDNr,OLUNr,LijnVolgNr) = $LB(Oorsprong,Type,OrderlijnData, Tekst, VoorraadStatus, BONNr, BonHfdData, FAKNr, FakHfdData) waar Type = P of T (Product of Tekst) de lijnData kan van zowel KOD, KUL, KFA als KFAP komen Index ^||ECCache("IORD",OrderDatum,ORDNr)="" 1 1 BONNr:%String 1 pxHoofding:WS.Vhisie4.KlantDocument.dto.LeveringHoofding pxLijn:WS.Vhisie4.KlantDocument.dto.LeveringLijn,VorigeLeverStatus:WS.Vhisie4.KlantDocument.enu.LeverStatus WS.Vhisie4.KlantDocument.enu.LeverStatus pxLijn:WS.Vhisie4.KlantDocument.dto.LeveringLijn WS.Vhisie4.KlantDocument.enu.LeverStatus lbHoofding:%List,lbLijn:%List 1 WS.Vhisie4.KlantDocument.dto.FactuurLijn lbHoofding:%List 1 WS.Vhisie4.KlantDocument.dto.FactuurHoofding