oziel Posted May 13, 2010 Report Share Posted May 13, 2010 Colegas... Estou com uns probleminhas em alguns cadastros, descobri que o problema estava relacionado com o arquivo tipo memo. Mensagem: Clipper internal error ! GetCadastro(325)- Internal Error (1112) Já criei nova estrutura, mandei os registros e o problema continua exatametente no mesmo registro. Para encurtar a conversa, imprimi o cadastro, apaguei o registro e criei um novo. Será que não tem outra solução... Vejam abaixo: No programa principal ........... REQUEST DBFCDX RddSetDefault("DBFCDX") DbSetDriver("DBFCDX") Programa de Cadastro .... Select Cadastro Set Index to Cadastro Set Order to 1 DbGoTop() ............ @ 180.9,210.0 DBUTTON "Edita " FILE ".\BMP\DBSELEC.BMP" SIZE 40,20 GLIP POS 3 ; ACTION( GetCadastro(.F.), oBrw:Refresh() ) ; TOOLTIP OemToAnsi( "Modificar Cadastro Selecionado" ) ..... Function Getcadastro() ..... mContra = Cadastro->Contra // Area Memo onde acontece o erro .... OZIEL LOPES FW 22c - Clipper 5.3b - Workshop 4.0 Quote Link to comment Share on other sites More sharing options...
oziel Posted May 13, 2010 Author Report Share Posted May 13, 2010 Colegas... Estou com uns probleminhas em alguns cadastros, descobri que o problema estava relacionado com o arquivo tipo memo. Mensagem: Clipper internal error ! GetCadastro(325)- Internal Error (1112) Já criei nova estrutura, mandei os registros e o problema continua exatametente no mesmo registro. Para encurtar a conversa, imprimi o cadastro, apaguei o registro e criei um novo. Será que não tem outra solução... Vejam abaixo: No programa principal ........... REQUEST DBFCDX RddSetDefault("DBFCDX") DbSetDriver("DBFCDX") Programa de Cadastro .... Select Cadastro Set Index to Cadastro Set Order to 1 DbGoTop() ............ @ 180.9,210.0 DBUTTON "Edita " FILE ".\BMP\DBSELEC.BMP" SIZE 40,20 GLIP POS 3 ; ACTION( GetCadastro(.F.), oBrw:Refresh() ) ; TOOLTIP OemToAnsi( "Modificar Cadastro Selecionado" ) ..... Function Getcadastro() ..... mContra = Cadastro->Contra // Area Memo onde acontece o erro .... OZIEL LOPES FW 22c - Clipper 5.3b - Workshop 4.0 Quote Link to comment Share on other sites More sharing options...
kapiaba Posted May 13, 2010 Report Share Posted May 13, 2010 Erro muito estranho. Não lembro mais, mas verifique ai, se você uma LIB de nome: RDDFPT.LIB, se tiver incorpore-a. Nunca vi este erro. João Santos - São Paulo. kmt_karinha@pop.com.br joao@pleno.com.br Fone: (11) 3106-2832 / 8243-5632 FWH 2.7 - xHARBOUR WorkShop.Exe Quote Link to comment Share on other sites More sharing options...
kapiaba Posted May 13, 2010 Report Share Posted May 13, 2010 Qual é o tamanho deste campo memo? > 64kb?? João Santos - São Paulo. kmt_karinha@pop.com.br joao@pleno.com.br Fone: (11) 3106-2832 / 8243-5632 FWH 2.7 - xHARBOUR WorkShop.Exe Quote Link to comment Share on other sites More sharing options...
kapiaba Posted May 13, 2010 Report Share Posted May 13, 2010 Tente: ANNOUNCE RDDSYS REQUEST DBFCDX, DBFFPT //external ordkeyno, ordkeycount, ordcreate, ordkeygoto REQUEST OrdKeyNo, OrdKeyCount, OrdCreate, OrdKeyGoto FUNCTION MAIN() id=code>id=code>João Santos - São Paulo. kmt_karinha@pop.com.br joao@pleno.com.br Fone: (11) 3106-2832 / 8243-5632 FWH 2.7 - xHARBOUR WorkShop.Exe Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.