Index: APPS/TRANSP/Transsmart/impl/RequestDataBouwer.cls.xml
===================================================================
diff -u -r72356 -r72373
--- APPS/TRANSP/Transsmart/impl/RequestDataBouwer.cls.xml	(.../RequestDataBouwer.cls.xml)	(revision 72356)
+++ APPS/TRANSP/Transsmart/impl/RequestDataBouwer.cls.xml	(.../RequestDataBouwer.cls.xml)	(revision 72373)
@@ -605,18 +605,18 @@
 </Method>
 
 <Method name="MaakgetStatusHistoryByQueryRequest">
-<FormalSpec>Carrier:%String,DateFrom:%String,DateTo:%String</FormalSpec>
+<FormalSpec>Carrier:%String,DateFrom:%TimeStamp,DateTo:%TimeStamp</FormalSpec>
 <ReturnType>WS.Transsmart.tns.getStatusHistoryByQuery</ReturnType>
 <Implementation><![CDATA[
 	#dim Request as WS.Transsmart.tns.getStatusHistoryByQuery = ##class(WS.Transsmart.tns.getStatusHistoryByQuery).%New()
-	Do Request.shipmentInfo.carrierCodes.Insert( "SNB")
-	//Do Request.shipmentInfo.carrierCodes.Insert( "VRD")
+	Do Request.shipmentInfo.carrierCodes.Insert( Carrier)
 	Set Request.shipmentInfo.dateTimeFrom = DateFrom
 	Set Request.shipmentInfo.dateTimeTo = DateTo
 	Set Request.shipmentInfo.incremental = "false"
-	//Set Request.shipmentInfo.
+
 	Set Request.actionInfo.action = "getStatusHistoryByQuery"
 	Set Request.actionInfo.version = "2.0"
+	
 	Quit Request
 ]]></Implementation>
 </Method>