Revision 8d19aa00
Von Stephan Köhler vor mehr als 18 Jahren hinzugefügt
| SL/IR.pm | ||
|---|---|---|
| 337 | 337 |
if ($form->{"projectnumber_$i"}) {
|
| 338 | 338 |
$project_id = $form->{"projectnumber_$i"};
|
| 339 | 339 |
} |
| 340 |
print(STDERR $project_id, " Project_id\n"); |
|
| 341 | 340 |
$deliverydate = |
| 342 | 341 |
($form->{"deliverydate_$i"})
|
| 343 | 342 |
? qq|'$form->{"deliverydate_$i"}'|
|
| ... | ... | |
| 353 | 352 |
'$form->{"unit_$i"}', $deliverydate, (SELECT id FROM project WHERE projectnumber = '$project_id'),
|
| 354 | 353 |
'$form->{"serialnumber_$i"}')|;
|
| 355 | 354 |
$dbh->do($query) || $form->dberror($query); |
| 356 |
print(STDERR $query, "\n\n"); |
|
| 357 | 355 |
} |
| 358 | 356 |
} |
| 359 | 357 |
|
Auch abrufbar als: Unified diff
Merge von 853 aus unstable: Korrektur
STDERR entfernt, Packet List in Lieferschein umbenannt, Vorlagen geändert, locales