prgs não compila error/base 1001

Fórum sobre a linguagem CA-Clipper.

Moderador: Moderadores

leonilzo
Usuário Nível 1
Usuário Nível 1
Mensagens: 13
Registrado em: 29 Mai 2007 11:47
Localização: curitiba

prgs não compila error/base 1001

Mensagem por leonilzo »

oi pessoal sou novato em clipper ... é mais um hobby... e gostaria de uma ajudinha se possível... é tenho ums prgs de controle de estoque... funciona muito bem a anos ...já compilei muitas e muitas vezes e funcionava muito bem.... agora parou ... só compila o 1º arquivo não chama os outros prgs, ai dá pau porque não acha as funções()

alguem pode me ajudar

os erros que da é o seguinte

desde já agradeço

ele gera o exe mais quando abre ..

error base/1001 undefinid function : tela
leo
Avatar do usuário
Pablo César
Usuário Nível 7
Usuário Nível 7
Mensagens: 5312
Registrado em: 31 Mai 2006 10:22
Localização: Curitiba - Paraná

Mensagem por Pablo César »

Bem vindo Leo ao FORUM. Por acaso você estaria migrando para uma nova versão do Clipper ?. Acredito que o seu problema esteja na forma que é compilado seu sistema. Procure linkar todos os OBJs onde estaria os módulos que contém as funções como esse da TELA. Crie os OBJ com o Clipper <nome_do_PRG> e depois utilize por exemplo o RTLINK FI <OBJ1>,<OBJ2>,<OBJ3> OUT SEU_PROG.EXE

Veja que quando utilizo o "<" e ">", não quer dizer que é assim a sintaxe. Isto é, só coloquei esses sinais só para diferenciar. E desculpa se parece que eu te estaria sub-estimando.

Um clip-abraço :)Pos
leonilzo
Usuário Nível 1
Usuário Nível 1
Mensagens: 13
Registrado em: 29 Mai 2007 11:47
Localização: curitiba

Mensagem por leonilzo »

obrigado amigão ..... vou tentar um por um .... mas compilo os meus prg
com o cl.bat (clipper%1 ... if not errorlevel 1 rtlink file %1) linka automaticamente todos os arquivos

uso o clipper5.2
leo
leonilzo
Usuário Nível 1
Usuário Nível 1
Mensagens: 13
Registrado em: 29 Mai 2007 11:47
Localização: curitiba

Mensagem por leonilzo »

não funcionou amigão tem mais alguma dica k possa me ajudar ....da o mesmo erro
leo
Avatar do usuário
Pablo César
Usuário Nível 7
Usuário Nível 7
Mensagens: 5312
Registrado em: 31 Mai 2006 10:22
Localização: Curitiba - Paraná

Mensagem por Pablo César »

Leo, me responde o seguinte:

1. A sua função "TELA()", está em que PRG ?.
2. Voce disse que utiliza o CL.BAT. Mas quando eu disse se você programava numa versão anterior a 5.0, eu queria que você me confirmasse se seus módulos foram feitos, estilo PROCEDURES (como era feito em Summer 87, por exemplo). Porque antes você apenas se preocupava com o primeiro PRG e os outros eram chamados para serem compilados, através do "DO TELA" (por exemplo) e tinhas que colocar SET PROCEDURE TO ROTINAS (por exemplo). Em sintese, eu quero dizer que em algum lugar dos teus PRGs está chamando a FUNÇÃO ou PROCEDURE chamada TELA(... E você não estaria incluindo o módulo onde está essa função. Será que você não estaria chamando uma função que não existe ?.
3. Coloque aqui a forma que você compilou, ora por mim sugerida. Mas coloque de forma completa com os nomes dos módulos.

Um clip-abraço :)Pos
leonilzo
Usuário Nível 1
Usuário Nível 1
Mensagens: 13
Registrado em: 29 Mai 2007 11:47
Localização: curitiba

Mensagem por leonilzo »

oi Paulo... obrigado mais uma vez......
tenho aprocimadamente 200 PRGs que são interligados atraves do prg principal leo.prg que chama os prgs através de um menu...
exp.

tela() = chama tela.prg
*set proc to tela= (assim funciona mas da pau na proxima procedure)
set message to 23
public senha_a,senha_e,senha_c
senha_a:=senha_c:=senha_e:="S"
c_senha()
clear typeahead
tone(500,2)
setcolor(quadn)
@ 05,01 to 05,78
@ 05,00 say chr(195)
@ 05,79 say chr(180)
*set proc to linha()
linha()
@ 23,11 prompt " EPSON "
@ 23,19 prompt " DESK JET "
menu to escolha
if escolha = 2
confimp(6)
else
confimp(5)
endif
while .t.
setcolor(telan)
linha()
@ 23,12 SAY "Use "+chr(24)+" "+chr(25)+" "+chr(26)+" "+chr(27)+" <ESC> e <ENTER> p/selecao"
setcolor(telm)
@ 04,01 say space(78)
@ 04,01 prompt ' Cadastros '
@ 04,14 prompt ' Estoque '
@ 04,25 prompt ' C.Pagar '
@ 04,36 prompt ' C.Receber '
@ 04,49 prompt ' Faturamento '
@ 04,64 prompt ' Utilit rios '
menu to om
setcolor(telan)
if om = 1
cad()
om = 1
elseif om = 2
est()
om = 2
elseif om = 3
pagar()
om = 3
......
o clipper que uso é clipper5.2
eu compilei assim..
cl leo... não chama os outros módulos apenas o leo.prg cria o obj

a sua sugestão
clipper leo,tela,func... etc
rtlink fi leo,tela,func...etc

funciona mas tenho k compilar arquivo por arquivo...e ir arrumando os erros....e até umas duas semanas atrás eu compilava apenas com o cl.bat ele chamava sózinho os prgs...


mas já m ajudou bastante...

:)Pos
leo
Avatar do usuário
Eolo
Colaborador
Colaborador
Mensagens: 1134
Registrado em: 08 Dez 2005 18:24
Localização: São Paulo - SP

Mensagem por Eolo »

Leonilzo,
Mostre o conteúdo do seu arquivo CL.bat... De repente, vc tá usando a opção /M na hora de compilar e por isso as funções não são carregadas.
leonilzo
Usuário Nível 1
Usuário Nível 1
Mensagens: 13
Registrado em: 29 Mai 2007 11:47
Localização: curitiba

Mensagem por leonilzo »

oi eolo bom dia ....
função é a seguinte

cl.bat
clipper %1
if not errorlevel 1 rtlink file %1

obrigado
:D
leo
Avatar do usuário
sygecom
Administrador
Administrador
Mensagens: 7131
Registrado em: 21 Jul 2006 10:12
Localização: Alvorada-RS
Contato:

Mensagem por sygecom »

Tche, vc esta com os PATH do clipper configurado direitinho ? vc usa qual windows ? vc mexeu em algum PRG quando parou de compilar ?

Abraços
Leonardo Machado
Leonardo Machado
xHarbour.org + Hwgui + PostgreSql
leonilzo
Usuário Nível 1
Usuário Nível 1
Mensagens: 13
Registrado em: 29 Mai 2007 11:47
Localização: curitiba

Mensagem por leonilzo »

oi leonardo boa noite....
eu uso windows xp o path do clipper já configurei.... até joguei todo o sistema no mesmo diretório... tnho todos os prgs originais gravado em cdrom para proteção ...e já coloquei os prgs originais e dá o mesmo erro
já perdi a conta de quantas alterações já fiz neste sistema e sempre funcionou .... já instalei até em uma outra máquina com win98 e da o mesmo erro

para compilar e linkar
------------------------------------
cl.bat
clipper %1
if not errorlevel 1 rtlink file %1
-----------------------------------
funcionava 100% compilava e cria todos *.obj agora só compila o principal ... só se compilar um por um e rtlink fi ... arquivo por arquivo

obrigado...

:)Pos


[/code]
leo
Avatar do usuário
sygecom
Administrador
Administrador
Mensagens: 7131
Registrado em: 21 Jul 2006 10:12
Localização: Alvorada-RS
Contato:

Mensagem por sygecom »

Tche, vc sabe que quando vc grava para um CD-ROM um arquivo...ele fica atribuido como somente leitura....tente dar uma olhada nas atribuições desses arquivos PRG e veja se nenhum esta atribuido....

Abraços
Leonardo Machado
Leonardo Machado
xHarbour.org + Hwgui + PostgreSql
leonilzo
Usuário Nível 1
Usuário Nível 1
Mensagens: 13
Registrado em: 29 Mai 2007 11:47
Localização: curitiba

Mensagem por leonilzo »

sim meu amigo obrigado por mais essa sugestão... mas os prgs se for para compliar um por um .... compila tudo certo cria o obj ... só não chama os outros prgs ... ai tenho k linkar todos com rtlink fi....

tenho o clipper como um hobby e já faz tempo... eu nunca vi isso..

mas mesmo assim obrigado

se mais alguma sugetão é bem vinda

:xau
leo
Avatar do usuário
sygecom
Administrador
Administrador
Mensagens: 7131
Registrado em: 21 Jul 2006 10:12
Localização: Alvorada-RS
Contato:

Mensagem por sygecom »

Tche, tente diminuir a quantidade de PRG ...colocando tudo como FUNCTION ....o que imagino que deve esta acontecendo ai ?...que seus PRG s?o os nomes das FUN??ES....ai a chamada..fica pelo nome do PRG e deve esta alguma chamada errada......eu tenho o custe de usar FUNC para chamar as Fun??es !!!

Abra?os
Leonardo Machado
Leonardo Machado
xHarbour.org + Hwgui + PostgreSql
Responder