Revision c09536f4
Von Sven Schöling vor fast 15 Jahren hinzugefügt
| SL/OE.pm | ||
|---|---|---|
| 1197 | 1197 |
} |
| 1198 | 1198 |
|
| 1199 | 1199 |
$query = qq|SELECT p.partnumber, p.description, p.unit, a.qty, | . |
| 1200 |
qq|pg.partsgroup | .
|
|
| 1201 |
qq|FROM assembly a | .
|
|
| 1202 |
qq| JOIN parts p ON (a.parts_id = p.id) | .
|
|
| 1203 |
qq| LEFT JOIN partsgroup pg ON (p.partsgroup_id = pg.id) | .
|
|
| 1204 |
qq| WHERE a.bom = '1' | .
|
|
| 1205 |
qq| AND a.id = ? | . $sortorder;
|
|
| 1206 |
@values = ($form->{"id_$i"});
|
|
| 1200 |
qq|pg.partsgroup | .
|
|
| 1201 |
qq|FROM assembly a | .
|
|
| 1202 |
qq| JOIN parts p ON (a.parts_id = p.id) | .
|
|
| 1203 |
qq| LEFT JOIN partsgroup pg ON (p.partsgroup_id = pg.id) | .
|
|
| 1204 |
qq| WHERE a.bom = '1' | .
|
|
| 1205 |
qq| AND a.id = ? | . $sortorder;
|
|
| 1206 |
@values = ($form->{"id_$i"});
|
|
| 1207 | 1207 |
$sth = $dbh->prepare($query); |
| 1208 | 1208 |
$sth->execute(@values) || $form->dberror($query); |
| 1209 | 1209 |
|
Auch abrufbar als: Unified diff
Keine Tabs in SL/* Modulen.
Machen das Leben nur schwer für Leute die zufällig nicht die Tabbreite eingestellt haben wie der Autor.