Index: Flow/Had/OrderHfd.cls.xml
===================================================================
diff -u -r734 -r906
--- Flow/Had/OrderHfd.cls.xml	(.../OrderHfd.cls.xml)	(revision 734)
+++ Flow/Had/OrderHfd.cls.xml	(.../OrderHfd.cls.xml)	(revision 906)
@@ -1,11 +1,11 @@
 <?xml version="1.0" encoding="UTF-8"?>
-<Export generator="Cache" version="9" zv="Cache for Windows NT (Intel/P4) 5.0.21 (Build 6408)" ts="2011-01-27 17:01:02">
+<Export generator="Cache" version="9" zv="Cache for Windows NT (Intel/P4) 5.0.21 (Build 6408)" ts="2011-02-15 16:03:18">
 <Class name="Flow.Had.OrderHfd">
 <ClassType>persistent</ClassType>
 <IncludeCode>%VHMacro,BL.Derde.KlantSpecifiek</IncludeCode>
 <ProcedureBlock>0</ProcedureBlock>
 <Super>%Library.Persistent</Super>
-<TimeChanged>61791,33290.065933</TimeChanged>
+<TimeChanged>62137,57853.485957</TimeChanged>
 <TimeCreated>59232,52414</TimeCreated>
 <ClassDefinitionError>0</ClassDefinitionError>
 
@@ -291,7 +291,9 @@
  . ; GADefObject Open+XMLWrite
  . If (Opties'[";PROM;PRKR;PRQTY") Do  Set Opties=Opties_";PROM;PRKR;PRQTY"	
  . If (Opties'["ORDSORT") Do  Set Opties=Opties_";ORDSORT"	
+ . Set %WithXMLDeclaration=0
  . Do:(objProduct) objProduct.XMLWrite(KLNr_"\"_Qty_"\",DevObj,$G(Taal),$G(Opties),"")
+ . Kill %WithXMLDeclaration
  . ;Do:(objProduct) objProduct.%Close()
  . Set:(objProduct) objProduct=""
  . Do ENDTAG^XMLWRITE(DevObj,"ORDERLIJN")
@@ -509,5 +511,5 @@
 </Data>
 </Storage>
 </Class>
-<Checksum value="311989263"/>
+<Checksum value="4162151027"/>
 </Export>
Index: Flow/OrderWMS/Hoofding.cls.xml
===================================================================
diff -u -r734 -r906
--- Flow/OrderWMS/Hoofding.cls.xml	(.../Hoofding.cls.xml)	(revision 734)
+++ Flow/OrderWMS/Hoofding.cls.xml	(.../Hoofding.cls.xml)	(revision 906)
@@ -1,10 +1,10 @@
 <?xml version="1.0" encoding="UTF-8"?>
-<Export generator="Cache" version="9" zv="Cache for Windows NT (Intel/P4) 5.0.21 (Build 6408)" ts="2011-01-27 17:01:03">
+<Export generator="Cache" version="9" zv="Cache for Windows NT (Intel/P4) 5.0.21 (Build 6408)" ts="2011-02-18 15:31:07">
 <Class name="Flow.OrderWMS.Hoofding">
 <ClassType>persistent</ClassType>
 <StorageStrategy>VHOpslag</StorageStrategy>
 <Super>%Library.Persistent</Super>
-<TimeChanged>61844,52430.176826</TimeChanged>
+<TimeChanged>62140,55924.738359</TimeChanged>
 <TimeCreated>59235,32903</TimeCreated>
 <ClassDefinitionError>0</ClassDefinitionError>
 
@@ -128,6 +128,10 @@
 <Type>Sys.cTimeStamp</Type>
 </Property>
 
+<Property name="StartUGLYPicking">
+<Type>Sys.cTimeStamp</Type>
+</Property>
+
 <Property name="EindeOrderPicking">
 <Type>Sys.cTimeStamp</Type>
 </Property>
@@ -372,7 +376,10 @@
 <ReturnType>%Library.String</ReturnType>
 <SoapBindingStyle>document</SoapBindingStyle>
 <SoapBodyUse>literal</SoapBodyUse>
-<Implementation><![CDATA[ Quit $ZT($P(..DueOutTime,",",2),2)
+<Implementation><![CDATA[
+ Set Tijd=$P(..DueOutTime,",",2)
+ If (Tijd<3000)||(Tijd>(19*3600)) Set Tijd=$P($H,",",2) ; indien ongeldige tijd, soms is de tijd 0 of zelfs negatief - PV 29/11/2010
+ Quit $ZT(Tijd,2)
 ]]></Implementation>
 </Method>
 
@@ -475,5 +482,5 @@
 </SQLMap>
 </Storage>
 </Class>
-<Checksum value="144154107"/>
+<Checksum value="578955565"/>
 </Export>