Revision b65a230d
Von Sven Schöling vor fast 15 Jahren hinzugefügt
bin/mozilla/ic.pl | ||
---|---|---|
290 | 290 |
# <th class=listtop colspan=6>| . $locale->text('choice part') . qq|</th> |
291 | 291 |
# </tr> |
292 | 292 |
# <tr height="5"></tr> |
293 |
# <tr class=listheading>
|
|
294 |
# <th> </th>
|
|
295 |
# <th class=listheading>| . $locale->text('Part Number') . qq|</th>
|
|
296 |
# <th class=listheading>| . $locale->text('Part Description') . qq|</th>
|
|
297 |
# <th class=listheading>| . $locale->text('Unit of measure') . qq|</th>
|
|
298 |
# <th class=listheading>| . $locale->text('Sell Price') . qq|</th>
|
|
299 |
# <th class=listheading>| . $locale->text('soldtotal') . qq|</th>
|
|
300 |
# </tr>|;
|
|
293 |
# <tr class=listheading>
|
|
294 |
# <th> </th>
|
|
295 |
# <th class=listheading>| . $locale->text('Part Number') . qq|</th>
|
|
296 |
# <th class=listheading>| . $locale->text('Part Description') . qq|</th>
|
|
297 |
# <th class=listheading>| . $locale->text('Unit of measure') . qq|</th>
|
|
298 |
# <th class=listheading>| . $locale->text('Sell Price') . qq|</th>
|
|
299 |
# <th class=listheading>| . $locale->text('soldtotal') . qq|</th>
|
|
300 |
# </tr>|;
|
|
301 | 301 |
# |
302 | 302 |
# my $j = 0; |
303 | 303 |
# my $i = $form->{rows}; |
... | ... | |
308 | 308 |
# <tr class=listrow| . ($j % 2) . qq|>|; |
309 | 309 |
# if ($j == 1) { |
310 | 310 |
# print qq| |
311 |
# <td><input name=ndx class=radio type=radio value=$j checked></td>|;
|
|
311 |
# <td><input name=ndx class=radio type=radio value=$j checked></td>|;
|
|
312 | 312 |
# } else { |
313 | 313 |
# print qq| |
314 |
# <td><input name=ndx class=radio type=radio value=$j></td>|;
|
|
314 |
# <td><input name=ndx class=radio type=radio value=$j></td>|;
|
|
315 | 315 |
# } |
316 | 316 |
# print qq| |
317 |
# <td><input name="new_partnumber_$j" type=hidden value="$form->{"partnumber_$j"}">$form->{"partnumber_$j"}</td>
|
|
318 |
# <td><input name="new_description_$j" type=hidden value="$form->{"description_$j"}">$form->{"description_$j"}</td>
|
|
319 |
# <td><input name="new_unit_$j" type=hidden value="$form->{"unit_$j"}">$form->{"unit_$j"}</td>
|
|
320 |
# <td><input name="new_sellprice_$j" type=hidden value="$form->{"sellprice_$j"}">$form->{"sellprice_$j"}</td>
|
|
321 |
# <td><input name="new_soldtotal_$j" type=hidden value="$form->{"soldtotal_$j"}">$form->{"soldtotal_$j"}</td>
|
|
317 |
# <td><input name="new_partnumber_$j" type=hidden value="$form->{"partnumber_$j"}">$form->{"partnumber_$j"}</td>
|
|
318 |
# <td><input name="new_description_$j" type=hidden value="$form->{"description_$j"}">$form->{"description_$j"}</td>
|
|
319 |
# <td><input name="new_unit_$j" type=hidden value="$form->{"unit_$j"}">$form->{"unit_$j"}</td>
|
|
320 |
# <td><input name="new_sellprice_$j" type=hidden value="$form->{"sellprice_$j"}">$form->{"sellprice_$j"}</td>
|
|
321 |
# <td><input name="new_soldtotal_$j" type=hidden value="$form->{"soldtotal_$j"}">$form->{"soldtotal_$j"}</td>
|
|
322 | 322 |
# </tr> |
323 | 323 |
# |
324 |
# <input name="new_id_$j" type=hidden value="$form->{"id_$j"}">|;
|
|
324 |
# <input name="new_id_$j" type=hidden value="$form->{"id_$j"}">|;
|
|
325 | 325 |
# } |
326 | 326 |
# |
327 | 327 |
# print qq| |
... | ... | |
1781 | 1781 |
# saving the history |
1782 | 1782 |
if(!exists $form->{addition}) { |
1783 | 1783 |
$form->{snumbers} = qq|partnumber_| . $form->{partnumber}; |
1784 |
$form->{addition} = "SAVED";
|
|
1785 |
$form->save_history($form->dbconnect(\%myconfig));
|
|
1784 |
$form->{addition} = "SAVED";
|
|
1785 |
$form->save_history($form->dbconnect(\%myconfig));
|
|
1786 | 1786 |
} |
1787 | 1787 |
# /saving the history |
1788 | 1788 |
$parts_id = $form->{id}; |
... | ... | |
1914 | 1914 |
# saving the history |
1915 | 1915 |
if(!exists $form->{addition}) { |
1916 | 1916 |
$form->{snumbers} = qq|partnumber_| . $form->{partnumber}; |
1917 |
$form->{addition} = "SAVED AS NEW";
|
|
1918 |
$form->save_history($form->dbconnect(\%myconfig));
|
|
1917 |
$form->{addition} = "SAVED AS NEW";
|
|
1918 |
$form->save_history($form->dbconnect(\%myconfig));
|
|
1919 | 1919 |
} |
1920 | 1920 |
# /saving the history |
1921 | 1921 |
$form->{id} = 0; |
... | ... | |
1935 | 1935 |
# saving the history |
1936 | 1936 |
if(!exists $form->{addition}) { |
1937 | 1937 |
$form->{snumbers} = qq|partnumber_| . $form->{partnumber}; |
1938 |
$form->{addition} = "DELETED";
|
|
1939 |
$form->save_history($form->dbconnect(\%myconfig));
|
|
1938 |
$form->{addition} = "DELETED";
|
|
1939 |
$form->save_history($form->dbconnect(\%myconfig));
|
|
1940 | 1940 |
} |
1941 | 1941 |
# /saving the history |
1942 | 1942 |
my $rc = IC->delete(\%myconfig, \%$form); |
Auch abrufbar als: Unified diff
Tabs aus *.pl Dateien entfernt.