]> wagnertech.de Git - mfinanz.git/commitdiff
projects / mfinanz.git / commitdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw | patch | inline | side by side (from parent 1: 2153567)
choice umgebaut, und nebenbei den sqlfehler in top100 gefixt
authorSven Schöling <s.schoeling@linet-services.de>
Thu, 29 Nov 2007 18:00:01 +0000 (18:00 +0000)
committerSven Schöling <s.schoeling@linet-services.de>
Thu, 29 Nov 2007 18:00:01 +0000 (18:00 +0000)
bin/mozilla/ic.pl patch | blob | history
templates/webpages/ic/choice_de.html [new file with mode: 0644] patch | blob
templates/webpages/ic/choice_master.html [new file with mode: 0644] patch | blob

diff --git a/bin/mozilla/ic.pl b/bin/mozilla/ic.pl
index daba6887e5944f3d4033c541dd6cd6c698f52fac..e9b13a3271555b922cd99d808e8644106eb7cc68 100644 (file)
--- a/bin/mozilla/ic.pl
+++ b/bin/mozilla/ic.pl
@@ -152,62 +152,15 @@ sub choice {
 
   $form->header;
 
 
   $form->header;
 
-  print qq|
-  <body>
-
-  <form method=post action=$form->{script}>
-
-  <input type=hidden name=searchitems value=$form->{searchitems}>
-  <input type=hidden name=title value="$form->{title}">
-
-  <input type=hidden name=revers value="$form->{revers}">
-  <input type=hidden name=lastsort value="$form->{lastsort}">|;
-
-  print qq|
-      <table>
-       <tr class=listheading>
-         <th class=listheading nowrap>| . $locale->text('Part Number') . qq|</th>
-         <th class=listheading nowrap>| . $locale->text('Part Description') . qq|</th>
-        </tr>
-        <tr valign=top>
-         <td><input type=text name=partnumber size=20 value=></td>
-         <td><input type=text name=description size=30 value=></td>
-       </tr>
-      </table>
-     <br>|;
-
-  print qq|
-
-<input type=hidden name=login value=$form->{login}>
-<input type=hidden name=password value=$form->{password}>
-
-<input type=hidden name=itemstatus value="$form->{itemstatus}">
-<input type=hidden name=l_linetotal value="$form->{l_linetotal}">
-<input type=hidden name=l_partnumber value="$form->{l_partnumber}">
-<input type=hidden name=l_description value="$form->{l_description}">
-<input type=hidden name=l_onhand value="$form->{l_onhand}">
-<input type=hidden name=l_unit value="$form->{l_unit}">
-<input type=hidden name=l_sellprice value="$form->{l_sellprice}">
-<input type=hidden name=l_linetotalsellprice value="$form->{l_linetotalsellprice}">
-<input type=hidden name=sort value="$form->{sort}">
-<input type=hidden name=revers value="$form->{revers}">
-<input type=hidden name=lastsort value="$form->{lastsort}">
-
-<input type=hidden name=bom value="$form->{bom}">
-<input type=hidden name=titel value="$form->{titel}">
-<input type=hidden name=searchitems value="$form->{searchitems}">
-
-<input type=hidden name=row value=$j>
-
-<input type=hidden name=nextsub value=item_selected>
-
-<input type=hidden name=test value=item_selected>
-
-<input name=lastndx type=hidden value=$lastndx>
-
-<input name=ndxs_counter type=hidden value=$form->{ndxs_counter}>
-
-<input name=extras type=hidden value=$form->{extras}>|;
+  push @custom_hiddens, qw(login password searchitems title bom titel revers lastsort sort ndxs_counter extras);
+  push @custom_hiddens, qw(itemstatus l_linetotal l_partnumber l_description l_onhand l_unit l_sellprice l_linetotalsellprice);
+  my @HIDDENS = (
+        +{ name => 'row',     value => $j              },
+        +{ name => 'nextsub', value => 'item_selected' },
+        +{ name => 'test',    value => 'item_selected' },
+        +{ name => 'lastndx', value => $lastndx        },
+    map(+{ name => $_,        value => $form->{$_}     }, @custom_hiddens),
+  );
 
   my ($partnumber, $description, $unit, $sellprice, $soldtotal);
   # if choice set data
 
   my ($partnumber, $description, $unit, $sellprice, $soldtotal);
   # if choice set data
@@ -253,15 +206,8 @@ sub choice {
     }    #rof
   }    #fi
 
     }    #rof
   }    #fi
 
-  print $totop100;
-
-  print qq|
-     <input class=submit type=submit name=action value="|
-    . $locale->text('list') . qq|">
-    </form>
+  print $form->parse_html_template('ic/choice', +{ HIDDENS => \@HIDDENS, totop100 => $totop100 });
 
 
-   </body>
-  </html>|;
   $lxdebug->leave_sub();
 }    #end choice
 
   $lxdebug->leave_sub();
 }    #end choice
 
@@ -420,7 +366,7 @@ sub addtop100 {
 
   $form->{top100}      = "top100";
   $form->{l_soldtotal} = "Y";
 
   $form->{top100}      = "top100";
   $form->{l_soldtotal} = "Y";
-  $form->{soldtotal}   = "soldtotal";
+#  $form->{soldtotal}   = "soldtotal";
   $form->{sort}        = "soldtotal";
   $form->{l_qty}       = "N";
   $form->{l_linetotal} = "";
   $form->{sort}        = "soldtotal";
   $form->{l_qty}       = "N";
   $form->{l_linetotal} = "";
diff --git a/templates/webpages/ic/choice_de.html b/templates/webpages/ic/choice_de.html
new file mode 100644 (file)
index 0000000..2247bea
--- /dev/null
+++ b/templates/webpages/ic/choice_de.html
@@ -0,0 +1,28 @@
+[%- USE HTML %]
+[%- USE LxERP %]
+<body>
+
+  <form method=post action="[% script %]">
+
+[%- FOREACH row = HIDDENS %]
+   <input type="hidden" name="[% HTML.escape(row.name) %]" value="[% HTML.escape(row.value) %]" > 
+[%- END %]
+
+      <table>
+       <tr class=listheading>
+         <th class=listheading nowrap>Artikelnummer</th>
+         <th class=listheading nowrap>Artikelbeschreibung</th>
+        </tr>
+        <tr valign=top>
+         <td><input type=text name=partnumber size=20 value=></td>
+         <td><input type=text name=description size=30 value=></td>
+       </tr>
+      </table>
+     <br>
+
+  [% totop100 %]
+
+     <input class=submit type=submit name=action value="auflisten"> </form>
+
+   </body>
+  </html>
diff --git a/templates/webpages/ic/choice_master.html b/templates/webpages/ic/choice_master.html
new file mode 100644 (file)
index 0000000..8eaa3c4
--- /dev/null
+++ b/templates/webpages/ic/choice_master.html
@@ -0,0 +1,28 @@
+[%- USE HTML %]
+[%- USE LxERP %]
+<body>
+
+  <form method=post action="[% script %]">
+
+[%- FOREACH row = HIDDENS %]
+   <input type="hidden" name="[% HTML.escape(row.name) %]" value="[% HTML.escape(row.value) %]" > 
+[%- END %]
+
+      <table>
+       <tr class=listheading>
+         <th class=listheading nowrap><translate>Part Number</translate></th>
+         <th class=listheading nowrap><translate>Part Description</translate></th>
+        </tr>
+        <tr valign=top>
+         <td><input type=text name=partnumber size=20 value=></td>
+         <td><input type=text name=description size=30 value=></td>
+       </tr>
+      </table>
+     <br>
+
+  [% totop100 %]
+
+     <input class=submit type=submit name=action value="<translate>list</translate>"> </form>
+
+   </body>
+  </html>
Unnamed repository; edit this file 'description' to name the repository.