Confirmar Gravar, abrir PDF e retornar a listagem.

Confirmar Gravar, abrir PDF e retornar a listagem. Boa tarde. Tenho o código abaixo para Confirmar a gravação do Registro. Gostaria de saber como faço para se escolher Gravar, abrir um PDF e retornar a listagem? Esse código quando clico no botão para confirmar ele está limpando o formulário. Obrigado ...

Cláudio Machado 11/05/2021 (há 2 anos)

Boa tarde.
Tenho o código abaixo para Confirmar a gravação do Registro.
Gostaria de saber como faço para se escolher Gravar, abrir um PDF e retornar a listagem?

Esse código quando clico no botão para confirmar ele está limpando o formulário.
Obrigado

<?php
function onConfirma($param)
{
$action = new TAction(array($this, 'ConfirmarCompra'));
$action->setParameters($param);
new TQuestion('Confirma a Compra ?', $action);
}
public static function ConfirmarCompra( $param )
{
try
{
TTransaction::open('ourorio');
$repository = new TRepository('Compras');
//$repository->delete();
new TMessage('info', 'Compra Registrada com Sucesso!.');
TTransaction::close();
}
catch (Exception $e)
{
new TMessage('error', 'Error ' . $e->getMessage());
TTransaction::rollback();
}
}
?>

Pacotão Dominando o Adianti Framework 7

O material mais completo de treinamento do Framework.
Curso em vídeo aulas + Livro completo + Códigos fontes do projeto ERPHouse.
Conteúdo Atualizado! Versão 7.4

Dominando o Adianti 7 Quero me inscrever agora!

Comentários (11)

Nataniel Rabaioli 12/05/2021 (há 2 anos)

Pra redirecionar para a listagem, a TMessage aceita um TAction como terceiro parâmetro, executado após o clique no botão.

<?php
new TMessage('info', 'Compra Registrada com Sucesso!.', new TAction('classe','metodo'));
?>

Sobre o pdf, pode usar a função TPage::openFile('arquivo.pdf');

Cláudio Machado - AUTOR DO POST 12/05/2021 (há 2 anos)

Bom dia Nataniel. Obrigado por responder.

Quanto a voltar para a Lista eu já sei como fazer;
Usar a função TPage::openFile('arquivo.pdf'); não faço a mínima idéia de como usar., nem conhecia.

Esse código que postei quando clico no botão para confirmar ele está limpando o formulário.
Obrigado

Nataniel Rabaioli 12/05/2021 (há 2 anos)

Transforme a função onConfirma em estática, dessa forma não haverá remontagem da tela

Cláudio Machado - AUTOR DO POST 12/05/2021 (há 2 anos)

Na verdade mudar para estática não executava nada.
Alterei as 2 funções para:

public function onConfirma($param)
public function ConfirmarCompra( $param )

E assim funciona sem limpar a tela. Agora só falta abrir o PDF e finalizo.
Se puder ajudar nisso, agradeço. Ele abre mas não exibe nada.
Obrigado

Cláudio Machado - AUTOR DO POST 12/05/2021 (há 2 anos)

Achei que havia funcionado, mas não está, continua limpando o form.

Cláudio Machado - AUTOR DO POST 13/05/2021 (há 2 anos)

Alguém pra ajudar?

Nataniel Rabaioli 13/05/2021 (há 2 anos)

Confirme que seu ambiente está configurado para mostrar os erros da aplicação. Por exemplo, ao mudar uma função para estática, você não pode usar "$this" dentro dela. Isso gera um erro e provavelmente por isso que o código não executa.

<?php
//$action = new TAction(array($this, 'ConfirmarCompra'));
$action = new TAction(array(__CLASS__, 'ConfirmarCompra'));
?>

Quanto ao pdf, você quer abrir um pdf já existente? Onde está esse arquivo? Você precisa passar o caminho relativo do arquivo para a função openFile.

Cláudio Machado - AUTOR DO POST 13/05/2021 (há 2 anos)

A confirmação funcionou perfeitamente Naniel. O erro estava nessa linha mesmo.

Ficou assim:

<?php
public static function onConfirma($param)
{
$action = new TAction(array(__CLASS__, 'ConfirmarCompra'));
$action->setParameters($param);
new TQuestion('Confirma os Dados da Compra ?', $action);
}
public static function ConfirmarCompra( $param )
{
try
{
TTransaction::open('ourorio');
$repository = new TRepository('Compras');
//$repository->delete();
new TMessage('info', 'Compra Registrada com Sucesso!');
TPage::openFile('app/output/Recibo.pdf');
TTransaction::close();
}
catch (Exception $e)
{
new TMessage('error', 'Error ' . $e->getMessage());
TTransaction::rollback();
}
}
?>

Cláudio Machado - AUTOR DO POST 13/05/2021 (há 2 anos)

Quanto ao PDF eu tenho uma função que gera o PDF através de u botão.
O nome é unico Recibo.pdf

Nesse caso, precisava que ao confirmar a compra ele gerasse o arquivo PDF baseado nesse registro.

Segue o código que gera o PDF:

<?php
public function OnPDF($param)
{
// open a transaction with database 'samples'
TTransaction::open('ourorio');
// load all customers
$repository = new TRepository('ComprasSub');
$criteria = new TCriteria;
$ComprasSub = $repository->load($criteria);
$data = $this->form->getData('ComprasSub');
$this->form->validate();
$pdf = new TPDFDesigner;
$pdf->fromXml('app/reports/recibo_compra_cliente.pdf.xml');
$pdf->replace('{id_compra}',$data->id_compra);
$pdf->replace('{data_compra}',DateTime::createFromFormat('Y-m-d', $data->data_compra)->format( 'd/m/Y' ));
$pdf->replace('{cliente_txt}',utf8_decode($data->cliente_txt));
$pdf->replace('{endereco_tipo}',utf8_decode($data->cliente_endereco_tipo), 0, 0, 'L');
$pdf->replace('{endereco_numero}',utf8_decode($data->cliente_endereco_numero), 0, 0, 'L');
$pdf->replace('{endereco}',utf8_decode($data->cliente_endereco), 0, 0, 'L');
$pdf->replace('{bairro}',utf8_decode($data->cliente_bairro), 0, 0, 'L');
$pdf->replace('{cpf}',utf8_decode($data->cliente_cpf), 0, 0, 'L');
$pdf->replace('{identidade}',utf8_decode($data->cliente_identidade), 0, 0, 'L');
$pdf->replace('{telefone}',utf8_decode($data->cliente_telefone), 0, 0, 'L');
$pdf->replace('{nascimento}',DateTime::createFromFormat('Y-m-d', $data->cliente_nascimento)->format( 'd/m/Y' ));
$pdf->replace('{cidade}',utf8_decode($data->cliente_cidade), 0, 0, 'L');
$pdf->replace('{estado}',utf8_decode($data->cliente_estado), 0, 0, 'L');
$pdf->replace('{email}',utf8_decode($data->cliente_email), 0, 0, 'L');
$pdf->replace('{vendedor_txt}',utf8_decode($data->vendedor_txt));
$pdf->replace('{loja_txt}',utf8_decode($data->loja_txt));
$pdf->replace('{loja_id}',utf8_decode($data->loja_id));
$pdf->generate();
// Itens do Pedido
//$pedidos_list = ComprasSub::where('compra_id','=',$id_compra)->load();
//if ($pedidos_list)
//{
foreach ($ComprasSub as $pedido_list)
{
$pdf->gotoAnchorX('details');
$pdf->Ln(18);
$pdf->Cell(50, 12, utf8_decode($pedido_list->quantidade), 0, 0, 'R');
$pdf->Cell(25, 12, utf8_decode($pedido_list->unidade), 0, 0, 'R');
$pdf->Cell(100, 12, utf8_decode($pedido_list->descricao), 0, 0, 'L');
$pdf->Cell(170, 12, utf8_decode($pedido_list->kilate_txt), 0, 0, 'R');
$pdf->Cell(50, 12, utf8_decode($pedido_list->tipo_compra_txt), 0, 0, 'R');
$pdf->Cell(115, 12, number_format((double)$pedido_list->valor_unit, 2, ',', '.'), 0, 0, 'R');
$pdf->Cell(70, 12, number_format((double)$pedido_list->subtotal, 2, ',', '.'), 0, 0, 'R');
// grid background
$fill = !$fill;
}
//}
// inicio do rodapé
$pdf->SetY(-25);
$pdf->SetFont('Arial', '', 8);
$pdf->setFontColorRGB( '#000000' );
$pdf->Cell(590, 10, utf8_decode('Pág. ').$pdf->PageNo().' de {nb}',0,0,'R');
$pdf->SetY(-25);
$pdf->SetY(-25);
$pdf->Cell(340,10,utf8_decode("Impresso em ".date("d/m/Y H:i:s"."")),0,1,'R');
$pdf->SetY(-25);
$pdf->Cell(420,10,utf8_decode(" Por ".TSession::getValue('username')),0,1,'R'); //nome do usuário
// fim do rodapé
$file = 'app/output/Recibo.pdf';
if (!file_exists($file) OR is_writable($file))
{
$pdf->save($file);
//parent::openFile($file);
$window = TWindow::create('Ouro Rio', 0.8, 0.8);
$object = new TElement('object');
$object->data = $file;
$object->type = 'application/pdf';
$object->style = "width: 100%; height:calc(100% - 10px)";
$window->add($object);
$window->show();
}
else
{
throw new Exception(_t('Permission denied') . ': ' . $file);
}
TToast::show('success','RECIBO GERADO COM SUCESSO!', 'top left', 'fas fa-check');
TTransaction::close();
AdiantiCoreApplication::loadPage( 'ComprasList' );
exit;
}
?>

Eu ainda estou apanhando pra fazer o detalhe do PDF aparecer somente o item do Master, porquê estão aparecendo todos os itens do detalhe, mas isso é um outro problema.
Mas se puder ajudar.. Rsrs.

Cláudio Machado - AUTOR DO POST 18/05/2021 (há 2 anos)

Boa noite pessoal.
Só falta essa parte: Gravar e abrir o PDF
Quem puder ajudar, agradeço antecipadamente.

Cláudio Machado - AUTOR DO POST 20/05/2021 (há 2 anos)

Bom dia.
Alguém pra ajudar?
Obrigado

Novo Comentário