Tabela
GA7 Cabecalho de Procedimentos
Campo Tipo Tamanho Decimal Titulo Formato Validacao F3 Contexto Lista Condicao PYME
GA7_FILIAL C 2 0 Filial N
GA7_CODPRO C 10 0 Procedimento @! existchav('GA7',M->GA7_CODPRO) R N
GA7_DESC C 50 0 Descricao @! NaoVazio() R N
GA7_TIPPRO C 1 0 T Procedimto @! R 1=Honorario;3=Raio X;6=Banco Sangue;8=Exames;9=Pacote N
GA7_HONORA C 1 0 Honorar. Med @! Pertence('10') R 1=Sim;0=Nao N
GA7_CODGDE C 2 0 Grp Despesas @! HS_SeekRet('GAW','M->GA7_CODGDE',1,.f.,'GA7_DESGDE','GAW_DESC') GAW R N
GA7_DESGDE C 30 0 Desc Grp Dsp @! V N
GA7_CODPRE C 6 0 Prestador @! HS_SeekRet('GAZ','M->GA7_CODPRE',1,.f.,'GA7_NOMPRE','GAZ_FANPRE') ZA2 R N
GA7_NOMPRE C 30 0 Nome Prestad @! V N
GA7_CODESP C 3 0 Especialid. @! HS_SeekRet('GFR','M->GA7_CODESP',1,.f.,'GA7_NOMESP','GFR_DSESPE') GFR001 R S
GA7_NOMESP C 30 0 Descricao @! V S
GA7_CODGPP C 9 0 Grupo Proced @! HS_SeekRet('GAQ','M->GA7_CODGPP',1,.F.,'GA7_DESGPP','GAQ_DESC') GAQ R N
GA7_DESGPP C 30 0 Descricao @! V N
GA7_TABPRO C 150 0 Lista Tab.Pr @! R N
GA7_CALVIA C 1 0 Cal. Vias @! Pertence('01') R 0=Nao;1=Sim N
GA7_USAFAA C 1 0 Usa Ft Acomo @! Pertence('01') R 0=Nao;1=Sim N
GA7_METFIL N 6 4 Filme RX m2 @E 9.9999 R N
GA7_CODPAN C 6 0 Porte Anest. @! EMPTY(M->GA7_CODPAN) .OR. EXISTCPO('SX5','PA'+M->GA7_CODPAN) PA R N
GA7_CUSTOP N 11 4 Custo Proced @E 999,999.9999 R N
GA7_DOPLER C 1 0 Dopler @! Pertence('01') R 0=Nao;1=Sim N
GA7_TEMPRO C 5 0 Duracao 99:99 R S
GA7_OBSERV M 10 0 Observacoes R S
GA7_CPVSAN C 8 0 Cod.Vig.San. @! R S
GA7_GRPPRE C 6 0 Grp.Precauc. @! HS_SeekRet('GCJ','M->GA7_GRPPRE',1,.f.,'GA7_DGRPPR','GCJ_DGRPPR') GCJ R N
GA7_DGRPPR C 40 0 Des.Grp.Prec @! V N
GA7_LOCINF C 6 0 Topografia LI R S
GA7_DESLOC C 40 0 Descricao @! V S
GA7_QTDAUX N 1 0 Qtd Auxiliar @E 9 R N
GA7_DIAENT N 2 0 Dias P/Entre @E 99 R N
GA7_INCIDE N 2 0 Incidencia @E 99 R N
GA7_GRPPER C 6 0 Cod.Grp.Perg @! HS_SeekRet('GCO','M->GA7_GRPPER',1,.f.,'GA7_DGRPPE','GCO_DGRPPE') GCO R N
GA7_DGRPPE C 40 0 Desc.Grp.Per @! V N
GA7_CDSEXO C 1 0 Sexo @! Pertence('012') R 0=Masculino;1=Feminino;2=Ambos N
GA7_IDAMIN N 3 0 Idade Minima @E 999 Positivo() .And. HS_A28Idad() R N
GA7_IDAMAX N 3 0 Idade Maxima @E 999 Positivo() .And. HS_A28Idad() R N
GA7_ESPFET C 1 0 Ctr.F.Etaria @! Pertence("01") R 0=Nao;1=Sim N
GA7_LOGARQ C 40 0 Log do Arq N
GA7_CODSUS C 20 0 Proced. SUS @! GMV R N
GA7_CITISS C 2 0 Class. Item @! HS_VldA28() G20001 R N
GA7_DCTISS C 30 0 Desc Classif @! V N
GA7_PERSOL C 1 0 Per. Solicit @! Pertence('01') R 0=Nao;1=Sim N
GA7_GRUPO C 50 0 Grupo SUS @! V N
GA7_SUBGRP C 50 0 SubGrupo SUS @! V N
GA7_FORORG C 50 0 Forma Organ. @! V N
GA7_QTDMAX N 4 0 Qtd Maxima 9999 R N
GA7_COMPLE C 1 0 Complexidade R N
GA7_ANESTE C 1 0 Anestesia @! R N
GA7_PERMAI C 1 0 Perman Maior @! R N
GA7_RUBRIC C 6 0 Cod Rubrica R N
GA7_PERMAN N 4 0 Perm. Hosp. @! R N
GA7_COMPET C 6 0 Competencia 999999 R N
GA7_FINANC C 2 0 Financiamto @! R N
GA7_QTDPTS N 4 0 Qtd Pontos 9999 R N
GA7_AUTORI C 1 0 Exige Autor. @! R N
GA7_MNEMON C 10 0 Mnemonico R N
GA7_TABPLS C 2 0 Cd. Tab. Pd. @! Vazio() .OR. BR4->(ExistCpo('BR4',M->GA7_TABPLS,1)) B41HSP R N
GA7_PROPLS C 16 0 Cd. Proc. Pl @! Vazio() .OR. BR8->(ExistCpo('BR8',M->GA7_TABPLS + M->GA7_PROPLS,1)) BPPHSP R N
GA7_VINSB1 C 1 0 Vinc Cad Pro @! NaoVazio() R 0=Nao;1=Sim N
GA7_PRIORI C 6 0 Prioridade @! R N
GA7_DURMIN C 5 0 Duracao mini 99:99 R N
GA7_URGENC C 1 0 Proc Urgenci @! Pertence('01') R 0=Nao;1=Sim N
GA7_CODTIS C 8 0 Vinc Cd Tiss @! V S
GA7_DESTIS C 100 0 Desc Vinc Cd @! V S
GA7_PROMOC C 1 0 Proc.Exclusi @! Pertence('01') R 0=Nao;1=Sim S