152 |
152 |
|
153 |
153 |
$form->header;
|
154 |
154 |
|
155 |
|
print qq|
|
156 |
|
<body>
|
157 |
|
|
158 |
|
<form method=post action=$form->{script}>
|
159 |
|
|
160 |
|
<input type=hidden name=searchitems value=$form->{searchitems}>
|
161 |
|
<input type=hidden name=title value="$form->{title}">
|
162 |
|
|
163 |
|
<input type=hidden name=revers value="$form->{revers}">
|
164 |
|
<input type=hidden name=lastsort value="$form->{lastsort}">|;
|
165 |
|
|
166 |
|
print qq|
|
167 |
|
<table>
|
168 |
|
<tr class=listheading>
|
169 |
|
<th class=listheading nowrap>| . $locale->text('Part Number') . qq|</th>
|
170 |
|
<th class=listheading nowrap>| . $locale->text('Part Description') . qq|</th>
|
171 |
|
</tr>
|
172 |
|
<tr valign=top>
|
173 |
|
<td><input type=text name=partnumber size=20 value=></td>
|
174 |
|
<td><input type=text name=description size=30 value=></td>
|
175 |
|
</tr>
|
176 |
|
</table>
|
177 |
|
<br>|;
|
178 |
|
|
179 |
|
print qq|
|
180 |
|
|
181 |
|
<input type=hidden name=login value=$form->{login}>
|
182 |
|
<input type=hidden name=password value=$form->{password}>
|
183 |
|
|
184 |
|
<input type=hidden name=itemstatus value="$form->{itemstatus}">
|
185 |
|
<input type=hidden name=l_linetotal value="$form->{l_linetotal}">
|
186 |
|
<input type=hidden name=l_partnumber value="$form->{l_partnumber}">
|
187 |
|
<input type=hidden name=l_description value="$form->{l_description}">
|
188 |
|
<input type=hidden name=l_onhand value="$form->{l_onhand}">
|
189 |
|
<input type=hidden name=l_unit value="$form->{l_unit}">
|
190 |
|
<input type=hidden name=l_sellprice value="$form->{l_sellprice}">
|
191 |
|
<input type=hidden name=l_linetotalsellprice value="$form->{l_linetotalsellprice}">
|
192 |
|
<input type=hidden name=sort value="$form->{sort}">
|
193 |
|
<input type=hidden name=revers value="$form->{revers}">
|
194 |
|
<input type=hidden name=lastsort value="$form->{lastsort}">
|
195 |
|
|
196 |
|
<input type=hidden name=bom value="$form->{bom}">
|
197 |
|
<input type=hidden name=titel value="$form->{titel}">
|
198 |
|
<input type=hidden name=searchitems value="$form->{searchitems}">
|
199 |
|
|
200 |
|
<input type=hidden name=row value=$j>
|
201 |
|
|
202 |
|
<input type=hidden name=nextsub value=item_selected>
|
203 |
|
|
204 |
|
<input type=hidden name=test value=item_selected>
|
205 |
|
|
206 |
|
<input name=lastndx type=hidden value=$lastndx>
|
207 |
|
|
208 |
|
<input name=ndxs_counter type=hidden value=$form->{ndxs_counter}>
|
209 |
|
|
210 |
|
<input name=extras type=hidden value=$form->{extras}>|;
|
|
155 |
push @custom_hiddens, qw(login password searchitems title bom titel revers lastsort sort ndxs_counter extras);
|
|
156 |
push @custom_hiddens, qw(itemstatus l_linetotal l_partnumber l_description l_onhand l_unit l_sellprice l_linetotalsellprice);
|
|
157 |
my @HIDDENS = (
|
|
158 |
+{ name => 'row', value => $j },
|
|
159 |
+{ name => 'nextsub', value => 'item_selected' },
|
|
160 |
+{ name => 'test', value => 'item_selected' },
|
|
161 |
+{ name => 'lastndx', value => $lastndx },
|
|
162 |
map(+{ name => $_, value => $form->{$_} }, @custom_hiddens),
|
|
163 |
);
|
211 |
164 |
|
212 |
165 |
my ($partnumber, $description, $unit, $sellprice, $soldtotal);
|
213 |
166 |
# if choice set data
|
... | ... | |
253 |
206 |
} #rof
|
254 |
207 |
} #fi
|
255 |
208 |
|
256 |
|
print $totop100;
|
257 |
|
|
258 |
|
print qq|
|
259 |
|
<input class=submit type=submit name=action value="|
|
260 |
|
. $locale->text('list') . qq|">
|
261 |
|
</form>
|
|
209 |
print $form->parse_html_template('ic/choice', +{ HIDDENS => \@HIDDENS, totop100 => $totop100 });
|
262 |
210 |
|
263 |
|
</body>
|
264 |
|
</html>|;
|
265 |
211 |
$lxdebug->leave_sub();
|
266 |
212 |
} #end choice
|
267 |
213 |
|
... | ... | |
420 |
366 |
|
421 |
367 |
$form->{top100} = "top100";
|
422 |
368 |
$form->{l_soldtotal} = "Y";
|
423 |
|
$form->{soldtotal} = "soldtotal";
|
|
369 |
# $form->{soldtotal} = "soldtotal";
|
424 |
370 |
$form->{sort} = "soldtotal";
|
425 |
371 |
$form->{l_qty} = "N";
|
426 |
372 |
$form->{l_linetotal} = "";
|
choice umgebaut, und nebenbei den sqlfehler in top100 gefixt