Bem Vindo, Visitante
Você tem que se registrar antes, para poder colocar mensagens no Fórum.

Nome de usuário/Email:
  

Senha
  





Pesquisar Nos Fóruns

(Pesquisa Avançada)

Estatísticas do Fórum
» Membros: 400
» Último Membro: Elethryck
» Tópicos do Fórum: 96
» Inserção de Mensagens: 401

Estatísticas Completas

usuários Online
Estão de momento 35 usuárioes online.
» 0 Membro(s) | 34 Visitante(s)
Bing

Últimos Tópicos
Método clone pelo ORMBR
Fórum: Usando ObjectSet
Última Mensagem: Deivison Davi Albring
09-12-2019, 09:38 AM
» Respostas: 0
» Visualizações: 390
ormbr.types.database
Fórum: Como Usar
Última Mensagem: ailtonbrc
11-11-2019, 11:06 AM
» Respostas: 1
» Visualizações: 1,239
ExecuteDirect X ExecuteSc...
Fórum: Como Usar
Última Mensagem: Isaque Pinheiro
26-09-2019, 09:57 AM
» Respostas: 1
» Visualizações: 1,058
dúvida de iniciante -> le...
Fórum: Como Usar
Última Mensagem: Gr@c@
24-09-2019, 08:38 AM
» Respostas: 0
» Visualizações: 589
Executar uma StoredProced...
Fórum: Como Usar
Última Mensagem: Gr@c@
23-09-2019, 06:11 PM
» Respostas: 0
» Visualizações: 658
link tortoise-git
Fórum: Como Usar
Última Mensagem: Isaque Pinheiro
26-08-2019, 11:13 AM
» Respostas: 1
» Visualizações: 1,354
TORMBrJson.JsonToObjectLi...
Fórum: Código Fonte
Última Mensagem: Isaque Pinheiro
13-07-2019, 03:07 PM
» Respostas: 1
» Visualizações: 1,322
Fechar conexão
Fórum: Como Usar
Última Mensagem: MaikonPanazzolo
04-06-2019, 05:03 PM
» Respostas: 7
» Visualizações: 4,974
Conexão com banco de dado...
Fórum: Como Usar
Última Mensagem: MaikonPanazzolo
04-06-2019, 11:59 AM
» Respostas: 0
» Visualizações: 1,139
Como gravar TBlob de Stre...
Fórum: Como Usar
Última Mensagem: marson
31-05-2019, 12:14 PM
» Respostas: 0
» Visualizações: 1,061

 
  Componente X Codigo ORMBr
Inserido por: ailtonbrc - 24-05-2019, 08:49 PM - Fórum: RESTFull DataSnap - Sem Respostas

Eu estava fazendo meu projeto de forma manual (sem componente) , adquiri o componente e iniciei o uso, porem precisei retornar ao código anterior e percebi que mesmo não fazendo atualizações de fontes o método cancel parou de funcionar, 

percebi que nem chega mais no servidor tem algo de diferente? como posso corrigir ou qual a unit que fera o cancel para eu depurar "para não ficar procurando do passo a passo"


teve atualizações recentes no fontes, posso baixar sem prejuízo?

a proposito para retornar ao projeto anterior voltei tudo (servidor e client)

Imprimir este artigo

  Consulta por ICritéria
Inserido por: BrunoMaia - 20-05-2019, 11:14 PM - Fórum: Como Usar - Respostas (1)

Boa noite. 
Olhando os exemplos, vejo que realmente é simples implementar um CRUD. Porém a minha dúvida é um pouco mais adiante.
Imagine o cenário.
Tenho uma estrutura de pedido devidamente relacionada
Pedido -> Itens
          -> Cliente
          -> Pagamentos
          -> Transportadora


Pelo oque entendi, fazendo um open do pedido, todos os campos dessas classes vão ser carregados.
Gostaria de saber se tendo essa estrutura, como posso fazer uma consulta para retornar apenas por exemplo (Código do cliente, nome do cliente, total do pedido e formas de pagamento) sem carregar as outras colunas.

Pelo oque vi, teria q utilizar um ICritéria que me retornaria um DataSet e desta forma não iria usar a estrutura criada. 

Estou certo ou comi bola em algum ponto?

Imprimir este artigo

  Fechar conexão
Inserido por: MaikonPanazzolo - 20-05-2019, 09:10 AM - Fórum: Como Usar - Respostas (7)

Boa dia pessoal, estou tendo um problema na hora de finalizar meu sistema com uma conexão ativa, por exemplo, no meu sistema tenho algumas tabelas de conexão com o banco de dados e em todos os métodos necessários que comunicam com o banco de dados seja por insert ou por edit, estou associando uma variável que vai herdar do método da conexão com o banco, e depois de feito o procedimento eu libero essa variável, porém na hora de finalizar meu sistema utilizando o parâmetro ReportMemoryLeaksOnShutdown do Delphi, eu obtenho o retorno com muita perda de memória, e todos os objetos estão relacionados aos componentes ORMBR, qual é a melhor forma de liberá-los da memória após o uso? Alguém poderia me fornecer essa informação? No link abaixo tem bem certo os locais que estão retornando o memory leak.

http://prntscr.com/nqx57d

Att. Maikon



Arquivo(s) anexado(s) Miniatura(s)
   
Imprimir este artigo

  Load Lazy automático
Inserido por: Odlawso - 09-04-2019, 06:03 PM - Fórum: Como Usar - Respostas (1)

Saudações.

Estou implementando um projeto usando o ORMBr e vi a necessidade de usar load lazy para obter melhor desempenho.
Entretanto, uma dificuldade que estou tendo é o fato de ter que fazer o carregamento das dependências manualmente, ou seja, através de uma linha de comando.
É possível, ou há previsão de que o ORMBr faça o carregamento automaticamente quando o objeto fosse acessado?

Obrigado.

Imprimir este artigo

  Erro instanciando TContainerClientDataSet com coluna > 31 caracteres e valor default
Inserido por: Odlawso - 29-03-2019, 04:02 PM - Fórum: Usando DataSet - Respostas (3)

Saudações!

Está ocorrendo um erro quando instancio um TContainerClientDataSet<M> cuja entidade M contenha uma coluna com nome maior que 31 caracteres, conforme exemplo abaixo.
No Dictionary, além de ter o nome grande, a coluna precisa ter um valor default. Sem o valor default o erro não ocorre.

---- Início do exemplo

Classe TPedido:
----

type
  [Entity]
  [Table('pedido', '')]
  [PrimaryKey('codigo', NotInc, NoSort, False, 'Chave primária')]
  Tpedido = class(TInterfacedObject, Ipedido)
  private
    { Private declarations }
    Fcodigo: Integer;

...

    Fvalor_outras_despesas_acessorias: Currency;

...

  public
...

    [Column('valor_outras_despesas_acessorias', ftCurrency)]
    [Dictionary('valor_outras_despesas_acessorias', 'Mensagem de validação', '0', '', '', taRightJustify)]
    property valor_outras_despesas_acessorias: Currency read Fvalor_outras_despesas_acessorias write Fvalor_outras_despesas_acessorias;


Chamada onde ocorre o erro:
------

FContainerPedido := TContainerClientDataSet<TPedido>.Create(FConn.Conn, qryPedido);


Exception:
------

valor_outras_despesas_acessorias: Preparation of default expression failed with error "Violação de acesso ao endereço 009AE939 no módulo 'MeuServer.exe'. Leitura do endereço 00000034"

---- Fim do exemplo

Alguém já passou por esse problema e tem uma solução?

Imprimir este artigo

  Campos Nullable
Inserido por: Deivison Davi Albring - 15-03-2019, 03:35 PM - Fórum: Como Usar - Respostas (4)

Tenho um modelo que contem campos do tipo Nullable<String> ex:

    [Column('BASE_FONE_CON1', ftString, 15)]
    [Dictionary('BASE_FONE_CON1', 'Mensagem de validação', '', '', '', taLeftJustify)]
    property BASE_FONE_CON1: Nullable<String> read FBASE_FONE_CON1 write FBASE_FONE_CON1;


Tudo certo, populo a classe TBASE e, na hora de jogar os dados na tela para os edit's, se o campo acima estiver NULL no banco de dados
ocorre o erro : 

Invalid operation, Nullable type has no value.

gostaria de saber se tem alguma maneira de tratar esse retorno para trazer um default talvez quando o campo for NULL.

Sei que existe a função .GetValueOrDefault, mas além disso, nao teria como o framework tratar automaticamente e trazer um default no lugar de null?

Obrigado!

Imprimir este artigo

  Como Povoar classes de tabelas usando joins
Inserido por: Deivison Davi Albring - 14-03-2019, 04:27 PM - Fórum: Como Usar - Respostas (2)

Existe algum método, tipo um "Load" que sirva para povoar as classes das tabelas?

por enquanto estou fazendo uma class function exemplo :

class fuction Load(id : Integer): TPESSOA;
var
  oContainer : TContainerObjectSet<TPESSOA>;
  List : TObjectList<TPESSOA>;
begin
  oContainer := TCOntainerObjectSet<TPESSOA>.Create(oConn);
  List := oContainer.Findwhere('id = '+id.ToString);
  Result := List.First;
end;

isso retorna um objeto TPESSOA contendo um registro
no formulário só preciso passar pra um TObjectList e posso usar, até aí tudo bem..

agora, se eu quiser fazer isso usando Joins...?
(Pode ser que eu não descobri que ja existe um método mais fácil, mas,caso não exista, fica a dica de implementar uma função como essa nativamente no Framework)

Imprimir este artigo

  Datasnap Exemplo
Inserido por: Gedeba - 11-03-2019, 11:59 AM - Fórum: RESTFull DataSnap - Respostas (2)

Bom dia Isaque,
desculpa a insistência... estou estudando os exemplos via firedac, na pasta datasnap tem o cliente e o servidor o servidor esta compilando normalmente mas quando tento executar o cliente da o erro Unit 'firedac.stan.exprfuncs' not found. Fui no exemplo e coloquei a unit no form3 e ainda da o erro....

o erro ocorre quando tento executar esta linha
oDataSnapMaster := TContainerRESTFDMemTable<Tmaster>.Create(FDMaster);

No seu exemplo vc tem um servidor comum usando  fdconnection, usando os métodos no servermetodos insert update e delete e busca tem como no lado cliente trabalhar com objeto puro no exemplo vc utiliza o fdmentable...  e vc tem um exemplo usando objeto puro cliente/servidor mas passando um fdconnection como parametro para conexao com  banco.  tem como usar o cliente puro sem passar um fdconnection... este exemplo esta ok.. executando sem erro...

Desde já agradeço a atenção e o compartilhamento de informações e do projeto.

Geraldo.

Imprimir este artigo

  Ormbr com restdataware
Inserido por: Gedeba - 07-03-2019, 09:41 AM - Fórum: Como Usar - Respostas (2)

Bom dia Isaque

Tem algum exemplo usando do restdataware, vim um exemplo firedac usando o datasnap, fiz atualização novamente ainda não encontrei nada, se optar em usar o firedac para no servidor ter acesso mobile também, pelo que vi no exemplo tem que se criar cada (4) método  para cada tabela ou tem alguma forma mais simples de implementação

Desde já agradeço.

Geraldo

Imprimir este artigo

  Erro em campo NotNull
Inserido por: samuca.ti@hotmail.com - 17-09-2018, 08:54 AM - Fórum: Usando DataSet - Respostas (14)

Boa tarde Pessoal,

estou quebrando a cabeça no segunte problema

No banco sqlserver a coluna "Descricao" está como not null.

se eu fizer um insert via management studio 
insert INSERT INTO MESA (DESCRICAO) VALUES ('') - ok

via 
oMesas := TContainerObjectSet<TMesa>.Create(iBDConexao, -1);

Mesa.descricao := '';
oMesas.Insert(Mesa); -ok

porem ao recarregar o clientdataset dá a mensagem "Field value required" e dá access violation e fecha o app.

resposta obvia: "o campo é obrigatorio e estou inserindo vazio ("nao estou mandando null")"

porem ele deixa gravar tanto no sql quanto no container, o problema é ao carregar, não deveria dar essa mensagem visto que o campo não está como null no registro e sim com 'vazio'.

    [Restrictions([NotNull])]
    [Column('DESCRICAO', ftString, 30)]
    [Dictionary('DESCRICAO', 'Descrição da Mesa', '', '', '', taLeftJustify)]
    property descricao: String read FDESCRICAO write FDESCRICAO;


Origens do Problema:
procedure TSessionDataSet<M>.OpenSQL(const ASQL: string);

onde alimenta os fields no cds:
procedure TBindDataSet.SetInternalInitFieldDefsObjectClass(ADataSet: TDataSet; AObject: TObject);

if LColumn.IsNotNull then
      ADataSet.FieldByName(LColumn.ColumnName).Required := True;

se alguem tiver uma solução e puder ajudar, estou tentando aqui mas se alguem conseguir achar algo antes.

obrigado

Imprimir este artigo