Comportamento do framework em alguns detalhes...

Comportamento do framework em alguns detalhes... Pessoal...boa noite... Pesquisa muito no forum, e tenho me virado bem com os meus objetivos de converter um ERP gigantesco de VB/MSACCESS/SQLSERVER para Adianti/Framework/postgres, um form master e 14 subforms de detalhes, estou usando o TFieldlist adaptado nos detalhes, até então não tenho postado pedido de ajuda, mas chega um momento que fica difícil seguir sozinho, por tanto segue os pe...

AT

Comportamento do framework em alguns detalhes...

Antonio Augusto Tavares 08/04/2019 (há 5 anos)

Pessoal...boa noite...

Pesquisa muito no forum, e tenho me virado bem com os meus objetivos de converter um ERP gigantesco de VB/MSACCESS/SQLSERVER para Adianti/Framework/postgres, um form master e 14 subforms de detalhes, estou usando o TFieldlist adaptado nos detalhes, até então não tenho postado pedido de ajuda, mas chega um momento que fica difícil seguir sozinho, por tanto segue os pepinos, se puderem me ajudar fico muito grato...

1 - Porque o master_id (find_id) é colocado na TSession no load do Master, e so aparece nos sub-forms na segunda tentativa, ou seja somente quanto pesquiso o id pela segunda vez que o subform mostra os dados? (EntidadeForm linha 255)

2 - Porque somente o frame $pessoal declarado e detalhado junto as demais abas do notebook, não é reconhecido no tabClick? (EntidadeForm linha 322 )

3 - Porque o onLoad dos detalhes após onSave e onDelete aparecem em tela cheia, fora de sua aba no notebook, talves pelo uso do TAdiantiCoreTranslator, se for o caso qual solução para este problema? EnderecoForm linhas 267 e 300)?

4 - Porque o Método setChangeAction() não encontrado no EnderecoForm linha 80?

5 - Porque o TForm::sendData apaga tudo, quando acionado para manter o registro selecionado e apagar os campos de pesquisa (EntidadeForm linha 277)?

Sendo só para o momento rsrsrs segue anexo o form master principal e o detalhe EnderecoFoirm, desde ja agradeço!!!

Augusto

Curso completo Meu Negócio Pronto

Use para si, ou transforme em um negócio: Inclui aulas e códigos-fontes
Gestor de conteúdo (SITE) + Loja Virtual (E-Commerce) + Emissor de Notas para infoprodutos

Meu negócio pronto Quero me inscrever agora!

Comentários (2)

AT

Antonio Augusto Tavares - AUTOR DO POST 08/04/2019 (há 5 anos)

<?php
/**
* EntidadeForm
*
* @version 1.0
* @package setcia
* @author Antonio Augusto Tavares
* @copyright Copyright (c) 2018 Setsoft - Consultoria e Informática Ltda
*/
class EntidadeForm extends TPage
{
private $form;
private $entidade;
private $notebook;
static $foto;
public $imagem;
public $table;
private $divFoto;
public $imgFoto;
//use PessoaisForm;
function __construct()
{
parent::__construct();
parent::include_js('app/lib/include/application.js');
// cria o form
$this->form = new BootstrapFormBuilder('form_entidade');
$this->form->style = 'width: 100%';
$this->form->setFieldSizes('100%');
// declara campos e suas caracteristicas
$id_find = new TEntry('id_find');
$id_find->setExitAction(new TAction(array($this, 'onEditeEntidade')));
$nome_find = new TDBUniqueSearch('nome_find', 'setcis', 'entidade', 'id', 'nome', 'nome asc');
$nome_find->setMinLength(1);
$nome_find->setSize('100%');
$nome_find->setMask('{nome}');
$programatico_find = new TDBUniqueSearch('programatico_find', 'setcis', 'entidade', 'id', 'programatico');
$programatico_find->setMinLength(1);
$programatico_find->setSize('100%');
$programatico_find->setMask('{programatico} ');
$fornecedores = 5;
$Associados = 4;
$criteria = new TCriteria();
$criteria->add(new TFilter('system_group_id','=',$Associados));
$id = new TEntry('id');
$nome = new TEntry('nome');
$pessoas_id = new TDBCombo('pessoas_id', 'setcis', 'pessoas', 'id', 'descricao');
$entidades_id = new TDBCombo('entidades_id', 'setcis', 'entidades', 'id', 'descricao', 'descricao asc',$criteria);
$programatico = new TEntry('programatico');
// validações
$nome->addValidation('Nome', new TRequiredValidator);
$pessoas_id->addValidation('Pessoa', new TRequiredValidator);
$entidades_id->addValidation('Categoria', new TRequiredValidator);
$programatico->addValidation('Código/Alternatibo', new TRequiredValidator);
$id->setEditable(FALSE);
// posiciona elementos no form
$row = $this->form->addFields([ $id_find ],
[ $nome_find ],
[ $programatico_find ],
[ TButton::create('clear', array($this, 'onClear'), 'Novo', 'fa:eraser green')]);
$row->layout = ['col-sm-1', 'col-sm-8', 'col-sm-2', 'col-sm-1'];
$row = $this->form->addFields([ new TLabel('Codigo') ],
[ new TLabel('Nome') ],
[ new TLabel('Pessoa') ],
[ new TLabel('Categoria') ],
[ new TLabel('Código/Alternativo') ],
[TButton::create('delete', array($this, 'onDelete'), 'Excluir', 'fa:eraser red')]);
$row->layout = ['col-sm-1', 'col-sm-4', 'col-sm-2', 'col-sm-2', 'col-sm-2', 'col-sm-1' ];
$row = $this->form->addFields([ $id ],
[ $nome ],
[ $pessoas_id ],
[ $entidades_id ],
[ $programatico ],
[ TButton::create('save', array($this, 'onSave'), 'Salvar', 'fa:save blue')]);
$row->layout = ['col-sm-1', 'col-sm-4', 'col-sm-2', 'col-sm-2', 'col-sm-2', 'col-sm-1' ];
// defina ações de pesquisa
$nome_change = new TAction(array($this, 'onEditeEntidade'));
$nome_find->setChangeAction($nome_change);
$programatico_change = new TAction(array($this, 'onEditeEntidade'));
$programatico_find->setChangeAction($programatico_change);
$entidades_id_change = new TAction(array($this, 'onSetMask'));
$entidades_id->setChangeAction($entidades_id_change);
// prepara notebook de detalhes
$foto = new THBox();
$pessoal = new TFrame;
$pessoal->class = 'tframe tframe-custom';
$pessoal->style = 'background:whiteSmoke';
$endereco = new TFrame;
$endereco->class = 'tframe tframe-custom';
$endereco->style = 'background:whiteSmoke';
$inscricao = new TFrame;
$inscricao->class = 'tframe tframe-custom';
$inscricao->style = 'background:whiteSmoke';
$eletronico = new THBox();
$contrato = new THBox();
$carteira = new THBox();
$vinculado = new THBox();
$conta = new THBox();
$boleto = new THBox();
$mandato = new THBox();
$atendimento = new THBox();
$ocorrencias = new THBox();
//TScript::create(' $( "#campo" ).focus(); ');
//TScript::create("$('li[role=presentation]').eq(1).hide();");
//TScript::create("$('li[role=Pessoais]').eq(1).hide();");
//$this->form->setCurrentPage(0); // lembrando que os índices iniciam-se por 0.
//$this->notebook->setCurrentPage(3);
//$this->notebook->setTabsVisibility(False);
// cria notebook detalhes
$notebook = new BootstrapNotebookWrapper( new TNotebook() );
$notebook->setTabAction( new TAction(array($this, 'onTabClick')));
$notebook->appendPage('Imagem', $foto);
$notebook->appendPage('Pessoais', $pessoal);
$notebook->appendPage('Endereços', $endereco);
$notebook->appendPage('Inscrições', $inscricao);
$notebook->appendPage('Eletrônicos', $eletronico);
$notebook->appendPage('Contratos', $contrato);
$notebook->appendPage('Carteira', $carteira);
$notebook->appendPage('Vínculos', $vinculado);
$notebook->appendPage('Contas', $conta);
$notebook->appendPage('Boleto', $boleto);
$notebook->appendPage('Mandatos', $mandato);
$notebook->appendPage('Atendimento', $atendimento);
$notebook->appendPage('Ocorrências', $ocorrencias);
$notebook->style = 'background:white';
// pagina imagem
//$imagem = new TImage('app/fotos/0000000.jpg');
//$foto->put($imagem, 1,1);
//$imagem->setSize(450);
//$foto->add($imagem);
/*
$divFoto = new TElement('div');
$divFoto->id = 'divFoto';
$divFoto->style = "width:100px;height:100px";
$imgFoto = new TElement('img');
$imgFoto->style = "width:100px;height:100px";
$imgFoto->src = "app/fotos/0000000.jpg";
$divFoto->add($imgFoto);
$foto->add($divFoto);
*/
// prepara sub-forms/detalhes
$form_pessoais = new PessoaisForm;
$pessoal->add($form_pessoais);
$form_Endereco = new EnderecoForm;
$endereco->add($form_Endereco);
$form_Inscricao = new InscricaoForm;
$inscricao->add($form_Inscricao);
// monta pagina
$vbox = new TVBox;
$vbox->style = 'width: 100%';
$vbox->add(new TXMLBreadCrumb('menu.xml', __CLASS__));
$vbox->add($this->form);
$vbox->add($notebook);
parent::add($vbox);
}
// define mascara programatico
public static function onSetMask( $param )
{
try
{
TTransaction::open('setcis');
$categoria = new entidades($param['key']);
$objeto = new stdClass;
TForm::getData('form_entidade', $objeto);
$objeto->entidades_id->setMask($categoria->mascara);
TForm::setData('form_entidade', $objeto);
TTransaction::close();
}
catch (Exception $e)
{
new TMessage('error', $e->getMessage());
}
}
// Inicio de edição
public function show()
{
if (!$this->loaded AND (!isset($_GET['method']) OR $_GET['method'] !== 'onClear') )
{
$this->onClear(0);
}
parent::show();
}
// limpa o form
public function onClear($param)
{
$objeto = new stdClass;
$objeto->id = '';
$objeto->nome = '';
$objeto->pessoas_id = '';
$objeto->entidades_id = '';
$objeto->programatico = '';
$this->form->setData($objeto);
}
// apresenta dados no form
public static function onEditeEntidade( $param )
{
try
{
if (isset($param['key']))
{
TTransaction::open('setcis');
$id_ent = (int) $param['key'];
TSession::setValue('id_entidade', $id_ent);
var_dump($id_ent);
//$object = TSession::getValue('id_entidade');
$objetoEntidade = new entidade($id_ent);
$objetoForm = new stdClass;
$objetoForm->id_find = '';
$objetoForm->Nome_find = '';
$objetoForm->progratico_find = '';
if ($objetoEntidade)
{
$objetoForm->id = $objetoEntidade->id;
$objetoForm->nome = $objetoEntidade->nome;
$objetoForm->pessoas_id = $objetoEntidade->pessoas_id;
$objetoForm->entidades_id = $objetoEntidade->entidades_id;
$objetoForm->programatico = $objetoEntidade->programatico;
}
TForm::sendData('form_entidade', $objetoForm);
TTransaction::close();
}
}
catch (Exception $e)
{
new TMessage('error', $e->getMessage());
TTransaction::rollback();
}
}
// mostra imagem
public static function onShowImage($param)
{
//$imagem = new TImage($param);
//AdiantiCoreApplication::loadPage(__CLASS__, 'foto', $imagem);
//$foto->add($imagem);
//$this->imgFoto->src = "app/images/{$empresa}/{$nomeImg}.png";
//$imgFoto->src = 'app/fotos/' . substr('000000' . $param, -7) . '.jpg';
//var_dump($param);
//$foto->add($divFoto);
}
// method onTabClick
public function onTabClick($param)
{
try
{
TTransaction::open('setcis');
//$id_ent = $param['id'];
$page = (int) $param['current_page'];
$id_ent = TSession::getValue('id_ent');
if ($page = 2) // load sub-form pessoais
{
$form_pessoais = new PessoaisForm;
//$pessoal->add($form_pessoais);
}
elseif ($page = 3) // load sub-form endereços
{
$form_Endereco = new EnderecoForm;
$endereco->add($form_Endereco);
}
elseif ($page = 4) // load sub-form inscrições
{
$form_Inscricao = new InscricaoForm;
$inscricao->add($form_Inscricao);
}
}
catch (Exception $e)
{
new TMessage('error', $e->getMessage());
TTransaction::rollback();
}
}
// confirma antes da exclusão
public static function onDelete($param)
{
$action = new TAction([__CLASS__, 'Delete']);
$action->setParameters($param);
new TQuestion(TAdiantiCoreTranslator::translate('Do you really want to delete ?'), $action);
}
// method delete
public function Delete($param)
{
try
{
TTransaction::open('setcis');
$id = $param['id'];
$entidades = new entidade($id);
$entidades->delete();
TTransaction::close();
$pos_action = new TAction([__CLASS__, 'onClear']);
new TMessage('info', TAdiantiCoreTranslator::translate('Record deleted'), $pos_action);
}
catch (Exception $e)
{
new TMessage('error', $e->getMessage());
TTransaction::rollback();
}
}
// method onSave
public function onSave($param)
{
try
{
TTransaction::open('setcis');
$this->form->validate();
$data = $this->form->getData();
if (!$param['id'])
{
$entidades = new entidade;
}
else
{
$entidades = new entidade($data->id);
}
$entidades->fromArray( (array) $data);
$entidades->store();
$data->id = $entidades->id;
$this->form->setData($data);
new TMessage('info', 'Record saved');
TTransaction::close();
}
catch (Exception $e)
{
new TMessage('error', $e->getMessage());
TTransaction::rollback();
}
}
}

AT

Antonio Augusto Tavares - AUTOR DO POST 08/04/2019 (há 5 anos)

<?php
/**
* EnderecoForm
* @version 1.0
* @package setcia
* @author Antonio Augusto Tavares
* @copyright Copyright (c) 2018 Setsoft - Consultoria e Informática Ltda
*/
class EnderecoForm extends TPage
{
protected $form; // form
protected $detail_row;
protected $fieldlist;
static $id_ent;
/**
* Class constructor
* Creates the page and the registration form
*/
function __construct()
{
parent::__construct();
// creates the form
$this->form = new TForm('form_endereco');
// cria fieldlist
$this->fieldlist = new TFieldList;
$this->fieldlist->width = '100%';
$this->form->add($this->fieldlist);
// define campos
$id = new THidden('list_id[]');
$enderecos_id = new TDBCombo('list_enderecos_id[]', 'setcis', 'Enderecos', 'id', 'descricao');
$cep = new TEntry('list_cep[]');
$cep->setExitAction(new TAction(array($this, 'onCep')));
$logradouros_id = new TDBCombo('list_logradouros_id[]', 'setcis', 'Logradouros', 'id', 'descricao', 'descricao asc');
$endereco = new TEntry('list_endereco[]');
$numero = new TEntry('list_numero[]');
$complemento = new TEntry('list_complemento[]');
$bairro = new TEntry('list_bairro[]');
$cidade_id = new TDBCombo('list_cidade_id[]', 'setcis', 'municipio', 'id', 'nome', 'nome asc');
$estado_id = new TDBCombo('list_estado_id[]', 'setcis', 'estado', 'id', 'sigla', 'sigla asc');
$padrao = new TEntry('list_padrao[]');
$entidade_id = new THidden('list_entidade_id[]', 'setcis', 'Entidade', 'id', 'nome');
$actEnd = new TCombo('action');
//$cep->setExitAction(new TAction(array($this, 'onCep')));
// validações
$enderecos_id->addValidation('Tipo', new TRequiredValidator);
$cep->addValidation('Cep', new TRequiredValidator);
$logradouros_id->addValidation('Logradouro', new TRequiredValidator);
// Tamanhos
$enderecos_id->setSize('100%');
$cep->setSize('100%');
$logradouros_id->setSize('100%');
$endereco->setSize('100%');
$numero->setSize('100%');
$complemento->setSize('100%');
$bairro->setSize('100%');
$cidade_id->setSize('100%');
$estado_id->setSize('100%');
$actEnd->setSize('100%');
// define ações
$items = ['1'=>'Salvar', '2'=>'Excluir'];
$actEnd->addItems($items);
$actEnd->setValue('1');
$cep_action = new TAction(array($this, 'onCep'));
$cep->setChangeAction($cep_action);
$change_action = new TAction(array($this, 'onDefine'));
$actEnd->setChangeAction($change_action);
// monta fieldlist
$this->fieldlist->addField( '', $id);
$this->fieldlist->addField( 'Tipo', $enderecos_id);
$this->fieldlist->addField( 'Cep', $cep);
$this->fieldlist->addField( 'Logradouro', $logradouros_id);
$this->fieldlist->addField( 'Endereco', $endereco);
$this->fieldlist->addField( 'Numero', $numero);
$this->fieldlist->addField( 'Complemento', $complemento);
$this->fieldlist->addField( 'Bairro', $bairro);
$this->fieldlist->addField( 'Cidade', $cidade_id);
$this->fieldlist->addField( 'Estado', $estado_id);
$this->fieldlist->addField( '', $entidade_id);
$this->fieldlist->addField( 'Salvar/Excluir', $actEnd);
// adiciona campos no form
$this->form->addField($id);
$this->form->addField($enderecos_id);
$this->form->addField($cep);
$this->form->addField($logradouros_id);
$this->form->addField($endereco);
$this->form->addField($numero);
$this->form->addField($complemento);
$this->form->addField($bairro);
$this->form->addField($cidade_id);
$this->form->addField($estado_id);
$this->form->addField($padrao);
$this->form->addField($entidade_id);
$this->form->addField($actEnd);
// create the page container
$container = new TVBox;
$container->style = 'width: 100%';
$container->add($this->form);
parent::add($container);
}
// metodo show() - mostra os dados na pagina
public function show()
{
if (!$this->loaded AND (!isset($_GET['method']) OR $_GET['method'] !== 'onLoad') )
{
$this->onLoad(0);
}
parent::show();
}
// Clear form
public function onClear($param)
{
$this->fieldlist->addHeader();
}
// metodo carga do fieldlist
function onLoad($param)
{
try
{
TTransaction::open('setcis');
$id_ent = TSession::getValue('id_entidade');
var_dump($id_ent);
$objEndereco = EntidadeEndereco::where('entidade_id', '=', $id_ent)->load();
$this->fieldlist->addHeader();
if ($objEndereco)
{
foreach ($objEndereco as $end)
{
$objForm = new stdClass;
$objForm->list_id = $end->id;
$objForm->list_enderecos_id = $end->enderecos_id;
$objForm->list_cep = $end->cep;
$objForm->list_logradouros_id = $end->logradouros_id;
$objForm->list_endereco = $end->endereco;
$objForm->list_numero = $end->numero;
$objForm->list_complemento = $end->complemento;
$objForm->list_bairro = $end->bairro;
$objForm->list_cidade_id = $end->cidade_id;
$objForm->list_estado_id = $end->estado_id;
$row = $this->fieldlist->addDetail($objForm);
$row->del($row->get(count($row->getChildren())-1));
}
$row = $this->fieldlist->addDetail( new stdClass );
$row->del($row->get(count($row->getChildren())-1));
}
else
{
$row = $this->fieldlist->addDetail( new stdClass );
$row->del($row->get(count($row->getChildren())-1));
}
// * fecha transação
TTransaction::close();
TScript::create(' $( "#numero" ).focus(); ');
}
catch (Exception $e)
{
new TMessage('error', $e->getMessage());
TTransaction::rollback();
}
}
public static function onDefine($param)
{
$opcao = $param['key'];
//var_dump($param);
if($opcao == '1')
{
AdiantiCoreApplication::loadPage(__CLASS__, 'onSave', $param);
}
else
{
// define the delete action
$action = new TAction([__CLASS__, 'onDelete']);
$action->setParameters($param);
// * shows a dialog to the user
new TQuestion(TAdiantiCoreTranslator::translate('Do you really want to delete ?'), $action);
}
}
// method onSave
public static function onSave($param)
{
try
{
// captura o indice e id
$posicao = $param['_field_data'];
$input_pieces = explode('=', $posicao);
$indice = (int) end($input_pieces);
$id_end = (int) $param['list_id'][$indice];
TTransaction::open('setcis');
if($id_end > 0)
{
$objEndereco = new EntidadeEndereco($id_end);
}
else
{
$objEndereco = new EntidadeEndereco;
$objEndereco->entidade_id = TSession::getValue('id_entidade');
}
$objEndereco->enderecos_id = $param['list_enderecos_id'][$indice];
$objEndereco->cep = $param['list_cep'][$indice];
$objEndereco->logradouros_id = $param['list_logradouros_id'][$indice];
$objEndereco->endereco = $param['list_endereco'][$indice];
$objEndereco->numero = $param['list_numero'][$indice];
$objEndereco->complemento = $param['list_complemento'][$indice];
$objEndereco->bairro = $param['list_bairro'][$indice];
$objEndereco->cidade_id = $param['list_cidade_id'][$indice];
$objEndereco->estado_id = $param['list_estado_id'][$indice];
$objEndereco->store();
TTransaction::close(); // close the transaction
$pos_action = new TAction([__CLASS__, 'onload']);
new TMessage('info', TAdiantiCoreTranslator::translate('Record saved'), $pos_action);
}
catch (Exception $e) // in case of exception
{
new TMessage('error', $e->getMessage());
TTransaction::rollback();
}
}
// method delete endereço
public function onDelete($param)
{
try
{
// captura o indice e id
$posicao = $param['_field_data'];
$input_pieces = explode('=', $posicao);
$indice = (int) end($input_pieces);
$id_end = (int) $param['list_id'][$indice];
TTransaction::open('setcis');
if($id_end > 0)
{
$tabEndereco = new EntidadeEndereco($id_end);
$tabEndereco->delete();
}
TTransaction::close();
$pos_action = new TAction([__CLASS__, 'onload']);
new TMessage('info', TAdiantiCoreTranslator::translate('Record deleted'), $pos_action);
}
catch (Exception $e)
{
new TMessage('error', $e->getMessage());
TTransaction::rollback();
}
}
// method busca cep
public static function onCep($param)
{
var_dump($param);
if(isset($param['key']))
{
$resultado = @file_get_contents('http://republicavirtual.com.br/web_cep.php?cep='.urlencode($param['key']).'&formato=query_string');
//var_dump($resultado);
if($resultado)
{
parse_str($resultado, $retorno);
TTransaction::open('setcis');
$obj = new StdClass;
$obj->enderecos_id = $param['enderecos_id'];
$obj->cep = $param['cep'];
$logradouro = logradouros::where('descricao', '=', strtoupper($retorno['tipo_logradouro']))->load();
foreach ($logradouro as $logradouros) $obj->logradouros_id = $logradouros->id;
$obj->endereco = strtoupper($retorno['logradouro']);
$obj->bairro = strtoupper($retorno['bairro']);
$municipios = municipio::where('nome', '=', strtoupper($retorno['cidade']))->load();
foreach ($municipios as $municipio) $obj->cidade_id = $municipio->id;
$estados = estado::where('sigla', '=', strtoupper($retorno['uf']))->load();
foreach ($estados as $estado) $obj->estado_id = $estado->id;
TTransaction::close();
TForm::sendData('form_Endereco', $obj);
}
else
{
//Exception $e;
//new TMessage('error', $e->getMessage());
}
}
else
{
//catch (Exception $e)
//new TMessage('error', $e->getMessage());
}
}
}

Novo Comentário