vhLib.Macro,BL.Derde.KlantSpecifiek 1 %RegisteredObject,%XML.Adaptor 0 PAKBON %String %String %String %String BL.Flow.Proxy.pxPakbonLijn list s px=##class(BL.Flow.Proxy.pxPakbon).TestCreate(367791,.status) do ProxyToXMLFile^vhLib(px,"\\notes01\shared\p v e\resultaat.xml","DOCS",1,1) 1 pxFlowDocs s px=##class(BL.Flow.Proxy.pxPakbon).Create(367791,.status) 1 pxPakbon Leveringsbon invullen BONNr:%String %Status Doos (dozen) met losse onderdelen voor "_$$$CRLF_" Tandembox bulkverpakking." Set pxLijn=##class(pxTekstLijn).BuildHTML(InfoText,0,1) Do ..Lijnen.InsertAt(pxLijn.%ConstructClone(1),1) ; vooraan Do ..Lijnen.Insert(pxLijn) ; achteraan Quit ]]> PRNr:%String %Boolean oLijn:Flow.OrderWMS.Lijn Boolean