Fatal C 3023

[Netavin]

... mas amigo Adalberto, como pode ver estou usando apenas 4 prg´s.
Com toda certeza tem programadores que usam muito mais que isso. Eu já vi.

Grato!

Netavin

[Adalberto]

Boa tarde Netavin!

... você esta utilizando 4 arquivos .PRG, mais o primeiro e um arquivo .CLP, e dentro de ele seguro que tem mais .PRG’s, e esse arquivo o que o você tem que partir em dois ou talvez mais arquivos .CLP.

Ou pode ser que um arquivo PRG seja muito extenso, separe algumas funções em outro PRG.

Da certo, e muito obrigado por me chamar de amigo.

[Maligno]

como pode ver estou usando apenas 4 prg´s.

Uma velha máxima popular: "O ato não anula o fato". Ou seja, mesmo que sejam apenas 4 PRGs, é fato que o erro existe. E se existe, você está extrapolando o limite da tabela interna de "labels" que o Clipper consegue manter. Não vimos seus fontes, mas sou capaz de apostar que cada um deles é enorme. Isso explica o fato. Solução: segmentar os fontes, criando PRGs menores e compilando-os separadamente.

[Netavin]

Muito bem !!!
Vou fazer como indicado.
Retorno depois os resultados.
Por ora, muito obrigado!!

Netavin

[Maligno]

...
Blinker incremental off
Blinker exec clipper //f:250
Blinker procedure depth 140
Blinker exec nodelete
Blinker exec compress1
Blinker exec extended
Blinker alignment 128
Search BLXCLP53
Lib Clipper
Lib Extend
Lib DBFNTX
Lib Terminal
Lib CTP

... enquanto digitava estas linhas me ocorreu que não sei o porquê do Lib Terminal....

E você sabe o por quê do "BLINKER ALIGNMENT 128"? Quanto às LIBs, pode remover CLIPPER, EXTEND e TERMINAL. Elas são "default" no Clipper. Acho que a DBFNTX também, mas não tenho certeza. Mas aí é fácil. Remova. Se o sistema não funcionar a contento, recoloque-a.

Aliás, falando em NTX, você deveria experimentar usar a SIX, que é mil vezes melhor.

[Netavin]

Caro amigo Maligno, com certeza vou fazer essa experiência em relação às Lib´s. Mas com respeito a troca de NTX por SIX, ... como diria Jack o estripador: vamos por partes.
Ainda não consegui resolver o problema atual. Estou trabalhando na redução dos prg´s. Mas adianto que porenquanto não está adiantando... vamos ver.

Forte abraço !

Netavin.

[Netavin]

... em tempo
Não sei o porquê dessa linha Malígno. Poderia ter pesquisado agora para te responder. Mas estaria sendo injusto né...
Qual o objetivo dessa linha?

Netavin.

[Netavin]

Estou de volta, pessoal.

Então reduzi todos os prg´s. Não adiantou. E eu notei um padrão neste caso: o arquivo mencionado antes do código de erro é sempre o último da lista do script.
Novamente conto com a ajuda de vocês.

até mais....

Netavin.

[Netavin]

senhores do conselho ...

fiz mais uma medida paliativa para conseguir compilar: eliminei a função "Calendário" . Com isso consegui compilar. Mas estou condenado a não aumentar meu sistema até que descubra o problema.

Obrigado a todos !

Netavin.

[Adalberto]

Netavin,

Você não tem dito o conteúdo de PRGS.CLP, lá tem muitos prg’s?, Pode fazer que esse arquivo seja menor e talvez em vez de um sejam dois o mais.

Em que arquivo estava a função CALENDARIO?

Saudações

[Netavin]

Bom dia Adalberto!
Obrigado por se lembrar de mim...
Colega, antes de eu fracionar os "prg´s" eles eram em quantidade de 03 apenas. Mas seguindo as dicas/opiniões eu os fracionei e agora são 15. São todos arquivos pequenos, seguindo as orientações.
Quanto à função Calendário, não nada a ver. Com isso eu apenas quis dizer que tive que retirar uma parte do programa para que ele ficasse menor e pudesse compilar. Assim como tirei esse função, poderia tirar qualquer outra, desde que eliminasse uma parte do programa.

Th um bom final de semana.

[]´s

Netavin.

[Adalberto]

Netavin

E o conteúdo do PRGS.CLP?.

Se não atrapalha seus planos pode me enviar os prg’s que eu, gostoso, faço testes e posto o resultado. Se você prefere faz isto por e_mail ou por MP.

[Netavin]

Caro Adalberto, eis os arquivos ".clp" e ".lnk"

CLP
SYSWOOD
FUNC
FUNC2
FUNC3
CANEL
MENUCIAL
COMER
COMER1
COMEREL
MENUEST
INCESTO
ESTOQUE
RELATORI
RH
RELRH

LNK
FILE PRGS,C:\CLIPPER5\TIMESLIC
OUTPUT SYSWOOD
BLINKER INCREMENTAL OFF
BLINKER EXECUTABLE CLIPPER //F:250
BLINKER PROCEDURE DEPTH 70
BLINKER EXECUTABLE NODELETE
BLINKER EXECUTABLE COMPRESS 1
BLINKER EXTENDED
BLINKER ALIGNEMENT 128
SEARCH BLXCLP53
LIB DBFNTX
LIB CTP

Se quiser passar eu e-mail ou MSN ou ainda SKYPE, podemos trocar idéias.

Grato!

Netavin.

[Adalberto]

Estou olhando a lista de programas (.PRG) dentro de PRGS.CLP, acho que você pode dividir essa lista em dois o mais arquivos .CLP

PRGS01.CLP
SYSWOOD
FUNC
FUNC2
FUNC3
CANEL

PRGS02.CLP
MENUCIAL
COMER
COMER1
COMEREL

PRGS03.CLP
MENUEST
INCESTO
ESTOQUE
RELATORI
RH
RELRH

E logo compilar e linkedidar

BL.BAT
Cls
SET INCLUDE=C:\CLIPPER5\INCLUDE
SET LIB=C:\CLIPPER5\LIB
SET OBJ=C:\CLIPPER5\OBJ
SET PLL=C:\CLIPPER5\PLL
\CLIPPER5\BIN\CLIPPER @PRGS /M /O
\CLIPPER5\BIN\BLINKER @PRGS

PRGS01.CLP
PRGS02.CLP
PRGS03.CLP
CANELA
COMER
ESTOQUE
RH

PRGS.LNK
File PRGS, c:\Clipper5\timeslic
OUTPUT CANELA
Blinker incremental off
Blinker exec clipper //f:250
Blinker procedure depth 140
Blinker exec nodelete
Blinker exec compress1
Blinker exec extended
Blinker alignment 128
Search BLXCLP53
Lib Clipper
Lib Extend
Lib DBFNTX
Lib Terminal
Lib CTP

[alaminojunior]

Não sei se ajuda muito, mas tente também selecionar algumas funções de uso genérico, ou até outras mais específicas que não exigem muita manutenção, e montar uma lib.