14:27:26.205 - EXCEÇÃO NÃO TRATADA! Erro: 7000 Classe: Excecaoprograma Mesagem: File cannot be closed because outstanding references exist. Chamadas:Linha:99 - construtor.adicionarsetprocedure - construtor.prg Linha:53 - construtor.criar - construtor.prg Linha:5020 - orcamentobase._opedidovendadb_access - orcamentobase.prg Linha:535 - orcamentovenda._opedidovendadb_access - orcamentovenda.prg Linha:834 - orcamentovenda._limparlogerro - orcamentobase.prg Linha:819 - orcamentobase.limparlogerro - orcamentobase.prg Linha:249 - orcamentosaidasbase.limparlogerro - orcamentosaidasbase.prg Linha:1580 - orcamentovenda.limparlogerro - orcamentovenda.prg Linha:53 - itenspedidovenda_unit._criarorcamento - itenspedidovenda_unit.prg Linha:2323 - itenspedidovenda_unit.testunit053 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Conteúdo: SET PROCEDURE TO &lcFxp ADDITIVE Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:1588 - orcamentovenda.limparlogerro - orcamentovenda.prg Linha:53 - itenspedidovenda_unit._criarorcamento - itenspedidovenda_unit.prg Linha:2323 - itenspedidovenda_unit.testunit053 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:27:26.212 - EXCEÇÃO NÃO TRATADA! Erro: 1925 Mesagem: Unknown member OCLIENTE. Local: definircliente Linha: 3407 Conteúdo: llModouCliente = tnOidCliente != THIS.oCliente.ObterOid() Detalhes: OCLIENTE Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:3436 - orcamentovenda.definircliente - orcamentovenda.prg Linha:57 - itenspedidovenda_unit._criarorcamento - itenspedidovenda_unit.prg Linha:2323 - itenspedidovenda_unit.testunit053 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:27:26.215 - EXCEÇÃO NÃO TRATADA! Erro: 1992 - Mensagem: OVENDEDOR is not a function, procedure or program. - Linha: 58 Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:58 - itenspedidovenda_unit._criarorcamento - itenspedidovenda_unit.prg Linha:2323 - itenspedidovenda_unit.testunit053 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:27:26.225 - EXCEÇÃO NÃO TRATADA! Erro: 1925 Mesagem: Unknown member OTPO. Local: definirtpoporoid Linha: 10460 Conteúdo: lnOidTpOAtual = THIS.oTpO.ObterOid() Detalhes: OTPO Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:10477 - orcamentovenda.definirtpoporoid - orcamentobase.prg Linha:59 - itenspedidovenda_unit._criarorcamento - itenspedidovenda_unit.prg Linha:2323 - itenspedidovenda_unit.testunit053 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:27:26.228 - EXCEÇÃO NÃO TRATADA! Erro: 1925 - Mensagem: Unknown member OFILIAL. - Linha: 61 Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:61 - itenspedidovenda_unit._criarorcamento - itenspedidovenda_unit.prg Linha:2323 - itenspedidovenda_unit.testunit053 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:27:26.232 - EXCEÇÃO NÃO TRATADA! Erro: 1925 - Mensagem: Unknown member OPARCELAMENTO. - Linha: 65 Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:65 - itenspedidovenda_unit._criarorcamento - itenspedidovenda_unit.prg Linha:2323 - itenspedidovenda_unit.testunit053 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:27:26.234 - EXCEÇÃO NÃO TRATADA! Erro: 1925 - Mensagem: Unknown member OPARCELAMENTO. - Linha: 66 Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:66 - itenspedidovenda_unit._criarorcamento - itenspedidovenda_unit.prg Linha:2323 - itenspedidovenda_unit.testunit053 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:27:26.237 - EXCEÇÃO NÃO TRATADA! Erro: 1925 - Mensagem: Unknown member OITENS. - Linha: 67 Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:67 - itenspedidovenda_unit._criarorcamento - itenspedidovenda_unit.prg Linha:2323 - itenspedidovenda_unit.testunit053 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:27:26.279 - EXCEÇÃO NÃO TRATADA! Erro: 1925 - Mensagem: Unknown member OITENS. - Linha: 2330 Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:2330 - itenspedidovenda_unit.testunit053 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:27:26.283 - EXCEÇÃO NÃO TRATADA! Erro: 9 - Mensagem: Data type mismatch. - Linha: 77 Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:77 - itenspedidovenda_unit._configuraritempedido - itenspedidovenda_unit.prg Linha:2331 - itenspedidovenda_unit.testunit053 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:27:26.287 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 78 Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:78 - itenspedidovenda_unit._configuraritempedido - itenspedidovenda_unit.prg Linha:2331 - itenspedidovenda_unit.testunit053 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:27:26.291 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 79 Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:79 - itenspedidovenda_unit._configuraritempedido - itenspedidovenda_unit.prg Linha:2331 - itenspedidovenda_unit.testunit053 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:27:26.295 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 80 Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:80 - itenspedidovenda_unit._configuraritempedido - itenspedidovenda_unit.prg Linha:2331 - itenspedidovenda_unit.testunit053 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:27:26.298 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 82 Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:82 - itenspedidovenda_unit._configuraritempedido - itenspedidovenda_unit.prg Linha:2331 - itenspedidovenda_unit.testunit053 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:27:26.302 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 87 Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:87 - itenspedidovenda_unit._configuraritempedido - itenspedidovenda_unit.prg Linha:2331 - itenspedidovenda_unit.testunit053 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:27:26.309 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 90 Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:90 - itenspedidovenda_unit._configuraritempedido - itenspedidovenda_unit.prg Linha:2331 - itenspedidovenda_unit.testunit053 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:27:26.317 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 92 Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:92 - itenspedidovenda_unit._configuraritempedido - itenspedidovenda_unit.prg Linha:2331 - itenspedidovenda_unit.testunit053 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:27:26.323 - EXCEÇÃO NÃO TRATADA! Erro: 1939 - Mensagem: WITH/ENDWITH mismatch. - Linha: 93 Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:93 - itenspedidovenda_unit._configuraritempedido - itenspedidovenda_unit.prg Linha:2331 - itenspedidovenda_unit.testunit053 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:27:26.327 - EXCEÇÃO NÃO TRATADA! Erro: 1925 - Mensagem: Unknown member OITENS. - Linha: 2332 Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:2332 - itenspedidovenda_unit.testunit053 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:27:26.330 - EXCEÇÃO NÃO TRATADA! Erro: 9 - Mensagem: Data type mismatch. - Linha: 77 Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:77 - itenspedidovenda_unit._configuraritempedido - itenspedidovenda_unit.prg Linha:2333 - itenspedidovenda_unit.testunit053 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:27:26.333 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 78 Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:78 - itenspedidovenda_unit._configuraritempedido - itenspedidovenda_unit.prg Linha:2333 - itenspedidovenda_unit.testunit053 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:27:26.336 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 79 Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:79 - itenspedidovenda_unit._configuraritempedido - itenspedidovenda_unit.prg Linha:2333 - itenspedidovenda_unit.testunit053 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:27:26.339 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 80 Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:80 - itenspedidovenda_unit._configuraritempedido - itenspedidovenda_unit.prg Linha:2333 - itenspedidovenda_unit.testunit053 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:27:26.342 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 82 Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:82 - itenspedidovenda_unit._configuraritempedido - itenspedidovenda_unit.prg Linha:2333 - itenspedidovenda_unit.testunit053 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:27:26.345 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 87 Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:87 - itenspedidovenda_unit._configuraritempedido - itenspedidovenda_unit.prg Linha:2333 - itenspedidovenda_unit.testunit053 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:27:26.348 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 90 Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:90 - itenspedidovenda_unit._configuraritempedido - itenspedidovenda_unit.prg Linha:2333 - itenspedidovenda_unit.testunit053 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:27:26.351 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 92 Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:92 - itenspedidovenda_unit._configuraritempedido - itenspedidovenda_unit.prg Linha:2333 - itenspedidovenda_unit.testunit053 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:27:26.354 - EXCEÇÃO NÃO TRATADA! Erro: 1939 - Mensagem: WITH/ENDWITH mismatch. - Linha: 93 Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:93 - itenspedidovenda_unit._configuraritempedido - itenspedidovenda_unit.prg Linha:2333 - itenspedidovenda_unit.testunit053 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:27:26.356 - EXCEÇÃO NÃO TRATADA! Erro: 1925 - Mensagem: Unknown member OITENS. - Linha: 2335 Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:2335 - itenspedidovenda_unit.testunit053 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:27:26.359 - EXCEÇÃO NÃO TRATADA! Erro: 1925 - Mensagem: Unknown member OITENS. - Linha: 2337 Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:2337 - itenspedidovenda_unit.testunit053 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:27:26.366 - EXCEÇÃO NÃO TRATADA! Erro: 1924 - Mensagem: LOITEMPEDIDO3 is not an object. - Linha: 2340 Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:2340 - itenspedidovenda_unit.testunit053 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro()