Find the lines:


	if ($::g_BillContact{'SEPARATE'})				# if separate billing address
		{														# print it separately
		$ACTINIC::B2B->SetXML('BILL_LABEL', ACTINIC::GetPhrase(-1, 339));

		SetXMLFromHash(\%hashBillMap, \%::g_BillContact);
		}
	else														# otherwise
		{
		$ACTINIC::B2B->SetXML('BILL_LABEL', "");
		my ($sKey, $sValue);
		while (($sKey, $sValue) = each(%hashBillMap))	# clear all related XML
			{
			$ACTINIC::B2B->SetXML($sValue, "");
			$ACTINIC::B2B->SetXML($sValue . "_SEP", "");
			}
		}

and change it to read:


#	if ($::g_BillContact{'SEPARATE'})				# if separate billing address
#		{														# print it separately
		$ACTINIC::B2B->SetXML('BILL_LABEL', ACTINIC::GetPhrase(-1, 339));

		SetXMLFromHash(\%hashBillMap, \%::g_BillContact);
#		}
#	else														# otherwise
#		{
#		$ACTINIC::B2B->SetXML('BILL_LABEL', "");
#		my ($sKey, $sValue);
#		while (($sKey, $sValue) = each(%hashBillMap))	# clear all related XML
#			{
#			$ACTINIC::B2B->SetXML($sValue, "");
#			$ACTINIC::B2B->SetXML($sValue . "_SEP", "");
#			}
#		}