Untitled

select 
       UP3.CD_UPNIVEL1 CD_PROPAGR,
       UP1.DE_UPNIVEL1 DESCR_PROPAGR,
       UP3.CD_UPNIVEL3 NRO_TALHAO,
       UP3.DT_PLANTIO,
       UP3.QT_AREA_PROD AREA_PLANTIO,
       V.DE_VARIED NOME_VARIED,
       UP3.CD_ESPACAM ESPAC,
       CASE
         WHEN UP3.CD_TP_PROPR = '1' THEN
          '1 - PRÓPRIA'
         WHEN UP3.CD_TP_PROPR = '1' THEN
          '2 - FORNECEDOR'
         ELSE
          '**'
       END AS NOME_VINCULO,
       F.DE_FORNEC GRUPO_COLHEITA_NOME,
       UP3.DE_LATITUDE LAT,
       UP3.DE_LONGITUDE,
       UP1.CD_FORNEC GRUPO_COLHEITA_CD,
       '' CAD,
       SOLO.DE_TP_SOLO AMB_PROD,
       '' DT_CICLO_INIT,
       '' DT_COLHEITA_INIT,
       '' DT_COLHEITA_FIM,
       '' N_CORTE,
       QD.QT_AREA AS AREA_COLHEITA,
       H.QT_TCH TCH_COLHEITA,
       '' AS ATR_COLHEITA,
       '' Destino,
       UP3.CD_SIST_COLH AS BLOCO_COLHEITA,
       UP3.CD_FREN_TRAN AS FRENTE_CD,
       FRENTE.DE_FREN_TRAN AS FRENTE_DESCR,
       '' BACIA,
       '' REFORMA,
       S.DE_SIST_COLH TIPO_COLHEITA,
       UP3.CD_SAFRA

  from UPNIVEL3 UP3
 inner join UPNIVEL1 UP1 ON UP3.CD_UPNIVEL1 = UP1.CD_UPNIVEL1

 INNER JOIN VARIUPNIV3 VUP3

ON VUP3.CD_SAFRA = UP3.CD_SAFRA
AND VUP3.CD_UPNIVEL1 = UP3.CD_UPNIVEL1
AND VUP3.CD_UPNIVEL3 = UP3.CD_UPNIVEL3
AND VUP3.CD_VARIED = UP3.CD_VARIED

 INNER JOIN VARIEDADES V

ON VUP3.CD_VARIED = V.CD_VARIED

 INNER JOIN FORNECS F

ON F.CD_FORNEC = UP1.CD_FORNEC

 INNER JOIN TIPOSOLO SOLO

ON UP3.CD_TP_SOLO = SOLO.CD_TP_SOLO

 INNER JOIN QUEIMA_DE QD

ON QD.CD_SAFRA = UP3.CD_SAFRA
AND QD.CD_UPNIVEL1 = UP3.CD_UPNIVEL1
AND QD.CD_UPNIVEL3 = UP3.CD_UPNIVEL3

 inner join HISTPREPRO h

ON H.CD_SAFRA = UP3.CD_SAFRA
AND H.CD_UPNIVEL1 = UP3.CD_UPNIVEL1
AND H.CD_UPNIVEL3 = UP3.CD_UPNIVEL3

 INNER JOIN FRENTRANSP FRENTE

ON FRENTE.CD_FREN_TRAN = UP3.CD_FREN_TRAN

 INNER JOIN SISTCOLH S

ON S.CD_SIST_COLH = UP3.CD_SIST_COLH

 where
 UP3.CD_UPNIVEL1 IN (select CD_UPNIVEL1
                         from UPNIVEL1
                        where INSTANCIA IS NULL
                           or INSTANCIA IN ('TGA'))
and UP3.CD_SAFRA = 2024

AND UP3.CD_UPNIVEL3 IS NOT NULL

AND h.cd_hist != 'E'

 order by UP3.CD_SAFRA DESC,
          UP3.CD_UPNIVEL1,
          UP3.CD_UPNIVEL2,
          UP3.CD_ORDENACAO