| X3_ARQUIVO | X3_ORDEM | X3_CAMPO | X3_TIPO | X3_TAMANHO | X3_DECIMAL | X3_TITULO | X3_DESCRIC | X3_PICTURE | X3_VALID | X3_RELACAO | X3_F3 | X3_NIVEL | X3_TRIGGER | X3_BROWSE | X3_VISUAL | X3_CONTEXT | X3_OBRIGAT | X3_CBOX | X3_PICTVAR | X3_WHEN | X3_INIBRW | X3_GRPSXG | X3_FOLDER |
| B23 | 01 | B23_FILIAL | C | 2 | 0 | Filial | Filial do Sistema | | | | | 1 | | | | | | | | | | 033 | |
| B23 | 04 | B23_CDPRRA | C | 16 | 0 | Cd. Proc. | Código do Procedimento | @! | | | | 1 | | N | A | R | | | | | | | |
| B23 | 05 | B23_CODPRO | C | 16 | 0 | Cod Tab Padr | Codigo Tabela Padrao | @! | ExistCpo("BR8",M->B23_CODPAD+M->B23_CODPRO,1) .And. PLSGATNIV(M->B23_CDPAD1,M->B23_CODPRO,"B23",.F.,.F.) | | BRHPLS | 1 | S | S | A | R | | | | | | | |
| B23 | 06 | B23_DESCRI | C | 230 | 0 | Descrição | Desc Finalidade Atend | @! | | IF(INCLUI,"",BR8->(POSICIONE("BR8",1,XFILIAL("BR8")+B23->(B23_CODPAD+B23_CODPRO),"BR8_DESCRI"))) | | 1 | | S | V | V | | | | | Posicione("BR8",1,xFilial("BR8")+B23->B23_CODPAD+B23->B23_CODPRO,"BR8_DESCRI") | | |
| B23 | 08 | B23_TIPLAN | C | 1 | 0 | Tp Lanc Acom | Tp Lançamento Acomodação | @! | Pertence("1;2") | "2" | | 1 | | S | A | R | | 1=Aplicado a todas as acomodacoes;2=Especifico para uma unica acomodacao | | | | | |
| B23 | 09 | B23_CODACO | C | 2 | 0 | Acomodação | Acomodação | @! | | | | 1 | | S | A | R | | | | M->B23_TIPLAN=="2" | | | |
| B23 | 11 | B23_DESACO | C | 40 | 0 | Ds Acomod. | Descrição Acomodação | @! | | If(Inclui,"",BI4->(Posicione("BI4",1,xFilial("BI4")+B23->B23_CODACO,"BI4_DESCRI"))) | | 1 | | S | V | V | | | | M->B23_TIPLAN=="2" | Posicione("BI4",1,xFilial("BI4")+B23->B23_CODACO,"BI4_DESCRI") | | |
| B23 | 14 | B23_UPSCO | N | 16 | 4 | US CO Pagto | Valor da US Pagamento | @E 99,999,999,999.9999 | M->B23_USPCO >= 0 | | | 1 | | S | A | R | | | | M->B23_VRPCO==0 | | | |
| B23 | 17 | B23_USRCO | N | 16 | 4 | US CO Recto | Valor da US Recebimento | @E 99,999,999,999.9999 | M->B23_USRCO >= 0 | | | 1 | | S | A | R | | | | M->B23_VRRCO==0 | | | |
| B23 | 19 | B23_USPPP | N | 16 | 4 | US PP Pagto | Valor da US Pagamento | @E 99,999,999,999.9999 | M->B23_USPPP >= 0 | | | 1 | | S | A | R | | | | M->B23_VRPPP==0 | | | |
| B23 | 20 | B23_USRPP | N | 16 | 4 | US PP Recto | Valor da US Recebimento | @E 99,999,999,999.9999 | M->B23_USRPP >= 0 | | | 1 | | S | A | R | | | | M->B23_VRRPP==0 | | | |
| B23 | 21 | B23_TPLAN | C | 1 | 0 | Tp Lanc Ope. | Tp Lancamento Operadora | @! | Pertence("1;2") | "2" | | 1 | | N | A | R | | 1=Aplicado a todas as operadoras;2=Especifico para uma unica operadora | | | | | |
| B23 | 22 | B23_CODOPE | C | 4 | 0 | Operadora | Operadora | @! | PlsZero() .And. BA0->(ExistCpo("BA0",M->B23_CODOPE,1)) | | B89PLS | 1 | | N | A | R | | | | M->B23_TPLAN=="2" | | | |
| B23 | 23 | B23_DESOPE | C | 40 | 0 | Descrição | Nome da Operadora | @! | | If(Inclui,"",BA0->(Posicione("BA0",1,xFilial("BA0")+B23->B23_CODOPE,"BA0_NOMINT"))) | | 1 | | N | V | V | | | | M->B23_TPLAN=="2" | | | |
| B23 | 24 | B23_PORTSL | N | 3 | 0 | Porte Sala | Porte de Sala | @E 999 | | | | 1 | | S | A | R | | | | | | | |
| B23 | 25 | B23_TPLANP | C | 1 | 0 | Tp Lanc Prd. | Tp Lancamento Produto | @! | Pertence("1;2") | "2" | | 1 | | N | A | R | | 1=Aplicado a todos os produtos;2=Especifico para um unico Produto | | | | | |
| B23 | 26 | B23_CODPLA | C | 4 | 0 | Cod Produto | Código do produto | @! | PlsSeek("BI3",, B22->B22_CODINT+M->B23_CODPLA,"","") | | BIUPLS | 1 | | N | A | R | | | | M->B23_TPLANP=="2" | | | |
| B23 | 27 | B23_DESPLA | C | 40 | 0 | Ds Produto | Descrição do Produto | @! | | If(Inclui,"",BI3->(Posicione("BI3",1,xFilial("BI3")+B22->B22_CODINT+B23->B23_CODPLA,"BI3_DESCRI"))) | | 1 | | N | V | V | | | | | | | |
| B23 | 29 | B23_CODPAD | C | 2 | 0 | Cod. Padrão | Código Padrão | @! | ExistCpo("BR4",M->B23_CODPAD,1) | GETMV("MV_PLSTBPD") | B41PLS | 1 | | N | A | R | | | | | | | |
| B23 | 32 | B23_CDNV01 | C | 6 | 0 | Cd Niv 01 | Cd Nivel 01 | @! | | | | 1 | | N | V | R | | | | | | | |
| B23 | 34 | B23_CDNV02 | C | 6 | 0 | Cd Niv 02 | Cd Nivel 02 | @! | | | | 1 | | N | V | R | | | | | | | |
| B23 | 35 | B23_CDNV03 | C | 6 | 0 | Cd Niv 03 | Cd Nivel 03 | @! | | | | 1 | | N | V | R | | | | | | | |
| B23 | 36 | B23_CDNV04 | C | 6 | 0 | Cd Niv 04 | Cd Nivel 04 | @! | | | | 1 | | N | V | R | | | | | | | |
| B23 | 37 | B23_NIVEL | C | 1 | 0 | Nivel | Nivel | @! | | | | 1 | | S | V | R | | | | | | | |
| B23 | 54 | B23_UCO | N | 16 | 2 | Uco | Uco | @E 9,999,999,999,999.99 | | | | 1 | | S | A | R | | | | | | | |
| B23 | 60 | B23_USPCO | N | 16 | 4 | US CO Pagto | Valor da US Pagamento | @E 99,999,999,999.9999 | M->B23_USPCO >= 0 | | | 1 | | S | A | R | | | | M->B23_VRPCO==0 | | | |
| B23 | 02 | B23_CODINT | C | 4 | 0 | Operadora | Operadora | @! | | Iif(inclui,B22->B22_CODINT, B23->B23_CODINT) | | 1 | | N | V | R | | | | | | | 1 |
| B23 | 03 | B23_CODTAB | C | 3 | 0 | Tabela | Código da Tabela | @! | | IIF(INCLUI,B22->B22_CODTAB, B23->B23_CODTAB) | | 1 | | S | V | R | | | | | | | 1 |
| B23 | 07 | B23_CODTDE | C | 3 | 0 | Cod. TDE | Cod Tabela Co-Partip. | @R !!! | Vazio() .or. ExistCpo("BF8",M->B23_CODINT+M->B23_CODTDE,1) | | BRQPLS | 1 | S | N | A | R | | | | | | | 1 |
| B23 | 10 | B23_CDPAD1 | C | 2 | 0 | Cod Pad De | Código Padrão | @! | PB23CDPAD2() | GETMV("MV_PLSTBPD") | B41PLS | 1 | | N | A | R | | | | | | | 1 |
| B23 | 12 | B23_CDPRO1 | C | 16 | 0 | Cd Proc De | Código Tabela Padrão | @! | ExistCpo("BR8",M->B23_CDPAD1+M->B23_CDPRO1,1) .and. VldDeAte(M->B23_CDPRO1, M->B23_CDPRO2) | | BRHPLS | 1 | S | S | A | R | | | | | | | 1 |
| B23 | 13 | B23_DSPRO1 | C | 230 | 0 | Des Proc De | Descrição | @! | | If(Inclui,"",BR8->(Posicione("BR8",1,xFilial("BR8")+B23->(B23_CDPAD1+B23_CDPRO1),"BR8_DESCRI"))) | | 1 | | S | V | V | | | | | Posicione("BR8",1,xFilial("BR8")+B23->B23_CDPAD1+B23->B23_CDPRO1,"BR8_DESCRI") | | 1 |
| B23 | 15 | B23_CDPAD2 | C | 2 | 0 | Cod Pad Ate | Código Padrão | @! | PB23CDPAD2() | GETMV("MV_PLSTBPD") | B41PLS | 1 | | N | V | R | | | | | | | 1 |
| B23 | 16 | B23_CDPRO2 | C | 16 | 0 | Cd Proc Ate | Código Tabela Padrão | @! | ExistCpo("BR8",M->B23_CDPAD2+M->B23_CDPRO2,1) .AND. VldDeAte(M->B23_CDPRO1, M->B23_CDPRO2) | | BRMPLS | 1 | S | S | A | R | | | | | | | 1 |
| B23 | 18 | B23_DSPRO2 | C | 230 | 0 | Des Proc Ate | Descrição | @! | | If(Inclui,"",BR8->(Posicione("BR8",1,xFilial("BR8")+B23->(B23_CDPAD1+B23_CDPRO1),"BR8_DESCRI"))) | | 1 | | S | V | V | | | | | Posicione("BR8",1,xFilial("BR8")+B23->B23_CDPAD2+B23->B23_CDPRO2,"BR8_DESCRI") | | 1 |
| B23 | 28 | B23_REGATE | C | 1 | 0 | Reg Atendto | Regime de Atendimento | @! | | | | 1 | | N | A | R | | 1=Internacao;2=Ambulatorial;3=Ambos | | | | | 1 |
| B23 | 30 | B23_FINATE | C | 2 | 0 | Finalidade | Finalidade Atendimento | @! | BGY->(ExistCpo("BGY",M->B23_CODINT+M->B23_FINATE,1)) .OR. VAZIO() | | BGYPLS | 1 | S | S | A | R | | | | | | | 1 |
| B23 | 31 | B23_VIGINI | D | 8 | 0 | Vigência Ini | Vigência Inicial | | | | | 1 | | S | A | R | | | | | | | 1 |
| B23 | 33 | B23_VIGFIM | D | 8 | 0 | Vigência Fim | Vigência Final | | dtos(M->B23_VIGFIM) >= dtos(M->B23_VIGINI) | | | 1 | | S | A | R | | | | | | | 1 |
| B23 | 38 | B23_CDTBUS | C | 3 | 0 | Tabela US | Codigo da Tabela de US | @! | Vazio() .or. PlsSeek("B27",1,M->B23_CODINT+M->B23_CDTBUS+"1","","") | | BRNPLS | 1 | S | S | A | R | | | | | | | 2 |
| B23 | 39 | B23_QTDUS | N | 3 | 0 | Quant US | Quantidade de US | @E 999 | | | | 1 | | S | A | R | | | | !empty(M->B23_CDTBUS) | | | 2 |
| B23 | 40 | B23_BANDUS | N | 12 | 2 | Banda US | Banda para US | @E 999,999,999.99 | | | | 1 | | S | A | R | | | | !empty(M->B23_CDTBUS) | | | 2 |
| B23 | 41 | B23_VRPPP | N | 16 | 2 | VL PP Pagto | Valor em R$ Recebimento | @E 9,999,999,999,999.99 | M->B23_VRPPP >= 0 | | | 1 | | N | A | R | | | | | | | 6 |
| B23 | 42 | B23_VRRPP | N | 16 | 2 | VL PP Recto | Valor em R$ Recebimento | @E 9,999,999,999,999.99 | M->B23_VRRPP >= 0 | | | 1 | | N | A | R | | | | | | | 6 |
| B23 | 43 | B23_VRPCO | N | 16 | 2 | VL CO Pagto | Valor em R$ Recebimento | @E 9,999,999,999,999.99 | M->B23_VRPCO >= 0 | | | 1 | | N | A | R | | | | | | | 6 |
| B23 | 44 | B23_VRRCO | N | 16 | 2 | VL CO Recto | Valor em R$ Recebimento | @E 9,999,999,999,999.99 | M->B23_VRRCO >= 0 | | | 1 | | N | A | R | | | | | | | 6 |
| B23 | 45 | B23_CDTBUC | C | 3 | 0 | Tabela UCO | Código da Tabela de UCO | @! | Vazio() .or. PlsSeek("B27",1,M->B23_CODINT+M->B23_CDTBUC+"3","","") | | BRPPLS | 1 | S | S | A | R | | | | | | | 3 |
| B23 | 46 | B23_QTDUC | N | 3 | 0 | Quant UCO | Quantidade UCO | @E 999 | | | | 1 | | S | A | R | | | | !empty(M->B23_CDTBUC) | | | 3 |
| B23 | 47 | B23_BANDUC | N | 12 | 2 | Banca UCO | Banca UCO | @E 999,999,999.99 | | | | 1 | | S | A | R | | | | !empty(M->B23_CDTBUC) | | | 3 |
| B23 | 48 | B23_CDTBFM | C | 3 | 0 | Tabela Filme | Codigo da Tabela de Filme | @! | Vazio() .or. PlsSeek("B27",1,M->B23_CODINT+M->B23_CDTBFM+"2","","") | | BROPLS | 1 | S | S | A | R | | | | | | | 4 |
| B23 | 49 | B23_QTDFM | N | 3 | 0 | Quant Filme | Quantidade de Filme | @E 999 | | | | 1 | | S | A | R | | | | !empty(M->B23_CDTBFM) | | | 4 |
| B23 | 50 | B23_BANDFM | N | 12 | 2 | Banda Filme | Banda para Filme | @E 999,999,999.99 | | | | 1 | | S | A | R | | | | !empty(M->B23_CDTBFM) | | | 4 |
| B23 | 51 | B23_CDPTAN | C | 3 | 0 | Tb Port Anes | Tabela Porte Anestesico | @! | Vazio() .or. PlsSeek("B27",1,M->B23_CODINT+M->B23_CDPTAN+"4","","") | | BRRPLS | 1 | S | S | A | R | | | | | | | 5 |
| B23 | 52 | B23_PORTAN | N | 3 | 0 | Porte Anest | Porte Anestesico | 999 | | | | 1 | | S | A | R | | | | !empty(M->B23_CDPTAN) | | | 5 |
| B23 | 53 | B23_BANPTA | N | 12 | 2 | Banda Porte | Banda Porte Anestesico | @E 999,999,999.99 | | | | 1 | | S | A | R | | | | !empty(M->B23_CDPTAN) | | | 5 |
| B23 | 55 | B23_BANDAP | N | 16 | 2 | Banda Pagto. | Banda para pagamento | @E 9,999,999,999,999.99 | | | | 1 | | S | A | R | | | | !empty(M->B23_CODTDE) | | | 1 |
| B23 | 56 | B23_BANDAR | N | 16 | 2 | Banda Recto. | Banda para recebimento | @E 9,999,999,999,999.99 | | | | 1 | | S | A | R | | | | !empty(M->B23_CODTDE) | | | 1 |
| B23 | 57 | B23_PERACR | N | 16 | 2 | % Acrescimo | Percentual de Acrescimo | @E 9,999,999,999,999.99 | | | | 1 | | | A | R | | | | | | | 1 |
| B23 | 58 | B23_PERDES | N | 16 | 2 | % Desconto | Percentual de Desconto | @E 9,999,999,999,999.99 | | | | 1 | | N | A | R | | | | | | | 1 |
| B23 | 59 | B23_OBSERV | M | 10 | 0 | Observações | Observações | @! | | | | 1 | | | A | R | | | | | | | 1 |