Fórum INCREMENTAR em reg. 1 caracter vindo d outro campo #195009
14/11/2003
0
Olá pessoal preciso incrementar um caracter caracter vindo de outro campo.
Exemplo:
while not (Titens_nota_cpm.Eof) do
begin
Tinf_tudo.Append;
Tinf_tudoNOTA.Value := Titens_nota_alpraticNOTA.Value + *******;
veja o exemplo
Titens_nota_cpm para
NOTA | FILIAL|
00230 | 2
00231 | 2
00232 | 1
Tinf_tudo
Gostaria de fazer assim o campo NOTA(nota+registro do campo filial)
NOTA
002302
002312
002321
Obrigado!!!!
Exemplo:
while not (Titens_nota_cpm.Eof) do
begin
Tinf_tudo.Append;
Tinf_tudoNOTA.Value := Titens_nota_alpraticNOTA.Value + *******;
veja o exemplo
Titens_nota_cpm para
NOTA | FILIAL|
00230 | 2
00231 | 2
00232 | 1
Tinf_tudo
Gostaria de fazer assim o campo NOTA(nota+registro do campo filial)
NOTA
002302
002312
002321
Obrigado!!!!
Infohelp
Curtir tópico
+ 0
Responder
Posts
14/11/2003
Rafael_gamba
Nâo use o comando append (ele cria um novo registro). Para editar um registro já existente use o comando edit.
exemplo :
Titens_nota_cpm.[b:f52d0f09f6]first[/b:f52d0f09f6];
[b:f52d0f09f6]while not [/b:f52d0f09f6](Titens_nota_cpm.Eof) [b:f52d0f09f6]do [/b:f52d0f09f6]
[b:f52d0f09f6]begin [/b:f52d0f09f6]
Tinf_tudo.[b:f52d0f09f6]edit[/b:f52d0f09f6];
Tinf_tudoNOTA.[b:f52d0f09f6]Value[/b:f52d0f09f6] :=Tinf_tudoNOTA.[b:f52d0f09f6]Value+[/b:f52d0f09f6]Titens_nota_cpmCAMPO.[b:f52d0f09f6]value[/b:f52d0f09f6];
Tinf_tudo.[b:f52d0f09f6]Post[/b:f52d0f09f6];
Titens_nota_cpm.[b:f52d0f09f6]next[/b:f52d0f09f6];
[b:f52d0f09f6]end;[/b:f52d0f09f6]
Pronto!!!!!
Abraço!!
exemplo :
Titens_nota_cpm.[b:f52d0f09f6]first[/b:f52d0f09f6];
[b:f52d0f09f6]while not [/b:f52d0f09f6](Titens_nota_cpm.Eof) [b:f52d0f09f6]do [/b:f52d0f09f6]
[b:f52d0f09f6]begin [/b:f52d0f09f6]
Tinf_tudo.[b:f52d0f09f6]edit[/b:f52d0f09f6];
Tinf_tudoNOTA.[b:f52d0f09f6]Value[/b:f52d0f09f6] :=Tinf_tudoNOTA.[b:f52d0f09f6]Value+[/b:f52d0f09f6]Titens_nota_cpmCAMPO.[b:f52d0f09f6]value[/b:f52d0f09f6];
Tinf_tudo.[b:f52d0f09f6]Post[/b:f52d0f09f6];
Titens_nota_cpm.[b:f52d0f09f6]next[/b:f52d0f09f6];
[b:f52d0f09f6]end;[/b:f52d0f09f6]
Pronto!!!!!
Abraço!!
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)