Diógenes Posted June 17, 2009 Report Share Posted June 17, 2009 No meu sistema o menu de relatório e montando conforme os dados digitados em um arquivo DBF então quando faço um relatório novo o usuário digita o nome da função que gera o relatório neste arquivo e a opção irá aparecer no menu de relatório, o problema ocorre se o usuário ou até o pessoal do suporte digita o nome da função errado o sistema gera o erro base 1449 &, gostaria de saber se alguem sabe como evitar que o erro ocorra. ( não vale dizer pra digitar o nome da função corretamente ) Quote Link to comment Share on other sites More sharing options...
Diógenes Posted June 17, 2009 Author Report Share Posted June 17, 2009 No meu sistema o menu de relatório e montando conforme os dados digitados em um arquivo DBF então quando faço um relatório novo o usuário digita o nome da função que gera o relatório neste arquivo e a opção irá aparecer no menu de relatório, o problema ocorre se o usuário ou até o pessoal do suporte digita o nome da função errado o sistema gera o erro base 1449 &, gostaria de saber se alguem sabe como evitar que o erro ocorra. ( não vale dizer pra digitar o nome da função corretamente ) Quote Link to comment Share on other sites More sharing options...
kapiaba Posted June 17, 2009 Report Share Posted June 17, 2009 ERRO: ERROR BASE 1449/ SYNTAX ERROR : & DESCRIÇÃO: Erro de Sintaxe O QUE FAZER: Este erro geralmente ocorre durante o processo de impressão quando os comandos de Ativa Comprimido Desativa Comprimido, Ativa Expandido, Desativa Expandido, estão preenchidos de forma incorreta nos CADASTROS do programa. Defina corretamente o Cadastro de impressora no sistema. Exemplo.: Impressora EPSON; ATIVA COMPRIMIDO: CHR(15) DESATIVA COMPRIMIDO: CHR(18) ATIVA EXPANDIDO: CHR(14) DESATIVA EXPANDIDO: CHR(20) Abraços João Santos - São Paulo. kmt_karinha@pop.com.br kapiaba@brfree.com.br Fone: (11) 3106-2832 FWH 2.7 - xHARBOUR 0.99.61 - WorkShop.Exe Quote Link to comment Share on other sites More sharing options...
kapiaba Posted June 17, 2009 Report Share Posted June 17, 2009 GENTILEZA ATUALIZAR SEU PERFIL. QUEM É VOCE?? Abraços. João Santos - São Paulo. kmt_karinha@pop.com.br kapiaba@brfree.com.br Fone: (11) 3106-2832 FWH 2.7 - xHARBOUR 0.99.61 - WorkShop.Exe Quote Link to comment Share on other sites More sharing options...
Diógenes Posted June 17, 2009 Author Report Share Posted June 17, 2009 Exemplo da minha pergunta. DbSelectArea( "Menu" ) cReport := Trim( Menu->NomeFuncao ) Eval( {|| cReport } ) Quando não existe ou a função foi digitada com erro, ele gera o erro 1449 & Quote Link to comment Share on other sites More sharing options...
Marca Posted June 17, 2009 Report Share Posted June 17, 2009 citação:GENTILEZA ATUALIZAR SEU PERFIL. QUEM É VOCE?? Abraços. João Santos - São Paulo. kmt_karinha@pop.com.br kapiaba@brfree.com.br Fone: (11) 3106-2832 FWH 2.7 - xHARBOUR 0.99.61 - WorkShop.Exe id=quote>id=quote>HEHEHHE Nao sei se sou eu é q estou ficando velho ou se os bons hábitos de dar bom dia boa tarde , olá estão caindo em desuso ou se pura falta mesmo destes costumes mas... fazer oq. Vc realmente espera ajuda asimm rapaz ? Marcelo Ferro Petrópolis - Rj Fwh9.01/xHarbour 1.1.0 Simplex /SqlLib /xMate/WSe Pelles Quote Link to comment Share on other sites More sharing options...
eajunior Posted June 17, 2009 Report Share Posted June 17, 2009 Antes de mais nada, Bom Dia e como estão meus amigos, se me permitirem volto participar ativamente desde forum a partir desta data O Sr Diogenes apenas pediu uma ajuda e mais nada. Obs: Ele e meu discipulo Onde você vê um obstáculo alguém vê o término da viagem e o outro vê uma chance de crescer. Elias Abrão Júnior Fone : (0**11) 9804-6348 Indaiatuba - SP eajunior.fw@gmail.com xHarbour 0.99.0 - Fivewin 2.5 e xMate Quote Link to comment Share on other sites More sharing options...
Diógenes Posted June 17, 2009 Author Report Share Posted June 17, 2009 Caro Marcelo Ferro, se vc não quiser me ajudar, obrigado pelo fato de ter me alertado que eu preciso ser tão cordial neste forum pra receber ajuda. Se eu tiver ofendido alguem me desculpem, não tive intenção de ofender ninguém. Quote Link to comment Share on other sites More sharing options...
Diógenes Posted June 17, 2009 Author Report Share Posted June 17, 2009 Caro João o que vc gostaria que eu informa-se em meu perfil. Eu atualizarei com todo prazer..... Quote Link to comment Share on other sites More sharing options...
kapiaba Posted June 17, 2009 Report Share Posted June 17, 2009 citação:Caro João o que vc gostaria que eu informa-se em meu perfil. Eu atualizarei com todo prazer..... id=quote>id=quote>Oi Diogenes, primeiro, não estresse com o querido Marcelo Ferro, ele é maravilhoso. Informe, seu dados. Nome, de ondes és, cidade, o que usas, FIVE FOR CLIPPER, FIVE FOR XHARBOUR, etc. Veja o Perfil dos demais. Abraços e conte conosco. João Santos - São Paulo. kmt_karinha@pop.com.br kapiaba@brfree.com.br Fone: (11) 3106-2832 FWH 2.7 - xHARBOUR 0.99.61 - WorkShop.Exe Quote Link to comment Share on other sites More sharing options...
Yury Posted June 17, 2009 Report Share Posted June 17, 2009 olá, modifique seu ErrSysw (gerador de doc de erro), colocando o seguinte teste: IF erro:genCode == EG_NOFUNC cPROG=ALLTRIM(erro:OPERATION()) MSGSTOP("ImpossÃvel executar "+cPROG+". Este programa não está disponÃvel para esta versão do sistema","ERRO") RETURN ENDIF id=code>id=code>desta forma não irá gerar erro em tempo de execução, somente uma mensagem de aviso abraço Yury Marcelino Al Viman Sistemas vimansca@vimansca.com.br yury030575@yahoo.com.br (msn) skype: yury.marcelino.al Leme / SP FW 2.6 / [x]Harbour 99.50 / WS / xDev 0.65 / @say Quote Link to comment Share on other sites More sharing options...
vagner Posted June 17, 2009 Report Share Posted June 17, 2009 citação:Antes de mais nada, Bom Dia e como estão meus amigos, se me permitirem volto participar ativamente desde forum a partir desta data O Sr Diogenes apenas pediu uma ajuda e mais nada. Obs: Ele e meu discipulo Onde você vê um obstáculo alguém vê o término da viagem e o outro vê uma chance de crescer. Elias Abrão Júnior Fone : (0**11) 9804-6348 Indaiatuba - SP eajunior.fw@gmail.com xHarbour 0.99.0 - Fivewin 2.5 e xMate id=quote>id=quote>Fala Sumido Bom já q é seu discÃpulo, altere o errorsys.prg para q qndo der o erro, ele dê uma outra mensagem para vc, como vc está pegando a função de um dbf e tentando rodar e ela não existir vai dar pau mesmo Vagner Wirts VI Encontro está chegando , não perca Quote Link to comment Share on other sites More sharing options...
Marca Posted June 17, 2009 Report Share Posted June 17, 2009 citação:Caro Marcelo Ferro, se vc não quiser me ajudar, obrigado pelo fato de ter me alertado que eu preciso ser tão cordial neste forum pra receber ajuda. Se eu tiver ofendido alguem me desculpem, não tive intenção de ofender ninguém. id=quote>id=quote>rsssss Q nada Diógenes foi só para descontrair Com certeza todos iremos ajudar caso esteja a nosso alcançe ainda mais vc sendo discipulo de meu amigo Elias Marcelo Ferro Petrópolis - Rj Fwh9.01/xHarbour 1.1.0 Simplex /SqlLib /xMate/WSe Pelles Quote Link to comment Share on other sites More sharing options...
Diógenes Posted June 17, 2009 Author Report Share Posted June 17, 2009 Vou testar, obrigado a todos pela atenção vou postar o resultado do teste.... Quote Link to comment Share on other sites More sharing options...
sambomb Posted June 17, 2009 Report Share Posted June 17, 2009 "ACHO" que o que nosso amigo Kapiaba e Marcelo pretendiam dizer é que por vc ser novo por aqui seria de bom grado se apresentar primeiro antes de questionar suas dúvidas, questão de etiqueta apenas... como pode perceber vc já recebeu uma reposta para sua dúvida independentemente se você se apresentou ou se foi "cordial" em seu tópico... E não interprete o Kapiaba como um arrogante, e sim como um curioso faz mais a cara dele Espero ter conseguido esclarecer o ponto de vista deles pelo pouco que os conheço MSN: samirid=red>abreuid=black>@hotmail.com Skype: Samirid=red>Abreuid=black> xHarbour 1.1.0 + FwXh 8.02 Quote Link to comment Share on other sites More sharing options...
kapiaba Posted June 17, 2009 Report Share Posted June 17, 2009 citação:"ACHO" que o que nosso amigo Kapiaba e Marcelo pretendiam dizer é que por vc ser novo por aqui seria de bom grado se apresentar primeiro antes de questionar suas dúvidas, questão de etiqueta apenas... como pode perceber vc já recebeu uma reposta para sua dúvida independentemente se você se apresentou ou se foi "cordial" em seu tópico... E não interprete o Kapiaba como um arrogante, e sim como um curioso faz mais a cara dele Espero ter conseguido esclarecer o ponto de vista deles pelo pouco que os conheço MSN: samirid=red>abreuid=black>@hotmail.com Skype: Samirid=red>Abreuid=black> xHarbour 1.1.0 + FwXh 8.02 id=quote>id=quote>Ô LOKO SAMIR!! PEGOU PESADO!! EU, ARROGANTE??? FALA SÉRIO!! ALIAS, QUEM É VOCE??? KKKKKKKKKKK João Santos - São Paulo. kmt_karinha@pop.com.br kapiaba@brfree.com.br Fone: (11) 3106-2832 FWH 2.7 - xHARBOUR 0.99.61 - WorkShop.Exe Quote Link to comment Share on other sites More sharing options...
gibaf Posted June 17, 2009 Report Share Posted June 17, 2009 se ainda estiver com o problema, simplesmente faca assim, antes da rotina dar o erro: If ValType( NomeDaFuncaoQueEhParaExecutar ) = "UI" //Execute sua funcao. Else //Funcao ainda nao compilada. Endif espero ter ajudado... []'s Gilberto Frohlich - Toledo/PR giba_f@hotmail.com giba_f@yahoo.com.br xHarbour xBuild+Fivewin 2.7+PellesC+(Postgres+DB2) Quote Link to comment Share on other sites More sharing options...
sambomb Posted June 17, 2009 Report Share Posted June 17, 2009 citação: citação:"ACHO" que o que nosso amigo Kapiaba e Marcelo pretendiam dizer é que por vc ser novo por aqui seria de bom grado se apresentar primeiro antes de questionar suas dúvidas, questão de etiqueta apenas... como pode perceber vc já recebeu uma reposta para sua dúvida independentemente se você se apresentou ou se foi "cordial" em seu tópico... E não interprete o Kapiaba como um arrogante, e sim como um curioso faz mais a cara dele Espero ter conseguido esclarecer o ponto de vista deles pelo pouco que os conheço MSN: samirid=red>abreuid=black>@hotmail.com Skype: Samirid=red>Abreuid=black> xHarbour 1.1.0 + FwXh 8.02 id=quote>id=quote>Ô LOKO SAMIR!! PEGOU PESADO!! EU, ARROGANTE??? FALA SÉRIO!! ALIAS, QUEM É VOCE??? KKKKKKKKKKK João Santos - São Paulo. kmt_karinha@pop.com.br kapiaba@brfree.com.br Fone: (11) 3106-2832 FWH 2.7 - xHARBOUR 0.99.61 - WorkShop.Exe id=quote>id=quote>Aprende a ler Kapiaba!!! Falei pra ele NÃO te ACHARid=red> arrogante e sim curioso Obs.: ta desvirtuando o tópico MSN: samirid=red>abreuid=black>@hotmail.com Skype: Samirid=red>Abreuid=black> xHarbour 1.1.0 + FwXh 8.02 Quote Link to comment Share on other sites More sharing options...
kapiaba Posted June 17, 2009 Report Share Posted June 17, 2009 citação: citação: citação:"ACHO" que o que nosso amigo Kapiaba e Marcelo pretendiam dizer é que por vc ser novo por aqui seria de bom grado se apresentar primeiro antes de questionar suas dúvidas, questão de etiqueta apenas... como pode perceber vc já recebeu uma reposta para sua dúvida independentemente se você se apresentou ou se foi "cordial" em seu tópico... E não interprete o Kapiaba como um arrogante, e sim como um curioso faz mais a cara dele Espero ter conseguido esclarecer o ponto de vista deles pelo pouco que os conheço MSN: samirid=red>abreuid=black>@hotmail.com Skype: Samirid=red>Abreuid=black> xHarbour 1.1.0 + FwXh 8.02 id=quote>id=quote>Ô LOKO SAMIR!! PEGOU PESADO!! EU, ARROGANTE??? FALA SÉRIO!! ALIAS, QUEM É VOCE??? KKKKKKKKKKK João Santos - São Paulo. kmt_karinha@pop.com.br kapiaba@brfree.com.br Fone: (11) 3106-2832 FWH 2.7 - xHARBOUR 0.99.61 - WorkShop.Exe id=quote>id=quote>Aprende a ler Kapiaba!!! Falei pra ele NÃO te ACHARid=red> arrogante e sim curioso Obs.: ta desvirtuando o tópico MSN: samirid=red>abreuid=black>@hotmail.com Skype: Samirid=red>Abreuid=black> xHarbour 1.1.0 + FwXh 8.02 id=quote>id=quote>Ô LOKO MEU!! MEU XMOU DE ANARFA!! AAANNNDDEERRSSON?? Dà PRA DAR UM JEITO NESTE CAMARADA?? QUE ABUSADO!! KKKKKK João Santos - São Paulo. kmt_karinha@pop.com.br kapiaba@brfree.com.br Fone: (11) 3106-2832 FWH 2.7 - xHARBOUR 0.99.61 - WorkShop.Exe Quote Link to comment Share on other sites More sharing options...
aferra Posted June 17, 2009 Report Share Posted June 17, 2009 kkkkkkkkkkkkkkkkkkkkkk ELE VOLTOU SAMIR !!!! kkkkkkkkkkkkkkkkkkkkkk Alessandroid=blue> FW20d+CL53b+Blk7+@Say+CDX FW9.02+xHb110+@Say+CDX "O fracasso jamais me surpreenderá, se minha vontade de vencer for suficientemente forte..."id=red> Quote Link to comment Share on other sites More sharing options...
Marca Posted June 17, 2009 Report Share Posted June 17, 2009 citação:kkkkkkkkkkkkkkkkkkkkkk ELE VOLTOU SAMIR !!!! kkkkkkkkkkkkkkkkkkkkkk Alessandroid=blue> FW20d+CL53b+Blk7+@Say+CDX FW9.02+xHb110+@Say+CDX "O fracasso jamais me surpreenderá, se minha vontade de vencer for suficientemente forte..."id=red> id=quote>id=quote>hahahahaha e Pelo visto esta animado Alessandro Marcelo Ferro Petrópolis - Rj Fwh9.01/xHarbour 1.1.0 Simplex /SqlLib /xMate/WSe Pelles Quote Link to comment Share on other sites More sharing options...
ronaldo Posted June 17, 2009 Report Share Posted June 17, 2009 basta vc utilizar qualquer tratamento de erro: try sua funcai catch ? vai entrar aqui se houver erro acima... end Ronaldo Minacapelli (11) 2950 3069 Quote Link to comment Share on other sites More sharing options...
kapiaba Posted June 17, 2009 Report Share Posted June 17, 2009 citação: citação:kkkkkkkkkkkkkkkkkkkkkk ELE VOLTOU SAMIR !!!! kkkkkkkkkkkkkkkkkkkkkk Alessandroid=blue> FW20d+CL53b+Blk7+@Say+CDX FW9.02+xHb110+@Say+CDX "O fracasso jamais me surpreenderá, se minha vontade de vencer for suficientemente forte..."id=red> id=quote>id=quote>hahahahaha e Pelo visto esta animado Alessandro Marcelo Ferro Petrópolis - Rj Fwh9.01/xHarbour 1.1.0 Simplex /SqlLib /xMate/WSe Pelles id=quote>id=quote>KKKKKKKKKKKKKKKK. MARCELO O HOMEM MEU CHAMOU ANARFABETO!! POOODDDYYY??? KKKKKKKKKKKKKKKK. João Santos - São Paulo. kmt_karinha@pop.com.br kapiaba@brfree.com.br Fone: (11) 3106-2832 FWH 2.7 - xHARBOUR 0.99.61 - WorkShop.Exe Quote Link to comment Share on other sites More sharing options...
emotta Posted June 17, 2009 Report Share Posted June 17, 2009 Diógenes, tem uma forma mais simples e sem alterar o errorsys, se for xharbour faça o seguinte: DbSelectArea( "Menu" ) cReport := Trim( Menu->NomeFuncao ) Try Eval( {|| cReport } ) Catch Alert(" Funcao definida errado. "+cReport End Caso seja clipper ou Harbour faça o seguinte: bError:= ERRORBLOCK( {|oError| Break(oError)} ) BEGIN SEQUENCE Eval( {|| cReport } ) Recover oError Alert(" Funcao definida errado. "+cReport End ErrorBlock(bError) // volta normal Abraços, Eduardo Motta EMotta Sistemas 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.