Nome do arquivo DBF com o conteudo de uma variavel

[joaovitor]

Ola Amigos,

Sou iniciante em clipper e gostaria de criar um relatorio com o conteudo de uma variavel, tipo tenho uma variavel chamada wusuario, que contem o nome do usuario, exemplo "pedro", gostaria de criar um arquivo dbf com o conteudo da variavel, ou seja, "pedro.dbf"

Será que alguem sabe como fazer isso.

Obrigado Amigos.

Joao Vitor

[alaminojunior]

Olá meu caro, tente assim:
Depois de criar a estrutura do arquivo, aquela história de AADD()...
vc usa a função DBCREATE()
Detalhe:
A sintaxe é DbCreate("Pedro","estrutura","Driver RDD") com aspas, certo ?

Só que vc especifica assim:

Wusuario:= "Pedro"

DbCreate(wusuario,"estrutura","Driver RDD") sem as aspas acho que ele pega o valor da variavel

Tenta aí, depois nos fale

[joaovitor]

Amigo,

Naum uso essa rotina, mais me parece que ela é bem mais facil.

Será que poderia enviar um exemplo para mim.

Se puder agradeço,

Marcio.
marcioril@hotmail.com

[ajc_sistemas]

DBCREATE(USUARIO,{{"CODIGO","N",10,0},;
{"NOME","C",60,0},;
{"SENHA","N",6,0} } )

BOM ACHO QUE ISTO LHE DÁ UM IDÉIA DE COMO FAZER.

ABRAÇOS

ANTONIO

[joaovitor]

Amigo Antonio,

A criação do arquivo deu certo, agora consigo criar um arquivo tmp com o codigo do cliente, exemplo c1365.dbf, mais agora preciso fazer uma consulta nesse arquivo usando select, como ficaria???.

Abro meu arquivos assim:

IF !FILE("INDCL.NTX")
SELECT 1
USE CLIENTE ALIAS CLIENTE shared new
INDEX ON COD_CLI TO INDCL
INDEX ON NOME_CLI TO INDCL1
SET INDEX TO INDCL, INDCL1
ELSE
SELECT 1
USE CLIENTE ALIAS CLIENTE shared new
SET INDEX TO INDCL, INDCL1
ENDIF

Se puder ajudar, agradeço.

Marcio

[digitom]

Tente assim:


No inicio do sistema crie uma variável publica com o nome do arquivo
veja exemplo:

usu := USUARIO
Cname:=''
For n=1 to 8
//Aqui vai criar um arquivo DBF com no maximo 8 caracteres
//se o usuario for JOAO VITOR, O cname vai ser JOAOVITO
if IsDigit(subst(usu,n,1)) .or. IsAlpha(subst(usu,n,1))
Cname+=subst(usu,n,1)
endif
Next
Public ProAux:=Cname+'.DBF'



PARA ABRIR O ARQUIVO
use "&PROAUX"

e

SELECT "&PROAUX"

É isso aí.
Não sei se deu para entender.