/*****************************************************************************/
/*     Programa .....: rc0310a.f                                             */
/*     Data .........: 28 de Agosto de 1998                                  */
/*     Sistema ......: RC - Revisao de Contas                                */
/*     Empresa ......: DZSET Solucoes e Sistemas                             */
/*     Cliente ......: Cooperativas Medicas                                  */
/*     Programador ..: Nora                                                  */
/*     Objetivo .....: Frames gerais                                         */
/*---------------------------------------------------------------------------*/
/*     VERSAO    DATA        RESPONSAVEL  MOTIVO                             */
/*****************************************************************************/
/*
def var cd-unidade-guia-aux       like docrecon.cd-unidade-guia.
def var aa-guia-atendimento-aux   like docrecon.aa-guia-atendimento.

def var nr-guia-atendimento-aux   like docrecon.nr-guia-atendimento.
def var lg-urgencia-aux           like moviproc.lg-urgencia.
def var lg-adicional-urgencia-aux like moviproc.lg-adicional-urgencia.       
*/
def {1} shared var in-tipo-fatura-aux  as integer                    no-undo.

/*-------------------- VARIAVEIS FRAME REEMBOLSO ---------------------------*/
def {1} shared var in-tipo-pessoa-reemb-aux  as log  format "J/F"              no-undo.
def {1} shared var nr-cpf-cnpj-reemb-aux     like preserv.nr-cgc-cpf           no-undo. 
def {1} shared var nm-prest-reemb-aux        as char format "x(70)"            no-undo.        
def 		   var nm-profissional-reemb-aux as char format "x(70)"            no-undo.  
def 		   var nm-conselho-reemb-aux     as char format "x(07)"            no-undo.
def 		   var cd-conselho-reemb-aux     as char format "x(15)"            no-undo.
def 		   var uf-profissional-reemb-aux as char format "x(02)"            no-undo.

/* ------------------------- USUARIO EVENTUAL FRAME F-USUARIO-EVENTUAL -----*/
def var nome-usuar-event-aux     as char format "x(200)"             no-undo.
def var dt-nasc-usuar-event-aux  as date format "99/99/9999"         no-undo.
def var sexo-usuar-event-aux     as log  format "Feminino/Masculino" no-undo.
def var cd-cidade-residencia-aux as int                              no-undo.
def var ds-cidade-residencia-aux as char format "x(190)"             no-undo.

def rectangle r-f-transacao
      edge-pixels 3 graphic-edge no-fill size 78 by 1.85.
      
define {1} shared frame f-transacao
       docrecon.cd-transacao          
         view-as fill-in native size 5 by 1.25                                                          
         tooltip "Codigo da transacao" at row 1.25 col 10
       
       tranrevi.ds-transacao          no-label
         view-as fill-in native size 41 by 1.25                                                         
         tooltip "Descricao da transacao" 
       
    &if "{&window-system}" <> "TTY" 
    &then
          r-f-transacao  at row 1 col 1                        
          with three-d overlay row 4 side-labels 1 down centered  no-box.                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                        
    &else
          with three-d overlay row 3 side-labels 1 down centered  no-box.                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                        
    &endif.

def rectangle r-f-prestador
      edge-pixels 3 graphic-edge no-fill size 78 by 5.65.

define {1} shared frame f-prestador
       docrecon.cd-unidade-prestadora  
         view-as fill-in native size 5 by 1.25
         tooltip "Codigo da unidade prestadora" at row 1.25 col 3
       
       unimed.nm-unimed-reduz          no-label
         view-as fill-in native size 50 by 1.25
         tooltip "Nome abreviado da unidade"
       
       docrecon.cd-prestador-principal 
         view-as fill-in native size 9 by 1.25
         tooltip "Codigo do prestador principal" at row 2.50 col 2
         
       preserv.nm-prestador            no-label 
         view-as fill-in native size 46 by 1.25                                                         
         tooltip "Nome do prestador"
       
       docrecon.cd-vinculo-principal   
         view-as fill-in native size 3 by 1.25                                                          
         tooltip "Tipo de vinculo do prestador principal" at row 3.80 col 4
       
       tipovinc.ds-tipo-vinculo        no-label 
         view-as fill-in native size 52 by 1.25                                                         
         tooltip "Descricao do tipo de vinculo do Prestador" 
       
       docrecon.dt-anoref              
         view-as fill-in native size 5 by 1.25                                                          
         tooltip "Ano de referencia do periodo" at row 5.05 col 7
       
       docrecon.nr-perref              label "Periodo"
         view-as fill-in native size 4 by 1.25                                                          
         tooltip "Periodo de referencia" at row 5.05 col 26
       
       perimovi.dt-inicio-per          label "Inicio"  
         view-as fill-in native size 11 by 1.25                                                         
         tooltip "Data de inicio do periodo" at row 5.05 col 40
       
       perimovi.dt-fim-per             label "Fim"     
         view-as fill-in native size 11 by 1.25                                                         
         tooltip "Data final do periodo"     at row 5.05 col 60
       
       &if "{&window-system}" <> "TTY" 
       &then
             r-f-prestador  at row 1 col 1                        
             with three-d overlay row 5.85 side-labels 1 down centered  no-box.                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                        
       &else
             with three-d overlay row 4.85 side-labels 1 down centered  no-box.                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                        
       &endif.
       
       
def rectangle rt-doc-ser
      edge-pixels 3 graphic-edge no-fill size 78 by 4.35.

define {1} shared frame f-doc-ser
       docrecon.cd-unidade-prestadora  
         view-as fill-in native size 5  by 1.25
         tooltip "Codigo da unidade prestadora"  at row 1.25 col 4
       
       unimed.nm-unimed-reduz          no-label
         view-as fill-in native size 50 by 1.25
         tooltip "Nome abreviado da unidade"
       
       docrecon.cd-prestador-principal 
         view-as fill-in native size 9  by 1.25
         tooltip "Codigo do prestador principal" at row 2.55 col 3
         
       preserv.nm-prestador            no-label 
         view-as fill-in native size 46 by 1.25                                                         
         tooltip "Nome do prestador"
         
       docrecon.nr-serie-doc-original  
         view-as fill-in native size 5  by 1.25                                                          
         tooltip "Serie do documento original"   at row 3.80 col 2
         
       &if "{&window-system}" <> "TTY" 
       &then
             rt-doc-ser  at row 1 col 1                        
             with three-d overlay row 5.85 side-labels 1 down centered  no-box.                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                        
       &else
             with three-d overlay row 4.85 side-labels 1 down centered  no-box.                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                        
       &endif.
       

def rectangle r-f-prestador-aux
      edge-pixels 3 graphic-edge no-fill size 78 by 1.85.
      
define {1} shared frame f-prestador-aux
       docrecon.cd-unidade-prestadora  
        view-as fill-in native size 5 by 1.25                                                          
        tooltip "Codigo da unidade prestadora" at row 1.25 col 4
       
       unimed.nm-unimed-reduz          no-label 
        view-as fill-in native size 41 by 1.25                                                         
        tooltip "Nome abreviado da unidade"
       
       &if "{&window-system}" <> "TTY" 
       &then
             r-f-prestador-aux at row 1 col 1                        
             with three-d overlay row 5.85 side-labels 1 down centered  no-box.                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                        
       &else
             with three-d overlay row 4.85 side-labels 1 down centered  no-box.                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                        
       &endif.

def rectangle r-f-documento-aux
      edge-pixels 3 graphic-edge no-fill size 78 by 3.85.
      
define {1} shared frame f-documento-aux
       docrecon.nr-serie-doc-original  
         view-as fill-in native size 5 by 1.25                                                          
         tooltip "Serie do documento original" at row 1.25 col 2
       
       docrecon.nr-doc-original        
         view-as fill-in native size 9 by 1.25                                                          
         tooltip "Numero do documento original" at row 1.25 col 45
       
       &if "{&window-system}" <> "TTY" 
       &then
             r-f-documento-aux at row 1 col 1                        
             with three-d overlay row 7.75 side-labels 1 down centered  no-box.                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                        
       &else
             with three-d overlay row 6.75 side-labels 1 down centered  no-box.                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                        
       &endif.
       
def rectangle r-f-prest-elimina-aux
      edge-pixels 3 graphic-edge no-fill size 78 by 3.15.
      
define {1} shared frame f-prest-elimina-aux
       docrecon.cd-unidade-prestadora
        view-as fill-in native size 5 by 1.25                                                          
        tooltip "Codigo da unidade prestadora" at row 1.25 col 5
       
       unimed.nm-unimed-reduz          no-label
        view-as fill-in native size 45 by 1.25                                                         
        tooltip "Nome abreviado da unidade"
        
       docrecon.cd-prestador-principal 
        view-as fill-in native size 9 by 1.25                                                          
        tooltip "Codigo do prestador principal" at row 2.50 col 4
       
       preserv.nm-prestador            no-label 
        view-as fill-in native size 41 by 1.25                                                         
        tooltip "Nome do prestador" 
       &if "{&window-system}" <> "TTY" 
       &then
             r-f-prest-elimina-aux at row 1 col 1                        
             with three-d overlay row 5.85 side-labels 1 down centered  no-box.                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                        
       &else
             with three-d overlay row 4.85 side-labels 1 down centered  no-box.                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                        
       &endif.

def rectangle r-f-internacao
      edge-pixels 3 graphic-edge no-fill size 78 by 5.80.

define {1} shared frame f-internacao
       guiautor.dt-internacao-realiz       
         view-as fill-in native size 11 by 1.25
         tooltip "Data da internacao" at row 1.25 col 10
       
       guiautor.dt-alta-realiz             
        view-as fill-in native size 11 by 1.25                                                         
        tooltip "Data de alta" at row 2.50 col 13
       
       guiautor.nr-dias-internacao-realiz  
        view-as fill-in native size 4 by 1.25                                                          
        tooltip "Total de dias de internacao realizada" at row 3.80 col 3
       
       guiautor.nr-dias-uti-realiz         
        view-as fill-in native size 4 by 1.25                                                          
        tooltip "Total de dias de internacao UTI" at row 5.10 col 5
        
       &if "{&window-system}" <> "TTY" 
       &then
             r-f-internacao at row 1 col 1                        
             with three-d overlay row 8 side-labels 1 down centered  title " Dados de Internacao Realizado " .
       &else
             with three-d overlay row 7 side-labels 1 down centered  title " Dados de Internacao Realizado " .
       &endif.
       
def rectangle r-f-guia-tela
      edge-pixels 3 graphic-edge no-fill size 78 by 4.5.
      
define {1} shared frame f-guia-tela
       cd-unidade-guia-aux
        view-as fill-in native size 5 by 1.25
        tooltip "Unidade responsavel pela emissao da guia" at row 1.25 col 8
        
       aa-guia-atendimento-aux             
        view-as fill-in native size 5 by 1.25
        tooltip "Ano de emissao da guia de autorizacao" at row 2.50 col 11
       
       nr-guia-atendimento-aux             
        view-as fill-in native size 9 by 1.25                                                          
        tooltip "Numero da guia de autorizacao" at row 3.80 col 15
       
       &if "{&window-system}" <> "TTY" 
       &then
             r-f-guia-tela at row 1 col 1                        
             with three-d overlay row 8 side-labels 1 down centered  title " Dados da Guia ".
       &else
             with three-d overlay row 7 side-labels 1 down centered  title " Dados da Guia " .
       &endif.

def rectangle r-f-guia-modi
      edge-pixels 3 graphic-edge no-fill size 78 by 4.5.
      
define {1} shared frame f-guia-modi
       docrecon.cd-unidade                 
        view-as fill-in native size 5 by 1.25                                                          
        tooltip "Unidade do prestador" at row 1.25 col 5
       
       docrecon.aa-guia-atendimento        
        view-as fill-in native size 5 by 1.25                                                          
        tooltip "Ano de emissao da guia de autorizacao" at row 2.50 col 8
       
       docrecon.nr-guia-atendimento        
        view-as fill-in native size 9 by 1.25
        tooltip "Numero da guia de autorizacao" at row 3.80 col 12
        
       &if "{&window-system}" <> "TTY" 
       &then
             r-f-guia-modi at row 1 col 1                        
             with three-d overlay row 4 side-labels 1 down centered  no-box.
       &else
             with three-d overlay row 3 side-labels 1 down centered  no-box.
       &endif.

def rectangle r-f-fatura
      edge-pixels 3 graphic-edge no-fill size 78 by 8.5.
      
define {1} shared frame f-fatura
       docrecon.cd-unidade-prestadora      
        view-as fill-in native size 5 by 1.25                                                          
        tooltip "Codigo da unidade prestadora" at row 1.25 col 3       
       unimed.nm-unimed-reduz              no-label
        view-as fill-in native size 45 by 1.25                                                         
        tooltip "Nome abreviado da unidade" 
       
       docrecon.cd-prestador-principal     
        view-as fill-in native size 9 by 1.25                                                          
        tooltip "Codigo do prestador principal" at row 2.50 col 2
       
       preserv.nm-prestador                no-label 
        view-as fill-in native size 41 by 1.25                                                         
        tooltip "Nome do prestador" 
       
       docrecon.aa-fatura                label "Ano Fatura/NDR"  
        view-as fill-in native size 5 by 1.25                                                          
        tooltip "Ano base da fatura"            at row 3.80 col 4
          
       docrecon.cd-serie-nf              label "Serie NF/NDR"  
        view-as fill-in native size 4 by 1.25
        tooltip "Serie da nota fiscal" at row 5.05 col 6
       
       docrecon.cod-fatur-ap  label "Nr.Fatura/NDR" format "x(16)"                
        view-as fill-in native size 21 by 1.25                                                          
        tooltip "Numero da fatura"  at row 6.30 col 5
        
       in-tipo-fatura-aux     label "Tipo Fatura"
        view-as combo-box list-item-pairs "Fatura",0,"NDR",1
                                       at row 7.70 col 7
       
       &if "{&window-system}" <> "TTY" 
       &then
             r-f-fatura at row 1 col 1                        
             with three-d overlay row 4 side-labels 1 down centered  title " Dados da Fatura " .
       &else
             with three-d overlay row 3 side-labels 1 down centered  title " Dados da Fatura " .
       &endif.

def rectangle r-f-fatura-aux
      edge-pixels 3 graphic-edge no-fill size 78 by 8.5.
      
define {1} shared frame f-fatura-aux
       docrecon.cd-unidade-prestadora  
         view-as fill-in native size 5 by 1.25
         tooltip "Codigo da unidade prestadora" at row 1.25 col 3
       
       unimed.nm-unimed-reduz          no-label
         view-as fill-in native size 50 by 1.25
         tooltip "Nome abreviado da unidade"
       
       docrecon.cd-prestador-principal 
         view-as fill-in native size 9 by 1.25
         tooltip "Codigo do prestador principal" at row 2.50 col 2
         
       preserv.nm-prestador            no-label 
         view-as fill-in native size 46 by 1.25                                                         
         tooltip "Nome do prestador"
         
       docrecon.aa-fatura                label "Ano Fatura/NDR"  
        view-as fill-in native size 5 by 1.25                                                          
        tooltip "Ano base da fatura"            at row 3.80 col 4
          
       docrecon.cd-serie-nf              label "Serie NF/NDR"  
        view-as fill-in native size 4 by 1.25
        tooltip "Serie da nota fiscal" at row 5.05 col 6
       
       docrecon.cod-fatur-ap  label "Nr.Fatura/NDR" format "x(16)"                
        view-as fill-in native size 21 by 1.25                                                          
        tooltip "Numero da fatura" at row 6.30 col 5
        
       in-tipo-fatura-aux     label "Tipo Fatura"
        view-as combo-box list-item-pairs "Fatura",0,"NDR",1
                                       at row 7.70 col 7
       &if "{&window-system}" <> "TTY" 
       &then
             r-f-fatura-aux at row 1 col 1                        
             with three-d overlay row 4 side-labels 1 down centered  no-box.
       &else
             with three-d overlay row 3 side-labels 1 down centered  no-box.
       &endif.
       
def rectangle r-f-urgencia
      edge-pixels 3 graphic-edge no-fill size 40 by 5.25.
      
define {1} shared frame f-urgencia
       lg-urgencia-aux             label "Urg.Pagto"
        view-as fill-in native size 4 by 1.25                                                          
        tooltip "Indicador de utilizacao do movimento em urgencia para pagamento" at row 1.25 col 09
       
       lg-adicional-urgencia-aux   
        view-as fill-in native size 4 by 1.25
        tooltip "Documento tera adicional de urgencia" at row 2.50 col 5
        
       lg-urgencia-cob-aux         label "Urg.Cob"    
        view-as fill-in native size 4 by 1.25                                                          
        tooltip "Indicador de utilizacao do movimento em urgencia para cobranca" at row 3.85 col 11
         
       &if "{&window-system}" <> "TTY" 
       &then
             r-f-urgencia at row 1 col 1                        
             with three-d overlay row 4 side-labels 1 down centered  title "Indicadores de atendimento em Urgencia".
       &else
             with three-d overlay row 3 side-labels 1 down centered  title "Indicadores de atendimento em Urgencia".
       &endif.

def rectangle r-f-usuario
      edge-pixels 3 graphic-edge no-fill size 78 by 7.57.
      
define {1} shared frame f-usuario
       docrecon.cd-unidade                 
        view-as fill-in native size 5 by 1.25                                                          
        tooltip "Unidade do prestador" at row 1.25 col 5
       
       unimed.nm-unimed-reduz          no-label 
        view-as fill-in native size 52 by 1.25                                                         
        tooltip "Nome abreviado da unidade" 
       
       docrecon.cd-modalidade          
        view-as fill-in native size 3 by 1.25                                                          
        tooltip "Identificacao da modalidade de comercializacao" at row 2.50 col 6
       
       modalid.ds-modalidade           no-label 
        view-as fill-in native size 54 by 1.25                                                         
        tooltip "Descricao da modalidade de comercializacao" 
       
       docrecon.nr-ter-adesao          
        view-as fill-in native size 7 by 1.25
        tooltip "Numero do termo de adesao" at row 3.80 col 11
       
       contrat.nm-contratante          no-label 
        view-as fill-in native size 50 by 1.25                                                         
        tooltip "Nome do contratante"       
       
       docrecon.cd-usuario             
        view-as fill-in native size 7 by 1.25                                                          
        tooltip "Codigo do beneficiario no plano de saude" at row 5.05 col 10
       
       usuario.nm-usuario              no-label 
        view-as fill-in native size 51 by 1.25                                                         
        tooltip "Nome do beneficiario" 
       
       docrecon.dt-anoref              
        view-as fill-in native size 5 by 1.25                                                          
        tooltip "Ano de referencia do periodo" at row 6.40 col 5
       
       docrecon.nr-perref              label "Periodo" 
        view-as fill-in native size 4 by 1.25                                                          
        tooltip "Periodo de referencia" at row 6.40 col 25
       
       perimovi.dt-inicio-per          label "Inicio"  
        view-as fill-in native size 11 by 1.25                                                         
        tooltip "Data de inicio do periodo" at row 6.40 col 40
       
       perimovi.dt-fim-per             label "Fim"     
        view-as fill-in native size 11 by 1.25                                                         
        tooltip "Data final do periodo" at row 6.40 col 60
       
       &if "{&window-system}" <> "TTY" 
       &then
             r-f-usuario at row 1 col 1                        
             with three-d overlay row 4 side-labels 1 down centered  no-box.
       &else
             with three-d overlay row 3 side-labels 1 down centered  no-box.
       &endif.

define {1} shared frame f-auxiliares
       " -------->   Digitacao de auxiliares e Anestesistas   <-------- "
       with color message no-labels no-box overlay centered no-underline
       row 4.

       
def rectangle r-f-divihono
      edge-pixels 3 graphic-edge no-fill size 78 by 7.
      
define {1} shared frame f-divihono
       moviproc.cd-unidade-prestador        
        view-as fill-in native size 5 by 1.25                                                          
        tooltip "Codigo da unidade do prestador" at row 1.25 col 8
       
       unimed.nm-unimed-reduz                    no-label
        view-as fill-in native size 45 by 1.25                                                         
        tooltip "Nome abreviado da unidade"
       
       moviproc.cd-prestador                
        view-as fill-in native size 9 by 1.25                                                          
        tooltip "Identifica o codigo do prestador" at row 2.5 col 13
       
       preserv.nm-prestador                      no-label 
        view-as fill-in native size 41 by 1.25                                                         
        tooltip "Nome do prestador" 
          
       moviproc.cd-tipo-vinculo             
        view-as fill-in native size 3 by 1.25                                                          
        tooltip "Codigo do tipo de vinculo do prestador" at row 3.80 col 12
       
       tipovinc.ds-tipo-vinculo                  no-label 
        view-as fill-in native size 47 by 1.3                                                         
        tooltip "Descricao do tipo de vinculo do Prestador" 
       
       moviproc.cd-esp-prest-executante     
        view-as fill-in native size 4 by 1.3                                                          
        tooltip "Especialidade do prestador executante" at row 5.05 col 5
       
       esp-med.ds-especialid                     no-label 
        view-as fill-in native size 46 by 1.3                                                         
        tooltip "Descricao da especialidade medica" 
       
       moviproc.lg-trab-cooperado           
        view-as fill-in native size 4 by 1.3                                                          
        tooltip "Trabalho caracterizado como ato credenciado principal" at row 6.40 col 11
       
       &if "{&window-system}" <> "TTY" 
       &then
             r-f-usuario at row 1 col 1                        
             with three-d overlay row 4 side-labels 1 down centered
             title " Prestador que recebera a Divisao de Honorarios ".
       &else
             with three-d overlay row 3 side-labels 1 down centered  
             title " Prestador que recebera a Divisao de Honorarios ".
       &endif.

def rectangle r-f-clinicas
      edge-pixels 3 graphic-edge no-fill size 78 by 4.40.
      
define {1} shared frame f-clinicas
       docrecon.cd-unidade-prestadora  
         view-as fill-in native size 5 by 1.25
         tooltip "Codigo da unidade prestadora" at row 1.25 col 3
       
       unimed.nm-unimed-reduz          no-label
         view-as fill-in native size 50 by 1.25
         tooltip "Nome abreviado da unidade"
         
       clinicas.cd-clinica 
         view-as fill-in native size 9 by 1.25
         tooltip "Codigo da Clinica" at row 2.50 col 11
         
       clinicas.ds-clinica             no-label 
         view-as fill-in native size 46 by 1.25                                                         
         tooltip "Descricao da Clinica"  
       
       docrecon.dt-anoref              
         view-as fill-in native size 5 by 1.25                                                          
         tooltip "Ano de referencia do periodo" at row 3.80 col 7
       
       docrecon.nr-perref              label "Periodo"
         view-as fill-in native size 4 by 1.25                                                          
         tooltip "Periodo de referencia" at row 3.80 col 26
       
       perimovi.dt-inicio-per          label "Inicio"  
         view-as fill-in native size 11 by 1.25                                                         
         tooltip "Data de inicio do periodo" at row 3.80 col 40
       
       perimovi.dt-fim-per             label "Fim"     
         view-as fill-in native size 11 by 1.25                                                         
         tooltip "Data final do periodo"     at row 3.80 col 60
       
       &if "{&window-system}" <> "TTY" 
       &then
             r-f-clinicas  at row 1 col 1                        
             with three-d overlay row 5.85 side-labels 1 down centered  no-box.                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                        
       &else
             with three-d overlay row 4.85 side-labels 1 down centered  no-box.                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                        
       &endif.     

/* -------------------------- DADOS EXECUTANTE COMPLEMENTAR - REEMBOLSO --- */ 
def rectangle r-exec-reembolso
    edge-pixels 3 graphic-edge no-fill size 67 by 8.5.
    
def {1} shared frame f-exec-reeembolso

    in-tipo-pessoa-reemb-aux    label "Tipo de Pessoa"           
      view-as fill-in native size 2 by 1.3 
      tooltip "Tipo de pessoa executante"                        at row 1.4   col 5
      
    nr-cpf-cnpj-reemb-aux       label "CPF/CNPJ" 
      view-as fill-in native size 20 by 1.3
      tooltip "CPF/CNPJ do executante"                           at row 1.4   col 36
      
    nm-prest-reemb-aux          label "Nome Prestador" 
      view-as fill-in native size 45 by 1.3
      tooltip "Nome do prestador executante de reembolso"        at row 2.8   col 5 
      
    nm-profissional-reemb-aux   label "Nome Profissional" 
      view-as fill-in native size 45 by 1.3
      tooltip "Nome do profissional executante de reembolso"     at row 4.2   col 2
      
    nm-conselho-reemb-aux       label "Conselho Prof." 
      view-as fill-in native size 8 by 1.3
      tooltip "Conselho do profissional executante"              at row 5.6   col 5 
      
    cd-conselho-reemb-aux       label "Numero do Conselho" 
      view-as fill-in native size 16 by 1.3
      tooltip "Numero do conselho"                               at row 5.6   col 30   
      
    uf-profissional-reemb-aux   label "UF Prof." 
      view-as combo-box inner-lines 08
      tooltip "UF do profissional executante"                    at row 7.0   col 11
      
    &if "{&window-system}" <> "TTY" 
    &then
          r-exec-reembolso  at row 1 col 1                        
          with three-d overlay row 7 side-labels 1 down centered  title " DADOS DO EXECUTANTE - REEMBOLSO " . 
    &else
          with three-d overlay row 6 side-labels 1 down centered  title " DADOS DO EXECUTANTE - REEMBOLSO " .
    &endif.  
    
/* ----------------------------------- DADOS DO PRESTADOR DE REEMBOLSO --- */                                                                                                 

def rectangle r-reembolso
    edge-pixels 2 graphic-edge no-fill size 65 by 4.5.

def rectangle r-reembolso-dados-executante
    edge-pixels 2 graphic-edge no-fill size 65 by 4.5.
    
def {1} shared frame f-reembolso      
     skip(1)                                                          
     
	 " Prestador de Pagamento do Reembolso "  at row 1.3 column 17 
	 
     docrecon.int-16            label "Unidade"            format "9999"
         view-as fill-in size 5 by 1.3 native                        
         tooltip "Codigo da unidade"                                 at row 2.8 column 12   
         
     unimed.nm-unimed      no-label                                                                           
         view-as fill-in size 37 by 1.3 native                                                      
         tooltip "Nome abreviado da unidade"          
                                   
     docrecon.int-17            label "Prestador"          format "99999999"
         view-as fill-in size 9 by 1.3 native                        
         tooltip "Codigo do prestador"                               at row 4.3 column 10       
         
     preserv.nm-prestador       no-label
         view-as fill-in size 33 by 1.3 native
         tooltip "Nome do prestador de Reembolso" 
 
	 " Prestador Executante do Reembolso "  at row 6.6 column 18 

	 in-tipo-pessoa-reemb-aux    label "Tipo de Pessoa"           
		 view-as fill-in native size 2 by 1.3
		 tooltip "Tipo de pessoa executante"                        at row 8   col 5
      
     nr-cpf-cnpj-reemb-aux       label "CPF/CNPJ" 
		 view-as fill-in native size 20 by 1.3
		 tooltip "CPF/CNPJ do executante"                           at row 8 col 34
      
     nm-prest-reemb-aux          label "Nome Prestador" 
		 view-as fill-in native size 43 by 1.3
		 tooltip "Nome do prestador executante de reembolso"        at row 9.5   col 5 
 
	skip(1)
    &if "{&window-system}" <> "TTY"
    &then                                                                                 
         r-reembolso at row 1.7 col 2
		 r-reembolso-dados-executante at row 6.99 col 2 
         with overlay row 7 col 7 side-labels frame f-reembolso three-d size 67 by 12
         title "Informacoes do Reembolso".
    &else
         with overlay row 7 col 7 side-labels frame f-reembolso three-d size 67 by 12
         title "Informacoes do Reembolso". 
    &endif.
    
/* ----------------------------------- DADOS DO USUARIO EVENTUAL --- */   
    
def rectangle r-usu-eve                                                           
      edge-pixels 2 graphic-edge no-fill size 61 by 7. 

def frame f-usuario-eventual
    nome-usuar-event-aux   label "Nome Usuario"                                                                           
      view-as fill-in native size 41 by 1.3                                                         
      tooltip "Nome do usuario " at row 1.7 col 5  

    dt-nasc-usuar-event-aux label "Data Nascimento" 
      view-as fill-in native size 11 by 1.3                                                         
      tooltip "Data Nascimento do usuario" at row 3.08 col 2

    sexo-usuar-event-aux    label "Sexo"                                                 
      view-as fill-in native size 11 by 1.3                                                         
      tooltip "Sexo do usuario" at row 4.46 col 13 

    cd-cidade-residencia-aux label "Cidade" format "999999"                                                  
      view-as fill-in native size 7 by 1.3                                                         
      tooltip "Sexo do usuario" at row 5.84 col 11

    ds-cidade-residencia-aux no-label 
      view-as fill-in native size 34 by 1.3  
      tooltip "Sexo do usuario" at row 5.84 col 26.3 

    r-usu-eve  at row 1 col 1                                                        
    with three-d overlay row 10 side-labels 1 down centered  title " USUARIO EVENTUAL ".
    
/* ------------------------------------------------------------------ EOF --- */  
