<th align="right" nowrap>| . $locale->text('Shipping Point') . qq|</th>
<td colspan="3"> | .
$cgi->textfield("-name" => "shippingpoint", "-size" => 35, "-value" => $form->{shippingpoint}) .
<th align="right" nowrap>| . $locale->text('Shipping Point') . qq|</th>
<td colspan="3"> | .
$cgi->textfield("-name" => "shippingpoint", "-size" => 35, "-value" => $form->{shippingpoint}) .
if ($form->{type} eq "credit_note") {
print qq| <tr>
<th align="right" nowrap>| . $locale->text('Credit Note Number') . qq|</th>
if ($form->{type} eq "credit_note") {
print qq| <tr>
<th align="right" nowrap>| . $locale->text('Credit Note Number') . qq|</th>