Caros, estou exportando um relatório pra csv, porém estou tendo problemas o arquivo fica todo desorganizado, os dados pulam pra próxima linha antes de chegar na ultima coluna.

Segue o código abaixo e o arquivo csv em anexo

Alguém já possou por isso ?

function onExportCSV()
{
$this->onSearch();

try
{
TTransaction::open('easycontact');

$repository = new TRepository('Contact');

$criteria = new TCriteria;
$content = '';
$contacts = $repository->load($criteria);

if ($contacts)
{
$header .= 'ID;'.
'Paciente;'.
'Telefone1;'.
'Telefone2;'.
'Telefone3;'.
'Telefone4;'.
'Tipo;'.
'Status;'.
'Tentativas;'.
'Disposition;'.
'Agendamento;'.
'Carga \n';


foreach ($contacts as $contact)
{
$content .= $contact->id.';'.
$contact->nome_paciente.';'.
$contact->telefone1.';'.
$contact->telefone2.';'.
$contact->telefone3.';'.
$contact->telefone4.';'.
$contact->tipo.';'.
$contact->status.';'.
$contact->retry.';'.
$contact->disposition.';'.
$contact->data_agendamento.';'.
$contact->data_carga."\n";

if ($i < 1) $content = $header;
$i++;
}
file_put_contents('app/output/contacts.csv', $content);
TPage::openFile('app/output/contacts.csv');
}
TTransaction::close();
}
catch (Exception $e)
{
new TMessage('error', 'Error ' . $e->getMessage());
TTransaction::rollback();
}

}