DOS ERRO 32

[Ricardo Sales Ribeiro]

Olá Pessoal
Boa tarde!

Tenho um sistema, q em uma determinada rotina funcionava certinho, uma rotina q me gerava um determinado relatorio, entretanto agora ao executar dar o seguinte error: DOS ERROR 32.

Estou encabulado, não dava esse erro e agora estar dando, e estou precisando urgente gerer esse relatorio.
Se alguem souber e puder me ajudar, eu agradeço desde já.

Gde abraço

[ANDRIL]

Erro 32 - Violação de Compartilhamento

Veja se já existe o arquivo, veja seu atributo através do prompt ATTRIB nomedoarquivo, pode ser que esteja como R+
Seu usuário tem acesso a pasta onde voce cria o arquivo? Veja, só se for diferente da do sistema.
Se tiver usando anti-virus, tente desativa-lo para testar, quem sabe não seja ele bloqueando.
Se tiver criando apartir de uma estação da rede e tentando salvar em uma pasta em outra maquina, verifique se ela esta setada para permitir leitura/gravação.
Partindo para o lado do hardware, de uma olhada no hd, desfragmente-o. Veja memória também.

Esse problema só ocorre com esta máquina? Se sim, bem provável que seja algum dos citados acima.

Abraços.

[Ricardo Sales Ribeiro]

Olá Parceiros
Eu me expliquei mal, acho eu, o erro q estar ocorrendo, observei agora bem direitinho é esse:

ERROR DBFNTX/1004
Create error: Arqtem08.Dbf
DOS ERROR 32

Na verdade minha rotina cria um arquivo temporario, para gerar o relatorio, e na hora de gerar dar esse erro acima descrito.

Parte da minha rotina é essa aqui:

Código: Selecionar todos

Sele a_IteFat
Copy Stru To ArqTemp
Use ArqTemp Exclusive Alias a_Temp New
Sele a_IteReq1
Set Orde To 2
wBak:='ArqTem'+Substr(Time(),7,2)+'.Dbf'
wDatBas:=CtoD('20/07/2010')
If wCodFor <> '999999'
   Copy To &wBak For (Dat_Req >= wDatIni .and. Dat_Req <= wDatBas) .and. For_Ite = wCodFor
Else
   Copy To &wBak For (Dat_Req >= wDatIni .and. Dat_Req <= wDatBas)
Endif
Use &wBak exclusive alias a_Bak New
Sele a_Bak

Eu crio um arquivo temporario para copiar alguns dados para lá e depois processa-los.

Abraços

[Pablo César]

O erro DBFNTX/1004 Open error (creating .dbf) bem pode ser por duas razões:
1. Certifique-se que o espaço em disco suficiente e entradas de diretório
estão disponíveis. Se o arquivo existir, certifique-se que não está marcada
read-only.

2. Em um ambiente de rede, verifique se o aplicativo tem a necessária
direitos para criar o arquivo.

No entanto eu devo acrescentar que por tratar-se de sistema em rede, o erro poderia ser atribuído por estar já sendo usado por outro usuário ou outra sessão. Pode ser ?
Notei que o nome é variável por dois ultimos digitos (segundos), você poderia aumentar mais dois dígitos para diminuir as chances de utilizarem o mesmo arquivo. Ficando: wBak:='Arq'+Substr(Time(),4,2)+Substr(Time(),7,2)+'.Dbf'.

Ou até mesmo criando o arquivo no C: e assim evitando que outro possa abrir. Daí bastaria você acrescentar o "C:" na variável wBak

wBak:='C:Arq'+Substr(Time(),4,2)+Substr(Time(),7,2)+'.Dbf'

De resto, no seu código eu não vi algo errado.

[ANDRIL]

ERROR DBFNTX/1004
Create error: Arqtem08.Dbf

Continuo apostando nas opções em que te falei. O erro acima é do runtime do clipper e diz claramente que o arquivo não pode ser criado. Porque não pode? É ai que voce tera que vasculhar na sua máquina, comece desde dos parametros files no config.nt e set clipper=F200 no autoexec.nt e continue pelas opções em que te passei.

wBak:='ArqTem'+Substr(Time(),7,2)+'.Dbf'

Veja se não criou anteriormente um arquivo com este mesmo nome, pois como usa apenas os segundos pode ocorrer isso e calhar do arquivo já se encontrar em aberto.

Boa sorte!

[Pablo César]

pode ocorrer isso e calhar do arquivo já se encontrar em aberto

Pois é... também acho. Outra o ERRO 32 do DOS seria por violação de compartilhamento, então muito provável.