13691790 DSAUBE-17856 DT Criação de Campos referente ao Dados Bancários no Protocolo de Reembolso

01. DADOS GERAIS

Produto:	TOTVS Saúde Planos
Linha de Produto:	Linha Protheus
Segmento:	Saúde
Módulo:	Protocolo de Reembolso
Função:	Dados Bancários
País:	Brasil
Ticket:	13691790
Issue:	DSAUBE-17856

02. SITUAÇÃO/REQUISITO

Na inclusão do Protocolo de Reembolso, ao inserir o Código do Banco (BOW_NROBCO), ocorreu a necessidade de ao disparar os dados bancários, ser incluído novos campos (Dígito da agência e conta), visto que anteriormente só retornava a descrição do banco, número da agência e conta.

03. SOLUÇÃO

Nesse cenário, foi efetuado uma nova atualização no dicionário de dados e fonte, para que ao inserir o Código do Banco, o dígito da agência e conta sejam considerados.

04. DEMAIS INFORMAÇÕES

Atualização Dicionário de Dados

No Protocolo de Reembolso, foram ajustados:

A inclusão dos campos no Arquivo SX3, considerando que ao incluir ocorre a mudança no X3_ORDEM, alocando-os na posição desejada, para que fiquem próximos aos demais aos campos dos dados bancários, e consequentemente os demais campos da estrutura serão dispostos na sequência adequada.

Tabela	Campo	Tipo	Ordem	Decimal	Titulo	Descrição	Picture	Usado	Visual?	Contexto	Browse	Obrigatório
BOW	BOW_NRODAG	Caracter	66	0	Dig Agência	Dígito Agência	@!	Sim	Visualizar	Real	Não	Não
BOW	BOW_NRODTO	Caracter	68	0	Dígito Conta	Dígito da Conta	@!	Sim	Visualizar	Real	Não	Não

A inclusão no Arquivo SXB (Consulta Padrão) para o Campo (BOW_NROBCO):

Alias	Tipo	Sequência	CONTÉM
BOWSA6	5	01	SA6->A6_COD
BOWSA6	5	02	SA6->A6_NOME
BOWSA6	5	03	SA6->A6_AGENCIA
BOWSA6	5	04	SA6->A6_DVAGE
BOWSA6	5	05	SA6->A6_NUMCON
BOWSA6	5	06	SA6->A6_DVCTA

A inclusão de gatilhos no Arquivo SX7, uma vez que é disparado pelo o Código do Banco (BOW_NROBCO):

Tabela	Campo	Sequência	Regra	Tipo	Seek	Alias Pesq.	Ordem Pesq.	Chave
BOW	BOW_DESBCO	001	SA6->A6_NOME	Primário	Sim	SA6	1	xFilial("SA6") +M->BOW_NROBCO
BOW	BOW_NROAGE	002	SA6->A6_AGENCIA	Primário	Sim	SA6	1	xFilial("SA6") +M->BOW_NROBCO
BOW	BOW_NRODAG	003	SA6->A6_DVAGE	Primário	Sim	SA6	1	xFilial("SA6") +M->BOW_NROBCO
BOW	BOW_NROCTA	004	SA6->A6_NUMCON	Primário	Sim	SA6	1	xFilial("SA6") +M->BOW_NROBCO
BOW	BOW_NRODTO	005	SA6->A6_DVCTA	Primário	Sim	SA6	1	xFilial("SA6") +M->BOW_NROBCO

Na Autorização do Reembolso, foram ajustados:

A inclusão dos campos no Arquivo SX3, lembrando que ocorre a mudança na Ordem:

Tabela	Campo	Tipo	Ordem	Tamanho	Decimal	Titulo	Descrição	Picture	Usado	Visual?	Contexto	Browse	Obrigatório
B44	B44_NRODAG	Caracter	TD	1	0	Dig Agência	Dígito da Agência	@!	Sim	Visualizar	Real	Não	Não
B44	B44_NRODTO	Caracter	TF	1	0	Dígito Conta	Dígito da Conta	@!	Sim	Visualizar	Real	Não	Não

A inclusão de gatilhos no Arquivo SX7, visto que é disparado pelo o Número do Protocolo (B44_PROTOC):

Tabela	Campo	Sequencia	Regra	Tipo	Seek	Alias Pesq.	Ordem Pesq.	Chave
B44	B44_NRODAG	055	BOW->BOW_NRODAG	Primário	Não	----------	---------	----------
B44	B44_NRODTO	056	BOW->BOW_NRODTO	Primário	Não	----------	---------	----------

Além disso, caso os dados bancários estiveram vazios quando um protocolo for autorizado, a rotina irá buscar na tabela BA3 no Grupo Familiar, os dados bancários do beneficiário. Com isso, foi inserido novos campos no Arquivo SX3 dessa tabela, sempre considerando a mudança da Ordem:

Tabela	Campo	Tipo	Ordem	Tamanho	Decimal	Titulo	Descrição	Picture	Usado	Visual?	Contexto	Browse	Obrigatório
BA3	BA3_DTACLI	Caracter	C5	1	0	Dig Agen Cli	Dígito Agência do Cliente	@!	Sim	Alterar	Real	Não	Não
BA3	BA3_DTCCLI	Caracter	C7	1	0	Dígito Conta Cli	Dígito da Conta do Cliente	@!	Sim	Alterar	Real	Não	Não

Importante

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.

05. ASSUNTOS RELACIONADOS

Para mais detalhes, confira a documentação de referência do Protocolo e Autorização do Reembolso:

Protocolo de Reembolso - PLSA001A

Autorização de Reembolso - PLSA001

Árvore de páginas