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 @@
 </Method>
 
 <Method name="VoorzieCSBSO44">
-<FormalSpec>CSBSO41:APPS.AKP.AankoopControle.BLUM.TXT.TransportEnFaktuur.CSBS041</FormalSpec>
+<FormalSpec>CSBSO41:APPS.AKP.AankoopControle.BLUM.TXT.TransportEnFaktuur.CSBS041,arraysleutel:%String</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
-	if 'CSBSO41.CSBSO44List.IsDefined(1) {
+	if $$$Not(CSBSO41.CSBSO44List.Count()) {
 		set CSBSO44 = ##class(APPS.AKP.AankoopControle.BLUM.TXT.TransportEnFaktuur.CSBS044).%New()
 		do CSBSO41.CSBSO44List.InsertAt(CSBSO44,CSBSO41.CSBSO44List.Count()+1)
 	} else {
 		set CSBSO44 = CSBSO41.CSBSO44List.GetAt(CSBSO41.CSBSO44List.Count())			
 		;check if this record is 'full' and create new if so
-		if 'CSBSO44.SpecialMarking5=""{
+		if $length(CSBSO44.SpecialMarking5) {
 			set CSBSO44 = ##class(APPS.AKP.AankoopControle.BLUM.TXT.TransportEnFaktuur.CSBS044).%New()				
 			do CSBSO41.CSBSO44List.InsertAt(CSBSO44,CSBSO41.CSBSO44List.Count()+1)
 		}