01. DADOS GERAIS
Produto: | TOTVS Saúde Planos |
---|---|
Linha de Produto: | Linha Protheus |
Segmento: | SIGAPLS - Plano de Saúde |
Módulo: | SIGAPLS - Plano de Saúde |
Função: | Layout PTU A1300 (PLSUA1300) |
Ticket: | 8706769 |
Issue: | DSAUBE-11178 |
02. REQUISITO
O ponto de entrada que permita manipular a Tag de abrangências do beneficiário, caso o cliente utilize outras tabelas para cadastrar o grupo de município(B9B) e o grupo de estados(B9C).
03. SOLUÇÃO
Ponto de entrada PL1300ABRA criado, que enviará quatro parâmetros:
- Cód. EDI (BF7_CODEDI)
- Cód. Abrang (BF7_CODORI)
- Recno da BA1
- Recno da BI3.
Retorno: Array com todas as abrangência do beneficiário: Sendo com duas posições o array, onde a primeira é para estados e a segunda para município.
- Para Grupo de Municípios: { " ", "1234567" } - Precisa ser preenchido a primeira posição em branco e a segunda com o código do Município com o tamanho de 7.
- Para Grupo de Estados: { "SP" , " " } - Precisa ser preenchido a primeira posição com o Estado e a segunda em branco.
Observação: Caso o beneficiário não tenha abrangências, precisará ser retornado um array vazio: {}
04. EXEMPLO DE USO
Ponto de Entrada
#include "PROTHEUS.CH" User Function PL1300ABRA() Local cCodEdi := paramixb[1] // Campo BF7_CODEDI Local cCodOri := paramixb[2] // Campo BF7_CODORI Local nRecBA1 := paramixb[3] // Recno do Beneficiário Local nRecBI3 := paramixb[4] // Recno do Produto Saúde Local aRet := {} // Retorno Local aAreaBA1 := BA1->(GetArea()) Local aAreaBI3 := BI3->(GetArea()) // Tratamento para a abrangência: // Quando for Grupo de Municpio aAdd(aRet,{"","1234567"}) // Quando for Grupo de Estado aAdd(aRet,{"SP",""}) RestArea(aAreaBA1) RestArea(aAreaBI3) Return aRet
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas