Como só somar colunas com palavras especificas?

[Cassiano Vellames_201385 0]

Olá pessoal, estou com uma duvida

Tenho uma tabela de custos por funcionário que estou criando, porem eu quero que eu possa separar todos os gastos, por funcionário, por tipo essas coisas

Em resumo eu queria saber se existe um método de somar apenas as partes com um nome x, parecido com o "somases" que se usa no excel

Por exemplo, eu quero que ele some o valor que o funcionário João gastou em comida, transporte separadamente e ignore todos os outros valores que não estejam relacionados a João.

Alguem pode me ajudar?

[Eisenheim 67]

Olá amigos.

 

Digamos que o João é o funcionario de código 21. Você teria que fazer algo semelhante a isso:

 

Select Codigo, Nome, Sum(Vl_Ref) As VlrRefeicao, Sum(Vl_Transp) As VlrTransporte

From Funcionarios

Group By Codigo, Nome

Order By Nome

 

Experimente e compartilhe o resultado.

[Cassiano Vellames_201385 0]

Opa amigo, desculpa a demora de responder, oq seria "Sum" ?

[Eisenheim 67]

Olá amigos.

 

"Sum" é uma instrução que faz a Soma da coluna passada como parâmetro agrupando os valores devolvendo uma linha com o valor total.

[Cassiano Vellames_201385 0]

[Error] UDespesas.pas(55): Undeclared identifier: 'Select'

[Eisenheim 67]

Olá amigos.

 

Amigo Cassiano Vellames_201385, sempre que tiver alguma dúvida, problema ou até mesmo um erro como o citado acima, peço-lhe que por gentileza tente expor, seja com suas palavras ou uma imagem, ou compartilhe parte do código se possível para que possamos ter como analisar e assim te dar uma orientação a respeito. Fica difícil para nós ajudar, quando pouca ou quase nenhuma informação é fornecida a respeito do problema, e isso acaba afastando outras pessoas a visitarem seu tópico e tentar lhe ajudar também.

[Cassiano Vellames_201385 0]

Opa, perdão a demora para responder. Aqui o codigo

--------------------------------------------------

FormHome: TFormHome;

implementation

uses URemoto, UEmpresas, UFuncionarios, UDespesas, UTipoDespesa;

{$R *.dfm}

procedure TFormHome.Panel1Click(Sender: TObject);
var remoto:TFormRemoto;
begin
remoto:=tformremoto.create(self);
remoto.showmodal

end;

procedure TFormHome.N2Click(Sender: TObject);
var empresas:TFormEmpresas;
begin
empresas:=tformempresas.create(self);
empresas.showmodal
end;

procedure TFormHome.Funcionario1Click(Sender: TObject);
var funcionarios:TFormFuncionarios;
begin
funcionarios:=tformfuncionarios.create(self);
funcionarios.showmodal;
end;

procedure TFormHome.Panel2Click(Sender: TObject);
var despesas:TFormdespesas;
begin
despesas:=tformdespesas.create(self);
despesas.showmodal;
end;

procedure TFormHome.Despesas1Click(Sender: TObject);
var tdespesa:TFormtdespesa;
begin
tdespesa:=tformtdespesa.create(self);
tdespesa.showmodal;
end;

end.