Home

Linha Microsiga Protheus

Páginas filhas
  • Fichas TXT

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

 

Ficha Prontuário

 

Registro de Admissao: #A015  GCY->GCY_REGGER

 

Atendimento.........: #A015  GCY->GCY_REGATE

Paciente............: #A022  Alltrim(GCY->GCY_NOME)       

Data do Atendimento.: #A021  DTOC(GCY->GCY_DATATE)    

Horario.............: #A015  GCY->GCY_HORATE

Sexo................: #A048  HS_IBrM24("GBH", 1, GCY->GCY_REGGER, "GBH_SEXO")

Plano ..............: #A109  POSICIONE("GCM",2,XFILIAL("GCM")+POSICIONE("GCZ",2,XFILIAL("GCZ")+GCY->GCY_REGATE,"GCZ_CODPLA"),"GCM_DESPLA")

Nascimento..........: #A021  dToC(GBH->GBH_DTNASC)                                    

Estado Civil........: #A050  if(GBH->GBH_ESTCIV=="0","Casado(a)","Solteiro(a)")

 

Observe que é necessário determinar os dados que irão compor cada campo com esta estrutura:

...