11:27:33.340 - EXCEÇÃO NÃO TRATADA!
Erro: 4000
Classe: Excecaousuario
Mesagem: Não é possível informar a data marcada de entrega com data prevista preenchida. Veja o parâmetro: "Utiliza tratamento diferenciado para datas marcadas e previstas no orçamento".
Chamadas:Linha:3564 - orcamentovenda.dentregamarcada_assign - orcamentobase.prg
Linha:7392 - orcamentovenda_unit.testunit112 - orcamentovenda_unit.prg
Linha:236 - orcamentovenda_unit.executarteste - testunitbase.prg
Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg
Linha:283 - iniciartesteunitario - iniciartesteunitario.prg

Conteúdo: 
THIS._RetornarMensagem(lcMensagemErro)
FUNCTION TestUnit113( tcResultadoEsperado_RET AS STRING, tcResultadoRetornado_RET AS STRING )
llTestOk = EVALUATE(lcTeste)
loTestUnit.ExecutarTeste(@laLstTestesParaExecutar)
ExecutarTesteUnitarioPrg( lcProg, lnSessaoAplicativo ,lcMensagem, lnInicio, @loArquivoTexto, @lnIDClasse )
Executando TestUnit: ORCAMENTOVENDA_UNIT.PRG
Linha:410 - ON...  - ctrlib.prg
Linha:3578 - orcamentovenda.dentregamarcada_assign - orcamentobase.prg
Linha:7392 - orcamentovenda_unit.testunit112 - orcamentovenda_unit.prg
Linha:236 - orcamentovenda_unit.executarteste - testunitbase.prg
Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg
Linha:283 - iniciartesteunitario - iniciartesteunitario.prg

Comando: 
lcListaChamada=oAgSistema.ObterFuncaoErro()

11:27:33.347 - EXCEÇÃO NÃO TRATADA!
Erro: 4000
Classe: Excecaousuario
Mesagem: Não é possível informar a data marcada de entrega com data prevista preenchida. Veja o parâmetro: "Utiliza tratamento diferenciado para datas marcadas e previstas no orçamento".
Informe a data marcada de entrega antes de informar o turno de entrega.
Chamadas:Linha:3685 - orcamentovenda.cturnoentrega_assign - orcamentobase.prg
Linha:7392 - orcamentovenda_unit.testunit112 - orcamentovenda_unit.prg
Linha:236 - orcamentovenda_unit.executarteste - testunitbase.prg
Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg
Linha:283 - iniciartesteunitario - iniciartesteunitario.prg

Conteúdo: 
THIS._RetornarMensagem( 'Informe a data marcada de entrega antes de informar o turno de entrega.' )
FUNCTION TestUnit113( tcResultadoEsperado_RET AS STRING, tcResultadoRetornado_RET AS STRING )
llTestOk = EVALUATE(lcTeste)
loTestUnit.ExecutarTeste(@laLstTestesParaExecutar)
ExecutarTesteUnitarioPrg( lcProg, lnSessaoAplicativo ,lcMensagem, lnInicio, @loArquivoTexto, @lnIDClasse )
Executando TestUnit: ORCAMENTOVENDA_UNIT.PRG
Linha:410 - ON...  - ctrlib.prg
Linha:3704 - orcamentovenda.cturnoentrega_assign - orcamentobase.prg
Linha:7392 - orcamentovenda_unit.testunit112 - orcamentovenda_unit.prg
Linha:236 - orcamentovenda_unit.executarteste - testunitbase.prg
Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg
Linha:283 - iniciartesteunitario - iniciartesteunitario.prg

Comando: 
lcListaChamada=oAgSistema.ObterFuncaoErro()