Tabela
GB4 Agenda Cirurgica
Campo Tipo Tamanho Decimal Titulo Formato Validacao F3 Contexto Lista Condicao PYME
GB4_FILIAL C 2 0 Filial N
GB4_REGATE C 6 0 Reg.Internac @! HspA47Ok() ZVR R N
GB4_SALA C 6 0 Codigo Sala @! HS_SeekRet("SX5","'GD'+M->GB4_SALA",1,.f.,"GB4_DESSAL","X5_DESCRI") GD R !lAltCir .And. !lCnfCir N
GB4_DESSAL C 45 0 Sala @! V N
GB4_DATA D 8 0 Data @D R !lAltCir .And. !lCnfCir N
GB4_HORINI C 5 0 Hora Inicial 99:99 R !lAltCir .And. !lCnfCir N
GB4_HORFIN C 5 0 Hora Final 99:99 R !lAltCir .And. !lCnfCir N
GB4_DTNASC D 8 0 Data Nasc. @D HspA47Ok() V N
GB4_SEXO C 1 0 Sexo @! IIf(!Empty(M->GB4_SEXO), Pertence("01"), .T.) .And. HspA47Ok() V 0=Masculino;1=Feminino N
GB4_IDADE N 3 0 Idade 999 R N
GB4_TIPO C 1 0 Tipo Idade @! PERTENCE("0123") R 0=Anos;1=Dias;2=Meses;3=Horas N
GB4_REGGER C 6 0 R.G.Paciente @! IIf(!Empty(M->GB4_REGGER),HS_SeekRet("GBH","M->GB4_REGGER",1,.f.,"GB4_NOME","GBH_NOME"), .T.) RGP R !lCnfCir N
GB4_NOME C 45 0 N.Paciente @! R !lCanCir .And. EMPTY(M->GB4_REGGER) N
GB4_CODPRO C 10 0 Cod Cirurgia @! HS_SeekRet("GA7","M->GB4_CODPRO",1,.f.,"GB4_DESPRO","GA7_DESC") GA7 R N
GB4_DESPRO C 45 0 Cirurgia @! V N
GB4_CODCRM C 7 0 Cirurgiao @! HS_SeekRet("SRA","M->GB4_CODCRM",11,.f.,"GB4_NOMMED","RA_NOME") MED R !lCnfCir N
GB4_NOMMED C 45 0 Nome Cirurg. @! V N
GB4_GRPANE C 6 0 Grupo Anest. @! HS_SeekRet("SX5","'GA'+M->GB4_GRPANE",1,.f.,"GB4_NGRPAN","X5_DESCRI") GA R N
GB4_NGRPAN C 45 0 Nome Grp.An. @! V N
GB4_CODCON C 3 0 Cod Convenio @! HS_SeekRet("GA9","M->GB4_CODCON",1,.f.,"GB4_NOMCON","GA9_NREDUZ") GA9 R !lCnfCir N
GB4_NOMCON C 45 0 Convenio @! V N
GB4_AGDOBS M 10 0 Observacao R N
GB4_RX C 1 0 RX @! Pertence("01") R 0=Nao;1=Sim N
GB4_SANGUE C 1 0 Sangue @! Pertence("01") R 0=Nao;1=Sim N
GB4_CTI C 1 0 CTI @! Pertence("01") R 0=Nao;1=Sim N
GB4_CRMAU1 C 7 0 1o. Auxiliar @! HS_SeekRet("SRA","M->GB4_CRMAU1",11,.f.,"GB4_NOMAU1","RA_NOME") MED R N
GB4_NOMAU1 C 45 0 Nome 1o. Aux @! V N
GB4_CRMAU2 C 7 0 2o. Auxiliar @! HS_SeekRet("SRA","M->GB4_CRMAU2",11,.f.,"GB4_NOMAU2","RA_NOME") MED R N
GB4_NOMAU2 C 45 0 Nome 2o. Aux @! V N
GB4_CRMAU3 C 7 0 3o. Auxiliar @! HS_SeekRet("SRA","M->GB4_CRMAU3",11,.f.,"GB4_NOMAU3","RA_NOME") MED R N
GB4_NOMAU3 C 45 0 Nome 3o. Aux @! V N
GB4_CRMAU4 C 7 0 4o. Auxiliar @! HS_SeekRet("SRA","M->GB4_CRMAU4",11,.f.,"GB4_NOMAU4","RA_NOME") MED R N
GB4_NOMAU4 C 45 0 Nome 4o. Aux @! V N
GB4_CRMANE C 7 0 Anestesista @! HS_SeekRet("SRA","M->GB4_CRMANE",11,.f.,"GB4_NOMANE","RA_NOME") MED R N
GB4_NOMANE C 45 0 Nome Anest. @! V N
GB4_ANEST C 1 0 Cd.Anestesia @! HS_SeekRet("SX5","'CA'+M->GB4_ANEST",1,.f.,"GB4_DESANE","X5_DESCRI") CA R N
GB4_DESANE C 37 0 Anestesia @! V N
GB4_TIPCIR C 6 0 Cod.Tpo Cir. @! HS_SeekRet("SX5","'CQ'+M->GB4_TIPCIR",1,.f.,"GB4_DESTPC","X5_DESCRI") CQ R N
GB4_DESTPC C 45 0 Tpo Cirurgia @! V N
GB4_PORTCI C 6 0 Cod. Porte @! HS_SeekRet("SX5","'PC'+M->GB4_PORTCI",1,.f.,"GB4_DESPOR","X5_DESCRI") PC R N
GB4_DESPOR C 45 0 Porte Cirurg @! V N
GB4_CODAGD C 6 0 Codigo Agend @! R N
GB4_SLREMA C 6 0 Sala Remarc. @! HS_SeekRet("SX5","'GD'+M->GB4_SLREMA",1,.f.,"GB4_DSREMA","X5_DESCRI") GD R N
GB4_DSREMA C 45 0 Sala @! V N
GB4_DTREMA D 8 0 Data Remarc. @D R N
GB4_HIREMA C 5 0 Hora Ini Rem 99:99 R N
GB4_HFREMA C 5 0 Hora Fin Rem 99:99 R N
GB4_STATUS C 1 0 Status Agend @! Pertence("0123") R 0=Nao Cofirmada;1=Confirmada;2=Remarcada;3=Cancelada N
GB4_MOTIVO C 45 0 Motivo @! R N
GB4_LOGARQ C 40 0 Log do Arq R N