Revision a0f1b420
Von Moritz Bunkus vor mehr als 17 Jahren hinzugefügt
| SL/Form.pm | ||
|---|---|---|
| 1928 | 1928 |
d.description AS department, |
| 1929 | 1929 |
e.name AS employee |
| 1930 | 1930 |
FROM $arap a |
| 1931 |
LEFT JOIN $table c ON (a.${table}_id = c.id)
|
|
| 1931 |
JOIN $table c ON (a.${table}_id = c.id)
|
|
| 1932 | 1932 |
LEFT JOIN employee e ON (e.id = a.employee_id) |
| 1933 | 1933 |
LEFT JOIN department d ON (d.id = a.department_id) |
| 1934 | 1934 |
WHERE a.id = ?|; |
| ... | ... | |
| 1945 | 1945 |
|
| 1946 | 1946 |
# now get the account numbers |
| 1947 | 1947 |
$query = qq|SELECT c.accno, c.description, c.link, c.taxkey_id, tk.tax_id |
| 1948 |
FROM chart c |
|
| 1949 |
LEFT JOIN taxkeys tk ON (tk.chart_id = c.id) |
|
| 1948 |
FROM chart c, taxkeys tk |
|
| 1950 | 1949 |
WHERE c.link LIKE ? |
| 1950 |
AND ( tk.chart_id = c.id OR c.link LIKE '%_tax%') |
|
| 1951 |
AND (NOT tk.chart_id = c.id OR NOT c.link LIKE '%_tax%') |
|
| 1951 | 1952 |
AND (tk.id = (SELECT id FROM taxkeys WHERE taxkeys.chart_id = c.id AND startdate <= $transdate ORDER BY startdate DESC LIMIT 1) |
| 1952 | 1953 |
OR c.link LIKE '%_tax%') |
| 1953 | 1954 |
ORDER BY c.accno|; |
| 1954 | 1955 |
|
| 1955 |
dump_query(0, "wuff", $query, '%$module%'); |
|
| 1956 |
|
|
| 1957 | 1956 |
$sth = $dbh->prepare($query); |
| 1958 | 1957 |
do_statement($self, $sth, $query, "%$module%"); |
| 1959 | 1958 |
|
Auch abrufbar als: Unified diff
Query-Vereinfachung wurde aus Versehen in r2296 committed.