Linha Microsiga Protheus

Árvore de páginas


01. DADOS GERAIS

Produto:

PROTHEUS

Linha de Produto:

TOTVS SAÚDE PLANOS

Segmento:

Saúde

Módulo:SIGAPLS
Função:Grupo Familiar/Beneficiários (PLSA260)
País:Brasil
Ticket:10763222
Story:DSAUBE-13817


02. SITUAÇÃO/REQUISITO

Solicitado o complemento da criação de Dados dos Responsáveis Legais na (BA1).

03. SOLUÇÃO

Solicitado o complemento dos campos na tabela BA1 de vidas para a auto-inserção caso tenham conteúdos nos dados dos responsáveis legais da rotina de vidas.


Inclusão de Dicionário de Dados

Efetuado ajustes na SX3:

X3_CAMPOX3_TIPOX3_TAMANHOX3_TITULOX3_PICTUREX3_VALIDX3_BROWSEX3_VISUALX3_CONTEXTX3_F3X3_FOLDER
BA1_NOMTIC70

Nome Responsável

@!
SAR
1
BA1_SOBRTIC30Sobr Responsável@!
SAR
1
BA1_CPFTITC11CPF Responsável@R 999.999.999-99If(Empty(M->BA1_CPFTIT),.T.,CGC(M->BA1_CPFTIT))SAR
1
BA1_MAILTIC60

Email Responsável

@!
SAR
1
BA1_DDDCELC3

DDD Responsável

999
SAR
1
BA1_CELTITC15Cel Responsável@!
SAR
1

BA1_DDDTEL

C3DDD Responsável999
SAR
1

BA1_TELTIT

C15Tel Responsável@!
SAR
1

BA1_CEPTIT

C8CEP Responsável@R !!!!!-!!!VAZIO() .OR. BC9->(ExistCpo('BC9',M->BA1_CEPTIT,1))SARB83PLS1

BA1_ENDTIT

C40End Responsável@!
SAR
1
BA1_NRENTIC6Nº End Resp.@!
SAR
1

BA1_COMTIT

C20

Compl Resp.

@!
SAR
1
BA1_BAITITC20Bairro Resp.@!
SAR
1

BA1_CIDTIT

C7Cd Mun. Resp.@!BID->(ExistCpo("BID",M->BA1_CIDTIT,1))SARB57PLS1

BA1_UFTIT

C2UF Responsável@!
SAR
1
BA1_MUNCTIC30Mun. Resp.@!
SVR
1

BA1_BANTIT

C3Cd Banco Resp.@!
SARSA61

BA1_AGETIT

C5Agência Resp.@!
SAR
1
BA1_NUMTITC10Nº Conta Resp.@!
SAR
1

SX7:

X7_CAMPOX7_SEQUENCX7_REGRAX7_CDOMINX7_TIPOX7_SEEKX7_ALIASX7_ORDEMX7_CHAVE
BA1_CEPTIT001BC9->BC9_ESTBA1_ENDTIPSBC91xFilial("BC9")+M->BA1_CEPTIT
BA1_CEPTIT002BC9->BC9_BAIRROBA1_BAITITPN


BA1_CEPTIT003BC9->BC9_MUNBA1_MUNCTIPN


BA1_CEPTIT004BC9->BC9_ESTBA1_UFTITPN


BA1_CEPTIT005BC9->BC9_CODMUNBA1_CIDTITPN


BA1_CIDTIT001BID->BID_DESCRIBA1_MUNCTIPSBID1xFilial("BID") + M->BA1_CIDTIT
BA1_CIDTIT002BID->BID_ESTBA1_UFTITPN


BA1_CPFUSR039BTS->BTS_NOMTITBA1_NOMTIPN


BA1_CPFUSR040BTS->BTS_SOBRTIBA1_SOBRTIPN


BA1_CPFUSR041BTS->BTS_CPFTITBA1_CPFTITPN


BA1_CPFUSR042BTS->BTS_MAILTIBA1_MAILTIPN


BA1_CPFUSR043

BTS->BTS_DDDCEL

BA1_DDDCELPN


BA1_CPFUSR044BTS->BTS_CELTITBA1_CELTITPN


BA1_CPFUSR045BTS->BTS_DDDTELBA1_DDDTELPN


BA1_CPFUSR046BTS->BTS_TELTITBA1_TELTITPN


BA1_CPFUSR047BTS->BTS_CEPTITBA1_CEPTITPN


BA1_CPFUSR048

BTS->BTS_ENDTIT

BA1_ENDTIPN


BA1_CPFUSR049BTS->BTS_NRENTIBA1_NRENTIPN


BA1_CPFUSR050BTS->BTS_COMTITBA1_COMTITPN


BA1_CPFUSR051BTS->BTS_BAITITBA1_BAITITPN


BA1_CPFUSR052BTS->BTS_CIDTITBA1_CIDTITPN


BA1_CPFUSR053BTS->BTS_UFTITBA1_UFTITPN


BA1_CPFUSR054BTS->BTS_MUNCTIBA1_MUNCTIPN


BA1_CPFUSR055BTS->BTS_BANTITBA1_BANTITPN


BA1_CPFUSR056BTS->BTS_AGETITBA1_AGETITPN


BA1_CPFUSR057BTS->BTS_NUMTITBA1_NUMTITPN


BA1_MATVID040BTS->BTS_NOMTITBA1_NOMTIPN


BA1_MATVID041BTS->BTS_SOBRTIBA1_SOBRTIPN


BA1_MATVID042BTS->BTS_CPFTITBA1_CPFTITPN


BA1_MATVID043BTS->BTS_MAILTIBA1_MAILTIPN


BA1_MATVID044BTS->BTS_DDDCELBA1_DDDCELPN


BA1_MATVID045BTS->BTS_CELTITBA1_CELTITPN


BA1_MATVID046BTS->BTS_DDDTELBA1_DDDTELPN


BA1_MATVID047BTS->BTS_TELTITBA1_TELTITPN


BA1_MATVID048BTS->BTS_CEPTITBA1_CEPTITPN


BA1_MATVID049BTS->BTS_ENDTITBA1_ENDTIPN


BA1_MATVID050

BTS->BTS_NRENTI

BA1_NRENTIPN


BA1_MATVID051BTS->BTS_COMTITBA1_COMTITPN


BA1_MATVID052BTS->BTS_BAITITBA1_BAITITPN


BA1_MATVID053BTS->BTS_CIDTITBA1_CIDTITPN


BA1_MATVID054BTS->BTS_UFTITBA1_UFTITPN


BA1_MATVID055

BTS->BTS_MUNCTI

BA1_MUNCTIPN


BA1_MATVID056BTS->BTS_BANTITBA1_BANTITPN


BA1_MATVID057BTS->BTS_AGETITBA1_AGETITPN


BA1_MATVID058BTS->BTS_NUMTITBA1_NUMTITPN


BA1_SOBRTI001Substr(M->BA1_NOMTI,1,30)BA1_SOBRTIPN



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.

04. DEMAIS INFORMAÇÕES

Não se aplica

05. ASSUNTOS RELACIONADOS

  • Não se aplica