Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision 83e061c0

Von Sven Schöling vor fast 17 Jahren hinzugefügt

  • ID 83e061c063b3f6b9f34ee0c9b7ff5575362be9a4
  • Vorgänger 21535676
  • Nachfolger 8ca52b02

choice umgebaut, und nebenbei den sqlfehler in top100 gefixt

Unterschiede anzeigen:

bin/mozilla/ic.pl
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} = "";

Auch abrufbar als: Unified diff