diff --git a/C4/Reports/Guided.pm b/C4/Reports/Guided.pm
index e03dc1fe34..ecebe86838 100644
--- a/C4/Reports/Guided.pm
+++ b/C4/Reports/Guided.pm
@@ -812,6 +812,13 @@ sub delete_definition {
 	$sth->execute($id);
 }
 
+=head2 get_sql($report_id)
+
+Given a report id, return the SQL statement for that report.
+Otherwise, it just returns.
+
+=cut
+
 sub get_sql {
 	my ($id) = @_ or return;
 	my $dbh = C4::Context->dbh();