|
Lines 110-117
elsif ( $phase eq 'Build new' ) {
Link Here
|
| 110 |
if ( $op eq 'convert' ) { |
110 |
if ( $op eq 'convert' ) { |
| 111 |
my $report_id = $input->param('report_id'); |
111 |
my $report_id = $input->param('report_id'); |
| 112 |
my $report = C4::Reports::Guided::get_saved_report($report_id); |
112 |
my $report = C4::Reports::Guided::get_saved_report($report_id); |
| 113 |
warn $report_id; |
|
|
| 114 |
use Data::Printer colored => 1; warn p $report; |
| 115 |
if ($report) { |
113 |
if ($report) { |
| 116 |
my $updated_sql = C4::Reports::Guided::convert_sql( $report->{savedsql} ); |
114 |
my $updated_sql = C4::Reports::Guided::convert_sql( $report->{savedsql} ); |
| 117 |
C4::Reports::Guided::update_sql( |
115 |
C4::Reports::Guided::update_sql( |
| 118 |
- |
|
|