From: dbs <dbs@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Date: Fri, 15 May 2009 21:51:40 +0000 (+0000)
Subject: LPAD() demands that its first parameter be TEXT in PostgreSQL 8.3; cast accordingly
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=eae41333c172337ac325fbb138965ae9a8860428;p=Evergreen.git

LPAD() demands that its first parameter be TEXT in PostgreSQL 8.3; cast accordingly


git-svn-id: svn://svn.open-ils.org/ILS/trunk@13192 dcc99617-32d9-48b4-a31d-7c20da2025e4
---

diff --git a/Open-ILS/src/perlmods/OpenILS/Reporter/SQLBuilder.pm b/Open-ILS/src/perlmods/OpenILS/Reporter/SQLBuilder.pm
index df2b501870..228b6d38d7 100644
--- a/Open-ILS/src/perlmods/OpenILS/Reporter/SQLBuilder.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Reporter/SQLBuilder.pm
@@ -395,7 +395,7 @@ sub toSQL {
 	$val =~ s/'/\\'/go;
 
 	return "EXTRACT(YEAR FROM '$rtime'::TIMESTAMPTZ + '$val months')" .
-		" || '-' || LPAD(EXTRACT(MONTH FROM '$rtime'::TIMESTAMPTZ + '$val months'),2,'0')";
+		" || '-' || LPAD(EXTRACT(MONTH FROM '$rtime'::TIMESTAMPTZ + '$val months')::text,2,'0')";
 }
 
 
@@ -721,7 +721,7 @@ package OpenILS::Reporter::SQLBuilder::Column::Transform::month_trunc;
 sub toSQL {
 	my $self = shift;
 	return 'EXTRACT(YEAR FROM "' . $self->{_relation} . '"."' . $self->name . '")' .
-		' || \'-\' || LPAD(EXTRACT(MONTH FROM "' . $self->{_relation} . '"."' . $self->name . '"),2,\'0\')';
+		' || \'-\' || LPAD(EXTRACT(MONTH FROM "' . $self->{_relation} . '"."' . $self->name . '")::text,2,\'0\')';
 }
 
 sub is_aggregate { return 0 }