Tabela
BHG Grp/Emp x Contrato x Co-Part
Campo Tipo Tamanho Decimal Titulo Formato Validacao F3 Contexto Lista Condicao PYME
BHG_FILIAL C 2 0 Filial S
BHG_CODINT C 4 0 Cd Operadora @! B41PLS S
BHG_CODIGO C 4 0 Grp/Empresa @! S
BHG_TIPO C 1 0 Reg Atendto @! 1=Internacao;2=Ambulatorial;3=Ambos S
BHG_QTD N 6 0 Qtd. Ate 999999 S
BHG_PERCOP N 16 2 % Co-Part. @E 9,999,999,999,999.99 PLSA660WHE("01") S
BHG_VLRCOP N 16 2 Vlr.CoPar. @E 9,999,999,999,999.99 PLSA660WHE("02") S
BHG_VALUS N 16 4 Valor U.S @E 99,999,999,999.9999 PLSA660WHE("03") S
BHG_TXADM N 16 2 Taxa Admin. @E 9,999,999,999,999.99 S
BHG_LIMFRA N 16 2 Vlr.Franq. @E 9,999,999,999,999.99 S
BHG_NUMCON C 12 0 Num.Contrato S
BHG_CODTAB C 7 0 Tab.CoPar. @R !!!!.!!! Vazio() .or. ExistCpo("BF8",M->BHG_CODTAB,1) B68PLS M->BHG_PERCOP > 0 S
BHG_SOMCOM C 1 0 Som.p/Compra @! 1=Sim;0=Nao M->BHG_PAGATO$"0, " S
BHG_PAGATO C 1 0 Pagto no Ato @! 1=Sim;0=Nao M->BHG_SOMCOM$"0, " S
BHG_PAGRDA C 1 0 Pagto na RDA @! 1=Sim;0=Nao S
BHG_VERCON C 3 0 Versao Cont. S
BHG_CODPRO C 4 0 Produto S
BHG_SUBCON C 9 0 Sub-contrato S
BHG_VERSUB C 3 0 Versao Sub. S
BHG_SOMPRO C 1 0 Somen.Proc.? @! 1=Sim;0=Nao S
BHG_VERPRO C 3 0 Versao @! R S
BHG_ANOMES C 6 0 Ano/Mes Reaj @R !!!!/!! N
BHG_VLRANT N 16 2 Valor Ant. @E 9,999,999,999,999.99 N
BHG_TIPUSR C 1 0 Tipo Benef. @! If(Empty(M->BHG_TIPUSR),.T.,ExistCpo("BIH",M->BHG_TIPUSR,1)) B47PLS N
BHG_DESTIP C 30 0 Descricao @! V N
BHG_GRAUPA C 2 0 Grau Parent. @! IF(Empty(M->BHG_GRAUPA),.T.,ExistCpo("BRP",M->BHG_GRAUPA,1)) B37PLS N
BHG_DESGRA C 30 0 Descricao @! V N
BHG_IDAINI N 3 0 Idade Minima 999 Positivo() .AND. M->BHG_IDAINI <= M->BHG_IDAFIN N
BHG_IDAFIN N 3 0 Idade Maxima 999 Positivo() .AND. If(!Empty(M->BHG_IDAINI),M->BHG_IDAFIN >= M->BHG_IDAINI,.T.) N
BHG_FAISAL C 1 0 Fxa Salarial @! Pertence("12") R 1=Nivel 1;2=Nivel 2;3=Nivel 3;4=Nivel 4;5=Nivel 5 N
BHG_RDACRE C 1 0 Rede Credenc @! Pertence("12") R 1=Sim;2=Nao N
BHG_RDAPRE C 1 0 Rede Prefere @! Pertence("12") R 1=Sim;2=Nao M->BHG_RDACRE = "1" N
BHG_PERCO2 N 16 2 % Co-Part2 @E 9,999,999,999,999.99 R M->BHG_VLRCO2 = 0 N
BHG_VLRCO2 N 16 2 Vlr.Co-Par2 @E 9,999,999,999,999.99 R M->BHG_PERCO2 = 0 N
BHG_VLRMIN N 16 2 Valor Minimo @E 9,999,999,999,999.99 R N
BHG_ACUMUL C 1 0 Cons. p/Acum @! Pertence("12") R 1=Inclusao do Contrato;2=Inclusao do Usuario N
BHG_CONSTB C 1 0 Cons Tab Pad @! Pertence("01") R 0=Nao;1=Sim N
BHG_VIGINI D 8 0 Vig. Inicial PlsVldBHG() R S
BHG_VIGFIN D 8 0 Vig. Final Vazio() .or. PlsVldBHG() R S
BHG_TABCOP C 4 0 Tab. Cop. In @! VAZIO() .OR. BRT->(ExistCpo("BRT",M->BHG_TABCOP,1)) PLSBRT R S
BHG_FINATE C 2 0 Finalidade @! Vazio() .or. BGY->(ExistCpo("BGY",M->BQC_CODINT+M->BHG_FINATE,1)) BGYPLS R S
BHG_DESFIN C 70 0 Ds Finalidad @! V S