Index: WS/TBX/OrderAbstract.cls.xml =================================================================== diff -u -r29059 -r40353 --- WS/TBX/OrderAbstract.cls.xml (.../OrderAbstract.cls.xml) (revision 29059) +++ WS/TBX/OrderAbstract.cls.xml (.../OrderAbstract.cls.xml) (revision 40353) @@ -197,6 +197,10 @@ + +%String + + 0 %String Index: vhUnitTest/APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/MaakOfferte/Test.cls.xml =================================================================== diff -u -r39060 -r40353 --- vhUnitTest/APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/MaakOfferte/Test.cls.xml (.../Test.cls.xml) (revision 39060) +++ vhUnitTest/APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/MaakOfferte/Test.cls.xml (.../Test.cls.xml) (revision 40353) @@ -40,7 +40,8 @@ Do $$$AssertEquals(TandemboxBesteller.GeefWebOrder().LeverTijd,"2011.01.01") Do $$$AssertEquals(TandemboxBesteller.GeefWebOrder().LeverTijdID,"62092") Do $$$AssertEquals(TandemboxBesteller.GeefWebOrder().IngaveTijdStip,"2011-06-30 09:15:00") - Do $$$AssertEquals(TandemboxBesteller.GeefWebOrder().Commissie,"De referentie") + Do $$$AssertEquals(TandemboxBesteller.GeefWebOrder().CommissieReferentie,"De Commissiereferentie") + Do $$$AssertEquals(TandemboxBesteller.GeefWebOrder().Commissie,"De Orderreferentie") ]]> @@ -153,7 +154,8 @@ set Aanvraag.Header.KlantID = ..#KlantID set Aanvraag.Header.PersonalityID = ..#PersonalityID set Aanvraag.Order.GevraagdeLeverdatum = "2011.01.01" - Set Aanvraag.Order.CommissieReferentie = "De referentie" + Set Aanvraag.Order.CommissieReferentie = "De Commissiereferentie" + Set Aanvraag.Order.OrderReferentie = "De Orderreferentie" quit Aanvraag ]]> Index: APPS/TBXWeb/impl/OrderVerwerker.cls.xml =================================================================== diff -u -r35697 -r40353 --- APPS/TBXWeb/impl/OrderVerwerker.cls.xml (.../OrderVerwerker.cls.xml) (revision 35697) +++ APPS/TBXWeb/impl/OrderVerwerker.cls.xml (.../OrderVerwerker.cls.xml) (revision 40353) @@ -34,6 +34,11 @@ 1 + +%String +1 + + WebOrder:WS.TBX.Order %String @@ -43,6 +48,7 @@ try { set ..WebOrder = WebOrder set ..OrderReferentie = WebOrder.Commissie + set ..CommissieReferentie = WebOrder.CommissieReferentie do ..ConverteerWebOrderHoofding() do ..ConverteerWebOrderLijnen(0) do ..ConversieAfhandeling() @@ -375,6 +381,8 @@ 1 %String -Waarde wordt on-the-flight berekend en ingevuld (proxy) +Waarde wordt on-the-fly berekend en ingevuld (proxy) %String 1 @@ -70,7 +70,7 @@ Index: APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller.cls.xml =================================================================== diff -u -r39108 -r40353 --- APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller.cls.xml (.../TandemboxBesteller.cls.xml) (revision 39108) +++ APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller.cls.xml (.../TandemboxBesteller.cls.xml) (revision 40353) @@ -117,7 +117,8 @@ Set ..WebOrder.ShowInHist = 80 Set ..WebOrder.LeverTijd = ..Aanvraag.Order.GevraagdeLeverdatum Set ..WebOrder.IngaveTijdStip = ..Aanvraag.Order.IngaveTijdStip - Set ..WebOrder.Commissie = ..Aanvraag.Order.CommissieReferentie + Set ..WebOrder.CommissieReferentie = ..Aanvraag.Order.CommissieReferentie + Set ..WebOrder.Commissie = ..Aanvraag.Order.OrderReferentie Do ..ZetLeveradresInOpmerking1() Do ..ZetGevraagdeLeverdatum()