Macro substituição

[Ricardo Sales Ribeiro]

Bom Dia
Amigos

Estou com um problema aparentemente simples mas não estou conseguindo exito, é o seguinte:
Eu preciso passar parametros para acessar um determinado arquivo num determinado drive, então criei esta rotina

Aqui entro com o codigo da Equipe: wCodEqu Pict ´999´
wCodEqu=001
quero gerar um arquivo tipo C:\SisOds\Dados\Rot001.Dbf
use C:\SisOds\Dados\Rot001 inde on c:\SisOds\Dados\001SERCD, c:\SisOds\Dados\001SERDT, c:\SisOds\Dados\001SEREQ
O codigo da equipe é variavel, eu digito na hora, a localização é fixa.

wDrv:='C:\SisOds\Dados\'
wArq0:='Rot'+'&wCodEqu'
wArq1:='&wArq0'+'.Dbf'

Estar dando erro nesta linha, quando eu junto tudo. syntax erro &
Use '&wDrv'+&wArq1 Inde '&wDrv'+'&wCodEqu'+'SerCd','&wDrv'+'&wCodEqu'+'SerEq','&wDrv'+'&wCodEqu'+'SerDt' Shared alias a_Arq1 New

Poderiam me ajudar.

Atenciosamente

[Toledo]

Ricardo, tem que ser macro substituição?

Senão, poderia fazer apenas o seguinte:

Código: Selecionar todos

wDrv:='C:\SisOds\Dados\'
wArq1:=wDrv+'Rot'+wCodEqu+'.Dbf'
wSerCd:=wDrv+wCodEqu+'SerCd'
wSerEq:=wDrv+wCodEqu+'SerEq'
wSerDt:=wDrv+wCodEqu+'SerDt'

Use (wArq1) Inde (wSerCd), (wSerEq), (wSerDt) Shared alias a_Arq1 New

Abraços,

[Ricardo Sales Ribeiro]

Bom Dia

Valeu Toledo

Obrigado pela sugestão, pode ser sim assim, claro quem sou eu para duvidar,kkk. Valeu mesmo.

Gde abraço