Index: AX/Uitgaand/EC/Data/impl/PakketRefOphalen.cls.xml
===================================================================
diff -u -r38557 -r38567
--- AX/Uitgaand/EC/Data/impl/PakketRefOphalen.cls.xml	(.../PakketRefOphalen.cls.xml)	(revision 38557)
+++ AX/Uitgaand/EC/Data/impl/PakketRefOphalen.cls.xml	(.../PakketRefOphalen.cls.xml)	(revision 38567)
@@ -43,29 +43,28 @@
 <ClassMethod>1</ClassMethod>
 <FormalSpec>KlantID:%String</FormalSpec>
 <Implementation><![CDATA[
-	Set request=##class(WS.Vhisie4.KlantProduct.GeefKlantProductReferentiesRequest).%New()
+	Set request=##class(WS.Vhisie4.KlantDocument.GeefOpenstaandeFacturenRequest).%New()
 	Set request.Header=##class(WS.Vhisie4.RequestHeader).%New()
 	Set request.Header.KlantId=$G(KlantID,4875)
-	;Set request.GenerationId=##class(AX.Uitgaand.EC.Klanten.impl.Klanten).LaatsteGenerationID()
+	Set request.Header.GenerationId=##class(AX.Uitgaand.EC.Klanten.impl.Klanten).LaatsteGenerationID()
 	Set request.Header.Taal="N"
 	Set request.Header.SessieId="xx"
-	Set bl=##class(WS.Vhisie4.KlantProduct.KlantProductService).%New()
-	Set dto=bl.GeefKlantProductReferenties(request)
-	D dto.XMLExport(,"literal,indent")
+	Set bl=..%New(request)
+	;Do DumpObject^%apiOBJ(bl.Historiek)
+	D bl.GeefResponse().XMLExport(,"literal,indent")
 ]]></Implementation>
 </Method>
 
 <Method name="%OnNew">
-<FormalSpec>Request:WS.Vhisie4.KlantProduct.GeefKlantProductReferentiesRequest</FormalSpec>
+<FormalSpec>Request</FormalSpec>
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
 	Set Timer=##class(TECH.Timing.Timer).%New("")
 	Do Timer.Start()
 
 	Set ..Request=Request
 	Set ..KlantId=..Request.Header.KlantId
-	Set ..GenerationId=..Request.GenerationId
-	Set:..GenerationId="" ..GenerationId=##class(AX.Uitgaand.EC.Klanten.impl.Klanten).LaatsteGenerationID()
+	Set ..GenerationId=##class(AX.Uitgaand.EC.Klanten.impl.Klanten).LaatsteGenerationID()
 	
 	Set ..ProductValidator=##class(AX.Uitgaand.EC.Data.impl.ProductValidator).%New(..KlantId,..GenerationId)