Elaborei a seguinte query:
SELECT DISTINCT
-- DADOS DA CIRURGIA
CIRURGIA.CD_CIRURGIA
,(SELECT A.DS_TAB_FAT FROM TAB_FAT A, ITREGRA, CON_PLA C, PRO_FAT D
WHERE A.CD_TAB_FAT = ITREGRA.CD_TAB_FAT
AND ITREGRA.CD_REGRA = C.CD_REGRA
AND D.CD_GRU_PRO = ITREGRA.CD_GRU_PRO
AND C.CD_CONVENIO = CONVENIO.CD_CONVENIO
AND C.CD_CON_PLA = CON_PLA.CD_CON_PLA
AND D.CD_PRO_FAT = CIRURGIA.CD_PRO_FAT) TABELA
,CIRURGIA.CD_PRO_FAT PROCEDIMENTO
,TO_CHAR(AVISO_CIRURGIA.DT_INICIO_CIRURGIA, 'DD/MM/YYYY') DATA_CIRURGIA
,TO_CHAR(AVISO_CIRURGIA.DT_INICIO_ANESTESIA, 'HH24:MI')HR_INICIO_ANESTESIA
,TO_CHAR(AVISO_CIRURGIA.DT_FIM_ANESTESIA, 'HH24:MI') HR_FIM_ANESTESIA
,AVISO_CIRURGIA.CD_TIP_ANEST COD_ANESTESIA
,(SELECT CD_PRESTADOR FROM PRESTADOR_AVISO A
WHERE A.CD_AVISO_CIRURGIA = AVISO_CIRURGIA.CD_AVISO_CIRURGIA
AND A.CD_AVISO_CIRURGIA = PRESTADOR_AVISO.CD_AVISO_CIRURGIA
AND CD_ATI_MED = 01
AND A.CD_CIRURGIA = CIRURGIA.CD_CIRURGIA)CIRURGIAO_I
,(SELECT CD_PRESTADOR FROM PRESTADOR_AVISO A
WHERE A.CD_AVISO_CIRURGIA = AVISO_CIRURGIA.CD_AVISO_CIRURGIA
AND A.CD_AVISO_CIRURGIA = PRESTADOR_AVISO.CD_AVISO_CIRURGIA
AND CD_ATI_MED = 02
AND A.CD_CIRURGIA = CIRURGIA.CD_CIRURGIA)CIRURGIAO_II
,(SELECT CD_PRESTADOR FROM PRESTADOR_AVISO A
WHERE A.CD_AVISO_CIRURGIA = AVISO_CIRURGIA.CD_AVISO_CIRURGIA
AND A.CD_AVISO_CIRURGIA = PRESTADOR_AVISO.CD_AVISO_CIRURGIA
AND CD_ATI_MED = 06
AND A.CD_CIRURGIA = CIRURGIA.CD_CIRURGIA)ANESTESISTA_I
,(SELECT CD_PRESTADOR FROM PRESTADOR_AVISO A
WHERE A.CD_AVISO_CIRURGIA = AVISO_CIRURGIA.CD_AVISO_CIRURGIA
AND A.CD_AVISO_CIRURGIA = PRESTADOR_AVISO.CD_AVISO_CIRURGIA
AND CD_ATI_MED = 51
AND A.CD_CIRURGIA = CIRURGIA.CD_CIRURGIA)ANESTESISTA_II
-- DADOS DO PACIENTE
,PACIENTE.CD_PACIENTE COD_PRONTUARIO
,PACIENTE.NM_PACIENTE NOME_PACIENTE
,DECODE( PACIENTE.TP_SEXO,'M', 'MASCULINO'
,'F', 'FEMININO'
,'I', 'INDETERMINADO' ) SEXO_PACIENTE
,PACIENTE.NR_FONE TELEFONE
,PACIENTE.NR_CEP CEP
,PACIENTE.DS_ENDERECO ENDERECO
,PACIENTE.NR_ENDERECO NUMERO_ENDERECO
,PACIENTE.DS_COMPLEMENTO COMPLEMENTO_ENDERECO
,PACIENTE.NM_BAIRRO BAIRRO
,(SELECT NM_CIDADE FROM DBAMV.CIDADE
WHERE CD_CIDADE = PACIENTE.CD_CIDADE) CIDADE
-- DADOS DO ATENDIMENTO
,CONVENIO.CD_CONVENIO COD_CONVENIO
--,NM_CONVENIO DESC_CONVENIO
--,CON_PLA.DS_CON_PLA DESC_PLANO
,CON_PLA.CD_CON_PLA COD_PLANO
,TO_CHAR(DT_ATENDIMENTO, 'DD/MM/YYYY') DATA_ATENDIMENTO
,DS_TIP_ACOM TIPO_ACOMODACAO
,ATENDIME.NR_CARTEIRA NR_CARTEIRINHA
FROM DBAMV.ATENDIME
,DBAMV.CONVENIO
,DBAMV.TIP_ACOM
,DBAMV.SERVICO
,DBAMV.CON_PLA
,DBAMV.CARTEIRA
,DBAMV.PACIENTE
,DBAMV.CIDADE
,DBAMV.TIPO_INTERNACAO
,DBAMV.AVISO_CIRURGIA
,DBAMV.PRESTADOR_AVISO
,DBAMV.CIRURGIA_AVISO
,DBAMV.CIRURGIA
WHERE
CONVENIO.CD_CONVENIO = ATENDIME.CD_CONVENIO
AND CIRURGIA_AVISO.CD_AVISO_CIRURGIA = AVISO_CIRURGIA.CD_AVISO_CIRURGIA
AND CIRURGIA.CD_CIRURGIA = CIRURGIA_AVISO.CD_CIRURGIA
AND AVISO_CIRURGIA.CD_AVISO_CIRURGIA = PRESTADOR_AVISO.CD_AVISO_CIRURGIA
AND ATENDIME.CD_ATENDIMENTO = AVISO_CIRURGIA.CD_ATENDIMENTO
AND SERVICO.CD_SERVICO(+) = ATENDIME.CD_SERVICO
AND TIP_ACOM.CD_TIP_ACOM(+) = ATENDIME.CD_TIP_ACOM
AND CON_PLA.CD_CON_PLA = ATENDIME.CD_CON_PLA
AND CON_PLA.CD_CONVENIO = ATENDIME.CD_CONVENIO
AND CARTEIRA.CD_PACIENTE(+) = ATENDIME.CD_PACIENTE
AND CARTEIRA.CD_CONVENIO(+) = ATENDIME.CD_CONVENIO
AND CARTEIRA.CD_CON_PLA(+) = ATENDIME.CD_CON_PLA
AND PACIENTE.CD_PACIENTE = ATENDIME.CD_PACIENTE
AND CIDADE.CD_CIDADE(+) = PACIENTE.CD_NATURALIDADE
AND TIPO_INTERNACAO.CD_TIPO_INTERNACAO(+) = ATENDIME.CD_TIPO_INTERNACAO
ORDER BY COD_PRONTUARIO
1o. - preciso que essa query seja executada no banco todo os dias as 6h am.
2o. - o resultado dessa query deve ser salvo em um arquivo TXT separado por virgulas em um local da rede.
Se necessário eu posso até criar um view com essa query e depois só rodar um select simples passando como parametro o sysdate. Mas meu conhecimento não está me permitindo fazer isso.
Abraços,
Augusto Moura.
