...
A classe PLPtuJsPCad, será responsável pela montagem do JSON para comunicar com a API de Pré-Cadastro do Beneficiário cadBenef. O JSON será enviado com os seguintes dados:
...
conforme exemplo abaixo:
...
Exemplo:
Bloco de código |
---|
language | c# |
---|
theme | RDark |
---|
title | JSON de Envio |
---|
linenumbers | true |
---|
collapse | true |
---|
|
{
"message":"Criar Beneficiario",
"listaBeneficiarios":[
{
"dadosUnimed":{
"codUnimed":"0001"
},
"dadosContratante":{
"cpfCnpj":"99999999999999",
"nomeContratante":"EMPRESA JURIDICA TESTE"
},
"dadosPessoa":{
"nome":"BENEFICIARIO TESTE",
"nomeSocial":"BENEFICIARIO SOCIAL TESTE",
"genero":"F",
"generoSocial":"F",
"dtNascimento":"20100101",
"cpf":"99999999999",
"cns":"999999999999999"
},
"dadosBeneficiario":{
"cdCarteiraTitular":"00011008000005016",
"dependencia":"00",
"dataInclusao":"20230101"
},
"dadosPlano":{
"dtValidadeCartao":"20270112",
"viaCartao":"1",
"dtInicioVigencia":"20010101",
"tpAbrangencia":1,
"tpAcomodacao":"B",
"tpContratacao":3,
"tpContrato":"P",
"segmentacao":"02",
"idRegPlanoANS":1,
"registroANS":"123456",
"cdRede":"TST01",
"cdLcat":0,
"nomeProduto":"PRODUTO EXEMPLO 1"
},
"listaAbrangencias":[
{
"cdMunic": 3548500,
"cdUF": 11
}
],
"listaCarencias":[
{
"tpCobertura":"1",
"DtFimCarencia":"20220512"
},
]
}
]
}
|
Para alterar o JSON, poderá ser utilizado o Ponto de Entrada PLMPJSBE (DT PE Manipular JSON de Envio de Beneficiários).
3. DICIONÁRIO DE DADOS
Atualização do Arquivo SX2 (Tabelas):
...
Após realizar a criação do Dicionário principal (Item 07 da documentação de Integrações TOTVS Saúde Planos Linha Protheus), vamos atualizar as seguintes tabelas para adaptar a API de Pré Cadastro do Beneficiário.
Atualização do Arquivo SX3 (Campo):
Tabela | Campo | Tipo | Tamanho | Decimal | Titulo | Descrição | Picture | Validação | Inicializador Padrão | Consulta Padrão | cBox | Usado | Exibe Browser | Visual? | Contexto | Obrigatório | When |
---|
BA1 | BA1_PTUCAD | C | 1 | 0 | Cad. Ben PTU | Cad.Benef na UNIMED | @! |
''" |
| 0=Nao Cadastrado;1=Pre Cadastrado;2=Cadastro Completo | Sim | Sim | Alterar | Real |
|
|
|
Tabela | Campo | Tipo | Tamanho | Decimal | Titulo | Descrição | Picture | Validação | Inicializador Padrão | Consulta Padrão | cBox | Usado | Exibe Browser | Visual? | Contexto | Obrigatório | When |
---|
B7E | B7E_FILIAL | C | 8 | 0 | Filial | Filial do SistemaCODOPEC | 4 | 0 | Operadora | Operadora | @R !.!!! | Vazio() .Or. ExistCpo("BA0",FWFldGet("B7E_CODOPE"),1) | PLSINTPAD(RETCODUSR()) | B89PLS | Sim | Sim | Alterar | Real | Sim | INCLUI | B7E | B7E_CODIGO | C | 4 | 0 | Codigo Integ | Código da Integração | @! | GETSXENUM( "B7E", "B7E_CODIGO" ) | Sim | Sim | Visualizar | Real | Sim | B7E | B7E_DESCRI | C | 40 | 0 | Descrição | Descrição da Integração | @! | Sim | Sim | Alterar | Real | Sim | B7E | B7E_ALIAS | C | 3 | 0 | Alias Prima. | Alias Primário | @! | Vazio() .Or. PlsAliasExi(FWFldGet("B7E_ALIAS")) | Sim | Sim | Alterar | Real | Sim | INCLUI | B7E | B7E_ENDPOI | C | 100 | 0 | EndPoint | EndPoint da Integracaoo | Sim | Sim | Alterar | Real | Não | B7E | B7E_ATIVO | C | 1 | 0 | Ativo | Ativo | @! | 1 | 0=Nao;1=Sim | Sim | Não | Alterar | Real | Sim | B7E | B7E_MAXENV | N | 3 | 0 | Máximo Envio | Máximo de Envio | @E 999 | FWFldGet("B7E_MAXENV") > 0 | Sim | Sim | Alterar | Real | Sim | B7E | B7E_CLASTP | C | 20 | 0 | Classe Stamp | Classe Stamp da Integ. | Vazio() .Or. FindClass(FWFldGet("B7E_CLASTP")) | Sim | Não | Alterar | Real | Não | B7E | B7E_CLACOM | C | 20 | 0 | Classe Comu. | Classe para Comunicação | Vazio() .Or. FindClass(FWFldGet("B7E_CLACOM")) | Sim | Não | Alterar | Real | Não | B7E | B7E_USRAUT | C | 20 | 0 | Login Auten. | Login Autenticação | Sim | Não | Alterar | Real | Não | B7E | B7E_PASAUT | C | 50 | 0 | Senha Auten. | Senha Autenticação | @* | Sim | Não | Alterar | Real | Não | B7E | B7E_ENDAUT | C | 100 | 0 | EndPoint Aut | EndPoint Autenticação | Sim | Não | Alterar | Real | Não | B7E | B7E_BEAAUT | M | 10 | 0 | Bearer Aute. | Bearer Autenticação | Sim | Não | Visualizar | Real | Não | B7E | B7E_COOAUT | M | 10 | 0 | Cookie Aut. | Cookie Autenticação | Sim | Não | Visualizar | Real | Não | B7E | B7E_TMPAUT | C | 20 | 0 | Tempo Expe. | Tempo de Expiração | Sim | Não | Visualizar | Real | Não | B7E | B7E_PERGGE | C | 10 | 0 | Perg. Gerar | Pergunta Gerar Pedidos | @! | Sim | Não | Alterar | Real | Não | B7E | B7E_UNIME | C | 1 | 0 | é Unimed? | Integração Unimed? | @! |
| "2" |
| 1=Sim;2=Nao | Sim | Não | Alterar | Real | Não |
Tabela | Campo | Tipo | Tamanho | Decimal | Titulo | Descrição | Picture | Validação | Inicializador Padrão | Consulta Padrão | cBox | Usado | Exibe Browser | Visual? | Contexto | Obrigatório | When |
---|
B7F | B7F_FILIAL | C8 | 0 | Filial | Filial do Sistema | B7F | B7F_CODOPE | C | 4 | 0 | Operadora | Operadora | @R !.!!! | Vazio() .Or. ExistCpo("BA0",FWFldGet("B7F_CODOPE"),1) | IIF(IsInCallstack("PLMapIntegra"),->B7E_CODOPE,PLSINTPAD(RETCODUSR()))B89PLS | Sim | Sim | Alterar | Real | Sim | IIF(IsInCallstack("PLMapIntegra"),.F.,INCLUI) | B7F | B7F_CODIGOC | 4 | 0 | Codigo Integ | Codigo da Integração | @! | Vazio() .Or. ExistCpo("",FWFldGet("B7F_CODOPE")+FWFldGet("B7F_CODIGO"),1)IIF(IsInCallstack("PLMapIntegra"),B7E->B7E_CODIGO," ") | Sim | Sim | Alterar | Real | Sim | IIF(IsInCallstack("PLMapIntegra"),.F.,INCLUI) | B7F | B7F_CODPED | C | 9 | 0 | Cod. Pedido | Codigo do Pedido | @! | GETSXENUM("B7F", "B7F_CODPED") | Sim | Sim | Visualizar | Real | Sim | B7F | B7F_ALIAS | C | 3 | 0 | Alias Prima. | Alias Primário | @! | Vazio() .Or. ExistCpo("B7E",FWFldGet("B7F_CODOPE")+FWFldGet("B7F_CODIGO")+FWFldGet("B7F_ALIAS"),1) | IIF(IsInCallstack("PLMapIntegra"),B7E->B7E_ALIAS," ") | Sim | Sim | Alterar | Real | Sim | IIF(IsInCallstack("PLMapIntegra"),.F.,INCLUI) | B7F | B7F_CHAVE | C | 60 | 0 | Chave | Chave de Busca | @! | Vazio() .OR. ExistCpo(FWFldGet("B7F_ALIAS"),FWFldGet("B7F_CHAVE"),IIF(FWFldGet("B7F_ALIAS") $ "BA1/BE4",2,1)) | Sim | Sim | Alterar | Real | Sim | B7F | B7F_DATINC | D | 8 | 0 | Dt. Inclusão | Data de Inclusão | dDataBase | Sim | Sim | Alterar | Real | Sim | B7F | B7F_DATCOM | D | 8 | 0 | Dt. Comunica | Data de Comunicação | Sim | Sim | Visualizar | Real | Não | B7F | B7F_STATUS | C | 1 | 0 | Status | Status do Pedido | @! | 0 | 0=Pendente de Envio;1=Envio Realizado;2=Erro de Envio;3=Envio Cancelado | Sim | Não | Alterar | Real | Não | B7F | B7F_TENVIO | N | 3 | 0 | Tent. Envio | Tentativas de Envio | @E 999 | FWFldGet("B7F_TENVIO") <= FWFldGet("B7E_MAXENV") | Sim | Não | Alterar | Real | Não | B7F | B7F_ENVJSO | M | 10 | 0 | Json Envio | Json Enviado | Sim | Não | Visualizar | Real | Não | B7F | B7F_RECJSO | M | 10 | 0 | Json Receb. | Json Recebido | Sim | Não | Visualizar | Real | Não | Atualização do Arquivo SIX (Índices):
...
_QTLOTE | N | 2 |
| Qtd. Lote | Qtd. Max. Lote | @E 99 |
| 1 |
|
| Sim | Não | Alterar | Real | Não |
|
Atualização do Arquivo
Atualização do Arquivo SX9 (Relacionamento):
...
Atualização do Arquivo SX1 (Pergunte):
Grupo | Ordem | Pergunta | Variável | Tipo | Tamanho | Decimal | Objeto | Consulta Padrão |
---|
PLPTUCADBE | 01 | Grupo/Empresa De ? | MV_PAR01 | C | 4 | 0 | 1 - Edit | B7APLS |
PLPTUCADBE | 02 | Grupo/Empresa Ate ? | MV_PAR02 | C | 4 | 0 | 1 - Edit | B7APLS |
PLPTUCADBE | 03 | Matricula De ? | MV_PAR03 | C | 6 | 0 | 1 - Edit | BA1PLS |
PLPTUCADBE | 04 | Matricula Ate ? | MV_PAR04 | C | 6 | 0 | 1 - Edit | BA1PLS |
PLPTUCADBE | 05 | Data Inclusao De ? | MV_PAR05 | D | 8 | 0 | 1 - Edit |
|
PLPTUCADBE | 06 | Data Inclusao Ate ? | MV_PAR06 | D | 8 | 0 | 1 - Edit |
Grupo | Ordem | Pergunta | Variável | Tipo | Tamanho | Decimal | Objeto | Consulta Padrão |
---|
PLRMPSTAMP | 01 | Operadora ? | MV_PAR01 | C | 4 | 0 | 1 - Edit | B89PLS |
PLRMPSTAMP | 02 | Data do STAMP ? | MV_PAR02
Card documentos |
---|
Informacao | A alteração de dicionário referente a essa implementação estará disponível no próximo pacote de Expedição Contínua do módulo SIGAPLS. |
---|
Titulo | IMPORTANTE |
---|
|
...