PC Toledo

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

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,

Bom Dia

Valeu Toledo

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

Gde abraço

PC Toledo

Macro substituição

Macro substituição

Macro substituição

Macro substituição