-- Customer specific once-script PNBR#28111 
-- Toevoegen rapport kunst objecten
-- Vanwege het ontbreken van DB18 branch wordt de view los geleverd. Tevens toegevoegd aan PNBR.sql in de DB20 trunk
-- Support: +31 53 4800700

SET ECHO ON
SPOOL xpnbr28111.lst
SET DEFINE OFF

-- PNBR#28111 Rapportage met kunstobjecten (srtdeel_key=41) inclusief foto 
-- Overige keys zijn kenmerken voor deze objecten die dezelfde naam hebben als het veld.
CREATE OR REPLACE VIEW PNBR_V_RAP_KUNST
(
   FCLT_F_Object,
   FCLT_F_Kunstenaar,
   FCLT_F_Titel,
   Materiaal,
   Gesigneerd,
   Hoogte,
   Breedte,
   HTML_Foto,
   Verkrijgingsinformatie,
   Taxatiewaarde
)
AS 
 SELECT   ins_deel_omschrijving id,
           (SELECT   ins_kenmerkdeel_waarde
              FROM   ins_kenmerkdeel ikd
             WHERE   ins_kenmerk_key = 102
                     AND d.ins_deel_key = ikd.ins_deel_key)
              Naam_kunstenaar,
           (SELECT   ins_kenmerkdeel_waarde
              FROM   ins_kenmerkdeel ikd
             WHERE   ins_kenmerk_key = 104
                     AND d.ins_deel_key = ikd.ins_deel_key)
              Titel,
           (SELECT   ins_kenmerkdeel_waarde
              FROM   ins_kenmerkdeel ikd
             WHERE   ins_kenmerk_key = 110
                     AND d.ins_deel_key = ikd.ins_deel_key)
              Materiaal,
           (SELECT   fac_usrdata_omschr
              FROM   ins_kenmerkdeel ikd,
                     ins_kenmerk ik,
                     ins_srtkenmerk isk,
                     fac_kenmerkdomein kd,
                     fac_usrdata ud
             WHERE       ikd.ins_kenmerk_key = 112
                     AND ik.ins_kenmerk_key = ikd.ins_kenmerk_key
                     AND ik.ins_srtkenmerk_key = isk.ins_srtkenmerk_key
                     AND kd.fac_kenmerkdomein_key = isk.fac_kenmerkdomein_key
                     AND ud.fac_usrtab_key = kd.fac_usrtab_key
                     AND ikd.ins_kenmerkdeel_waarde = ud.fac_usrdata_key
                     AND d.ins_deel_key = ikd.ins_deel_key)
              Gesigneerd,
           (SELECT   ins_kenmerkdeel_waarde
              FROM   ins_kenmerkdeel ikd
             WHERE   ins_kenmerk_key = 119
                     AND d.ins_deel_key = ikd.ins_deel_key)
              Hoogte,
           (SELECT   ins_kenmerkdeel_waarde
              FROM   ins_kenmerkdeel ikd
             WHERE   ins_kenmerk_key = 120
                     AND d.ins_deel_key = ikd.ins_deel_key)
              Breedte,
              decode((SELECT  ins_kenmerkdeel_waarde
                 FROM   ins_kenmerkdeel ikd
                WHERE   ins_kenmerk_key = 109
                        AND d.ins_deel_key = ikd.ins_deel_key), null, 'Geen foto',
              '<img  src="https://pnbr.facilitor.nl/CUST/PNBR/flexfiles/INS/I'
           ||to_char(TRUNC(d.ins_deel_key / 1000),'FM0000')
           || '___/I'
           || d.ins_deel_key
           || '/109/'
           || (SELECT   ins_kenmerkdeel_waarde
                 FROM   ins_kenmerkdeel ikd
                WHERE   ins_kenmerk_key = 109
                        AND d.ins_deel_key = ikd.ins_deel_key)
           || '" height="128">')
              Foto,
           (SELECT   ins_kenmerkdeel_waarde
              FROM   ins_kenmerkdeel ikd
             WHERE   ins_kenmerk_key = 125
                     AND d.ins_deel_key = ikd.ins_deel_key)
              Verkrijgingsinformatie,
           (SELECT   ins_kenmerkdeel_waarde
              FROM   ins_kenmerkdeel ikd
             WHERE   ins_kenmerk_key = 132
                     AND d.ins_deel_key = ikd.ins_deel_key)
              Taxatiewaarde
    FROM   ins_deel d
   WHERE   ins_srtdeel_key = 41 AND ins_deel_verwijder IS NULL
order by 3, 1;

COMMIT;

SPOOL OFF