14:19:41.426 - 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:74 - reservalotedb_unit.testunit1 - reservalotedb_unit.prg Linha:236 - reservalotedb_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Conteúdo: SET PROCEDURE TO &lcFxp ADDITIVE Executando TestUnit: RESERVALOTEDB_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:70 - construtor.criar - construtor.prg Linha:74 - reservalotedb_unit.testunit1 - reservalotedb_unit.prg Linha:236 - reservalotedb_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:19:41.437 - EXCEÇÃO NÃO TRATADA! Erro: 9 - Mensagem: Data type mismatch. - Linha: 39 Executando TestUnit: RESERVALOTEDB_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:39 - reservalotedb_unit.definirpropriedadesteste - reservalotedb_unit.prg Linha:75 - reservalotedb_unit.testunit1 - reservalotedb_unit.prg Linha:236 - reservalotedb_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:19:41.445 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 40 Executando TestUnit: RESERVALOTEDB_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:40 - reservalotedb_unit.definirpropriedadesteste - reservalotedb_unit.prg Linha:75 - reservalotedb_unit.testunit1 - reservalotedb_unit.prg Linha:236 - reservalotedb_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:19:41.448 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 42 Executando TestUnit: RESERVALOTEDB_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:42 - reservalotedb_unit.definirpropriedadesteste - reservalotedb_unit.prg Linha:75 - reservalotedb_unit.testunit1 - reservalotedb_unit.prg Linha:236 - reservalotedb_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:19:41.451 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 43 Executando TestUnit: RESERVALOTEDB_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:43 - reservalotedb_unit.definirpropriedadesteste - reservalotedb_unit.prg Linha:75 - reservalotedb_unit.testunit1 - reservalotedb_unit.prg Linha:236 - reservalotedb_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:19:41.454 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 44 Executando TestUnit: RESERVALOTEDB_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:44 - reservalotedb_unit.definirpropriedadesteste - reservalotedb_unit.prg Linha:75 - reservalotedb_unit.testunit1 - reservalotedb_unit.prg Linha:236 - reservalotedb_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:19:41.456 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 45 Executando TestUnit: RESERVALOTEDB_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:45 - reservalotedb_unit.definirpropriedadesteste - reservalotedb_unit.prg Linha:75 - reservalotedb_unit.testunit1 - reservalotedb_unit.prg Linha:236 - reservalotedb_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:19:41.459 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 46 Executando TestUnit: RESERVALOTEDB_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:46 - reservalotedb_unit.definirpropriedadesteste - reservalotedb_unit.prg Linha:75 - reservalotedb_unit.testunit1 - reservalotedb_unit.prg Linha:236 - reservalotedb_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:19:41.462 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 47 Executando TestUnit: RESERVALOTEDB_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:47 - reservalotedb_unit.definirpropriedadesteste - reservalotedb_unit.prg Linha:75 - reservalotedb_unit.testunit1 - reservalotedb_unit.prg Linha:236 - reservalotedb_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:19:41.465 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 48 Executando TestUnit: RESERVALOTEDB_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:48 - reservalotedb_unit.definirpropriedadesteste - reservalotedb_unit.prg Linha:75 - reservalotedb_unit.testunit1 - reservalotedb_unit.prg Linha:236 - reservalotedb_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:19:41.471 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 49 Executando TestUnit: RESERVALOTEDB_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:49 - reservalotedb_unit.definirpropriedadesteste - reservalotedb_unit.prg Linha:75 - reservalotedb_unit.testunit1 - reservalotedb_unit.prg Linha:236 - reservalotedb_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:19:41.477 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 50 Executando TestUnit: RESERVALOTEDB_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:50 - reservalotedb_unit.definirpropriedadesteste - reservalotedb_unit.prg Linha:75 - reservalotedb_unit.testunit1 - reservalotedb_unit.prg Linha:236 - reservalotedb_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:19:41.483 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 51 Executando TestUnit: RESERVALOTEDB_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:51 - reservalotedb_unit.definirpropriedadesteste - reservalotedb_unit.prg Linha:75 - reservalotedb_unit.testunit1 - reservalotedb_unit.prg Linha:236 - reservalotedb_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:19:41.487 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 52 Executando TestUnit: RESERVALOTEDB_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:52 - reservalotedb_unit.definirpropriedadesteste - reservalotedb_unit.prg Linha:75 - reservalotedb_unit.testunit1 - reservalotedb_unit.prg Linha:236 - reservalotedb_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:19:41.489 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 53 Executando TestUnit: RESERVALOTEDB_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:53 - reservalotedb_unit.definirpropriedadesteste - reservalotedb_unit.prg Linha:75 - reservalotedb_unit.testunit1 - reservalotedb_unit.prg Linha:236 - reservalotedb_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:19:41.492 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 54 Executando TestUnit: RESERVALOTEDB_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:54 - reservalotedb_unit.definirpropriedadesteste - reservalotedb_unit.prg Linha:75 - reservalotedb_unit.testunit1 - reservalotedb_unit.prg Linha:236 - reservalotedb_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:19:41.494 - EXCEÇÃO NÃO TRATADA! Erro: 1940 - Mensagem: Expression is not valid outside of WITH/ENDWITH. - Linha: 55 Executando TestUnit: RESERVALOTEDB_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:55 - reservalotedb_unit.definirpropriedadesteste - reservalotedb_unit.prg Linha:75 - reservalotedb_unit.testunit1 - reservalotedb_unit.prg Linha:236 - reservalotedb_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 14:19:41.497 - EXCEÇÃO NÃO TRATADA! Erro: 1939 - Mensagem: WITH/ENDWITH mismatch. - Linha: 56 Executando TestUnit: RESERVALOTEDB_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:56 - reservalotedb_unit.definirpropriedadesteste - reservalotedb_unit.prg Linha:75 - reservalotedb_unit.testunit1 - reservalotedb_unit.prg Linha:236 - reservalotedb_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro()