09:29:12.953 - EXCEÇÃO NÃO TRATADA! Erro: 7000 Classe: Excecaoprograma Mesagem: LOITEMPEDIDO is not an object. Chamadas:Linha:2355 - descontoorcamento.calcularvalordescontoitens - descontoorcamento.prg Linha:1820 - descontoorcamento._atualizardescontogeral - descontoorcamento.prg Linha:3082 - descontoorcamento.executarnotificacao - descontoorcamento.prg Linha:102 - observadororcamento._notificaralteracao - observador.prg Linha:208 - observadororcamento._identificartarefas - observadororcamento.prg Linha:125 - observadororcamento.atualizar - observador.prg Linha:1552 - custommu._notificarobservador - custommu.prg Linha:313 - itempedidovenda._notificarobservador - negociobase.prg Linha:4578 - itempedidovenda.npreco_assign - itempedidobase.prg Linha:2608 - itempedidovenda._aplicarprecoobtido - itempedidobase.prg Linha:2509 - itempedidovenda._buscarpreco - itempedidobase.prg Linha:1979 - itempedidovenda.definirproduto - itempedidobase.prg Linha:78 - itenspedidovenda_unit._configuraritempedido - itenspedidovenda_unit.prg Linha:478 - itenspedidovenda_unit.testunit011 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Conteúdo: IF (ISNULL(loItemPedido) OR ISNULL(loItemPedido.oProduto) ) Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:417 - ON... - ctrlib.prg Linha:2079 - itempedidovenda.definirproduto - itempedidobase.prg Linha:78 - itenspedidovenda_unit._configuraritempedido - itenspedidovenda_unit.prg Linha:478 - itenspedidovenda_unit.testunit011 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 09:29:12.005 - EXCEÇÃO NÃO TRATADA! Erro: 7000 Classe: Excecaoprograma Mesagem: LOITEM is not an object. Chamadas:Linha:912 - itempedidovenda._tratarexcecao - itempedidobase.prg Linha:4223 - itempedidovenda.alterarquantidade - itempedidobase.prg Linha:4061 - itempedidovenda.nquantidade_assign - itempedidobase.prg Linha:79 - itenspedidovenda_unit._configuraritempedido - itenspedidovenda_unit.prg Linha:478 - itenspedidovenda_unit.testunit011 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Conteúdo: IF loItem.oproduto.ObterIdProduto() == tcCodigoProduto AND loItem.ObterIdObjeto() != tnIdObjetoSolicitante AND tcCodigoFilialRetirada == loItem.ObterFilialRetirada() Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:417 - ON... - ctrlib.prg Linha:4083 - itempedidovenda.nquantidade_assign - itempedidobase.prg Linha:79 - itenspedidovenda_unit._configuraritempedido - itenspedidovenda_unit.prg Linha:478 - itenspedidovenda_unit.testunit011 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 09:29:12.038 - EXCEÇÃO NÃO TRATADA! Erro: 4000 Classe: Excecaousuario Mesagem: LOITEM is not an object. É necessário informar o produto antes de definir o tipo de entrega. Chamadas:Linha:906 - itempedidovenda._retornarmensagem - itempedidobase.prg Linha:844 - itempedidovenda._retornarerro - custommu.prg Linha:5212 - itempedidovenda.ctipoentrega_assign - itempedidobase.prg Linha:82 - itenspedidovenda_unit._configuraritempedido - itenspedidovenda_unit.prg Linha:478 - itenspedidovenda_unit.testunit011 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Conteúdo: DODEFAULT(tcLogUsuario, tcCodigoExcecao ) THIS._RetornarMensagem(tcLog, tcCodigoExcecao ) THIS._RetornarErro('É necessário informar o produto antes de definir o tipo de entrega.') .cTipoEntrega = tcTipoEntrega THIS._ConfigurarItemPedido(loItemPedido, '37651', 15.00, 'PC', 6.00, 'F', '', tdEntregaMarcada+4 , 'M' ) Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:417 - ON... - ctrlib.prg Linha:5418 - itempedidovenda.ctipoentrega_assign - itempedidobase.prg Linha:82 - itenspedidovenda_unit._configuraritempedido - itenspedidovenda_unit.prg Linha:478 - itenspedidovenda_unit.testunit011 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 09:29:12.038 - EXCEÇÃO NÃO TRATADA! Erro: 4000 Classe: Excecaousuario Mesagem: LOITEM is not an object. É necessário informar o produto antes de definir o tipo de entrega. É necessário informar o produto antes de definir o preço. Chamadas:Linha:906 - itempedidovenda._retornarmensagem - itempedidobase.prg Linha:844 - itempedidovenda._retornarerro - custommu.prg Linha:5068 - itempedidovenda.cturnoentrega_assign - itempedidobase.prg Linha:87 - itenspedidovenda_unit._configuraritempedido - itenspedidovenda_unit.prg Linha:478 - itenspedidovenda_unit.testunit011 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Conteúdo: DODEFAULT(tcLogUsuario, tcCodigoExcecao ) THIS._RetornarMensagem(tcLog, tcCodigoExcecao ) THIS._RetornarErro('É necessário informar o produto antes de definir o preço.') .cTurnoEntrega = tcTurno THIS._ConfigurarItemPedido(loItemPedido, '37651', 15.00, 'PC', 6.00, 'F', '', tdEntregaMarcada+4 , 'M' ) Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:417 - ON... - ctrlib.prg Linha:5096 - itempedidovenda.cturnoentrega_assign - itempedidobase.prg Linha:87 - itenspedidovenda_unit._configuraritempedido - itenspedidovenda_unit.prg Linha:478 - itenspedidovenda_unit.testunit011 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 09:29:12.054 - EXCEÇÃO NÃO TRATADA! Erro: 5000 Classe: Excecaonegocio Mesagem: LOITEM is not an object. É necessário informar o produto antes de definir o tipo de entrega. É necessário informar o produto antes de definir o preço. Classe: Itempedidovenda LINHA:849 - ITEMPEDIDOVENDA._RETORNARERRO - CUSTOMMU.PRG LINHA:5122 - ITEMPEDIDOVENDA.DENTREGAMARCADA_ASSIGN - ITEMPEDIDOBASE.PRG LINHA:90 - ITENSPEDIDOVENDA_UNIT._CONFIGURARITEMPEDIDO - ITENSPEDIDOVENDA_UNIT.PRG LINHA:478 - ITENSPEDIDOVENDA_UNIT.TESTUNIT011 - ITENSPEDIDOVENDA_UNIT.PRG LINHA:236 - ITENSPEDIDOVENDA_UNIT.EXECUTARTESTE - TESTUNITBASE.PRG LINHA:1431 - EXECUTARTESTEUNITARIOPRG - INICIARTESTEUNITARIO.PRG LINHA:283 - INICIARTESTEUNITARIO - INICIARTESTEUNITARIO.PRG COMANDO: LCNOMEFUNCAO=UPPER(OAGSISTEMA.OBTERFUNCAOERRO()) Chamadas:Linha:5122 - itempedidovenda.dentregamarcada_assign - itempedidobase.prg Linha:90 - itenspedidovenda_unit._configuraritempedido - itenspedidovenda_unit.prg Linha:478 - itenspedidovenda_unit.testunit011 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Conteúdo: THIS._RetornarErro('É necessário informar o produto antes de definir o preço.') .dEntregaMarcada = tdEntregaMarcada THIS._ConfigurarItemPedido(loItemPedido, '37651', 15.00, 'PC', 6.00, 'F', '', tdEntregaMarcada+4 , 'M' ) llTestOk = EVALUATE(lcTeste) loTestUnit.ExecutarTeste(@laLstTestesParaExecutar) Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:417 - ON... - ctrlib.prg Linha:5143 - itempedidovenda.dentregamarcada_assign - itempedidobase.prg Linha:90 - itenspedidovenda_unit._configuraritempedido - itenspedidovenda_unit.prg Linha:478 - itenspedidovenda_unit.testunit011 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 09:29:12.432 - EXCEÇÃO NÃO TRATADA! Erro: 5000 Classe: Excecaonegocio Mesagem: LOITEM is not an object. É necessário informar o produto antes de definir o tipo de entrega. É necessário informar o produto antes de definir o preço. Classe: Itempedidovenda LINHA:849 - ITEMPEDIDOVENDA._RETORNARERRO - CUSTOMMU.PRG LINHA:5122 - ITEMPEDIDOVENDA.DENTREGAMARCADA_ASSIGN - ITEMPEDIDOBASE.PRG LINHA:90 - ITENSPEDIDOVENDA_UNIT._CONFIGURARITEMPEDIDO - ITENSPEDIDOVENDA_UNIT.PRG LINHA:478 - ITENSPEDIDOVENDA_UNIT.TESTUNIT011 - ITENSPEDIDOVENDA_UNIT.PRG LINHA:236 - ITENSPEDIDOVENDA_UNIT.EXECUTARTESTE - TESTUNITBASE.PRG LINHA:1431 - EXECUTARTESTEUNITARIOPRG - INICIARTESTEUNITARIO.PRG LINHA:283 - INICIARTESTEUNITARIO - INICIARTESTEUNITARIO.PRG COMANDO: LCNOMEFUNCAO=UPPER(OAGSISTEMA.OBTERFUNCAOERRO()) Classe: Itempedidovenda LINHA:849 - ITEMPEDIDOVENDA._RETORNARERRO - CUSTOMMU.PRG LINHA:4403 - ITEMPEDIDOVENDA._AUTORIZARALTERACAOPRECO - ITEMPEDIDOBASE.PRG LINHA:4440 - ITEMPEDIDOVENDA.NPRECO_ASSIGN - ITEMPEDIDOBASE.PRG LINHA:92 - ITENSPEDIDOVENDA_UNIT._CONFIGURARITEMPEDIDO - ITENSPEDIDOVENDA_UNIT.PRG LINHA:478 - ITENSPEDIDOVENDA_UNIT.TESTUNIT011 - ITENSPEDIDOVENDA_UNIT.PRG LINHA:236 - ITENSPEDIDOVENDA_UNIT.EXECUTARTESTE - TESTUNITBASE.PRG LINHA:1431 - EXECUTARTESTEUNITARIOPRG - INICIARTESTEUNITARIO.PRG LINHA:283 - INICIARTESTEUNITARIO - INICIARTESTEUNITARIO.PRG COMANDO: LCNOMEFUNCAO=UPPER(OAGSISTEMA.OBTERFUNCAOERRO()) Chamadas:Linha:4403 - itempedidovenda._autorizaralteracaopreco - itempedidobase.prg Linha:4440 - itempedidovenda.npreco_assign - itempedidobase.prg Linha:92 - itenspedidovenda_unit._configuraritempedido - itenspedidovenda_unit.prg Linha:478 - itenspedidovenda_unit.testunit011 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Conteúdo: THIS._RetornarErro('É necessário informar o produto antes de definir o preço.') IF NOT THIS._AutorizarAlteracaoPreco(tAssign, llChamadaExterna ) .nPreco = tnPreco THIS._ConfigurarItemPedido(loItemPedido, '37651', 15.00, 'PC', 6.00, 'F', '', tdEntregaMarcada+4 , 'M' ) llTestOk = EVALUATE(lcTeste) Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:417 - ON... - ctrlib.prg Linha:4590 - itempedidovenda.npreco_assign - itempedidobase.prg Linha:92 - itenspedidovenda_unit._configuraritempedido - itenspedidovenda_unit.prg Linha:478 - itenspedidovenda_unit.testunit011 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 09:29:12.442 - EXCEÇÃO NÃO TRATADA! Erro: 1924 Mesagem: LOITEMPEDIDO is not an object. Local: alterardataentregamarcada Linha: 3716 Conteúdo: IF NOT(loItemPedido.cTipoEntrega == 'C') AND NOT (llTratamentoDiferenciadoDatasPrevistas AND loItemPedido.cTipoEntrega == 'E') AND ( NOT tlSomenteVazios OR EMPTY(loItemPedido.dEntregaMarcada) ) Detalhes: LOITEMPEDIDO Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:417 - ON... - ctrlib.prg Linha:3729 - itenspedidovenda.alterardataentregamarcada - itenspedidovenda.prg Linha:481 - itenspedidovenda_unit.testunit011 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 09:29:12.442 - EXCEÇÃO NÃO TRATADA! Erro: 1924 - Mensagem: LOITEMPEDIDO is not an object. - Linha: 486 Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:417 - ON... - ctrlib.prg Linha:486 - itenspedidovenda_unit.testunit011 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 09:29:12.442 - EXCEÇÃO NÃO TRATADA! Erro: 1924 - Mensagem: LOITEMPEDIDO is not an object. - Linha: 490 Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:417 - ON... - ctrlib.prg Linha:490 - itenspedidovenda_unit.testunit011 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 09:29:12.442 - EXCEÇÃO NÃO TRATADA! Erro: 1924 - Mensagem: LOITEMPEDIDO is not an object. - Linha: 493 Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:417 - ON... - ctrlib.prg Linha:493 - itenspedidovenda_unit.testunit011 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 09:29:12.442 - EXCEÇÃO NÃO TRATADA! Erro: 1924 - Mensagem: LOITEMPEDIDO is not an object. - Linha: 497 Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:417 - ON... - ctrlib.prg Linha:497 - itenspedidovenda_unit.testunit011 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 09:29:12.457 - EXCEÇÃO NÃO TRATADA! Erro: 1924 - Mensagem: LOITEMPEDIDO is not an object. - Linha: 486 Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:417 - ON... - ctrlib.prg Linha:486 - itenspedidovenda_unit.testunit011 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 09:29:12.457 - EXCEÇÃO NÃO TRATADA! Erro: 1924 - Mensagem: LOITEMPEDIDO is not an object. - Linha: 490 Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:417 - ON... - ctrlib.prg Linha:490 - itenspedidovenda_unit.testunit011 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 09:29:12.457 - EXCEÇÃO NÃO TRATADA! Erro: 1924 - Mensagem: LOITEMPEDIDO is not an object. - Linha: 493 Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:417 - ON... - ctrlib.prg Linha:493 - itenspedidovenda_unit.testunit011 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 09:29:12.457 - EXCEÇÃO NÃO TRATADA! Erro: 1924 - Mensagem: LOITEMPEDIDO is not an object. - Linha: 497 Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:417 - ON... - ctrlib.prg Linha:497 - itenspedidovenda_unit.testunit011 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 09:29:12.457 - EXCEÇÃO NÃO TRATADA! Erro: 1924 - Mensagem: LOITEMPEDIDO is not an object. - Linha: 486 Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:417 - ON... - ctrlib.prg Linha:486 - itenspedidovenda_unit.testunit011 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 09:29:12.467 - EXCEÇÃO NÃO TRATADA! Erro: 1924 - Mensagem: LOITEMPEDIDO is not an object. - Linha: 490 Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:417 - ON... - ctrlib.prg Linha:490 - itenspedidovenda_unit.testunit011 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 09:29:12.467 - EXCEÇÃO NÃO TRATADA! Erro: 1924 - Mensagem: LOITEMPEDIDO is not an object. - Linha: 493 Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:417 - ON... - ctrlib.prg Linha:493 - itenspedidovenda_unit.testunit011 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 09:29:12.467 - EXCEÇÃO NÃO TRATADA! Erro: 1924 - Mensagem: LOITEMPEDIDO is not an object. - Linha: 497 Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:417 - ON... - ctrlib.prg Linha:497 - itenspedidovenda_unit.testunit011 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 09:29:12.467 - EXCEÇÃO NÃO TRATADA! Erro: 1924 - Mensagem: LOITEMPEDIDO is not an object. - Linha: 486 Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:417 - ON... - ctrlib.prg Linha:486 - itenspedidovenda_unit.testunit011 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 09:29:12.467 - EXCEÇÃO NÃO TRATADA! Erro: 1924 - Mensagem: LOITEMPEDIDO is not an object. - Linha: 490 Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:417 - ON... - ctrlib.prg Linha:490 - itenspedidovenda_unit.testunit011 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 09:29:12.478 - EXCEÇÃO NÃO TRATADA! Erro: 1924 - Mensagem: LOITEMPEDIDO is not an object. - Linha: 493 Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:417 - ON... - ctrlib.prg Linha:493 - itenspedidovenda_unit.testunit011 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 09:29:12.478 - EXCEÇÃO NÃO TRATADA! Erro: 1924 - Mensagem: LOITEMPEDIDO is not an object. - Linha: 497 Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:417 - ON... - ctrlib.prg Linha:497 - itenspedidovenda_unit.testunit011 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro()