Tabela
GD7 Despesas Pro e Hon Paciente
Campo Tipo Tamanho Decimal Titulo Formato Validacao F3 Contexto Lista Condicao PYME
GD7_FILIAL C 2 0 Filial N
GD7_CODLOC C 2 0 Setor @! HS_VldP12() GCS R N
GD7_NOMLOC C 30 0 Descricao @! V N
GD7_DATDES D 8 0 Data @D R N
GD7_HORDES C 5 0 Hora 99:99 R N
GD7_QTDDES N 10 4 Quantidade @E 99,999.9999 HS_VQtdPr(M->GD7_QTDDES) .AND. FS_vldQtdProc() R N
GD7_CODDES C 10 0 Procedimento @! HS_VldM24(, 38) .And. HSPBPATRIG("GE7","CODDES") .AND. FS_vldQtdProc() GA7 R N
GD7_DDESPE C 30 0 Descricao @! V N
GD7_CODCRM C 7 0 CRM @! HS_VldM24(, 17) .And. HSPBPATRIG("GD7","CODCRM") GHCPRO R HS_M24WHEN("GD7_CODCRM") N
GD7_NOMMED C 30 0 Nome @! V N
GD7_CODATO C 2 0 Ato 99 HS_VldM24(, 18) GMC R N
GD7_DESATO C 20 0 Descricao @! V N
GD7_CODVIA C 6 0 Via acesso @! HS_VldM24(, 10) GE4 R N
GD7_DESVIA C 20 0 Descricao @! V N
GD7_COEDES N 5 2 Coef.Despesa @E 99.99 R N
GD7_COEFAM N 5 2 Coef.Ato Med @E 99.99 R N
GD7_VALDES N 10 4 Preco @E 99,999.9999 HS_CalcDsc() R N
GD7_DESPER N 5 2 Desc. Percen @E 99.99 HS_VldM24(, 40) R N
GD7_DESVAL N 10 2 Desc. Valor @E 999,999.99 HS_VldM24(, 40) R N
GD7_VALTOT N 10 2 Valor total @E 999,999.99 V N
GD7_TOTDSC N 10 2 Total c/ Dsc @E 999,999.99 V N
GD7_DESOBS C 100 0 Obs. Descont @! HS_VldM24(, 41) R N
GD7_VFILME N 10 4 Preco Filme @E 99,999.9999 HS_CalcDsc() R N
GD7_VCUSOP N 10 4 Preco C.Oper @E 99,999.9999 R N
GD7_PCUDES N 10 4 Preco Custo @E 99,999.9999 R N
GD7_URGDES C 1 0 Urgencia @! HS_VldM24(, 43) R 0=Nao;1=Sim;2=Regra N
GD7_GLODES C 1 0 Ind de Glosa @! Pertence("012") R 0=Normal;1=Indevida;2=Excecao N
GD7_COECHP N 6 3 Coef. CH Pr. @E 99.999 R N
GD7_QTDCHP N 10 2 V.R$/Q.CH Pr @E 99,999.99 R N
GD7_CODESP C 2 0 Especialidad @! HSPVLDBPA('GD7','M->GD7_CODESP') .And. HSPBPATRIG('GD7','CODESP',M->GD7_CODESP) GHCBES R HSPWheEsp() N
GD7_NOMESP C 30 0 Descricao @! V N
GD7_PGTMED C 1 0 Tp Rec Med @! Pertence('01234') .And. HS_GDAtrib(oGDPR, {{nPRStaReg, 'BR_AMARELO', 'BR_VERDE'}}) .And. HS_CalcDsc() R 0=Direto;1=Repasse Faturamento;2=Repasse Acatamento;3=Repasse Quitacao N
GD7_COECHM N 6 3 Coef.CH Med. @E 99.999 R N
GD7_REPAMB N 7 2 Repasse(%) @E 999.99 R N
GD7_VALREP N 15 4 Repasse @E 9,999,999,999.9999 R N
GD7_VALREB N 10 4 Rep. Bruto @E 99,999.9999 R N
GD7_CODPCT C 6 0 Proc. Padrao @! HS_VldM24(, 44) HSP008 R EMPTY(M->GD7_CODPCT) N
GD7_DESPCT C 30 0 Descricao @! V N
GD7_CODKIT C 5 0 Cod do Kit @! R N
GD7_DESKIT C 30 0 Descricao @! V N
GD7_SEQDES C 8 0 Seq.Despesa @! R N
GD7_SPRINC C 8 0 Seq.Desp.Pr. @! R N
GD7_NRSEQG C 6 0 Nro.Seq.Guia @! R N
GD7_REGATE C 6 0 Reg. Atendim @! R N
GD7_IDMARC C 2 0 Id. Marca R S
GD7_FATPAR C 1 0 Fatura Part. @! Pertence("01") R 0=Nao;1=Sim N
GD7_INCIDE N 2 0 Incidencia @E 99 HS_VIncide(M->GD7_INCIDE) R lAltIncide N
GD7_SLAUDO C 1 0 Solic. Laudo @! Pertence("01") R 0=Nao;1=Sim lGd7SLaudo N
GD7_CRMLAU C 7 0 CRM Solicit. @! HS_VldM24(, 17) MED R HS_M24WHEN("GD7_CRMLAU") N
GD7_NMELAU C 30 0 Nome Solicit @! V N
GD7_CODPRE C 6 0 Prestador R S
GD7_SEQGE7 C 8 0 Seq.Des.Fat @! R N
GD7_ORIDES C 1 0 Origem @! Pertence("012") R 0=Normal;1=Cirurgia;2=Incidencia N
GD7_CODPCO C 10 0 Cod Pacote @! R N
GD7_CODPRT C 10 0 Proced Tab @! R N
GD7_DESPRT C 50 0 Descricao @! R N
GD7_TPAPAC C 1 0 Tipo APAC @! R 1=Inicial;2=Continuacao;3=Unica S
GD7_CDGATE C 2 0 Grupo Atend. @! Vazio() .OR. HS_VLDM24(,29) GHF001 R S
GD7_CMCPAC C 2 0 Motivo Cobr. @! HS_SeekRet("GH7","M->GD7_CMCPAC",1,.F.,"GD7_DMCPAC","GH7_DMCPAC") GH7001 R S
GD7_DMCPAC C 50 0 Descricao @! V S
GD7_DSGATE C 50 0 Descricao @! V S
GD7_CDTATE C 2 0 Tipo Atend. @! Vazio() .OR. HS_VLDM24(,29) GHG001 R S
GD7_CGCFOR C 14 0 CNPJ Forn. @R 99.999.999/9999-99 Vazio() .Or. Cgc(M->GD7_CGCFOR) R S
GD7_NNFFOR C 6 0 Numero NF @! R S
GD7_DSTATE C 50 0 Descricao @! V S
GD7_DOPLER C 1 0 Dopler @! Pertence("012") R 0=Nao usa;1=Convencional;2=Colorido HS_M24When("GD7_DOPLER") N
GD7_LOGARQ C 40 0 Log do Arq @! R N
GD7_VLRCOS N 10 3 Vlr custo Op @E 9,999,999.999 R N
GD7_DOCCIR C 10 0 Doc cirurgia @! R N
GD7_DATFIM D 8 0 Data fim pro @D R N
GD7_HORFIM C 5 0 Hora fim pro 99:99 R N
GD7_TPANES C 6 0 Tp anestesia @! HS_SeekRet ("SX5", "'CA' + M->GD7_TPANES",1,.F.,"GD7_DESANE", "X5_DESCRI") CA R N
GD7_DESANE C 55 0 Anestesia @! V N
GD7_TABELA C 6 0 Tabela Calc. @! R N
GD7_VLREPF N 10 4 Rep. Filme @E 99,999.9999 R N
GD7_TECUTI C 1 0 Tec utilizad @! Vazio() .or. Pertence('CV') R C=Convencional;V=Videolaparoscopia;R=Robotica N
GD7_CNPJFO C 14 0 CNPJ Fornec. @R 99.999.999/9999-99 Vazio() .Or. Cgc(M->GD7_CNPJFO) R S
GD7_NFOPM C 11 0 NF OPM @! R S
GD7_LOTOPM C 11 0 Lote OPM @! R S
GD7_SEROPM C 3 0 Serie OPM @! R N
GD7_CNPJFA C 14 0 CNPJ Fabric. @R 99.999.999/9999-99 Vazio() .Or. Cgc(M->GD7_CNPJFA) R S
GD7_ANVOPM C 20 0 Reg Anvisa @! R S
GD7_COMPD C 7 0 Competencia @! R S
GD7_QTFILH N 2 0 Qtd Filhos 99 R S
GD7_CIDIND C 6 0 CID Indic. @! R S
GD7_GRINST C 20 0 Grau Instr. @! R S
GD7_MCONT1 C 2 0 Met Contra1 @! R S
GD7_MCONT2 C 2 0 Met Contra2 @! R S
GD7_GESTR C 3 0 Gest Risco @! R S
GD7_TDEAIH C 1 0 Tip Doc AIH @! R 1=CPF Prof;2=CNS;3=CNPJ;5=CNES N
GD7_DDEAIH C 20 0 Desc Doc AIH R N
GD7_REPPAR C 1 0 Repl Parcial @! R 0=Nao;1=Sim N
GD7_DENREG C 4 0 Dente/Reg. Vazio() .OR. HS_SeekRet('B05','M->GD7_DENREG',2, .F., 'GD7_DESREG', 'B05_DESCRI') B05HSP R N
GD7_DESREG C 50 0 Descricao V N
GD7_FADENT C 5 0 Face @! Vazio() .OR. HS_SeekRet('BYL','M->GD7_FADENT',3, .F., 'GD7_FACDES', 'BYL_DESFAC') B06HSP R N
GD7_FACDES C 50 0 Descricao Fa V N
GD7_STAPLS C 1 0 Status PLS @! R N
GD7_NUMORC C 6 0 Num Orc Fat @! R N
GD7_ITEORC C 2 0 Item Orcam R N
GD7_ITEFAT L 1 0 Item Faturad R S