Tabela
BWW Oper x Co-Participacao (Item)
Campo Tipo Tamanho Decimal Titulo Formato Validacao F3 Contexto Lista Condicao PYME
BWW_FILIAL C 2 0 Filial S
BWW_CODINT C 4 0 Cd Operadora @R !.!!! PLSVLDINT(M->BWW_CODINT) B89PLS S
BWW_ANO C 4 0 Ano 9999 ExistChav("BWW",M->BWW_CODINT+M->BWW_ANO+M->BWW_MES) .And. M->BWW_ANO >= "1900" .And. M->BWW_ANO <= "3000" S
BWW_MES C 2 0 Mes 99 ExistChav("BWW",M->BWW_CODINT+M->BWW_ANO+M->BWW_MES) .And. M->BWW_MES >= "01" .And. M->BWW_MES <= "12" S
BWW_TIPO C 1 0 Reg Atendto @! 1=Internacao;2=Ambulatorial;3=Ambos S
BWW_QTD N 6 0 Qtd. Ate 999999 S
BWW_PERCOP N 16 2 % Co-Part. @E 9,999,999,999,999.99 PLSA515WHE("01") S
BWW_VLRCOP N 16 2 Vlr.CoPar. @E 9,999,999,999,999.99 PLSA515WHE("02") S
BWW_VALUS N 16 4 Valor U.S @E 99,999,999,999.9999 PLSA515WHE("03") S
BWW_TXADM N 16 2 Taxa Admin. @E 9,999,999,999,999.99 S
BWW_LIMFRA N 16 2 Vlr.Franq. @E 9,999,999,999,999.99 S
BWW_CODTAB C 7 0 Tab.CoPar. @R !!!!.!!! If(Empty(M->BWW_CODTAB),.T.,ExistCpo("BF8",M->BWW_CODTAB,1)) B9JPLS S
BWW_SOMCOM C 1 0 Som.p/Compra @! 1=Sim;0=Nao M->BWW_PAGATO$"0, " S
BWW_PAGATO C 1 0 Pagto no Ato @! 1=Sim;0=Nao M->BWW_SOMCOM$"0, " S
BWW_VIGINI D 8 0 Vig. Inicial PlsVldBWW() R S
BWW_VIGFIN D 8 0 Vig. Final PlsVldBWW() R S
BWW_FINATE C 2 0 Finalidade @! Vazio() .or. BGY->(ExistCpo("BGY",M->BWK_CODINT+M->BWW_FINATE,1)) BGYPLS R S
BWW_DESFIN C 70 0 Ds Finalidad @! If(Inclui,"",BGY->(Posicione("BGY",1,xFilial("BGY")+BWW->BWW_CODINT+BWW->BWW_FINATE,"BGY_DESCRI"))) V S