09:32:06.507 - EXCEÇÃO NÃO TRATADA! Erro: 4000 Classe: Excecaousuario Mesagem: As configurações atuais impedem que faturamento por transferência seja selecionado. Chamadas:Linha:871 - localretirada_centrodistribuicao.definirtipofaturamento - localretirada.prg Linha:67 - localretirada_centrodistribuicao.definirfilialretirada - localretirada_centrodistribuicao.prg Linha:5697 - itempedidovenda._definirlocalretirada - itempedidobase.prg Linha:9304 - itempedidovenda.definirfilialretirada - itempedidobase.prg Linha:4958 - itempedidovenda.ctipoentrega_assign - itempedidobase.prg Linha:3698 - itempedidovenda._definirtipodeentrega - itempedidobase.prg Linha:1845 - itempedidovenda.definirproduto - itempedidobase.prg Linha:288 - orcamentovenda_unit.testunit001 - orcamentovenda_unit.prg Linha:236 - orcamentovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Conteúdo: THIS._RetornarMensagem('As configurações atuais impedem que faturamento por transferência seja selecionado.') THIS.DefinirTipoFaturamento( 0 ) && Transferencia IF THIS._oLocalRetirada.DefinirFilialRetirada( tcIdFilialRetirada, THIS._oOrcamento.ObterTipo(), THIS._oOrcamento.ObterFinalidade() ) llRetorno = THIS._DefinirLocalRetirada( tcIdFilial, '--', lnTipoFaturamento ) && 423897 THIS.DefinirFilialRetirada(lcFilialAutomatica) && FNX-1077 Executando TestUnit: ORCAMENTOVENDA_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:1958 - itempedidovenda.definirproduto - itempedidobase.prg Linha:288 - orcamentovenda_unit.testunit001 - orcamentovenda_unit.prg Linha:236 - orcamentovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 09:32:06.850 - EXCEÇÃO NÃO TRATADA! Erro: 4000 Classe: Excecaousuario Mesagem: Exite produto com quantidade definida, não é permitido alterar a Filial. Chamadas:Linha:167 - filialorcamento._validaralteracao - filialorcamento.prg Linha:126 - filialorcamento._definiroid - filialorcamento.prg Linha:99 - filialorcamento.definirvalor - filialorcamento.prg Linha:168 - filialorcamento.definirvalorporcodigo - filial.prg Linha:296 - orcamentovenda_unit.testunit001 - orcamentovenda_unit.prg Linha:236 - orcamentovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Conteúdo: THIS._RetornarMensagem( 'Exite produto com quantidade definida, não é permitido alterar a Filial.' ) THIS._ValidarAlteracao( tnOIDFilial, tlTrocandoFilial ) llOk = THIS._DefinirOid( tnOIDFilial, .F. ) llRetorno = THIS.DefinirValor( lnOidFilial ) THIS.oObjetoTeste.oFilial.DefinirValorPorCodigo('05') Executando TestUnit: ORCAMENTOVENDA_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:3937 - itempedidovenda.alterarquantidade - itempedidobase.prg Linha:3725 - itempedidovenda.nquantidade_assign - itempedidobase.prg Linha:306 - orcamentovenda_unit.testunit001 - orcamentovenda_unit.prg Linha:236 - orcamentovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 09:32:06.866 - EXCEÇÃO NÃO TRATADA! Erro: 4000 Classe: Excecaousuario Mesagem: Exite produto com quantidade definida, não é permitido alterar a Filial. Chamadas:Linha:167 - filialorcamento._validaralteracao - filialorcamento.prg Linha:126 - filialorcamento._definiroid - filialorcamento.prg Linha:99 - filialorcamento.definirvalor - filialorcamento.prg Linha:168 - filialorcamento.definirvalorporcodigo - filial.prg Linha:296 - orcamentovenda_unit.testunit001 - orcamentovenda_unit.prg Linha:236 - orcamentovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Conteúdo: THIS._RetornarMensagem( 'Exite produto com quantidade definida, não é permitido alterar a Filial.' ) THIS._ValidarAlteracao( tnOIDFilial, tlTrocandoFilial ) llOk = THIS._DefinirOid( tnOIDFilial, .F. ) llRetorno = THIS.DefinirValor( lnOidFilial ) THIS.oObjetoTeste.oFilial.DefinirValorPorCodigo('05') Executando TestUnit: ORCAMENTOVENDA_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:4246 - itempedidovenda.npreco_assign - itempedidobase.prg Linha:308 - orcamentovenda_unit.testunit001 - orcamentovenda_unit.prg Linha:236 - orcamentovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 09:32:06.877 - EXCEÇÃO NÃO TRATADA! Erro: 4000 Classe: Excecaousuario Mesagem: Exite produto com quantidade definida, não é permitido alterar a Filial. Chamadas:Linha:167 - filialorcamento._validaralteracao - filialorcamento.prg Linha:126 - filialorcamento._definiroid - filialorcamento.prg Linha:99 - filialorcamento.definirvalor - filialorcamento.prg Linha:168 - filialorcamento.definirvalorporcodigo - filial.prg Linha:296 - orcamentovenda_unit.testunit001 - orcamentovenda_unit.prg Linha:236 - orcamentovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Conteúdo: THIS._RetornarMensagem( 'Exite produto com quantidade definida, não é permitido alterar a Filial.' ) THIS._ValidarAlteracao( tnOIDFilial, tlTrocandoFilial ) llOk = THIS._DefinirOid( tnOIDFilial, .F. ) llRetorno = THIS.DefinirValor( lnOidFilial ) THIS.oObjetoTeste.oFilial.DefinirValorPorCodigo('05') Executando TestUnit: ORCAMENTOVENDA_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:5027 - itempedidovenda.ctipoentrega_assign - itempedidobase.prg Linha:309 - orcamentovenda_unit.testunit001 - orcamentovenda_unit.prg Linha:236 - orcamentovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 09:32:06.887 - EXCEÇÃO NÃO TRATADA! Erro: 4000 Classe: Excecaousuario Mesagem: Exite produto com quantidade definida, não é permitido alterar a Filial. Chamadas:Linha:167 - filialorcamento._validaralteracao - filialorcamento.prg Linha:126 - filialorcamento._definiroid - filialorcamento.prg Linha:99 - filialorcamento.definirvalor - filialorcamento.prg Linha:168 - filialorcamento.definirvalorporcodigo - filial.prg Linha:296 - orcamentovenda_unit.testunit001 - orcamentovenda_unit.prg Linha:236 - orcamentovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Conteúdo: THIS._RetornarMensagem( 'Exite produto com quantidade definida, não é permitido alterar a Filial.' ) THIS._ValidarAlteracao( tnOIDFilial, tlTrocandoFilial ) llOk = THIS._DefinirOid( tnOIDFilial, .F. ) llRetorno = THIS.DefinirValor( lnOidFilial ) THIS.oObjetoTeste.oFilial.DefinirValorPorCodigo('05') Executando TestUnit: ORCAMENTOVENDA_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:5090 - itempedidovenda.ccarga_assign - itempedidobase.prg Linha:310 - orcamentovenda_unit.testunit001 - orcamentovenda_unit.prg Linha:236 - orcamentovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro()