|
Lines 64-72
my @credit_types =
Link Here
|
| 64 |
|
64 |
|
| 65 |
if ($do_it) { |
65 |
if ($do_it) { |
| 66 |
|
66 |
|
| 67 |
$fromDate = output_pref({ dt => eval { dt_from_string($input->param("from")) } || dt_from_string, |
67 |
$fromDate = output_pref({ dt => eval { dt_from_string(scalar $input->param("from")) } || dt_from_string, |
| 68 |
dateformat => 'sql', dateonly => 1 }); #for sql query |
68 |
dateformat => 'sql', dateonly => 1 }); #for sql query |
| 69 |
$toDate = output_pref({ dt => eval { dt_from_string($input->param("to")) } || dt_from_string, |
69 |
$toDate = output_pref({ dt => eval { dt_from_string(scalar $input->param("to")) } || dt_from_string, |
| 70 |
dateformat => 'sql', dateonly => 1 }); #for sql query |
70 |
dateformat => 'sql', dateonly => 1 }); #for sql query |
| 71 |
|
71 |
|
| 72 |
my $whereTType = q{}; |
72 |
my $whereTType = q{}; |
| 73 |
- |
|
|