Index: vhTest/Utils/AXif/Dynamics/SalesOrderIn/Envelope.cls.xml =================================================================== diff -u -r48493 -r48511 --- vhTest/Utils/AXif/Dynamics/SalesOrderIn/Envelope.cls.xml (.../Envelope.cls.xml) (revision 48493) +++ vhTest/Utils/AXif/Dynamics/SalesOrderIn/Envelope.cls.xml (.../Envelope.cls.xml) (revision 48511) @@ -16,7 +16,7 @@ Set OrderHeader.DlvAddrStreet1 = "Ankerstraat 91" Set OrderHeader.DlvAddrCountry = "1019" Set OrderHeader.DeliveryName = "Een Belg" - Set OrderHeader.CustomerRef = "Mijn orderreferentie" + Set OrderHeader.CustomerRef = "CustomerRef" Set OrderHeader.CreatedDateTimeHeader = ##class(AXif.Dynamics.SalesOrderIn.MessageParts.AxdExtTypeCreatedDateTime).%New() Set OrderHeader.CreatedDateTimeHeader.content = ##class(TECH.DateTime).HorologToTimeStamp("64482,43844") Set OrderHeader.CurrencyCode = "EUR" @@ -27,7 +27,8 @@ Set OrderHeader.NameCustResponsible = "Marieke Van Hoof" Set OrderHeader.ProductionBody = "ProductionBody" Set OrderHeader.PackingSlipBody = "PackingSlipBody" - Set OrderHeader.ConfirmBody = "Mijn commissiereferentie" + Set OrderHeader.ConfirmBody = "ConfirmBody" + Set OrderHeader.PurchOrderFormNum = "PurchOrderFormNum" Set OrderHeader.LocationId = "1234" Do StandaardOrder.Body.MessageParts.ADUMsgSalesOrderOutQuery.OrderHeader.Insert(OrderHeader) @@ -51,6 +52,7 @@ Set AxdEntityOrderLine.ReceiptDateConfirmed = $$INTDATE^vhLib.DataTypes("19-07-2017") Set AxdEntityOrderLine.PackingSlipBody = "PackingSlipBody" Set AxdEntityOrderLine.ProductionBody = "ProductionBody" + Set AxdEntityOrderLine.ConfirmBody = "ConfirmBody" Do OrderHeader.OrderLine.Insert(AxdEntityOrderLine) @@ -75,6 +77,7 @@ Set AxdEntityOrderLine.ReceiptDateConfirmed = $$INTDATE^vhLib.DataTypes("19-07-2017") Set AxdEntityOrderLine.PackingSlipBody = "PackingSlipBody" Set AxdEntityOrderLine.ProductionBody = "ProductionBody" + Set AxdEntityOrderLine.ConfirmBody = "ConfirmBody" Set AxdEntityAttribute = ##class(AXif.Dynamics.SalesOrderIn.MessageParts.AxdEntityAttribute).%New() Set AxdEntityAttribute.Name = "AdminProductNummer" @@ -105,6 +108,7 @@ Set AxdEntityOrderLine.ReceiptDateConfirmed = $$INTDATE^vhLib.DataTypes("19-07-2017") Set AxdEntityOrderLine.PackingSlipBody = "PackingSlipBody" Set AxdEntityOrderLine.ProductionBody = "ProductionBody" + Set AxdEntityOrderLine.ConfirmBody = "ConfirmBody" Set AxdEntityOrderLine.SOPRContractId = "SOPRContractId" Do OrderHeader.OrderLine.Insert(AxdEntityOrderLine)