Index: vhTestFiles/UnitTests/APPS.AKP.AankoopControle.BLUM.impl.DespatchNaarCSBSOConverteerder.Converteer/TestMultiPallet5Plus/Test/Result.txt =================================================================== diff -u --- vhTestFiles/UnitTests/APPS.AKP.AankoopControle.BLUM.impl.DespatchNaarCSBSOConverteerder.Converteer/TestMultiPallet5Plus/Test/Result.txt (revision 0) +++ vhTestFiles/UnitTests/APPS.AKP.AankoopControle.BLUM.impl.DespatchNaarCSBSOConverteerder.Converteer/TestMultiPallet5Plus/Test/Result.txt (revision 37599) @@ -0,0 +1,104 @@ +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0196513023247481].ABLijnNr = 61000 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0196513023247481].ABNr = 809307 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0196513023247481].CSBSO44List[1].NumberOfParcels1 = 00016 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0196513023247481].CSBSO44List[1].NumberOfParcels2 = 00016 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0196513023247481].CSBSO44List[1].NumberOfParcels3 = 00016 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0196513023247481].CSBSO44List[1].NumberOfParcels4 = 00016 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0196513023247481].CSBSO44List[1].NumberOfParcels5 = 00016 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0196513023247481].CSBSO44List[1].PiecesPerParcels1 = 0000007 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0196513023247481].CSBSO44List[1].PiecesPerParcels2 = 0000007 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0196513023247481].CSBSO44List[1].PiecesPerParcels3 = 0000007 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0196513023247481].CSBSO44List[1].PiecesPerParcels4 = 0000007 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0196513023247481].CSBSO44List[1].PiecesPerParcels5 = 0000007 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0196513023247481].CSBSO44List[1].SpecialMarking1 = 0036719204 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0196513023247481].CSBSO44List[1].SpecialMarking2 = 0036719143 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0196513023247481].CSBSO44List[1].SpecialMarking3 = 0036719150 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0196513023247481].CSBSO44List[1].SpecialMarking4 = 0036719167 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0196513023247481].CSBSO44List[1].SpecialMarking5 = 0036719181 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0196513023247481].CSBSO44List[2].NumberOfParcels1 = 00016 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0196513023247481].CSBSO44List[2].NumberOfParcels2 = 0 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0196513023247481].CSBSO44List[2].NumberOfParcels3 = 0 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0196513023247481].CSBSO44List[2].NumberOfParcels4 = 0 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0196513023247481].CSBSO44List[2].NumberOfParcels5 = 0 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0196513023247481].CSBSO44List[2].PiecesPerParcels1 = 0000007 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0196513023247481].CSBSO44List[2].PiecesPerParcels2 = 0 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0196513023247481].CSBSO44List[2].PiecesPerParcels3 = 0 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0196513023247481].CSBSO44List[2].PiecesPerParcels4 = 0 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0196513023247481].CSBSO44List[2].PiecesPerParcels5 = 0 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0196513023247481].CSBSO44List[2].SpecialMarking1 = 0036716661 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0196513023247481].CSBSO44List[2].SpecialMarking2 = "" +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0196513023247481].CSBSO44List[2].SpecialMarking3 = "" +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0196513023247481].CSBSO44List[2].SpecialMarking4 = "" +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0196513023247481].CSBSO44List[2].SpecialMarking5 = "" +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0196513023247481].CountryOfOrigin = AT +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0196513023247481].CustomsClassification = 830242 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0196513023247481].IdentNr = 01965130 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0196513023247481].OrderLineCompletion = C +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0196513023247481].OrderLineCustomer = 232474.81 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0196513023247481].ProductNrCustomer = 980275 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0196513023247481].QuantityInvoiced = 672 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0196513023247481].QuantityShipped = 672 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0196513023247481].SetCode = E +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0196513023247481].UnitOfMeasure = ST +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0196513023247481].Value = 3373.6248 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0196513023247481].Weigth = 0 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0415836824002408].ABLijnNr = 04000 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0415836824002408].ABNr = 817873 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0415836824002408].CSBSO44List[1].NumberOfParcels1 = 00020 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0415836824002408].CSBSO44List[1].NumberOfParcels2 = 00020 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0415836824002408].CSBSO44List[1].NumberOfParcels3 = 0 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0415836824002408].CSBSO44List[1].NumberOfParcels4 = 0 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0415836824002408].CSBSO44List[1].NumberOfParcels5 = 0 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0415836824002408].CSBSO44List[1].PiecesPerParcels1 = 0000006 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0415836824002408].CSBSO44List[1].PiecesPerParcels2 = 0000006 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0415836824002408].CSBSO44List[1].PiecesPerParcels3 = 0 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0415836824002408].CSBSO44List[1].PiecesPerParcels4 = 0 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0415836824002408].CSBSO44List[1].PiecesPerParcels5 = 0 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0415836824002408].CSBSO44List[1].SpecialMarking1 = 0036728572 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0415836824002408].CSBSO44List[1].SpecialMarking2 = 0036728619 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0415836824002408].CSBSO44List[1].SpecialMarking3 = "" +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0415836824002408].CSBSO44List[1].SpecialMarking4 = "" +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0415836824002408].CSBSO44List[1].SpecialMarking5 = "" +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0415836824002408].CountryOfOrigin = AT +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0415836824002408].CustomsClassification = 830242 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0415836824002408].IdentNr = 04158368 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0415836824002408].OrderLineCompletion = C +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0415836824002408].OrderLineCustomer = 240024.08 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0415836824002408].ProductNrCustomer = 784192 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0415836824002408].QuantityInvoiced = 240 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0415836824002408].QuantityShipped = 240 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0415836824002408].SetCode = E +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0415836824002408].UnitOfMeasure = ST +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0415836824002408].Value = 1307.469852 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].CSBSO41Array[0415836824002408].Weigth = 0 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].Currency = W30 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].DeliveryCustomerNr = 212250 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].InvoiceDate = 161107 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].InvoiceNr = 999999 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].InvoiceType = 99 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].InvoicingCustomerNr = 212250 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].NetValue = 13768.891578 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].Tax = 0 +CSBSO11List[1].CSBSO21List[1].CSBSO31List[1].ValutaDate = 161107 +CSBSO11List[1].CSBSO21List[1].CollectionFee = "" +CSBSO11List[1].CSBSO21List[1].Colli1 = E +CSBSO11List[1].CSBSO21List[1].Colli2 = P +CSBSO11List[1].CSBSO21List[1].Colli3 = "" +CSBSO11List[1].CSBSO21List[1].Colli4 = "" +CSBSO11List[1].CSBSO21List[1].Colli5 = "" +CSBSO11List[1].CSBSO21List[1].GrosWeight = 20154.97 +CSBSO11List[1].CSBSO21List[1].NetWeight = 0 +CSBSO11List[1].CSBSO21List[1].NrOfColli1 = 66 +CSBSO11List[1].CSBSO21List[1].NrOfColli2 = 2 +CSBSO11List[1].CSBSO21List[1].NrOfColli3 = "" +CSBSO11List[1].CSBSO21List[1].NrOfColli4 = "" +CSBSO11List[1].CSBSO21List[1].NrOfColli5 = "" +CSBSO11List[1].CSBSO21List[1].ShipmentDate = 161107 +CSBSO11List[1].CSBSO21List[1].ShipmentID = 322909 +CSBSO11List[1].CSBSO21List[1].ShiptoCustomerNr = 212250 +CSBSO11List[1].ContainerNumberPart = "" +CSBSO11List[1].DeliveryAddress = Van Hoecke -XL +CSBSO11List[1].ShipmentID = 322909 +CSBSO11List[1].TransportationMode = L +CSBSO11List[1].TruckNumberPart = "" +TransmissieNummer = "" Index: vhUnitTest/APPS/AKP/AankoopControle/BLUM/impl/DespatchNaarCSBSOConverteerder/Converteer/TestMultiPallet5Plus.cls.xml =================================================================== diff -u --- vhUnitTest/APPS/AKP/AankoopControle/BLUM/impl/DespatchNaarCSBSOConverteerder/Converteer/TestMultiPallet5Plus.cls.xml (revision 0) +++ vhUnitTest/APPS/AKP/AankoopControle/BLUM/impl/DespatchNaarCSBSOConverteerder/Converteer/TestMultiPallet5Plus.cls.xml (revision 37599) @@ -0,0 +1,22 @@ + + + +vhUnitTest.TestCase + + + + + + + + Index: APPS/AKP/AankoopControle/BLUM/impl/DespatchNaarCSBSOConverteerder.cls.xml =================================================================== diff -u -r37598 -r37599 --- APPS/AKP/AankoopControle/BLUM/impl/DespatchNaarCSBSOConverteerder.cls.xml (.../DespatchNaarCSBSOConverteerder.cls.xml) (revision 37598) +++ APPS/AKP/AankoopControle/BLUM/impl/DespatchNaarCSBSOConverteerder.cls.xml (.../DespatchNaarCSBSOConverteerder.cls.xml) (revision 37599) @@ -143,7 +143,7 @@ set CSBSO31.NetValue = CSBSO31.NetValue + CSBSO31.CSBSO41Array.GetAt(arraysleutel).Value ; dan de pallet info toevoegen: tot 5 palletten op 1 record, dan volgend aanmaken etc. - do ..VoorzieCSBSO44(CSBSO41) + do ..VoorzieCSBSO44(CSBSO41,arraysleutel) for index=1:1:5{ if $Property(CSBSO41.CSBSO44List.GetAt(CSBSO41.CSBSO44List.Count()),"SpecialMarking"_ index) = ""{ set $Property(CSBSO41.CSBSO44List.GetAt(CSBSO41.CSBSO44List.Count()),"SpecialMarking"_ index) = $E( E1EDL37.EXIDV,*-9,*-0) @@ -158,16 +158,16 @@ -CSBSO41:APPS.AKP.AankoopControle.BLUM.TXT.TransportEnFaktuur.CSBS041 +CSBSO41:APPS.AKP.AankoopControle.BLUM.TXT.TransportEnFaktuur.CSBS041,arraysleutel:%String 1 + + + + EDI_DC40 + 100 + 1 + DELVRY03 + DELVRY03 + DESADV + + + BAU + 9002617000009 + + LVS + 5415001000006 + + + 322909 + 20154.97 + + SU + BAU + + + DP + 212250 + + + 10 + 20161107 + + + E + 66. + + + P + 2. + + + 00390026170036728572 + 172.90 + KGM + 0.72.857 + E + + 240024 + 08 + 120 + PCE + 784192 + 04158368 + 9002617872750 + + 00020 + ZNP + + + 0000006 + ZQP + + + 817873 + ZVN + + + 04000 + ZVP + + + 240024.08 + ZON + + + + + 00390026170036719204 + 175.56 + KGM + 0.71.920 + E + + 232474 + 81 + 112 + PCE + 980275 + 01965130 + 9009494066456 + + 00016 + ZNP + + + 0000007 + ZQP + + + 809307 + ZVN + + + 61000 + ZVP + + + 232474.81 + ZON + + + + + 00390026170036728619 + 172.90 + KGM + 0.72.861 + E + + 240024 + 08 + 120 + PCE + 784192 + 04158368 + 9002617872750 + + 00020 + ZNP + + + 0000006 + ZQP + + + 817873 + ZVN + + + 04000 + ZVP + + + 240024.08 + ZON + + + + + 00390026170036719143 + 175.56 + KGM + 0.71.914 + E + + 232474 + 81 + 112 + PCE + 980275 + 01965130 + 9009494066456 + + 00016 + ZNP + + + 0000007 + ZQP + + + 809307 + ZVN + + + 61000 + ZVP + + + 232474.81 + ZON + + + + + 00390026170036719150 + 175.56 + KGM + 0.71.915 + E + + 232474 + 81 + 112 + PCE + 980275 + 01965130 + 9009494066456 + + 00016 + ZNP + + + 0000007 + ZQP + + + 809307 + ZVN + + + 61000 + ZVP + + + 232474.81 + ZON + + + + + 00390026170036719167 + 175.56 + KGM + 0.71.916 + E + + 232474 + 81 + 112 + PCE + 980275 + 01965130 + 9009494066456 + + 00016 + ZNP + + + 0000007 + ZQP + + + 809307 + ZVN + + + 61000 + ZVP + + + 232474.81 + ZON + + + + + 00390026170036719181 + 175.56 + KGM + 0.71.918 + E + + 232474 + 81 + 112 + PCE + 980275 + 01965130 + 9009494066456 + + 00016 + ZNP + + + 0000007 + ZQP + + + 809307 + ZVN + + + 61000 + ZVP + + + 232474.81 + ZON + + + + + 00390026170036716661 + 175.56 + KGM + 0.76.668 + E + + 232474 + 81 + 112 + PCE + 980275 + 01965130 + 9009494066456 + + 00016 + ZNP + + + 0000007 + ZQP + + + 809307 + ZVN + + + 61000 + ZVP + + + 232474.81 + ZON + + + + + + + +