14:26:05.476 - EXCEÇÃO NÃO TRATADA! Erro: 1925 - Mensagem: Unknown member OFILIAL. - Linha: 984 Executando TestUnit: ITEMPEDIDOBASE_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:984 - itempedidobase_unit.testunit022 - 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:06.004 - 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:994 - itempedidobase_unit.testunit022 - 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:994 - itempedidobase_unit.testunit022 - 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:06.015 - 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:994 - itempedidobase_unit.testunit022 - 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:06.022 - 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:994 - itempedidobase_unit.testunit022 - 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:06.037 - 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:994 - itempedidobase_unit.testunit022 - 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:06.053 - 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:994 - itempedidobase_unit.testunit022 - 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:06.061 - 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:994 - itempedidobase_unit.testunit022 - 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:06.068 - 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:994 - itempedidobase_unit.testunit022 - 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:06.072 - 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:994 - itempedidobase_unit.testunit022 - 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:06.078 - EXCEÇÃO NÃO TRATADA! Erro: 9 - Mensagem: Data type mismatch. - Linha: 137 Executando TestUnit: ITEMPEDIDOBASE_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:137 - itempedidobase_unit.definirpropriedadesteste - itempedidobase_unit.prg Linha:996 - itempedidobase_unit.testunit022 - 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:06.085 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 138 Executando TestUnit: ITEMPEDIDOBASE_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:138 - itempedidobase_unit.definirpropriedadesteste - itempedidobase_unit.prg Linha:996 - itempedidobase_unit.testunit022 - 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:06.088 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 139 Executando TestUnit: ITEMPEDIDOBASE_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:139 - itempedidobase_unit.definirpropriedadesteste - itempedidobase_unit.prg Linha:996 - itempedidobase_unit.testunit022 - 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:06.091 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 140 Executando TestUnit: ITEMPEDIDOBASE_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:140 - itempedidobase_unit.definirpropriedadesteste - itempedidobase_unit.prg Linha:996 - itempedidobase_unit.testunit022 - 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:06.094 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 141 Executando TestUnit: ITEMPEDIDOBASE_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:141 - itempedidobase_unit.definirpropriedadesteste - itempedidobase_unit.prg Linha:996 - itempedidobase_unit.testunit022 - 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:06.097 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 142 Executando TestUnit: ITEMPEDIDOBASE_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:142 - itempedidobase_unit.definirpropriedadesteste - itempedidobase_unit.prg Linha:996 - itempedidobase_unit.testunit022 - 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:06.100 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 143 Executando TestUnit: ITEMPEDIDOBASE_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:143 - itempedidobase_unit.definirpropriedadesteste - itempedidobase_unit.prg Linha:996 - itempedidobase_unit.testunit022 - 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:06.103 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 144 Executando TestUnit: ITEMPEDIDOBASE_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:144 - itempedidobase_unit.definirpropriedadesteste - itempedidobase_unit.prg Linha:996 - itempedidobase_unit.testunit022 - 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:06.106 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 145 Executando TestUnit: ITEMPEDIDOBASE_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:145 - itempedidobase_unit.definirpropriedadesteste - itempedidobase_unit.prg Linha:996 - itempedidobase_unit.testunit022 - 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:06.113 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 146 Executando TestUnit: ITEMPEDIDOBASE_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:146 - itempedidobase_unit.definirpropriedadesteste - itempedidobase_unit.prg Linha:996 - itempedidobase_unit.testunit022 - 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:06.120 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 147 Executando TestUnit: ITEMPEDIDOBASE_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:147 - itempedidobase_unit.definirpropriedadesteste - itempedidobase_unit.prg Linha:996 - itempedidobase_unit.testunit022 - 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:06.126 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 148 Executando TestUnit: ITEMPEDIDOBASE_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:148 - itempedidobase_unit.definirpropriedadesteste - itempedidobase_unit.prg Linha:996 - itempedidobase_unit.testunit022 - 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:06.129 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 149 Executando TestUnit: ITEMPEDIDOBASE_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:149 - itempedidobase_unit.definirpropriedadesteste - itempedidobase_unit.prg Linha:996 - itempedidobase_unit.testunit022 - 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:06.132 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 150 Executando TestUnit: ITEMPEDIDOBASE_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:150 - itempedidobase_unit.definirpropriedadesteste - itempedidobase_unit.prg Linha:996 - itempedidobase_unit.testunit022 - 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:06.139 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 151 Executando TestUnit: ITEMPEDIDOBASE_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:151 - itempedidobase_unit.definirpropriedadesteste - itempedidobase_unit.prg Linha:996 - itempedidobase_unit.testunit022 - 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:06.143 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 152 Executando TestUnit: ITEMPEDIDOBASE_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:152 - itempedidobase_unit.definirpropriedadesteste - itempedidobase_unit.prg Linha:996 - itempedidobase_unit.testunit022 - 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:06.146 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 153 Executando TestUnit: ITEMPEDIDOBASE_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:153 - itempedidobase_unit.definirpropriedadesteste - itempedidobase_unit.prg Linha:996 - itempedidobase_unit.testunit022 - 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:06.153 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 154 Executando TestUnit: ITEMPEDIDOBASE_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:154 - itempedidobase_unit.definirpropriedadesteste - itempedidobase_unit.prg Linha:996 - itempedidobase_unit.testunit022 - 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:06.160 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 155 Executando TestUnit: ITEMPEDIDOBASE_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:155 - itempedidobase_unit.definirpropriedadesteste - itempedidobase_unit.prg Linha:996 - itempedidobase_unit.testunit022 - 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:06.166 - EXCEÇÃO NÃO TRATADA! Erro: 1939 - Mensagem: WITH/ENDWITH mismatch. - Linha: 156 Executando TestUnit: ITEMPEDIDOBASE_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:156 - itempedidobase_unit.definirpropriedadesteste - itempedidobase_unit.prg Linha:996 - itempedidobase_unit.testunit022 - 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:06.169 - EXCEÇÃO NÃO TRATADA! Erro: 1924 Mesagem: LOITEMPEDIDO is not an object. Local: testunit022 Linha: 998 Conteúdo: llOK = (loItemPedido.DefinirEntregaPosterior(1) AND loItemPedido.ObterEntregaPosterior()==1) Detalhes: LOITEMPEDIDO Executando TestUnit: ITEMPEDIDOBASE_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:1003 - itempedidobase_unit.testunit022 - 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:06.172 - EXCEÇÃO NÃO TRATADA! Erro: 1924 Mesagem: LOITEMPEDIDO is not an object. Local: testunit022 Linha: 1005 Conteúdo: llOk = loItemPedido.DefinirEntregaPosterior(0) AND loItemPedido.ObterEntregaPosterior()==0 Detalhes: LOITEMPEDIDO Executando TestUnit: ITEMPEDIDOBASE_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:1010 - itempedidobase_unit.testunit022 - itempedidobase_unit.prg Linha:236 - itempedidobase_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro()