Linha de Produto: | Microsiga Protheus |
Segmento: | Serviços |
Módulo: | Contabilidade Gerencial (SIGACTB) |
Função: | CTBA105 |
Situação/Requisito: | Inconsistência na validação do centro de custo. |
Solução/Implementação: | A funcionalidade que destrói o modelo esta deixando resquícios na memória, e quando o FWModelActive() é acionado, recebemos como retorno o último modelo utilizado e não o modelo ativo, seguindo orientação do FrameWork, incluímos a validação para garantir que o modelo esta ativo. |
Requisito: | DSERCTR1-11028 |
Observação: | Para rotinas que não estão em MVC, será necessário utilizar uma variável chamada lSetValue , e marca-lá como .T., a mesma esta declarada como Static no CTBA105, e se verdadeira efetuará a validação pela forma antiga. Exemplo de chamada para ser validada pelo método antigo (para rotinas não migradas para MVC (legado)). #include 'protheus.ch' #include 'parmtype.ch' User Function CTBA105PE() Local cConta := '1' Private lSetValue := .T. CTB105CTA(cConta,cTipo) Return |