Revision 2b89ec97
Von Thomas Kasulke vor mehr als 17 Jahren hinzugefügt
| bin/mozilla/ic.pl | ||
|---|---|---|
| 397 | 397 |
$lxdebug->leave_sub(); |
| 398 | 398 |
} #end search() |
| 399 | 399 |
|
| 400 |
|
|
| 401 | 400 |
sub search_update_prices {
|
| 402 | 401 |
$lxdebug->enter_sub(); |
| 403 | 402 |
|
| ... | ... | |
| 2056 | 2055 |
|
| 2057 | 2056 |
sub edit {
|
| 2058 | 2057 |
$lxdebug->enter_sub(); |
| 2059 |
|
|
| 2058 |
# show history button |
|
| 2059 |
$form->{javascript} = qq|<script type="text/javascript" src="js/show_history.js"></script>|;
|
|
| 2060 |
#/show hhistory button |
|
| 2060 | 2061 |
IC->get_part(\%myconfig, \%$form); |
| 2061 | 2062 |
|
| 2062 | 2063 |
$form->{"original_partnumber"} = $form->{"partnumber"};
|
| ... | ... | |
| 2408 | 2409 |
</tr> |
| 2409 | 2410 |
<tr> |
| 2410 | 2411 |
<th align="right" nowrap="true">| |
| 2411 |
. $locale->text('Gesch?ftsvolumen') . qq|</th>
|
|
| 2412 |
. $locale->text('Geschäftsvolumen') . qq|</th>
|
|
| 2412 | 2413 |
<td><input name=gv size=10 value=$form->{gv}></td>
|
| 2413 | 2414 |
</tr> |
| 2414 | 2415 |
|; |
| ... | ... | |
| 2714 | 2715 |
} |
| 2715 | 2716 |
} |
| 2716 | 2717 |
|
| 2718 |
if (!$form->{previousform}) {
|
|
| 2719 |
if ($form->{menubar}) {
|
|
| 2720 |
require "$form->{path}/menu.pl";
|
|
| 2721 |
&menubar; |
|
| 2722 |
} |
|
| 2723 |
} |
|
| 2724 |
# button for saving history |
|
| 2725 |
if($form->{id} ne "") {
|
|
| 2726 |
print qq| |
|
| 2727 |
<input type=button class=submit onclick=set_history_window(| |
|
| 2728 |
. $form->{id}
|
|
| 2729 |
. qq|); name=history id=history value=| |
|
| 2730 |
. $locale->text('history')
|
|
| 2731 |
. qq|>|; |
|
| 2732 |
} |
|
| 2733 |
# /button for saving history |
|
| 2717 | 2734 |
print qq| |
| 2718 | 2735 |
|
| 2719 | 2736 |
</form> |
| 2737 |
|
|
| 2720 | 2738 |
<script type="text/javascript" src="js/wz_tooltip.js"></script> |
| 2721 | 2739 |
|
| 2722 | 2740 |
</body> |
| ... | ... | |
| 3032 | 3050 |
if ($rc == 3) {
|
| 3033 | 3051 |
$form->error($locale->text('Partnumber not unique!'));
|
| 3034 | 3052 |
} |
| 3053 |
# saving the history |
|
| 3054 |
if(!exists $form->{addition}) {
|
|
| 3055 |
$form->{addition} = "SAVED";
|
|
| 3056 |
$form->save_history($form->dbconnect(\%myconfig)); |
|
| 3057 |
} |
|
| 3058 |
# /saving the history |
|
| 3035 | 3059 |
$parts_id = $form->{id};
|
| 3036 | 3060 |
|
| 3037 | 3061 |
# load previous variables |
| ... | ... | |
| 3148 | 3172 |
sub save_as_new {
|
| 3149 | 3173 |
$lxdebug->enter_sub(); |
| 3150 | 3174 |
|
| 3175 |
# saving the history |
|
| 3176 |
if(!exists $form->{addition}) {
|
|
| 3177 |
$form->{addition} = "SAVED AS NEW";
|
|
| 3178 |
$form->save_history($form->dbconnect(\%myconfig)); |
|
| 3179 |
} |
|
| 3180 |
# /saving the history |
|
| 3151 | 3181 |
$form->{id} = 0;
|
| 3152 | 3182 |
if ($form->{"original_partnumber"} &&
|
| 3153 | 3183 |
($form->{"partnumber"} eq $form->{"original_partnumber"})) {
|
| 3154 | 3184 |
$form->{partnumber} = "";
|
| 3155 | 3185 |
} |
| 3156 | 3186 |
&save; |
| 3157 |
|
|
| 3158 | 3187 |
$lxdebug->leave_sub(); |
| 3159 | 3188 |
} |
| 3160 | 3189 |
|
| 3161 | 3190 |
sub delete {
|
| 3162 | 3191 |
$lxdebug->enter_sub(); |
| 3163 |
|
|
| 3192 |
# saving the history |
|
| 3193 |
if(!exists $form->{addition}) {
|
|
| 3194 |
$form->{addition} = "DELETED";
|
|
| 3195 |
$form->save_history($form->dbconnect(\%myconfig)); |
|
| 3196 |
} |
|
| 3197 |
# /saving the history |
|
| 3164 | 3198 |
$rc = IC->delete(\%myconfig, \%$form); |
| 3165 | 3199 |
|
| 3166 | 3200 |
# redirect |
| ... | ... | |
| 3203 | 3237 |
$lxdebug->leave_sub(); |
| 3204 | 3238 |
} |
| 3205 | 3239 |
|
| 3206 |
|
|
| 3207 | 3240 |
sub parts_language_selection {
|
| 3208 | 3241 |
$lxdebug->enter_sub(); |
| 3209 | 3242 |
|
Auch abrufbar als: Unified diff
Historie eingefügt