[wiaflos-devel] COMMIT - r285 - trunk/soap/Plugins

[svn at linuxrulz.org]

Author: nkukard
Date: 2009-05-16 14:28:21 +0000 (Sat, 16 May 2009)
New Revision: 285

Modified:
   trunk/soap/Plugins/GL.pm
Log:
* Allow use of dates and type in SOAP for GL transactions


Modified: trunk/soap/Plugins/GL.pm
===================================================================
--- trunk/soap/Plugins/GL.pm	2009-05-16 14:27:07 UTC (rev 284)
+++ trunk/soap/Plugins/GL.pm	2009-05-16 14:28:21 UTC (rev 285)
@@ -95,11 +95,18 @@
 
 # Return list of GL transactions
 sub getGLTransactions {
+	my (undef,$data) = @_;
+
+
 	my $authInfo = Auth::sessionGetData();
 
-
+	# Do transaction
+	my $detail;
+	$detail->{'Type'} = $data->{'Type'};
+	$detail->{'StartDate'} = $data->{'StartDate'};
+	$detail->{'EndDate'} = $data->{'EndDate'};
 	# Grab and sanitize data
-	my $rawData = wiaflos::server::GL::getGLTransactions();
+	my $rawData = wiaflos::server::GL::getGLTransactions($detail);
 	if (ref $rawData ne "ARRAY") {
 		return SOAPResponse(RES_ERROR,$rawData,wiaflos::server::GL::Error());
 	}
@@ -112,6 +119,7 @@
 		$tmpItem->{'ID'} = $item->{'ID'};
 		$tmpItem->{'TransactionDate'} = $item->{'TransactionDate'};
 		$tmpItem->{'Reference'} = $item->{'Reference'};
+		$tmpItem->{'Type'} = $item->{'Type'};
 		$tmpItem->{'Posted'} = $item->{'Posted'};
 
 		push(@data,$tmpItem);