Lines 15-21
if ( CheckVersion($DBversion) ) {
Link Here
|
15 |
$sth->execute(); |
15 |
$sth->execute(); |
16 |
while (my $row = $sth->fetchrow_hashref) { |
16 |
while (my $row = $sth->fetchrow_hashref) { |
17 |
$sth2->execute($row->{accountlines_id}); |
17 |
$sth2->execute($row->{accountlines_id}); |
18 |
my $result = $sth2->fetchrow; |
18 |
my $result = $sth2->fetchrow_hashref; |
19 |
my $type = $types_map->{$result->{'type'}} // 'Pay'; |
19 |
my $type = $types_map->{$result->{'type'}} // 'Pay'; |
20 |
$sth3->execute($type,$row->{accountlines_id}); |
20 |
$sth3->execute($type,$row->{accountlines_id}); |
21 |
} |
21 |
} |
22 |
- |
|
|