Histórico da Página
01. DADOS GERAIS
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 |
02. SITUAÇÃO/REQUISITO
Manipular a validação do percentual no cadastro do grupo de rateio de acordo com os parâmetros
03. SOLUÇÃO
...
tabs | Passo 01, Passo 02, Passo 03, Passo 04 |
---|---|
ids | passo1,passo2 |
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.
Card documentos | ||||
---|---|---|---|---|
|
04. DEMAIS INFORMAÇÕES
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 |
Bloco de código | ||||||||||
---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||
// 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
|
05. ASSUNTOS RELACIONADOS
- Não se aplica.
...
default | yes |
---|---|
referencia | passo1 |
...
default | no |
---|---|
referencia | passo2 |
04. DEMAIS INFORMAÇÕES
Card documentos | ||||
---|---|---|---|---|
|
...
Templatedocumentos |
---|