Histórico da Página
01. DADOS GERAIS
Produto: | TOTVS Saúde Planos
| ||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
Linha de Produto: | Linha Protheus | ||||||||||||||||
Segmento: | Saude | ||||||||||||||||
Módulo: | PLANO DE SAÚDE (SIGAPLS) | ||||||||||||||||
Função: | Grupo/Empresa (PLSA660) | ||||||||||||||||
Ticket: | 10721073 | ||||||||||||||||
Requisito/Story/Issue (informe o requisito relacionado) : | DSAUBE-13920 |
02. SITUAÇÃO/REQUISITO
Necessidade da informação no ponto de entrada PLBLQSUB se será realizado o bloqueio das famílias com bloqueio futuro.
Este ponto de entrada permite inserir uma regra para validar e confirmar se o subcontrato deve ser bloqueado ou desbloqueado.
Ponto de chamada: É executado ao pressionar o botão “Ok” da rotina de bloqueio/desbloqueio do subcontrato, ou seja, após terem sido verificadas todas as regras padrões do sistema. Caso alguma verificação do sistema não permita, o ponto de entrada não será executado.
03. SOLUÇÃO
Adicionado a ponto de entrada PLBLQSUB um novo parâmetro (PARAMIXB[7]) com a informação se será realizado o bloqueio futuro. O Valor do parâmetro será um “Sim” ou “Não”.
Sintaxe
PLBLQSUB - Validação de Subcontrato ( [ cBloqueio ], [ cMotBlq ], [ dDatBlq ], [ cAlias ], [ dDatInc ], [ dDatPed ], [ cBloqFut ] ) --> Logico
Parâmetros:
Parâmetro | Tipo | Descrição | Referência |
cBloqueio | Caracter | Código de bloqueio do item posicionado (Para Sub-Contratos já bloqueados). | PARAMIXB[1] |
cMotBlq | Caracter | Motivo do bloqueio/desbloqueio informado na rotina. | PARAMIXB[2] |
dDatBlq | Data | Data do bloqueio/desbloqueio informado na rotina. | PARAMIXB[3] |
cAlias | Caracter | Alias do cadastro de tipos de bloqueio/desbloqueio utilizado. | PARAMIXB[4] |
dDatInc | Data | Data de inclusão do item posicionado. | PARAMIXB[5] |
dDatPed | Data | Data de pedido do bloqueio. | PARAMIXB[6] |
cBloqFut | Caracter | Famílias com Bloqueio Futuro ("Sim" ou "Não") | PARAMIXB[7] |
Retorno: Lógico (verdadeiro ou falso), Se verdadeiro, a rotina seguirá, normalmente, o processo de bloqueio, caso seja falso, a rotina não permitirá a confirmação.
Bloco de código | ||||||||
---|---|---|---|---|---|---|---|---|
| ||||||||
#Include "Protheus.ch" User Function PLBLQSUB() Local lValid := .F. Local cBloqueio := PARAMIXB[1] Local cMotBlq := PARAMIXB[2] Local dDatBlq := PARAMIXB[3] Local cAlias := PARAMIXB[4] Local dDatInc := PARAMIXB[5] Local dDatPed := PARAMIXB[6] Local cBloqFuturo := PARAMIXB[7] If Empty(cBloqueio) // Tratamento para Bloqueio Else // Tratamento para Desbloqueio Endif Do Case Case cBloqFuturo == "Sim" // Tratamento Case cBloqFuturo == "Não" // Tratamento EndCase Return lValid |
04. DEMAIS INFORMAÇÕES
Não se aplica
05. ASSUNTOS RELACIONADOS
- 10721073 DSAUBE-13790 DT Bloqueio do Subcontrato para Famílias com Bloqueio FuturoPLBLQSUB - Validação de Subcontrato
Templatedocumentos |
---|
HTML |
---|
<style> div.theme-default .ia-splitter #main { margin-left: 0px; } .ia-fixed-sidebar, .ia-splitter-left { display: none; } #main { padding-left: 10px; padding-right: 10px; overflow-x: hidden; } .aui-header-primary .aui-nav, .aui-page-panel { margin-left: 0px !important; } .aui-header-primary .aui-nav { margin-left: 0px !important; } </style> |