PC Toledo

Olá a todos! Estou com um problema. No meu DBF de Contas a Receber eu gravo somente o código do cliente, sendo assim quando eu mostro em DBEDIT e preciso que saia o nome do cliente, eu relaciono com o DBF clientes, só que há um problema que não sei como resolver, preciso fazer uma busca por nome do cliente dentro do dbedit de Contas a Receber, só que na verdade o nome do cliente vem do DBF cliente, portanto eu fiz a busca e não funcionou, não sei c fui claro, mas alguém se dispor em me ajuar e não entendeu, favor dizer que esclareço melhor a dúvida. Aproveitando, gostaria de saber como eu faço para diminuir a quantidade de espaços que está saindo no Nome do Cliente, não quero diminuir no DBF, quero diminuir dentro do DBEDIT, a linha relacionada onde quero diminuir está assim:

VETOR1[3] = "CLIENTES->NOME"

Agradeço a ajuda de todos.
Marcos
Da Roça.

Alguém poderia me ajudar?

Ola,

Sobre a procura em dois dbfs simultaneamente vc poderia utilizar o comando SET RELATION para definir relacoes entre arquivos pai-filho aberto em areas diferentes. EU NÃO COSTUMO UTILIZAR ESTE COMANDO, veja a sintexe:

SET RELATION TO [<expChave>> | <nRegistro> INTO <XcAlias>];
[<expChave2> | <nRegistro> INTO <xcAlias2>] [ADDITIVE]

Exemplo:
Imagine que voce tenha um arquivo denominado SEG.DBF com os seguintes registros INDEXADOS pelo campo de CODIGO.

COD TIPO LIMITE
--------------------------------
ACD ACIDENTE 8.000
SAU SAUDE 10.000
VID VIDA 5.000

USE cli && cliente tem um campo chamado cod_seg que contém os
&& mesmos codigos de SEG.DBF

SELECT 2
USE seg INDEX cod

SELECT 1
SET RELATION TO cod_seg INTO seg

? A->cod_seg && retorna SAU
? B->tipo && retorna SAUDE.
? C->limite && retorna 10.000

SKIP
? A->cod_seg && retorna VID
? B->tipo && retorna VIDA
? C->limite && retorna 5.000

*O arquivo-filho funciona como uma tabela de pesquisa.

Quanto a segunda duvida em diminuo o campo no dbedit() assim:


VETOR1[3] = "CLIENTES->left(NOME,20)"

agora o campo nome no dbedit tem a largura de 20 caracteres.


Abracos

Obrigado Andril pela ajuda, na segunda dúvida eu acrescentei aquele código mas deu erro de sintaxe:
"error base/1449 Erro de sintaxe: &"
Abraços,
Marcos.

Marcos escreveu:Obrigado Andril pela ajuda, na segunda dúvida eu acrescentei aquele código mas deu erro de sintaxe:
"error base/1449 Erro de sintaxe: &"
Abraços,
Marcos.

OLA MARCOS,

Realmente postei o codigo errado pois nao tenho o costume de utilizar o ALIAS na declaracao de arrays. Tente isto:

VETOR[3]="CLIENTE->(left(nome,20))"

Creio que com este exemplo o campo NOME no dbedit passe a apresentar apenas 20 caracters.

Abraços

Olá Marcos,

Outra alternativa à sua segunda pergunta seria:
Valeu?

Janio