summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xbin/ct.pl30
-rwxr-xr-xbin/gl.pl14
-rwxr-xr-xbin/ic.pl86
-rwxr-xr-xbin/ir.pl150
-rwxr-xr-xbin/jc.pl40
-rwxr-xr-xbin/pe.pl54
-rwxr-xr-xbin/rp.pl38
7 files changed, 206 insertions, 206 deletions
diff --git a/bin/ct.pl b/bin/ct.pl
index 1f90e63c..c7299b92 100755
--- a/bin/ct.pl
+++ b/bin/ct.pl
@@ -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">
|;
diff --git a/bin/gl.pl b/bin/gl.pl
index 98406247..218c5bb2 100755
--- a/bin/gl.pl
+++ b/bin/gl.pl
@@ -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>
diff --git a/bin/ic.pl b/bin/ic.pl
index 5ca97516..fc940b39 100755
--- a/bin/ic.pl
+++ b/bin/ic.pl
@@ -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"}>&nbsp;<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"}>&nbsp;<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">&nbsp;|
+ <th align="left" nowrap class="plus$n">&nbsp;|
. $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>
&nbsp;
$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>
&nbsp;
$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>
&nbsp;$form->{weight}
- <input type=hidden name=weight value=$form->{weight}>
+ <input type="hidden" name="weight" value="$form->{weight}">
</td>
<th>
&nbsp;
$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}, '', "&nbsp;" )
. 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{$_}" }
diff --git a/bin/ir.pl b/bin/ir.pl
index 4cb435a5..d892cedd 100755
--- a/bin/ir.pl
+++ b/bin/ir.pl
@@ -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]?',
diff --git a/bin/jc.pl b/bin/jc.pl
index 82a2992b..6de1a832 100755
--- a/bin/jc.pl
+++ b/bin/jc.pl
@@ -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}/ ) {
diff --git a/bin/pe.pl b/bin/pe.pl
index 9b2624a2..3d4bbbb1 100755
--- a/bin/pe.pl
+++ b/bin/pe.pl
@@ -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>
&nbsp;
$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">
|;
diff --git a/bin/rp.pl b/bin/rp.pl
index 1f044879..4389238c 100755
--- a/bin/rp.pl
+++ b/bin/rp.pl
@@ -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>&nbsp;$
}
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}">&nbsp;$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}">&nbsp;$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}">&nbsp;$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}">&nbsp;$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>
|;
}