@@ -, +, @@ --- Koha/SignStream.pm | 14 + Koha/SignsToStream.pm | 14 + .../intranet-tmpl/prog/en/includes/tools-menu.inc | 5 +- .../intranet-tmpl/prog/en/modules/tools/signs.tt | 490 +++++++++++++++++++++ .../prog/en/modules/tools/tools-home.tt | 7 +- koha-tmpl/intranet-tmpl/prog/js/tools-menu.js | 2 + tools/signs.pl | 327 ++++++++++++++ 7 files changed, 857 insertions(+), 2 deletions(-) create mode 100644 koha-tmpl/intranet-tmpl/prog/en/modules/tools/signs.tt create mode 100755 tools/signs.pl --- a/Koha/SignStream.pm +++ a/Koha/SignStream.pm @@ -33,6 +33,20 @@ Koha::SignStream - Koha SignStream object class =cut +=head3 saved_sql + +my $saved_sql = $stream->saved_sql; + +Return the report attached to a stream + +=cut + +sub saved_sql { + my ( $self ) = @_; + my $sql_rs = $self->_result->saved_sql; + return Koha::Report->_new_from_dbic( $sql_rs ); +} + sub _type { return 'SignStream'; } --- a/Koha/SignsToStream.pm +++ a/Koha/SignsToStream.pm @@ -33,6 +33,20 @@ Koha::SignsToStream - SignsToStream object class =cut +=head3 sign_stream + +my $sign_stream = $sts->sign_stream + +Return the stream + +=cut + +sub sign_stream { + my ( $self ) = @_; + my $stream_rs = $self->_result->sign_stream; + return Koha::SignStream->_new_from_dbic( $stream_rs ); +} + sub _type { return 'SignsToStream'; } --- a/koha-tmpl/intranet-tmpl/prog/en/includes/tools-menu.inc +++ a/koha-tmpl/intranet-tmpl/prog/en/includes/tools-menu.inc @@ -52,7 +52,7 @@ [% END # /IF ( CAN_user_tools_items_batchdel... %] - [% IF ( CAN_user_tools_edit_calendar || CAN_user_tools_manage_csv_profiles || CAN_user_tools_view_system_logs || CAN_user_tools_edit_additional_contents || CAN_user_tools_schedule_tasks || CAN_user_tools_edit_quotes || ( Koha.ArePluginsEnabled() && CAN_user_plugins_tool ) || CAN_user_tools_upload_general_files || CAN_user_tools_access_files ) %] + [% IF ( CAN_user_tools_edit_calendar || CAN_user_tools_manage_csv_profiles || CAN_user_tools_view_system_logs || CAN_user_tools_edit_additional_contents || CAN_user_tools_schedule_tasks || CAN_user_tools_edit_quotes || ( Koha.ArePluginsEnabled() && CAN_user_plugins_tool ) || CAN_user_tools_upload_general_files || CAN_user_tools_access_files || CAN_user_tools_edit_digital_signs ) %]
Additional tools