diff options
Diffstat (limited to 'bin')
| -rwxr-xr-x | bin/ct.pl | 30 | ||||
| -rwxr-xr-x | bin/gl.pl | 14 | ||||
| -rwxr-xr-x | bin/ic.pl | 86 | ||||
| -rwxr-xr-x | bin/ir.pl | 150 | ||||
| -rwxr-xr-x | bin/jc.pl | 40 | ||||
| -rwxr-xr-x | bin/pe.pl | 54 | ||||
| -rwxr-xr-x | bin/rp.pl | 38 |
7 files changed, 206 insertions, 206 deletions
@@ -478,7 +478,7 @@ sub search_name { <form method=post action=$form->{script}> -<input type=hidden name=db value=$form->{db}> +<input type=hidden name=db value="$form->{db}"> <table width=100%> <tr> @@ -1847,7 +1847,7 @@ s/(<option value="\Q$form->{employee}--$form->{employee_id}\E")/$1 selected/; . qq|</th> </tr> <tr> - <td><input name=none size=35 value=| . ( "=" x 35 ) . qq|></td> + <td><input name=none size=35 value="| . ( "=" x 35 ) . qq|"></td> </tr> <tr> <td><input name=shiptoname size=35 maxlength=64 value="$form->{shiptoname}"></td> @@ -1894,9 +1894,9 @@ s/(<option value="\Q$form->{employee}--$form->{employee_id}\E")/$1 selected/; $tax <tr> <th align=right>| . $locale->text('Startdate') . qq|</th> - <td><input name=startdate size=11 title="$myconfig{dateformat}" value=$form->{startdate}></td> + <td><input name=startdate size=11 title="$myconfig{dateformat}" value="$form->{startdate}"></td> <th align=right>| . $locale->text('Enddate') . qq|</th> - <td><input name=enddate size=11 title="$myconfig{dateformat}" value=$form->{enddate}></td> + <td><input name=enddate size=11 title="$myconfig{dateformat}" value="$form->{enddate}"></td> </tr> <tr> <th align=right>| . $locale->text('Credit Limit') . qq|</th> @@ -2430,29 +2430,29 @@ qq|<td><select name="partsgroup_$i">$selectpartsgroup</select></td>|; if ( $form->{db} eq 'customer' ) { $column_data{pricebreak} = - qq|<td align=right><input name="pricebreak_$i" size=5 value=| + qq|<td align=right><input name="pricebreak_$i" size=5 value="| . $form->format_amount( \%myconfig, $form->{"pricebreak_$i"} ) - . qq|></td>|; + . qq|"></td>|; $column_data{sellprice} = - qq|<td align=right><input name="sellprice_$i" size=10 value=| + qq|<td align=right><input name="sellprice_$i" size=10 value="| . $form->format_amount( \%myconfig, $form->{"sellprice_$i"}, 2 ) - . qq|></td>|; + . qq|"></td>|; $column_data{validfrom} = -qq|<td><input name="validfrom_$i" size=11 value=$form->{"validfrom_$i"}></td>|; +qq|<td><input name="validfrom_$i" size=11 value="$form->{"validfrom_$i"}"></td>|; $column_data{validto} = -qq|<td><input name="validto_$i" size=11 value=$form->{"validto_$i"}></td>|; +qq|<td><input name="validto_$i" size=11 value="$form->{"validto_$i"}"></td>|; } if ( $form->{db} eq 'vendor' ) { $column_data{leadtime} = - qq|<td align=right><input name="leadtime_$i" size=5 value=| + qq|<td align=right><input name="leadtime_$i" size=5 value="| . $form->format_amount( \%myconfig, $form->{"leadtime_$i"} ) - . qq|></td>|; + . qq|"></td>|; $column_data{lastcost} = - qq|<td align=right><input name="lastcost_$i" size=10 value=| + qq|<td align=right><input name="lastcost_$i" size=10 value="| . $form->format_amount( \%myconfig, $form->{"lastcost_$i"}, 2 ) - . qq|></td>|; + . qq|"></td>|; } $column_data{curr} = @@ -2716,7 +2716,7 @@ qq|<td><input name="ndx_$i" class=checkbox type=checkbox value=$i></td>|; </tr> </table> -<input name=lastndx type=hidden value=$i> +<input name="lastndx" type="hidden" value="$i"> |; @@ -307,9 +307,9 @@ qq|<input name="l_description" class=checkbox type=checkbox value=Y checked> | print qq| <body> -<form method=post action=$form->{script}> +<form method="post" action="$form->{script}"> -<input type=hidden name=sort value=transdate> +<input type="hidden" name="sort" value="transdate"> <table width=100%> <tr> @@ -403,7 +403,7 @@ qq|<input name="l_description" class=checkbox type=checkbox value=Y checked> | </tr> </table> -<input type=hidden name=nextsub value=generate_report> +<input type="hidden" name="nextsub" value="generate_report"> |; $form->hide_form(qw(path login sessionid)); @@ -1006,7 +1006,7 @@ sub display_rows { $checked = ( $form->{"fx_transaction_$i"} ) ? "1" : ""; $x = ($checked) ? "x" : ""; $fx_transaction = qq| - <td><input type=hidden name="fx_transaction_$i" value="$checked">$x</td> + <td><input type="hidden" name="fx_transaction_$i" value="$checked">$x</td> |; } @@ -1034,8 +1034,8 @@ sub display_rows { print qq|<tr valign=top> $accno $fx_transaction - <td><input name="debit_$i" size=12 value="$form->{"debit_$i"}" accesskey=$i></td> - <td><input name="credit_$i" size=12 value=$form->{"credit_$i"}></td> + <td><input name="debit_$i" size=12 value="$form->{"debit_$i"}" accesskey="$i"></td> + <td><input name="credit_$i" size=12 value="$form->{"credit_$i"}"></td> $source $memo $project @@ -1140,7 +1140,7 @@ qq|<textarea name=notes rows=$rows cols=50 wrap=soft>$form->{notes}</textarea>|; <th align=right>| . $locale->text('Reference') . qq|</th> <td><input name=reference size=20 value="$form->{reference}"></td> <th align=right>| . $locale->text('Date') . qq|</th> - <td><input name=transdate size=11 title="$myconfig{dateformat}" value=$form->{transdate}></td> + <td><input name=transdate size=11 title="$myconfig{dateformat}" value="$form->{transdate}"></td> </tr> $department <tr> @@ -386,7 +386,7 @@ qq|<textarea name="description" rows=$rows cols=40 wrap=soft>$form->{description } else { $description = - qq|<input name=description size=40 value="$form->{description}">|; + qq|<input name="description" size="40" value="$form->{description}">|; } for ( split / /, $form->{taxaccounts} ) { @@ -414,7 +414,7 @@ qq|<textarea name="description" rows=$rows cols=40 wrap=soft>$form->{description $form->unescape( $form->{selectpartsgroup} ); $partsgroup = - qq|<input type=hidden name=selectpartsgroup value="| + qq|<input type="hidden" name="selectpartsgroup" value="| . $form->escape( $form->{selectpartsgroup}, 1 ) . qq|">|; $form->{partsgroup} = $form->quote( $form->{partsgroup} ); @@ -422,26 +422,26 @@ qq|<textarea name="description" rows=$rows cols=40 wrap=soft>$form->{description s/(<option value="\Q$form->{partsgroup}\E")/$1 selected/; $partsgroup .= - qq|\n<select name=partsgroup>$form->{selectpartsgroup}</select>|; + qq|\n<select name="partsgroup">$form->{selectpartsgroup}</select>|; $group = $locale->text('Group'); } # tax fields foreach $item ( split / /, $form->{taxaccounts} ) { $tax .= qq| - <input class=checkbox type=checkbox name="IC_tax_$item" value=1 $form->{"IC_tax_$item"}> <b>$form->{"IC_tax_${item}_description"}</b> - <br><input type=hidden name=IC_tax_${item}_description value="$form->{"IC_tax_${item}_description"}"> + <input class="checkbox" type="checkbox" name="IC_tax_$item" value="1" $form->{"IC_tax_$item"}> <b>$form->{"IC_tax_${item}_description"}</b> + <br><input type="hidden" name="IC_tax_${item}_description" value="$form->{"IC_tax_${item}_description"}"> |; } $sellprice = qq| <tr> <th align="right" nowrap="true">| . $locale->text('Sell Price') . qq|</th> - <td><input name=sellprice size=11 value=$form->{sellprice}></td> + <td><input name="sellprice" size="11" value="$form->{sellprice}"></td> </tr> <tr> <th align="right" nowrap="true">| . $locale->text('List Price') . qq|</th> - <td><input name=listprice size=11 value=$form->{listprice}></td> + <td><input name="listprice" size="11" value="$form->{listprice}"></td> </tr> |; @@ -450,7 +450,7 @@ qq|<textarea name="description" rows=$rows cols=40 wrap=soft>$form->{description <th align="right" nowrap="true">| . $locale->text('Average Cost') . qq|</th> - <td><input type=hidden name=avgcost value=$form->{avgcost}>$form->{avgcost}</td> + <td><input type="hidden" name="avgcost" value="$form->{avgcost}">$form->{avgcost}</td> </tr> |; @@ -459,14 +459,14 @@ qq|<textarea name="description" rows=$rows cols=40 wrap=soft>$form->{description <th align="right" nowrap="true">| . $locale->text('Last Cost') . qq|</th> - <td><input name=lastcost size=11 value=$form->{lastcost}></td> + <td><input name="lastcost" size="11" value="$form->{lastcost}"></td> </tr> <tr> <th align="right" nowrap="true">| . $locale->text('Markup') . qq| %</th> - <td><input name=markup size=5 value=$form->{markup}></td> - <input type=hidden name=oldmarkup value=$markup> + <td><input name="markup" size="5" value="$form->{markup}"></td> + <input type="hidden" name="oldmarkup" value="$markup"> </tr> |; @@ -475,7 +475,7 @@ qq|<textarea name="description" rows=$rows cols=40 wrap=soft>$form->{description $onhand = qq| <tr> <th align="right" nowrap>| . $locale->text('On Hand') . qq|</th> - <th align=left nowrap class="plus$n"> | + <th align="left" nowrap class="plus$n"> | . $form->format_amount( \%myconfig, $form->{onhand} ) . qq|</th> </tr> @@ -484,7 +484,7 @@ qq|<textarea name="description" rows=$rows cols=40 wrap=soft>$form->{description $rop = qq| <tr> <th align="right" nowrap="true">| . $locale->text('ROP') . qq|</th> - <td><input name=rop size=10 value=$form->{rop}></td> + <td><input name="rop" size="10" value="$form->{rop}"></td> </tr> |; @@ -551,12 +551,12 @@ qq|<textarea name="description" rows=$rows cols=40 wrap=soft>$form->{description <table> <tr> <td> - <input name=weight size=10 value=$form->{weight}> + <input name="weight" size="10" value="$form->{weight}"> </td> <th> $form->{weightunit} - <input type=hidden name=weightunit value=$form->{weightunit}> + <input type="hidden" name="weightunit" value="$form->{weightunit}"> </th> </tr> </table> @@ -578,12 +578,12 @@ qq|<textarea name="description" rows=$rows cols=40 wrap=soft>$form->{description <table> <tr> <td> - <input name=weight size=10 value=$form->{weight}> + <input name="weight" size="10" value="$form->{weight}"> </td> <th> $form->{weightunit} - <input type=hidden name=weightunit value=$form->{weightunit}> + <input type="hidden" name="weightunit" value="$form->{weightunit}"> </th> </tr> </table> @@ -601,12 +601,12 @@ qq|<textarea name="description" rows=$rows cols=40 wrap=soft>$form->{description <tr> <td> $form->{weight} - <input type=hidden name=weight value=$form->{weight}> + <input type="hidden" name="weight" value="$form->{weight}"> </td> <th> $form->{weightunit} - <input type=hidden name=weightunit value=$form->{weightunit}> + <input type="hidden" name="weightunit" value="$form->{weightunit}"> </th> </tr> </table> @@ -627,7 +627,7 @@ qq|<textarea name="description" rows=$rows cols=40 wrap=soft>$form->{description $stock = qq| <tr> <th align="right" nowrap>| . $locale->text('Stock') . qq|</th> - <td><input name=stock size=10 value=$form->{stock}></td> + <td><input name="stock" size="10" value="$form->{stock}"></td> </tr> |; @@ -636,14 +636,14 @@ qq|<textarea name="description" rows=$rows cols=40 wrap=soft>$form->{description <th align="right" nowrap="true">| . $locale->text('Last Cost') . qq|</th> - <td><input type=hidden name=lastcost value=$form->{lastcost}>$form->{lastcost}</td> + <td><input type="hidden" name="lastcost" value="$form->{lastcost}">$form->{lastcost}</td> </tr> <tr> <th align="right" nowrap="true">| . $locale->text('Markup') . qq| %</th> - <td><input name=markup size=5 value=$form->{markup}></td> - <input type=hidden name=oldmarkup value=$markup> + <td><input name="markup" size="5" value="$form->{markup}"></td> + <input type="hidden" name="oldmarkup" value="$markup"> </tr> |; @@ -799,7 +799,7 @@ qq|<textarea name="description" rows=$rows cols=40 wrap=soft>$form->{description <table width="100%"> <tr> <th align="right" nowrap="true">| . $locale->text('Updated') . qq|</th> - <td><input name=priceupdate size=11 title="$myconfig{dateformat}" value=$form->{priceupdate}></td> + <td><input name="priceupdate" size="11" title="$myconfig{dateformat}" value="$form->{priceupdate}"></td> </tr> $sellprice $lastcost @@ -2239,9 +2239,9 @@ qq|<button class="submit" type="submit" name="action" value="add_labor_overhead" <br> -<form method=post action=$form->{script}> +<form method="post" action="$form->{script}"> -<input type=hidden name=item value=$form->{searchitems}> +<input type=hidden name=item value="$form->{searchitems}"> |; $form->hide_form(qw(callback path login sessionid)); @@ -2791,13 +2791,13 @@ s/option>$form->{"vendorcurr_$i"}/option selected>$form->{"vendorcurr_$i"}/; <tr> $vendor <td><input name="partnumber_$i" size=20 value="$form->{"partnumber_$i"}"></td> - <td><input name="lastcost_$i" size=10 value=| + <td><input name="lastcost_$i" size=10 value="| . $form->format_amount( \%myconfig, $form->{"lastcost_$i"}, 2 ) - . qq|></td> + . qq|"></td> $currency - <td nowrap><input name="leadtime_$i" size=5 value=| + <td nowrap><input name="leadtime_$i" size=5 value="| . $form->format_amount( \%myconfig, $form->{"leadtime_$i"} ) - . qq|> <b>| + . qq|"> <b>| . $locale->text('days') . qq|</b></td> </tr> @@ -2900,12 +2900,12 @@ s/option>$form->{"customercurr_$i"}/option selected>$form->{"customercurr_$i"}/; $customer $pricegroup - <td><input name="pricebreak_$i" size=5 value=| + <td><input name="pricebreak_$i" size=5 value="| . $form->format_amount( \%myconfig, $form->{"pricebreak_$i"} ) - . qq|></td> - <td><input name="customerprice_$i" size=10 value=| + . qq|"></td> + <td><input name="customerprice_$i" size=10 value="| . $form->format_amount( \%myconfig, $form->{"customerprice_$i"}, 2 ) - . qq|></td> + . qq|"></td> $currency <td><input name="validfrom_$i" size=11 title="$myconfig{dateformat}" value="$form->{"validfrom_$i"}"></td> <td><input name="validto_$i" size=11 title="$myconfig{dateformat}" value="$form->{"validto_$i"}"></td> @@ -3409,7 +3409,7 @@ sub select_name { <form method=post action="$form->{script}"> -<input type=hidden name=vr value=$vr> +<input type=hidden name=vr value="$vr"> <table width=100%> <tr> @@ -3436,7 +3436,7 @@ sub select_name { $ref->{name} = $form->quote( $ref->{name} ); $column_data{ndx} = -qq|<td><input name=ndx class=radio type=radio value=$i $checked></td>|; +qq|<td><input name=ndx class=radio type=radio value="$i" $checked></td>|; $column_data{name} = qq|<td><input name="new_name_$i" type=hidden value="$ref->{name}">$ref->{name}</td>|; $column_data{address} = qq|<td>$ref->{address1} $ref->{address2}|; @@ -3454,7 +3454,7 @@ qq|<td><input name="new_name_$i" type=hidden value="$ref->{name}">$ref->{name}</ print qq| </tr> -<input name="new_id_$i" type=hidden value=$ref->{id}> +<input name="new_id_$i" type=hidden value="$ref->{id}"> |; @@ -3469,7 +3469,7 @@ qq|<td><input name="new_name_$i" type=hidden value="$ref->{name}">$ref->{name}</ </tr> </table> -<input name=lastndx type=hidden value=$i> +<input name=lastndx type=hidden value="$i"> |; @@ -3480,7 +3480,7 @@ qq|<td><input name="new_name_$i" type=hidden value="$ref->{name}">$ref->{name}</ print qq| <input type=hidden name=nextsub value=name_selected> -<input type=hidden name=vc value=$table> +<input type=hidden name=vc value="$table"> <br> <button class="submit" type="submit" name="action" value="continue">| . $locale->text('Continue') @@ -3873,15 +3873,15 @@ sub list_assemblies { . $form->format_amount( \%myconfig, $ref->{rop}, '', " " ) . qq|</td>|; $column_data{stock} = - qq|<td width=10%><input name="qty_$i" size=10 value=| + qq|<td width=10%><input name="qty_$i" size=10 value="| . $form->format_amount( \%myconfig, $ref->{stock} ) - . qq|></td> - <input type=hidden name="stock_$i" value=$ref->{stock}>|; + . qq|"></td> + <input type=hidden name="stock_$i" value="$ref->{stock}">|; $j++; $j %= 2; print -qq|<tr class=listrow$j><input name="id_$i" type=hidden value=$ref->{id}>\n|; +qq|<tr class="listrow$j"><input name="id_$i" type=hidden value="$ref->{id}">\n|; for (@column_index) { print "\n$column_data{$_}" } @@ -285,10 +285,10 @@ sub form_header { $lang = qq| <tr> - <th align=right nowrap>| . $locale->text('Language') . qq|</th> - <td><select name=language_code>$form->{selectlanguage}</select></td> - <input type=hidden name=oldlanguage_code value=$form->{oldlanguage_code}> - <input type=hidden name="selectlanguage" value="| + <th align="right" nowrap>| . $locale->text('Language') . qq|</th> + <td><select name="language_code">$form->{selectlanguage}</select></td> + <input type="hidden" name="oldlanguage_code" value="$form->{oldlanguage_code}"> + <input type="hidden" name="selectlanguage" value="| . $form->escape( $form->{selectlanguage}, 1 ) . qq|"> </tr> |; @@ -300,12 +300,12 @@ sub form_header { $exchangerate = qq|<tr>|; $exchangerate .= qq| - <th align=right nowrap>| . $locale->text('Currency') . qq|</th> - <td><select name=currency>$form->{selectcurrency}</select></td> | + <th align="right" nowrap>| . $locale->text('Currency') . qq|</th> + <td><select name="currency">$form->{selectcurrency}</select></td> | if $form->{defaultcurrency}; $exchangerate .= qq| - <input type=hidden name=selectcurrency value="$form->{selectcurrency}"> - <input type=hidden name=defaultcurrency value=$form->{defaultcurrency}> + <input type="hidden" name="selectcurrency" value="$form->{selectcurrency}"> + <input type="hidden" name="defaultcurrency" value="$form->{defaultcurrency}"> |; if ( $form->{defaultcurrency} @@ -313,40 +313,40 @@ sub form_header { { if ( $form->{forex} ) { $exchangerate .= qq| - <th align=right nowrap>| + <th align="right" nowrap>| . $locale->text('Exchange Rate') . qq|</th> - <td>$form->{exchangerate}<input type=hidden name=exchangerate value=$form->{exchangerate}></td> + <td>$form->{exchangerate}<input type="hidden" name="exchangerate" value="$form->{exchangerate}"></td> |; } else { $exchangerate .= qq| - <th align=right nowrap>| + <th align="right" nowrap>| . $locale->text('Exchange Rate') . qq|</th> - <td><input name=exchangerate size=10 value=$form->{exchangerate}></td> + <td><input name="exchangerate" size="10" value="$form->{exchangerate}"></td> |; } } $exchangerate .= qq| -<input type=hidden name=forex value=$form->{forex}> +<input type="hidden" name="forex" value="$form->{forex}"> </tr> |; if ( $form->{selectvendor} ) { - $vendor = qq|<select name=vendor>$form->{selectvendor}</select> - <input type=hidden name="selectvendor" value="| + $vendor = qq|<select name="vendor">$form->{selectvendor}</select> + <input type="hidden" name="selectvendor" value="| . $form->escape( $form->{selectvendor}, 1 ) . qq|">|; } else { - $vendor = qq|<input name=vendor value="$form->{vendor}" size=35>|; + $vendor = qq|<input name="vendor" value="$form->{vendor}" size="35">|; } $department = qq| <tr> <th align="right" nowrap>| . $locale->text('Department') . qq|</th> - <td colspan=3><select name=department>$form->{selectdepartment}</select> - <input type=hidden name=selectdepartment value="| + <td colspan="3"><select name="department">$form->{selectdepartment}</select> + <input type="hidden" name="selectdepartment" value="| . $form->escape( $form->{selectdepartment}, 1 ) . qq|"> </td> </tr> @@ -362,7 +362,7 @@ sub form_header { print qq| <body onLoad="document.forms[0].${focus}.focus()"> -<form method=post action="$form->{script}"> +<form method="post" action="$form->{script}"> |; $form->{vc} = "vendor"; @@ -371,35 +371,35 @@ sub form_header { ); print qq| -<table width=100%> - <tr class=listtop> +<table width="100%"> + <tr class="listtop"> <th>$form->{title}</th> </tr> <tr height="5"></tr> <tr> <td> - <table width=100%> - <tr valign=top> + <table width="100%"> + <tr valign="top"> <td> <table> <tr> - <th align=right nowrap>| . $locale->text('Vendor') . qq|</th> - <td colspan=3>$vendor</td> + <th align="right" nowrap>| . $locale->text('Vendor') . qq|</th> + <td colspan="3">$vendor</td> - <input type=hidden name=vendor_id value=$form->{vendor_id}> - <input type=hidden name=oldvendor value="$form->{oldvendor}"> + <input type="hidden" name="vendor_id" value="$form->{vendor_id}"> + <input type="hidden" name="oldvendor" value="$form->{oldvendor}"> </tr> <tr> <td></td> - <td colspan=3> + <td colspan="3"> <table> <tr> <th nowrap>| . $locale->text('Credit Limit') . qq|</th> <td>| . $form->format_amount( \%myconfig, $form->{creditlimit}, 0, "0" ) . qq|</td> - <td width=20%></td> + <td width="20%"></td> <th nowrap>| . $locale->text('Remaining') . qq|</th> <td class="plus$n" nowrap>| . $form->format_amount( \%myconfig, $form->{creditremaining}, 0, "0" ) @@ -408,36 +408,36 @@ sub form_header { </table> </td> <tr> - <th align=right>| . $locale->text('Record in') . qq|</th> - <td colspan=3><select name=AP>$form->{selectAP}</select></td> - <input type=hidden name=selectAP value="$form->{selectAP}"> + <th align="right">| . $locale->text('Record in') . qq|</th> + <td colspan="3"><select name="AP">$form->{selectAP}</select></td> + <input type="hidden" name="selectAP" value="$form->{selectAP}"> </tr> $department $exchangerate </table> </td> - <td align=right> + <td align="right"> <table> <tr> - <th align=right nowrap>| . $locale->text('Invoice Number') . qq|</th> - <td><input name=invnumber size=20 value="$form->{invnumber}"></td> + <th align="right" nowrap>| . $locale->text('Invoice Number') . qq|</th> + <td><input name="invnumber" size="20" value="$form->{invnumber}"></td> </tr> <tr> - <th align=right nowrap>| . $locale->text('Order Number') . qq|</th> - <td><input name=ordnumber size=20 value="$form->{ordnumber}"></td> -<input type=hidden name=quonumber value="$form->{quonumber}"> + <th align="right" nowrap>| . $locale->text('Order Number') . qq|</th> + <td><input name="ordnumber" size="20" value="$form->{ordnumber}"></td> +<input type="hidden" name="quonumber" value="$form->{quonumber}"> </tr> <tr> - <th align=right nowrap>| . $locale->text('Invoice Date') . qq|</th> - <td><input name=transdate size=11 title="$myconfig{dateformat}" value=$form->{transdate}></td> + <th align="right" nowrap>| . $locale->text('Invoice Date') . qq|</th> + <td><input name="transdate" size="11" title="$myconfig{dateformat}" value="$form->{transdate}"></td> </tr> <tr> - <th align=right nowrap>| . $locale->text('Due Date') . qq|</th> - <td><input name=duedate size=11 title="$myconfig{dateformat}" value=$form->{duedate}></td> + <th align="right" nowrap>| . $locale->text('Due Date') . qq|</th> + <td><input name="duedate" size="11" title="$myconfig{dateformat}" value="$form->{duedate}"></td> </tr> <tr> - <th align=right nowrap>| . $locale->text('PO Number') . qq|</th> - <td><input name=ponumber size=20 value="$form->{ponumber}"></td> + <th align="right" nowrap>| . $locale->text('PO Number') . qq|</th> + <td><input name="ponumber" size="20" value="$form->{ponumber}"></td> </tr> $lang </table> @@ -468,16 +468,16 @@ sub form_footer { } $rows = ( $rows > $introws ) ? $rows : $introws; $notes = -qq|<textarea name=notes rows=$rows cols=35 wrap=soft>$form->{notes}</textarea>|; +qq|<textarea name="notes" rows="$rows" cols="35" wrap="soft">$form->{notes}</textarea>|; $intnotes = -qq|<textarea name=intnotes rows=$rows cols=35 wrap=soft>$form->{intnotes}</textarea>|; +qq|<textarea name="intnotes" rows="$rows" cols="35" wrap="soft">$form->{intnotes}</textarea>|; $tax = ""; $form->{taxincluded} = ( $form->{taxincluded} ) ? "checked" : ""; $taxincluded = ""; if ( $form->{taxaccounts} ) { $taxincluded = qq| - <input name=taxincluded class=checkbox type=checkbox value=1 $form->{taxincluded}> <b>| + <input name="taxincluded" class="checkbox" type="checkbox" value="1" $form->{taxincluded}> <b>| . $locale->text('Tax Included') . qq|</b> |; } @@ -490,8 +490,8 @@ qq|<textarea name=intnotes rows=$rows cols=35 wrap=soft>$form->{intnotes}</texta $form->round_amount($form->{taxes}{$item}, 2); $tax .= qq| <tr> - <th align=right>$form->{"${item}_description"}</th> - <td align=right>$form->{"${item}_total"}</td> + <th align="right">$form->{"${item}_description"}</th> + <td align="right">$form->{"${item}_total"}</td> </tr> |; } @@ -501,8 +501,8 @@ qq|<textarea name=intnotes rows=$rows cols=35 wrap=soft>$form->{intnotes}</texta $subtotal = qq| <tr> - <th align=right>| . $locale->text('Subtotal') . qq|</th> - <td align=right>$form->{invsubtotal}</td> + <th align="right">| . $locale->text('Subtotal') . qq|</th> + <td align="right">$form->{invsubtotal}</td> </tr> |; @@ -515,31 +515,31 @@ qq|<textarea name=intnotes rows=$rows cols=35 wrap=soft>$form->{intnotes}</texta print qq| <tr> <td> - <table width=100%> - <tr valign=bottom> + <table width="100%"> + <tr valign="bottom"> <td> <table> <tr> - <th align=left>| . $locale->text('Notes') . qq|</th> - <th align=left>| . $locale->text('Internal Notes') . qq|</th> - <th align=left>| . $locale->text('Import Text') . qq|</th> + <th align="left">| . $locale->text('Notes') . qq|</th> + <th align="left">| . $locale->text('Internal Notes') . qq|</th> + <th align="left">| . $locale->text('Import Text') . qq|</th> </tr> - <tr valign=top> + <tr valign="top"> <td>$notes</td> <td>$intnotes</td> - <td><textarea name=import_text rows=$rows cols=25></textarea> + <td><textarea name="import_text" rows="$rows" cols="25"></textarea> </tr> </table> </td> - <td align=right> + <td align="right"> $taxincluded <br> <table> $subtotal $tax <tr> - <th align=right>| . $locale->text('Total') . qq|</th> - <td align=right>$form->{invtotal}</td> + <th align="right">| . $locale->text('Total') . qq|</th> + <td align="right">$form->{invtotal}</td> </tr> </table> </td> @@ -549,9 +549,9 @@ qq|<textarea name=intnotes rows=$rows cols=35 wrap=soft>$form->{intnotes}</texta </tr> <tr> <td> - <table width=100%> + <table width="100%"> <tr> - <th colspan=6 class=listheading>| . $locale->text('Payments') . qq|</th> + <th colspan="6" class="listheading">| . $locale->text('Payments') . qq|</th> </tr> |; @@ -601,29 +601,29 @@ s/option>\Q$form->{"AP_paid_$i"}\E/option selected>$form->{"AP_paid_$i"}/; if ( $form->{currency} ne $form->{defaultcurrency} ) { if ( $form->{"forex_$i"} ) { $exchangerate = -qq|<input type=hidden name="exchangerate_$i" value=$form->{"exchangerate_$i"}>$form->{"exchangerate_$i"}|; +qq|<input type="hidden" name="exchangerate_$i" value="$form->{"exchangerate_$i"}">$form->{"exchangerate_$i"}|; } else { $exchangerate = -qq|<input name="exchangerate_$i" size=10 value=$form->{"exchangerate_$i"}>|; +qq|<input name="exchangerate_$i" size="10" value="$form->{"exchangerate_$i"}">|; } } $exchangerate .= qq| -<input type=hidden name="forex_$i" value=$form->{"forex_$i"}> +<input type="hidden" name="forex_$i" value="$form->{"forex_$i"}"> |; $column_data{"paid_$i"} = -qq|<td align=center><input name="paid_$i" size=11 value=$form->{"paid_$i"}></td>|; +qq|<td align="center"><input name="paid_$i" size="11" value="$form->{"paid_$i"}"></td>|; $column_data{"exchangerate_$i"} = - qq|<td align=center>$exchangerate</td>|; + qq|<td align="center">$exchangerate</td>|; $column_data{"AP_paid_$i"} = -qq|<td align=center><select name="AP_paid_$i">$form->{"selectAP_paid_$i"}</select></td>|; +qq|<td align="center"><select name="AP_paid_$i">$form->{"selectAP_paid_$i"}</select></td>|; $column_data{"datepaid_$i"} = -qq|<td align=center><input name="datepaid_$i" size=11 title="$myconfig{dateformat}" value=$form->{"datepaid_$i"}></td>|; +qq|<td align="center"><input name="datepaid_$i" size="11" title="$myconfig{dateformat}" value="$form->{"datepaid_$i"}"></td>|; $column_data{"source_$i"} = -qq|<td align=center><input name="source_$i" size=11 value="$form->{"source_$i"}"></td>|; +qq|<td align="center"><input name="source_$i" size="11" value="$form->{"source_$i"}"></td>|; $column_data{"memo_$i"} = -qq|<td align=center><input name="memo_$i" size=11 value="$form->{"memo_$i"}"></td>|; +qq|<td align="center"><input name="memo_$i" size="11" value="$form->{"memo_$i"}"></td>|; for (@column_index) { print qq|$column_data{"${_}_$i"}\n| } @@ -640,7 +640,7 @@ qq|<td align=center><input name="memo_$i" size=11 value="$form->{"memo_$i"}"></t </td> </tr> <tr> - <td><hr size=3 noshade></td> + <td><hr size="3" noshade></td> </tr> </table> <br> @@ -1077,14 +1077,14 @@ sub delete { print qq| <body> -<form method=post action=$form->{script}> +<form method="post" action="$form->{script}"> |; $form->{action} = "yes"; $form->hide_form; print qq| -<h2 class=confirm>| . $locale->text('Confirm!') . qq|</h2> +<h2 class="confirm">| . $locale->text('Confirm!') . qq|</h2> <h4>| . $locale->text( 'Are you sure you want to delete Invoice Number [_1]?', @@ -491,7 +491,7 @@ qq|<textarea name=description rows=$rows cols=46 wrap=soft>$form->{description}< $projectlabel = $locale->text('Job Number'); $laborlabel = $locale->text('Labor Code'); - $rate = qq|<input type=hidden name=sellprice value=$form->{sellprice}>|; + $rate = qq|<input type="hidden" name="sellprice" value="$form->{sellprice}">|; } else { @@ -509,13 +509,13 @@ qq|<textarea name=description rows=$rows cols=46 wrap=soft>$form->{description}< $rate = qq| <tr> <th align=right nowrap>| . $locale->text('Chargeout Rate') . qq|</th> - <td><input name=sellprice value=$form->{sellprice}></td> + <td><input name="sellprice" value="$form->{sellprice}"></td> <th align=right nowrap>| . $locale->text('Total') . qq|</th> <td>$form->{amount}</td> </tr> <tr> <th align=right nowrap>| . $locale->text('Allocated') . qq|</th> - <td><input name=allocated value=$form->{allocated}></td> + <td><input name="allocated" value="$form->{allocated}"></td> </tr> |; } @@ -531,18 +531,18 @@ qq|<textarea name=description rows=$rows cols=46 wrap=soft>$form->{description}< <th align=right nowrap>| . $locale->text('Allocated') . qq|</th> <td>$form->{allocated}</td> </tr> - <input type=hidden name=sellprice value=$form->{sellprice}> - <input type=hidden name=allocated value=$form->{allocated}> + <input type=hidden name=sellprice value="$form->{sellprice}"> + <input type=hidden name=allocated value="$form->{allocated}"> |; } } if ( $myconfig{role} eq 'user' ) { $charge = - qq|<input type=hidden name=qty value=$form->{qty}>$form->{qty}|; + qq|<input type=hidden name=qty value="$form->{qty}">$form->{qty}|; } else { - $charge = qq|<input name=qty value=$form->{qty}>|; + $charge = qq|<input name=qty value="$form->{qty}">|; } if ( ( $rows = $form->numtextrows( $form->{notes}, 40, 6 ) ) < 2 ) { @@ -598,7 +598,7 @@ qq|<textarea name=description rows=$rows cols=46 wrap=soft>$form->{description}< </tr> <tr> <th align=right nowrap>| . $locale->text('Date worked') . qq|</th> - <td><input name=transdate size=11 title="$myconfig{dateformat}" value=$form->{transdate}></td> + <td><input name=transdate size=11 title="$myconfig{dateformat}" value="$form->{transdate}"></td> </tr> <tr> <th align=right nowrap>$laborlabel</th> @@ -613,9 +613,9 @@ qq|<textarea name=description rows=$rows cols=46 wrap=soft>$form->{description}< <td> <table> <tr> - <td><input name=inhour title="hh" size=3 maxlength=2 value=$form->{inhour}></td> - <td><input name=inmin title="mm" size=3 maxlength=2 value=$form->{inmin}></td> - <td><input name=insec title="ss" size=3 maxlength=2 value=$form->{insec}></td> + <td><input name=inhour title="hh" size=3 maxlength=2 value="$form->{inhour}"></td> + <td><input name=inmin title="mm" size=3 maxlength=2 value="$form->{inmin}"></td> + <td><input name=insec title="ss" size=3 maxlength=2 value="$form->{insec}"></td> </tr> </table> </td> @@ -623,9 +623,9 @@ qq|<textarea name=description rows=$rows cols=46 wrap=soft>$form->{description}< <td> <table> <tr> - <td><input name=outhour title="hh" size=3 maxlength=2 value=$form->{outhour}></td> - <td><input name=outmin title="mm" size=3 maxlength=2 value=$form->{outmin}></td> - <td><input name=outsec title="ss" size=3 maxlength=2 value=$form->{outsec}></td> + <td><input name=outhour title="hh" size=3 maxlength=2 value="$form->{outhour}"></td> + <td><input name=outmin title="mm" size=3 maxlength=2 value="$form->{outmin}"></td> + <td><input name=outsec title="ss" size=3 maxlength=2 value="$form->{outsec}"></td> </tr> </table> </td> @@ -636,7 +636,7 @@ qq|<textarea name=description rows=$rows cols=46 wrap=soft>$form->{description}< </tr> <tr> <th align=right nowrap>| . $locale->text('Non-chargeable') . qq|</th> - <td><input name=noncharge value=$form->{noncharge}></td> + <td><input name=noncharge value="$form->{noncharge}"></td> </tr> <tr> <th align=right nowrap>| . $locale->text('Chargeable') . qq|</th> @@ -870,7 +870,7 @@ qq|<textarea name=description rows=$rows cols=46 wrap=soft>$form->{description}< </tr> <tr> <th align=right nowrap>| . $locale->text('Date') . qq|</th> - <td><input name=transdate size=11 title="$myconfig{dateformat}" value=$form->{transdate}></td> + <td><input name=transdate size=11 title="$myconfig{dateformat}" value="$form->{transdate}"></td> </tr> <tr> <th align=right nowrap>| . $locale->text('Part Number') . qq|</th> @@ -882,9 +882,9 @@ qq|<textarea name=description rows=$rows cols=46 wrap=soft>$form->{description}< </tr> <tr> <th align=right nowrap>| . $locale->text('Qty') . qq|</th> - <td><input name=qty size=6 value=$form->{qty}> + <td><input name=qty size=6 value="$form->{qty}"> <b>| . $locale->text('Cost') . qq|</b> - <input name=sellprice size=10 value=$form->{sellprice}></td> + <input name=sellprice size=10 value="$form->{sellprice}"></td> </tr> <tr> <th align=right nowrap>| . $locale->text('Total') . qq|</th> @@ -2059,13 +2059,13 @@ sub print_options { $media =~ s/(<option value="\Q$form->{media}\E")/$1 selected/; print qq| - <table width=100%> + <table width="100%"> <tr> <td>$type</td> <td>$lang</td> <td>$format</td> <td>$media</td> - <td align=right width=90%> + <td align="right" width="90%"> |; if ( $form->{printed} =~ /$form->{formname}/ ) { @@ -340,9 +340,9 @@ qq|<textarea name=notes rows=$rows cols=40 wrap=soft>$form->{notes}</textarea>|; $name <tr> <th align=right>| . $locale->text('Startdate') . qq|</th> - <td><input name=startdate size=11 title="($myconfig{dateformat})" value=$form->{startdate}></td> + <td><input name=startdate size=11 title="($myconfig{dateformat})" value="$form->{startdate}"></td> <th align=right>| . $locale->text('Enddate') . qq|</th> - <td><input name=enddate size=11 title="($myconfig{dateformat})" value=$form->{enddate}></td> + <td><input name=enddate size=11 title="($myconfig{dateformat})" value="$form->{enddate}"></td> </tr> $production </table> @@ -383,19 +383,19 @@ qq|<textarea name=notes rows=$rows cols=40 wrap=soft>$form->{notes}</textarea>|; <table> <tr> <th align="right" nowrap="true">| . $locale->text('Updated') . qq|</th> - <td><input name=priceupdate size=11 title="$myconfig{dateformat}" value=$form->{priceupdate}></td> + <td><input name=priceupdate size=11 title="$myconfig{dateformat}" value="$form->{priceupdate}"></td> </tr> <tr> <th align="right" nowrap="true">| . $locale->text('List Price') . qq|</th> - <td><input name=listprice size=11 value=$form->{listprice}></td> + <td><input name=listprice size=11 value="$form->{listprice}"></td> </tr> <tr> <th align="right" nowrap="true">| . $locale->text('Sell Price') . qq|</th> - <td><input name=sellprice size=11 value=$form->{sellprice}></td> + <td><input name=sellprice size=11 value="$form->{sellprice}"></td> </tr> <tr> <th align="right" nowrap="true">| . $locale->text('Weight') . qq|</th> @@ -403,12 +403,12 @@ qq|<textarea name=notes rows=$rows cols=40 wrap=soft>$form->{notes}</textarea>|; <table> <tr> <td> - <input name=weight size=10 value=$form->{weight}> + <input name=weight size=10 value="$form->{weight}"> </td> <th> $form->{weightunit} - <input type=hidden name=weightunit value=$form->{weightunit}> + <input type=hidden name=weightunit value="$form->{weightunit}"> </th> </tr> </table> @@ -599,8 +599,8 @@ sub list_stock { $j %= 2; print qq| - <tr valign=top class=listrow$j> - <input type=hidden name="id_$i" value=$ref->{id}> + <tr valign=top class="listrow$j"> + <input type=hidden name="id_$i" value="$ref->{id}"> |; for (@column_index) { print "$column_data{$_}\n" } @@ -820,19 +820,19 @@ sub search { print qq| <body> -<form method=post action=$form->{script}> +<form method="post" action="$form->{script}"> -<input type=hidden name=sort value=$sort> -<input type=hidden name=type value=$form->{type}> +<input type=hidden name=sort value="$sort"> +<input type=hidden name=type value="$form->{type}"> -<table width=100%> +<table width="100%"> <tr> <th class=listtop>$form->{title}</th> </tr> <tr height="5"></tr> <tr> <td> - <table width=100%> + <table width="100%"> $number $fromto $selectperiod @@ -854,7 +854,7 @@ sub search { </tr> </table> -<input type=hidden name=nextsub value=$report> +<input type="hidden" name="nextsub" value="$report"> |; $form->hide_form(qw(path login sessionid title)); @@ -1215,15 +1215,15 @@ qq|<textarea name="description" rows=$rows cols=60 style="width: 100%" wrap=soft $name <tr> <th align=right>| . $locale->text('Startdate') . qq|</th> - <td><input name=startdate size=11 title="($myconfig{dateformat})" value=$form->{startdate}></td> + <td><input name=startdate size=11 title="($myconfig{dateformat})" value="$form->{startdate}"></td> <th align=right>| . $locale->text('Enddate') . qq|</th> - <td><input name=enddate size=11 title="($myconfig{dateformat})" value=$form->{enddate}></td> + <td><input name=enddate size=11 title="($myconfig{dateformat})" value="$form->{enddate}"></td> </tr> </table> </td> </tr> <tr> - <td><hr size=3 noshade></td> + <td><hr size="3" noshade></td> </tr> </table> |; @@ -1530,12 +1530,12 @@ sub partsgroup_header { print qq| <body> -<form method=post action=$form->{script}> +<form method="post" action="$form->{script}"> -<input type=hidden name=id value=$form->{id}> -<input type=hidden name=type value=$form->{type}> +<input type="hidden" name="id" value="$form->{id}"> +<input type="hidden" name="type" value="$form->{type}"> -<table width=100%> +<table width="100%"> <tr> <th class=listtop>$form->{title}</th> </tr> @@ -1735,10 +1735,10 @@ sub pricegroup_header { print qq| <body> -<form method=post action=$form->{script}> +<form method="post" action="$form->{script}"> -<input type=hidden name=id value=$form->{id}> -<input type=hidden name=type value=$form->{type}> +<input type="hidden" name="id" value="$form->{id}"> +<input type="hidden" name="type" value="$form->{type}"> <table width=100%> <tr> @@ -2334,7 +2334,7 @@ qq|<td><input name="new_name_$i" type=hidden value="$ref->{name}">$ref->{name}</ print qq| </tr> -<input name="new_id_$i" type=hidden value=$ref->{id}> +<input name="new_id_$i" type=hidden value="$ref->{id}"> |; @@ -2349,7 +2349,7 @@ qq|<td><input name="new_name_$i" type=hidden value="$ref->{name}">$ref->{name}</ </tr> </table> -<input name=lastndx type=hidden value=$i> +<input name=lastndx type=hidden value="$i"> |; @@ -240,7 +240,7 @@ qq|<option value="$_->{projectnumber}--$_->{id}">$_->{projectnumber}\n|; <input type=hidden name=nextsub value=generate_projects> <tr> <th align=right>| . $locale->text('From') . qq|</th> - <td><input name=fromdate size=11 title="$myconfig{dateformat}" value=$form->{fromdate}></td> + <td><input name=fromdate size=11 title="$myconfig{dateformat}" value="$form->{fromdate}"></td> <th align=right>| . $locale->text('To') . qq|</th> <td><input name=todate size=11 title="$myconfig{dateformat}"></td> </tr> @@ -268,7 +268,7 @@ qq|<option value="$_->{projectnumber}--$_->{id}">$_->{projectnumber}\n|; <input type=hidden name=nextsub value=generate_inv_activity> <tr> <th align=right>| . $locale->text('From') . qq|</th> - <td><input name=fromdate size=11 title="$myconfig{dateformat}" value=$form->{fromdate}></td> + <td><input name=fromdate size=11 title="$myconfig{dateformat}" value="$form->{fromdate}"></td> <th align=right>| . $locale->text('To') . qq|</th> <td><input name=todate size=11 title="$myconfig{dateformat}"></td> </tr> @@ -302,7 +302,7 @@ qq|<option value="$_->{projectnumber}--$_->{id}">$_->{projectnumber}\n|; <input type=hidden name=nextsub value=generate_income_statement> <tr> <th align=right>| . $locale->text('From') . qq|</th> - <td><input name=fromdate size=11 title="$myconfig{dateformat}" value=$form->{fromdate}></td> + <td><input name=fromdate size=11 title="$myconfig{dateformat}" value="$form->{fromdate}"></td> <th align=right>| . $locale->text('To') . qq|</th> <td><input name=todate size=11 title="$myconfig{dateformat}"></td> </tr> @@ -391,7 +391,7 @@ qq|<option value="$_->{projectnumber}--$_->{id}">$_->{projectnumber}\n|; <input type=hidden name=nextsub value=generate_balance_sheet> <tr> <th align=right>| . $locale->text('as at') . qq|</th> - <td><input name=asofdate size=11 title="$myconfig{dateformat}" value=$form->{asofdate}></td> + <td><input name=asofdate size=11 title="$myconfig{dateformat}" value="$form->{asofdate}"></td> |; if ($selectfrom) { @@ -458,7 +458,7 @@ qq|<option value="$_->{projectnumber}--$_->{id}">$_->{projectnumber}\n|; <input type=hidden name=nextsub value=generate_trial_balance> <tr> <th align=right>| . $locale->text('From') . qq|</th> - <td><input name=fromdate size=11 title="$myconfig{dateformat}" value=$form->{fromdate}></td> + <td><input name=fromdate size=11 title="$myconfig{dateformat}" value="$form->{fromdate}"></td> <th align=right>| . $locale->text('To') . qq|</th> <td><input name=todate size=11 title="$myconfig{dateformat}"></td> </tr> @@ -493,7 +493,7 @@ qq|<option value="$_->{projectnumber}--$_->{id}">$_->{projectnumber}\n|; <input type=hidden name=nextsub value=generate_tax_report> <tr> <th align=right>| . $locale->text('From') . qq|</th> - <td><input name=fromdate size=11 title="$myconfig{dateformat}" value=$form->{fromdate}></td> + <td><input name=fromdate size=11 title="$myconfig{dateformat}" value="$form->{fromdate}"></td> <th align=right>| . $locale->text('To') . qq|</th> <td><input name=todate size=11 title="$myconfig{dateformat}"></td> </tr> @@ -518,7 +518,7 @@ qq|<input name=accno class=radio type=radio value=$ref->{accno} $checked> $ } print qq| - <input type=hidden name=db value=$form->{db}> + <input type=hidden name=db value="$form->{db}"> <input type=hidden name=sort value=transdate> </td> @@ -619,13 +619,13 @@ qq|<input name=accno class=radio type=radio value="gifi_$ref->{accno}"> $re print qq| <input type=hidden name=nextsub value=generate_tax_report> - <input type=hidden name=db value=$form->{db}> + <input type=hidden name=db value="$form->{db}"> <input type=hidden name=sort value=transdate> - <input type=hidden name=report value=$form->{report}> + <input type=hidden name=report value="$form->{report}"> <tr> <th align=right>| . $locale->text('From') . qq|</th> - <td><input name=fromdate size=11 title="$myconfig{dateformat}" value=$form->{fromdate}></td> + <td><input name=fromdate size=11 title="$myconfig{dateformat}" value="$form->{fromdate}"></td> <th align=right>| . $locale->text('To') . qq|</th> <td><input name=todate size=11 title="$myconfig{dateformat}"></td> </tr> @@ -721,11 +721,11 @@ qq|<input name=accno class=radio type=radio value="gifi_$ref->{accno}"> $re </tr> $selectto <input type=hidden name=type value=statement> - <input type=hidden name=format value=$postscript> + <input type=hidden name=format value="$postscript"> <input type=hidden name=media value="$myconfig{printer}"> - <input type=hidden name=nextsub value=$nextsub> - <input type=hidden name=action value=$nextsub> + <input type=hidden name=nextsub value="$nextsub"> + <input type=hidden name=action value="$nextsub"> $summary <tr> <table> @@ -799,7 +799,7 @@ qq|<input name=accno class=radio type=radio value="gifi_$ref->{accno}"> $re </tr> <tr> <th align=right>| . $locale->text('From') . qq|</th> - <td><input name=fromdate size=11 title="$myconfig{dateformat}" value=$form->{fromdate}></td> + <td><input name=fromdate size=11 title="$myconfig{dateformat}" value="$form->{fromdate}"></td> <th align=right>| . $locale->text('To') . qq|</th> <td><input name=todate size=11 title="$myconfig{dateformat}"></td> </tr> @@ -815,7 +815,7 @@ qq|<input name=accno class=radio type=radio value="gifi_$ref->{accno}"> $re <td align=left colspan=3>| . $locale->text('Subtotal') . qq|</th> </tr> - <input type=hidden name=db value=$form->{db}> + <input type=hidden name=db value="$form->{db}"> <input type=hidden name=sort value=transdate> |; @@ -1705,8 +1705,8 @@ qq|<td><select name="language_code_$i">$form->{"selectlanguage_$i"}</select></td $column_data{statement} = qq|<td><input name="statement_$i" type=checkbox class=checkbox value=1 $ref->{checked}> - <input type=hidden name="$form->{ct}_id_$i" value=$ref->{ctid}> - <input type=hidden name="curr_$i" value=$ref->{curr}> + <input type=hidden name="$form->{ct}_id_$i" value="$ref->{ctid}"> + <input type=hidden name="curr_$i" value="$ref->{curr}"> </td>|; } @@ -1871,7 +1871,7 @@ qq|$ref->{module}.pl?path=$form->{path}&action=edit&id=$ref->{id}&login=$form->{ print qq| </tr> - <input type=hidden name=rowcount value=$i> + <input type=hidden name=rowcount value="$i"> </table> </td> </tr> @@ -2006,7 +2006,7 @@ sub print_options { { print qq| <td>| . $locale->text('Copies') . qq| - <input name=copies size=2 value=$form->{copies}></td> + <input name=copies size=2 value="$form->{copies}"></td> |; } |