18:02:45.972 - EXCEÇÃO NÃO TRATADA! Erro: 4000 Classe: Excecaousuario Mesagem: A filial de retirada não poderá estar marcada como fechada. Chamadas:Linha:686 - localretirada_centrodistribuicao._validarfilialretirada - localretirada.prg Linha:499 - localretirada.definirfilialretirada - localretirada.prg Linha:36 - localretirada_centrodistribuicao.definirfilialretirada - localretirada_centrodistribuicao.prg Linha:5905 - itempedidovenda._definirlocalretirada - itempedidobase.prg Linha:9681 - itempedidovenda.definirfilialretirada - itempedidobase.prg Linha:998 - encomenda_unit.testunit27 - encomenda_unit.prg Linha:236 - encomenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Conteúdo: THIS._RetornarMensagem('A filial de retirada não poderá estar marcada como fechada.') THIS._ValidarFilialRetirada( tcIdFilial, tcTipoOrcamento ) && FNX-5345 DODEFAULT( tcIdFilial, tcTipoOrcamento, tcFinalidade ) IF THIS._oLocalRetirada.DefinirFilialRetirada( tcIdFilialRetirada, THIS._oOrcamento.ObterTipo(), THIS._oOrcamento.ObterFinalidade() ) llRetorno = THIS._DefinirLocalRetirada( tcIdFilial, '--', lnTipoFaturamento ) && 423897 Executando TestUnit: ENCOMENDA_UNIT.PRG Linha:416 - ON... - ctrlib.prg Linha:9783 - itempedidovenda.definirfilialretirada - itempedidobase.prg Linha:998 - encomenda_unit.testunit27 - encomenda_unit.prg Linha:236 - encomenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 18:02:48.032 - EXCEÇÃO NÃO TRATADA! Erro: 4000 Classe: Excecaousuario Mesagem: A filial de retirada não poderá estar marcada como fechada. Recurso de entrega posterior por item não está ativado. Veja parâmetro 'Venda com entrega posterior por item' (Filial/Sistema de Vendas) Chamadas:Linha:900 - itempedidovenda._retornarmensagem - itempedidobase.prg Linha:6394 - itempedidovenda._validarentregaposterior - itempedidobase.prg Linha:6321 - itempedidovenda.definirentregaposterior - itempedidobase.prg Linha:6170 - itempedidovenda.definirencomenda - itempedidobase.prg Linha:1003 - encomenda_unit.testunit27 - encomenda_unit.prg Linha:236 - encomenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Conteúdo: DODEFAULT(tcLogUsuario, tcCodigoExcecao ) THIS._RetornarMensagem("Recurso de entrega posterior por item não está ativado. "+ "Veja parâmetro 'Venda com entrega posterior por item' (Filial/Sistema de Vendas)") IF tnAtivado = 1 AND NOT THIS._ValidarEntregaPosterior() THIS.DefinirEntregaPosterior(lnEntregaPosterior) taRetornado_RET[1] = THIS.oObjetoTeste.DefinirEncomenda(1) Executando TestUnit: ENCOMENDA_UNIT.PRG Linha:416 - ON... - ctrlib.prg Linha:6218 - itempedidovenda.definirencomenda - itempedidobase.prg Linha:1003 - encomenda_unit.testunit27 - encomenda_unit.prg Linha:236 - encomenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro()