14:26:11.793 - 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:71 - itempedidobase_unit._criaritempedido - itempedidobase_unit.prg Linha:1205 - itempedidobase_unit.testunit027 - itempedidobase_unit.prg Linha:236 - itempedidobase_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Conteúdo: SET PROCEDURE TO &lcFxp ADDITIVE Executando TestUnit: ITEMPEDIDOBASE_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:1588 - orcamentovenda.limparlogerro - orcamentovenda.prg Linha:71 - itempedidobase_unit._criaritempedido - itempedidobase_unit.prg Linha:1205 - itempedidobase_unit.testunit027 - itempedidobase_unit.prg Linha:236 - itempedidobase_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:26:11.796 - EXCEÇÃO NÃO TRATADA! Erro: 1992 - Mensagem: OVENDEDOR is not a function, procedure or program. - Linha: 79 Executando TestUnit: ITEMPEDIDOBASE_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:79 - itempedidobase_unit._criaritempedido - itempedidobase_unit.prg Linha:1205 - itempedidobase_unit.testunit027 - itempedidobase_unit.prg Linha:236 - itempedidobase_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:26:11.803 - EXCEÇÃO NÃO TRATADA! Erro: 1925 - Mensagem: Unknown member OFILIAL. - Linha: 87 Executando TestUnit: ITEMPEDIDOBASE_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:87 - itempedidobase_unit._criaritempedido - itempedidobase_unit.prg Linha:1205 - itempedidobase_unit.testunit027 - itempedidobase_unit.prg Linha:236 - itempedidobase_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:26:11.826 - EXCEÇÃO NÃO TRATADA! Erro: 1925 Mesagem: Unknown member OTPO. Local: definirtpoporhierarquianumero Linha: 10493 Conteúdo: lcHierarquiaTpOAtual = THIS.oTpO.ObterHierarquiaNumero() Detalhes: OTPO Executando TestUnit: ITEMPEDIDOBASE_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:10510 - orcamentovenda.definirtpoporhierarquianumero - orcamentobase.prg Linha:90 - itempedidobase_unit._criaritempedido - itempedidobase_unit.prg Linha:1205 - itempedidobase_unit.testunit027 - itempedidobase_unit.prg Linha:236 - itempedidobase_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:26:11.833 - 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: ITEMPEDIDOBASE_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:3436 - orcamentovenda.definircliente - orcamentovenda.prg Linha:91 - itempedidobase_unit._criaritempedido - itempedidobase_unit.prg Linha:1205 - itempedidobase_unit.testunit027 - itempedidobase_unit.prg Linha:236 - itempedidobase_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:26:11.836 - EXCEÇÃO NÃO TRATADA! Erro: 1925 - Mensagem: Unknown member OPARCELAMENTO. - Linha: 95 Executando TestUnit: ITEMPEDIDOBASE_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:95 - itempedidobase_unit._criaritempedido - itempedidobase_unit.prg Linha:1205 - itempedidobase_unit.testunit027 - itempedidobase_unit.prg Linha:236 - itempedidobase_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:26:11.839 - EXCEÇÃO NÃO TRATADA! Erro: 1925 - Mensagem: Unknown member OPARCELAMENTO. - Linha: 96 Executando TestUnit: ITEMPEDIDOBASE_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:96 - itempedidobase_unit._criaritempedido - itempedidobase_unit.prg Linha:1205 - itempedidobase_unit.testunit027 - itempedidobase_unit.prg Linha:236 - itempedidobase_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:26:11.842 - EXCEÇÃO NÃO TRATADA! Erro: 1925 - Mensagem: Unknown member OITENS. - Linha: 101 Executando TestUnit: ITEMPEDIDOBASE_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:101 - itempedidobase_unit._criaritempedido - itempedidobase_unit.prg Linha:1205 - itempedidobase_unit.testunit027 - itempedidobase_unit.prg Linha:236 - itempedidobase_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:26:11.845 - EXCEÇÃO NÃO TRATADA! Erro: 1924 Mesagem: LOITEMPEDIDO is not an object. Local: testunit027 Linha: 1208 Conteúdo: loItemPedido.DefinirProduto('T0001') Detalhes: LOITEMPEDIDO Executando TestUnit: ITEMPEDIDOBASE_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:1211 - itempedidobase_unit.testunit027 - itempedidobase_unit.prg Linha:236 - itempedidobase_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:26:11.848 - EXCEÇÃO NÃO TRATADA! Erro: 1924 Mesagem: LOITEMPEDIDO is not an object. Local: testunit027 Linha: 1208 Conteúdo: loItemPedido.DefinirProduto('T0001') Detalhes: LOITEMPEDIDO Executando TestUnit: ITEMPEDIDOBASE_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:1212 - itempedidobase_unit.testunit027 - itempedidobase_unit.prg Linha:236 - itempedidobase_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:26:11.934 - EXCEÇÃO NÃO TRATADA! Erro: 1924 Mesagem: LOITEMPEDIDO is not an object. Local: testunit027 Linha: 1208 Conteúdo: loItemPedido.DefinirProduto('T0001') Detalhes: LOITEMPEDIDO Executando TestUnit: ITEMPEDIDOBASE_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:991 - itempedidobase.limparlogerro - itempedidobase.prg Linha:1213 - itempedidobase_unit.testunit027 - itempedidobase_unit.prg Linha:236 - itempedidobase_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro()