Produto: | |
---|---|
Linha de Produto: | |
Segmento: | |
Módulo: | Contabilidade Gerencial - SIGACTB |
Função: | Grupo de Rateio - CTBA276 |
País: | Brasil |
Ticket: | Interno |
Requisito/Story/Issue : | DSERCTR1-29624 |
Manipular a validação do percentual no cadastro do grupo de rateio de acordo com os parâmetros
Criado o ponto de entrada CTB276CW1, que permite validar o percentual de rateio caso o total seja diferente de 100%, para definir se o grupo de rateio será gravado bloqueado ou liberado, alterando a validação padrão, mesmo que o percentual seja diferente de 100%.
Observe que pra gravar o grupo liberado, deverá retornar .T.
Retorno
Nome | Tipo | Descrição | Obrigatório |
lRet | Lógico | Se .T., não bloqueia o grupo de rateio, permitindo digitar percentuais maior ou iguais(>=) à 100 em cada linha, e não valida o total de rateio para bloquear se diferente de 100 como no padrão. Se .F. Mantém o padrão. | SIM |
Parâmetros
Nome | Tipo | Descrição | Obrigatório |
cTpVld | Caractere | Tipo de Validação (L = Linha, T = Total) | SIM |
cCw1_Tipo | Caractere | Tipo do Grupo de Rateio (1 = Origem, 2 = Destino) | SIM |
cCw1_Entidade | Caractere | Entidade Contábil (1 = Conta Contábil, 2 = Centro de Custo, 3 = Item Contábil, 4 = Classe Valor, 5 = Combinado) | SIM |
nTotRat | Número | Percentual total do rateio | SIM |
nLinRat | Número | Percentual da Linha digitada (quando cTpVld = T, este parâmetro será NIL) | NÃO |
// Grava o grupo de rateio liberado, quando o tipo for Origem e percentual total >= 100 #Include "Protheus.ch" User Function CTB276CW1() Local aArea := GetArea() //Local cTpVld := PARAMIXB[1] Local cCw1_Tipo := PARAMIXB[2] //Local cCw1_Entidade := PARAMIXB[3] Local nTotRat := PARAMIXB[4] //Local nLinRat := PARAMIXB[5] Local lRet := (cCw1_Tipo == "1" .AND. nTotRat >= 100) RestArea(aArea) Return lRet |