Histórico da Página
...
Agora um exemplo de como o sistema se comporta caso eu utilize um SCPA/SUSEP ou Rede que não existe na minha base:
Observações Importantes:
Sempre que deletarmos 1 registro no Grupo de Serviço Vinculado a RDA (BIN) o sistema checa se há um cadastro correspondente na nova tela (B4L), caso exista ele deleta o cadastro na nova tela (B4L) e o registro gerado pela nova tela na B7O. Isso porque a nova tela é baseada no Grupo de serviço vinculado a RDA (BIN). Tanto é, que a consulta padrão da nova tela apresenta registros da tabela BIN.
Se eu deletar um registro na tela nova (B4L), o sistema vai deletar também o registro criado por ela na tabela B7O.
A nova tela de Exclusão de Planos, não aceita a alteração do registro. Caso tenha errado um cadastro, deverá exclui-lo.
Dicionários
Criado Tabela B4L - Exclusão de Planos A400 - Chave única (X2_UNICO): B4L_FILIAL+B4L_CODINT+B4L_CODRDA+B4L_CODLOC+B4L_PLANOS+B4L_REDEDI+B4L_GRPSER
Campos:
| Campo | Título | Descrição | Tamanho | Tipo | Propriedade | Inicializador Padrão | Uso | Validação Sistema | Consulta Padrão | Modo Edição |
|---|---|---|---|---|---|---|---|---|---|---|
| B4L_FILIAL | Filial | Filial | Caracter | |||||||
| B4L_CODINT | Operadora | Operadora | 4 | Caracter | Visualizar | PLSINTPAD() | Usado-Browse | |||
| B4L_CODRDA | Código RDA | Código RDA | 6 | Caracter | Visualizar | BAU->BAU_CODIGO | Usado-Browse | |||
| B4L_CODLOC | Código Local | Código Local | 3 | Caracter | Visualizar | Usado-Browse | ||||
| B4L_PLANOS | SCPA/SUSEP | SCPA ou SUSEP | 20 | Caracter | Alterar | Usado-Browse | PLSLIMB4L("B4L_PLANOS") | Inclui | ||
| B4L_REDEDI | Rede EDI | Rede EDI | 4 | Caracter | Alterar | Usado-Browse | PLSLIMB4L("B4L_REDEDI") | Inclui | ||
| B4L_GRPSER | Grp.Serviço | Grupo de Serviço | 3 | Caracter | Alterar | Usado-Browse-Obrigat. | ExistCPO("BIN",M->B4L_CODRDA+M->B4L_CODINT+M->B4L_CODLOC+M->B4L_GRPSER) | PLSBH7 | Inclui | |
| B4L_DATBLO | Data de Bloqueio | Data de Bloqueio | 8 | Caracter | Alterar | Usado-Browse-Obrigat. | Inclui |
Indice:
| Índice | Ordem | Chave | Descrição |
|---|---|---|---|
| B4L | 1 | B4L_FILIAL+B4L_CODINT+B4L_CODRDA+B4L_CODLOC+B4L_PLANOS+B4L_REDEDI+B4L_GRPSER | Filial +Operadora + Código RDA + Codigo Local + SCPA/ SUSEP + Rede EDI + Grp.Serviço |
Consulta Padrão:
| Alias | Tipo | Sequência | Coluna | Descrição | Contém |
|---|---|---|---|---|---|
| PLSBH7 | 1 | 01 | DB | Grupo Serviço X RDA | BIN |
| PLSBH7 | 2 | 01 | 01 | Codigo + Operadora | |
| PLSBH7 | 4 | 01 | 01 | Codigo Grupo | BIN_CODGRU |
| PLSBH7 | 4 | 01 | 01 | Desc.Local | POSICIONE('BH7',1,XFILIAL('BH7')+BIN->BIN_CODGRU,'BH7_DESCRI') |
| PLSBH7 | 4 | 01 | 01 | Codigo local | BIN_CODLOC |
| PLSBH7 | 4 | 01 | 01 | Operadora | PLSGRVLOC(BIN->BIN_CODINT) |
| PLSBH7 | 5 | 01 | BIN->BIN_CODGRU | ||
| PLSBH7 | 5 | 01 | Codigo Local | PLSGRVLOC(BIN->BIN_CODLOC) | |
| PLSBH7 | 6 | 01 | M->B4L_CODRDA = BIN->BIN_CODIGO |
Novos campos na tabela BH7:
| Campo | Título | Descrição | Tamanho | Tipo | Propriedade | Lista de Opções | Uso | Validação Sistema |
|---|---|---|---|---|---|---|---|---|
| BH7_CLASSI | Classif. | Classificação do Serviço | 2 | Caracter | Alterar | 09=Serviços de Internação;10=Serviços de Urgência e Emergência; | Usado - Browse | PERTENCE("09|10| ") |
| BH7_CLASRV | Plan.Serv | Plano/Produto x Serviços | 2 | Caracter | Alterar | 11=Plano/Produto X Serviços de Internação;12=Plano/Produto X Serviços de Urgência e Emergência; | Usado - Browse | PERTENCE("11|12| ") |
Novo índice Criado na tabela B7O:
| Índice | Ordem | Chave | Descrição |
|---|---|---|---|
| B7O | 1 | B7O_FILIAL+B7O_CODRDA+B7O_NVEXC+B7O_PRESUB+B7O_REDEXC+B7O_PLAEXC+B7O_ENDEXC+B7O_LABBLO+B7O_LABSUS+B7O_CODGRU | Filial + Cód. RDA + Niv.Exclusao + Prest.Subst. +Rede Excluid+Plano Exclui+End Excluido+Cod. Loc Blo+Cód Loc Sub +Exc. Servico |
| B7O | 5 | B7O_FILIAL+B7O_CODRDA+B7O_NVEXC+B7O_PLAEXC+B7O_ENDEXC+B7O_CODGRU | Filial + Cód. RDA + Niv.Exclusao + Plano Exclui + End Excluido + Exc. Servico |
Alteração da Chave Única da Tabela B7O. Nova Chave única(X2_UNICO):
| Tabela | Chave Única |
|---|---|
| B7O | B7O_FILIAL+B7O_CODRDA+B7O_NVEXC+B7O_PRESUB+B7O_REDEXC+B7O_PLAEXC+B7O_ENDEXC+B7O_LABBLO+B7O_LABSUS+B7O_CODGRU |
04. DEMAIS INFORMAÇÕES
...
É necessário que o cliente tenha criado os campos do ticket abaixo:
DSAUPC-19534 DT Ajustes PTU A400 - Batch V16.1
05. ASSUNTOS RELACIONADOS
...
Import HTML Content
Visão Geral
Conteúdo das Ferramentas