10:23:29.495 - EXCEÇÃO NÃO TRATADA! Erro: 2059 - Mensagem: Unhandled Structured Exception. ErrorNo: 2071 Message: User Thrown Error . UserValue: (Object) Details: Procedure: _tratarexcecao LineNo: 2225 - Linha: 1475 Executando TestUnit: ORCAMENTOVENDA_UNIT.PRG Linha:417 - ON... - ctrlib.prg Linha:1475 - itenspedidovenda._adicionarproduto - itenspedidovenda.prg Linha:1280 - itenspedidovenda.adicionar - itenspedidovenda.prg Linha:6979 - orcamentovenda_unit.testunit105 - orcamentovenda_unit.prg Linha:236 - orcamentovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 10:23:32.454 - EXCEÇÃO NÃO TRATADA! Erro: 4000 Classe: Excecaousuario Mesagem: Endereço de faturamento não foi definido! Chamadas:Linha:1736 - orcamentobase.gravar - orcamentobase.prg Linha:6064 - orcamentovenda.gravar - orcamentovenda.prg Linha:6982 - orcamentovenda_unit.testunit105 - orcamentovenda_unit.prg Linha:236 - orcamentovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Conteúdo: THIS._RetornarMensagem( THIS.LogUsuario ) llOk = DODEFAULT( ) THIS.oObjetoTeste.gravar() llTestOk = EVALUATE(lcTeste) loTestUnit.ExecutarTeste(@laLstTestesParaExecutar) Executando TestUnit: ORCAMENTOVENDA_UNIT.PRG Linha:417 - ON... - ctrlib.prg Linha:6995 - orcamentovenda_unit.testunit105 - orcamentovenda_unit.prg Linha:236 - orcamentovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 10:23:35.050 - EXCEÇÃO NÃO TRATADA! Erro: 4000 Classe: Excecaousuario Mesagem: Endereço de faturamento não foi definido! Chamadas:Linha:1736 - orcamentobase.gravar - orcamentobase.prg Linha:6064 - orcamentovenda.gravar - orcamentovenda.prg Linha:7008 - orcamentovenda_unit.testunit105 - orcamentovenda_unit.prg Linha:236 - orcamentovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Conteúdo: THIS._RetornarMensagem( THIS.LogUsuario ) llOk = DODEFAULT( ) THIS.oObjetoTeste.gravar() llTestOk = EVALUATE(lcTeste) loTestUnit.ExecutarTeste(@laLstTestesParaExecutar) Executando TestUnit: ORCAMENTOVENDA_UNIT.PRG Linha:417 - ON... - ctrlib.prg Linha:7021 - orcamentovenda_unit.testunit105 - orcamentovenda_unit.prg Linha:236 - orcamentovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 10:23:37.475 - EXCEÇÃO NÃO TRATADA! Erro: 4000 Classe: Excecaousuario Mesagem: Endereço de faturamento não foi definido! Chamadas:Linha:1736 - orcamentobase.gravar - orcamentobase.prg Linha:6064 - orcamentovenda.gravar - orcamentovenda.prg Linha:7008 - orcamentovenda_unit.testunit105 - orcamentovenda_unit.prg Linha:236 - orcamentovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Conteúdo: THIS._RetornarMensagem( THIS.LogUsuario ) llOk = DODEFAULT( ) THIS.oObjetoTeste.gravar() llTestOk = EVALUATE(lcTeste) loTestUnit.ExecutarTeste(@laLstTestesParaExecutar) Executando TestUnit: ORCAMENTOVENDA_UNIT.PRG Linha:417 - ON... - ctrlib.prg Linha:5418 - itempedidovenda.ctipoentrega_assign - itempedidobase.prg Linha:7024 - orcamentovenda_unit.testunit105 - orcamentovenda_unit.prg Linha:236 - orcamentovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 10:23:40.033 - EXCEÇÃO NÃO TRATADA! Erro: 4000 Classe: Excecaousuario Mesagem: Endereço de faturamento não foi definido! Tipo de frete definido como "Sem frete" mas o valor foi informado Chamadas:Linha:1736 - orcamentobase.gravar - orcamentobase.prg Linha:6064 - orcamentovenda.gravar - orcamentovenda.prg Linha:7033 - orcamentovenda_unit.testunit105 - orcamentovenda_unit.prg Linha:236 - orcamentovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Conteúdo: THIS._RetornarMensagem( THIS.LogUsuario ) llOk = DODEFAULT( ) THIS.oObjetoTeste.gravar() llTestOk = EVALUATE(lcTeste) loTestUnit.ExecutarTeste(@laLstTestesParaExecutar) Executando TestUnit: ORCAMENTOVENDA_UNIT.PRG Linha:417 - ON... - ctrlib.prg Linha:7046 - orcamentovenda_unit.testunit105 - orcamentovenda_unit.prg Linha:236 - orcamentovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 10:23:42.368 - EXCEÇÃO NÃO TRATADA! Erro: 4000 Classe: Excecaousuario Mesagem: Endereço de faturamento não foi definido! Tipo de frete definido como "Sem frete" mas o valor foi informado Chamadas:Linha:1736 - orcamentobase.gravar - orcamentobase.prg Linha:6064 - orcamentovenda.gravar - orcamentovenda.prg Linha:7056 - orcamentovenda_unit.testunit105 - orcamentovenda_unit.prg Linha:236 - orcamentovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Conteúdo: THIS._RetornarMensagem( THIS.LogUsuario ) llOk = DODEFAULT( ) THIS.oObjetoTeste.gravar() llTestOk = EVALUATE(lcTeste) loTestUnit.ExecutarTeste(@laLstTestesParaExecutar) Executando TestUnit: ORCAMENTOVENDA_UNIT.PRG Linha:417 - ON... - ctrlib.prg Linha:7067 - orcamentovenda_unit.testunit105 - orcamentovenda_unit.prg Linha:236 - orcamentovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 10:23:42.368 - EXCEÇÃO NÃO TRATADA! Erro: 4000 Classe: Excecaousuario Mesagem: Endereço de faturamento não foi definido! Tipo de frete definido como "Sem frete" mas o valor foi informado Chamadas:Linha:1736 - orcamentobase.gravar - orcamentobase.prg Linha:6064 - orcamentovenda.gravar - orcamentovenda.prg Linha:7056 - orcamentovenda_unit.testunit105 - orcamentovenda_unit.prg Linha:236 - orcamentovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Conteúdo: THIS._RetornarMensagem( THIS.LogUsuario ) llOk = DODEFAULT( ) THIS.oObjetoTeste.gravar() llTestOk = EVALUATE(lcTeste) loTestUnit.ExecutarTeste(@laLstTestesParaExecutar) Executando TestUnit: ORCAMENTOVENDA_UNIT.PRG Linha:417 - ON... - ctrlib.prg Linha:7070 - orcamentovenda_unit.testunit105 - orcamentovenda_unit.prg Linha:236 - orcamentovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro()