Die Anfrage kann nicht ausgefuehrt werden
Exception-Message: JBO-27122: SQL-Fehler bei Vorbereitung der Anweisung. Anweisung: with pa as ( select * from parameter where laufnr = 9005 ) select /*+ opt_param('_OPTIMIZER_USE_FEEDBACK','FALSE') */ /* Mantis 12917 */ v2.*, /* ACHTUNG: analoge Logik in artikel_view z.B. für die Detailansicht */ count(*) over (partition by katgliederung) anzg, count(*) over (partition by katgliederung order by sequenzg) posg, count(*) over (partition by katgliederungp, katgliederungg) anza, count(*) over (partition by katgliederungp, katgliederungg order by sequenza) posa ,min(rowpos) over (partition by katgliederungp, katgliederungg) minrowposg -- 19.03.14 pg: damit Suchergebnisse innerhalb der Gliederung nach Katalog sortiert werden können from ( select v1.*, rownum rowpos, rank() over (partition by art_id order by prioritaeta, katgliederunga) rangkatgliederunga from ( select /*+ first_rows */ /*rownum rowpos,*/ ar.art_id, ar.artnr, ar.ankey1 originalnummer -- ,fusw_sum_laginvbest(null,ar.art_id) + nvl(al.bestand,0) lagerbestand -- ,case -- when ar.beibedarf = 'J' -- and papeg.zahl1 = al.liefnr then -- 19.03.14 pg: bei PEG-Artikeln den Bestand aus ... -- nvl((select lagbest from sw_peg_lagbest where artnr = ar.artnr),0) -- sw_peg_lagbest lesen. Falls null, als grau Behandeln -- when ar.beibedarf = 'J' -- and al.tonerbestand is not null then -- 03.05.19 pg: Bestand aus artlief lesen unter Umständen -- al.tonerbestand -- else -- fusw_sum_laginvbest(null,ar.art_id) -- end lagerbestand, ,case when al.liefnr is not null then fusw_sum_laginvbest(null,ar.art_id) + nvl(al.bestand,0) else verfalt.bestand end lagerbestand ,ar.mindverkmng, ar.mengeneinh, ar.eiggrp, ar.packeinheit, nvl(meht.bez,meh.bez) mengeneinhbez, replace (meh.FORMATMASKE,'9','#') mengeneinhformatmaske, nvl(meht.bezkurz,meh.bezkurz) mengeneinhbezkurz, ar.aktiv, fusw_verkeinh_umrechnen_impl(ar.preiseinheit,ar.packeinheit,ar.artnr,ar.mengeneinh,ar.zahl1 ,meh.bezkurz,al.packeinheit,null,null,pa.text1 || pa.text2,'multiblikator') multiplikator /* damit muss der Preis multipliziert werden für die Anzeige im Web */ /* 21.03.14 pg: Logik in function ausgelagert case when nvl(ar.packeinheit,1) > 1 then 1/ar.preiseinheit*ar.packeinheit when nvl(ar.preiseinheit,1) = 1 and instr(pa_param.text(9005,1)|| pa_param.text(9005,2),meh.bezkurz) < 1 and ar.zahl1 > 1 then 1 else nvl(1/ar.preiseinheit,1) end multiplikator, */ ,fusw_verkeinh_umrechnen2_impl(ar.packeinheit,ar.artnr,ar.mengeneinh,ar.zahl1,meht.bezkurz,meh.bezkurz ,meht.bez,ar.preiseinheit,meh.bez,al.packeinheit,al.mengeneinh,al.umrechfaktor,nvl(mehtal.bez,mehal.bez),nvl(meht.sprache,'D'),'preismengeshop') preismenge /* 21.03.14 pg: Login in function ausgelagert case when nvl(ar.packeinheit,1) > 1 then ' / ' || pa_bez.mengeneinhbezkurz(61,nvl(meht.sprache,'D')) || ' à ' || to_char(ar.packeinheit) || ' ' || nvl(meht.bezkurz,meh.bezkurz) when nvl(ar.preiseinheit,1) = 1 and instr(pa.text1 || pa.text2,meh.bezkurz) < 1 and ar.zahl1 > 1 then ' / 1 ' || nvl(meht.bezkurz,meh.bezkurz) || ' à ' || to_char(ar.zahl1) else ' / 1 ' || nvl(meht.bezkurz,meh.bezkurz) end preismenge, */ ,fusw_verkeinh_umrechnen_impl(ar.preiseinheit,ar.packeinheit,ar.artnr,ar.mengeneinh,ar.zahl1 ,meh.bezkurz,al.packeinheit,null,null,pa.text1 || pa.text2,'defaultmenge') defaultmenge /* 21.03.14 pg: Login in function ausgelagert ,nvl(al.packeinheit,1) defaultmenge, -- 30.5.08 pg: packeinheit nicht mehr umrechnen gem. Tf. tsc nvl(al.packeinheit / nvl(ar.packeinheit,1),1) defaultmenge, */ ,fusw_verkeinh_umrechnen2_impl(ar.packeinheit,ar.artnr,ar.mengeneinh,ar.zahl1,meht.bezkurz,meh.bezkurz ,meht.bez,ar.preiseinheit,meh.bez,al.packeinheit,al.mengeneinh,al.umrechfaktor,nvl(mehtal.bez,mehal.bez),nvl(meht.sprache,'D'),'defaultmenge') defaultmengeneinh /* 21.03.14 pg: Login in function ausgelagert case when al.mengeneinh is not null and al.mengeneinh <> ar.mengeneinh and al.umrechfaktor > 1 then nvl(mehtal.bez,mehal.bez) || ' à ' || to_char(al.umrechfaktor) || ' ' || nvl(meht.bez,meh.bez) else '' end defaultmengeneinh, -- pg 11.11.11 dieses Feld wird im neuen Shop für Umpack verwendet, die Logik ist aber noch nicht ganz perfekt! */ ,ar.preiseinheit, case when papeg.zahl1 = al.liefnrhl then 'J' when ar.beibedarf = 'J' and al.bestand is not null then 'J' -- 03.05.19:wird für die Beurteilung des Lagerbestandes verwendet. Falls wir Bestand im Artlief haben, wie peg behandeln else 'N' end pegartikel, ar.beibedarf, ar.logisch1 oeko, ar.logisch2 spartipp, ar.logisch7 schnelldreher, ar.logisch8 staples, katga.katgliederung katgliederunga, katga.prioritaet prioritaeta, katga.sequenz sequenza, katgta.sprache sprachea, katgta.titel titela, nvl(katgta.text,katga.bez) texta, katgmma.pfad bilda, vars.selectedkatalog, vars.sparalshaupt, katgt.sprache, tmp.kundnr, katg.katgliederung, -- 13.03.12 pg: frueher war tmp an katg gebunden; für den Filter nach sortimentsartikel ist aber katga richtig. Fuer die Rueckeaertskompatiblitltaet katgliederung aus katg nehmen statt aus tmp tmp.anzhaupt, tmp.anzspar, tmp.anzkunden, tmp.anztemp, tmp.anzaktion, tmp.anzstempel, tmp.anzvisiten, case when vars.selectedkatalog = -1 then -- 08.01.13 fuer suche in allen sortimente 1 when vars.selectedkatalog = 1 then DECODE (vars.sparalshaupt, 1, tmp.anzspar, tmp.anzhaupt) when vars.selectedkatalog = 2 then tmp.anzspar when vars.selectedkatalog = 3 then tmp.anzaktion when vars.selectedkatalog = 4 or vars.selectedkatalog = 8 or vars.selectedkatalog = 9 then tmp.anzkunden when vars.selectedkatalog = 5 and vars.isroche = 'J' then tmp.anztemp when vars.selectedkatalog = 5 then tmp.anzaktion when vars.selectedkatalog = 6 then tmp.anzstempel when vars.selectedkatalog in (7,12,13) then /* 21.08.19 erweiterungen für Roche */ tmp.anzvisiten else tmp.anzhaupt end anz, katg.katalog, -- 13.03.12 pg katg.parent, -- 13.03.12 pg katg.sequenz, -- 13.03.12 pg katg.katgliederung katgliederungg, katg.parent katgliederungp, -- die Katgliederung des Parents, für die Filterung katg.sequenz sequenzg, katg.BEZ, katg.PUBLIZIEREN, katg.KATGLIEDART, NVL (katgt.titel, katg.BEZ) titel, katgt.text, katgt.fuss, katgmm2.pfad farbe, katgmmmarke.pfad marke, katgtp.titel titel_parent, cast ( multiset( select pfad from katgliedmultimedia katgmm where katgmm.katgliederung = katga.katgliederung AND katgmm.katgliedmmtyp LIKE 'BILD%' order by katgmm.katgliedmmtyp ) as varchar2array) artikeldetailBilder, cast (multiset ( -- die 1 bis 4 (hier: umbeschränkt) Bilder als Varchar2array holen select pfad from katgliedmultimedia katgmm where katgmm.katgliederung = katg.katgliederung and katgmm.katgliedmmtyp like 'BILD%' order by katgmm.katgliedmmtyp ) as varchar2array) bilder, --rank() over (partition by ar.art_id order by katga.prioritaet, katga.katgliederung) rangVonKatgInArt ( select katgr.katgliederung from katgliederung katgr where connect_by_isleaf = 1 -- wir wollen nur die letzte Row der Hierarchie (vor dem Root), das wird das Register sein start with katgr.katgliederung = katg.parent connect by katgr.katgliederung = prior katgr.parent and katgr.parent is not null -- den root wollen wir nicht mehr ) katgliederungregister , /* ar.logisch12 konfigurierbar -- nicht mehr konfigurierbar, weil mehrere punchouts: utopia/trivet */ ar.lovid3 konfigurierbar ,ar.bewirtsch , -- pa_basis.add_tage( -- 31.01.17 pg: Lieferterm einer ev. offenen Bestellung berücksichtigen Mantis 10513 01.04.17 pg: pa_basis.add_tage aus Performancegründen nicht mehr hier aufrufen, sondern aus CacheUtil case when al.liefnr is not null then case when al.datum3 > trunc(sysdate) then al.datum3 - trunc(sysdate) end else case when verfalt.liefterm > trunc(sysdate) then verfalt.liefterm - trunc(sysdate) end -- 15.08.22 pg: umbau auf Mantis 27866; Konfigurierbare werden in ViewRowImpl gesondert behandelt auf der Basis von beschzeit end verfuegbartage -- case -- when ar.beibedarf = 'J' -- and papeg.zahl1 = al.liefnr then -- 05.10.19 pg: Mantis 16710: bei PEG-Artikeln den Stichtag aus der entsprechenen Tabelle lesen -- nvl(dppapedis.liefterm,trunc(sysdate)) -- Kommt zum Zug wenn rot ist, d.h., lagerbestand <= 0 nvl ist nicht inhaltlich, nur defensiv -- else -- nvl (dp.liefterm, TRUNC(SYSDATE)) -- end verfuegbarstichtag -- wenn wir einen geplanten Eingang in der Dispo haben, den verwenden, sonst das Tagesdatum -- ,case -- when ar.beibedarf = 'J' -- and papeg.zahl1 = al.liefnrhl -- 05.10.19 pg: Mantis 16710: Falls wir die Verfügbarkeit von Papedis brauchen -- and dppapedis.liefterm is not null then -- 1 -- gem. Mantis 16710 1 Tag wenn verfügbarkeit von papedis (der Tag kommt dann zur Verfügbarkeit hinzu) -- when ar.beibedarf = 'J' and al.streckengesch = 'J' -- and Coalesce(al.beschzeit, li.beschzeit) is not null -- and li.liefnrhl = pa.zahl2 -- then -- Coalesce(al.beschzeit, li.beschzeit) -- gem. Mantis 22419 bei Streckengeschäft -- when dp.liefterm is not null then -- 2 -- beim geplanten Eingang keine Vorlaufzeit addieren, aber die 2 Tage -- else -- Coalesce(al.beschzeit, li.beschzeit, 1) + 2 -- sonst eben die Vorlaufzeit und zwei Tage sowieso -- end verfuegbartage -- -- ,'N','N') verfuegbarkeitsdatum 31.03.17 pg Aus den verfuegbartage in ViewRowImpl einen getter machen, der die gecachten pa_basis.add_tage ausnutzt ,case when paeco.zahl1 = al.liefnrhl then 'J' else 'N' end ecomediaartikel ,al.liefartnrha liefartnr ,cast ( fusw_katgliederung_serie(katg.katgliederung, katga.katgliederung, katgta.sprache) as varchar2array) serienlogo -- 24.01.14 jk/pg: subselect in eine FU ausgelagert, aus Performancegründen ,ar.fibugrp lageraufanfrage , ar.lovid5 /* drittprodukte */ ,ar.logisch18 keinrueckgaberecht -- 13.01.19 pg: Mantis 13726 ,Coalesce(al.beschzeit, li.beschzeit, 0) beschzeit -- 29.01.19 pg Mantis 15499 ,ar.lovid7 pfandartnr -- 06.11.20 Mantis 21175 ,case when al.streckengeschhl = 'J' and al.liefnrhl = pa.zahl2 then 'J' else 'N' end streckengesch -- 02.12.20 Mantis 22419 from artikel ar, mengeneinh meh, mengeneinhtext meht ,(select al.art_id, min(case when al.liefnr = 3669 and al.datum2 is not null then liefnr end) liefnr ,case when min(case when al.liefnr = 3669 and al.datum2 is not null then al.liefnr end) is not null then '###' end pseudoverfalt -- verhindert wegen coalesce unten den Aufruf der FU ,min(case when al.liefnr = 3669 and al.datum2 is not null then al.packeinheit end) packeinheit ,min(case when al.liefnr = 3669 and al.datum2 is not null then al.mengeneinh end) mengeneinh ,min(case when al.liefnr = 3669 and al.datum2 is not null then al.beschzeit end) beschzeit ,min(case when al.liefnr = 3669 and al.datum2 is not null then al.umrechfaktor end) umrechfaktor ,min(case when al.liefnr = 3669 and al.datum2 is not null and sysdate - al.datum2 <= pa.zahl1 then al.zahl2 end) bestand ,min(case when al.liefnr = 3669 and al.datum2 is not null and sysdate - al.datum2 <= pa.zahl1 then al.datum3 end) datum3 ,min(case when al.isthauptlief = 'J' then al.liefnr end) liefnrhl ,min(case when al.isthauptlief = 'J' then al.packeinheit end) packeinheithl ,min(case when al.isthauptlief = 'J' then al.mengeneinh end) mengeneinhhl ,min(case when al.isthauptlief = 'J' then al.beschzeit end) beschzeithl ,min(case when al.isthauptlief = 'J' then al.umrechfaktor end) umrechfaktorhl ,min(case when al.isthauptlief = 'J' then al.streckengesch end) streckengeschhl ,min(case when al.isthauptlief = 'J' then al.liefartnr end) liefartnrha from artlief al cross join pa group by al.art_id ) al -- 03.05.19 pg: nicht mehr artlief mit isthauptlief ='J',weil der höchste Bestand aus zahl2 verwendet werden soll 15.08.22 pg: doch wieder mit group by, da wir Hauptlief für Stempel und 3669 für die übrigen Artikel brauchen Mantis 27866 ,lateral (select coalesce(al.pseudoverfalt,toscak.pasw_kat.fallback_verf(ar.art_id)) verfalt from dual) verfaltintern ,lateral (select to_number(regexp_substr(verfaltintern.verfalt,'[^#]+',1,1)) bestand ,to_date(regexp_substr(verfaltintern.verfalt,'[^#]+',1,2),'YYYYMMDD') liefterm ,regexp_substr(verfaltintern.verfalt,'[^#]+',1,3) ampel from dual ) verfalt ,pa, mengeneinh mehal, mengeneinhtext mehtal ,parameter papeg ,parameter paeco , lieferant li, (SELECT -- wenn Sparsortiment als Hauptsortiment angezeigt, dann 1 (z.Z. nur Passanten) :p1selectedkatalog selectedkatalog, :p2sparalshaupt sparalshaupt, :p3sprache sprache, :p4isroche isroche FROM DUAL ) vars, toscak.sw_sortimentkatgliederung tmp, katgliederung katga, katgliedtext katgta, katgliedmultimedia katgmma, -- fuer Artikel katgliederung katg, katgliedtext katgt, katgliedtext katgtp, --Text für Parent katgliedmultimedia katgmm2, katgliedmultimedia katgmmmarke ,( -- 31.01.17 pg: offene Bestellzeilen gem. Mantis 10513 wie in pasw_schoch.aufzeile_lieferm ermitteln. Wir verwenden allerdings die DISPO, da z.B. offene Liefmng auf Rückstand sonst auch mitgerechnet werden select dp.art_id, min(dp.liefterm) liefterm from dispo dp where dp.appl = 'E' and dp.menge > 0 -- nur Lagereingänge and dp.wahrschdispo >= 75 group by dp.art_id ) dp ,( -- 05.10.19 pg: Mantis 16710: ggf. Verfügbarkeitsdatum von Papedis berücksichtigen select text1 artnr, case when regexp_like(nvl(text2, text3),'\d{2}\.\d{2}\.\d{2}') then to_date(nvl(text2, text3),'DD.MM.RR') end liefterm from sw_temporaer where tempart = 'PEG_TERMINCODE' ) dppapedis where meh.mengeneinh = ar.mengeneinh and meht.mengeneinh (+) = meh.mengeneinh and meht.sprache (+) = :p4sprache and al.art_id (+) = ar.art_id -- and al.isthauptlief (+) = 'J' 03.05.19 pg: wird in Inline-View analysiert and li.liefnr (+) = al.liefnrhl -- and pa.laufnr = 9005 03.05.19 pg: in With and mehal.mengeneinh(+) = al.mengeneinh and mehtal.mengeneinh (+) = mehal.mengeneinh and mehtal.sprache (+) = :p5sprache and papeg.laufnr = 181 and paeco.laufnr = 182 and katga.art_id = ar.art_id and katga.katalog = :p5aKatalog and katgta.katgliederung(+) = katga.katgliederung and katgta.sprache(+) = :p6sprache and katgmma.katgliederung(+) = katga.katgliederung and katgmma.katgliedmmtyp(+) = 'BILD' and katg.katgliederung = katga.parent -- katg ist der Parent über dem Artikel and katgt.katgliederung(+) = katg.katgliederung and katgt.sprache (+) = :p7sprache and katgtp.katgliederung(+) = katg.parent -- das ist der Text des Parents and katgtp.sprache (+) = :p8sprache AND katgmm2.katgliederung (+) = katga.katgliederung AND katgmm2.katgliedmmtyp (+) LIKE 'FARBE%' AND katgmmmarke.katgliederung (+) = katg.katgliederung AND katgmmmarke.katgliedmmtyp (+) = 'MARKE' and tmp.kundnr = :p9kundnr and tmp.sortimentgrp = :p9aSortimentgrp and tmp.katgliederung = katga.katgliederung and (tmp.anzspar > 0 or tmp.anzkunden > 0 or :p10nurSortiment = 'N') -- 10.03.12 pg: Benutzer mit nur Sortiment dürfen nichts anderes sehen and dp.art_id (+) = ar.art_id and dppapedis.artnr(+) = ar.artnr -- bei Papedis nicht auf Liefartnr gehen, da identisch and /* WHEREBEGINN */katg.katgliederung in (select /*+ cardinality (tab,1) */ column_value from table(cast( :katgliederung as tosca.numbertable)) tab)/* WHEREENDE */ ) v1 where anz > 0 ) v2 where (:p11selectbyartid = 'N' or rangkatgliederunga = 1) order by (Select sequenz from katgliederung katgliedp where katgliedp.katgliederung = parent), sequenzg, sequenza
Cookies:
28.04.2024 06:39:35
Exception-Message: JBO-27122: SQL-Fehler bei Vorbereitung der Anweisung. Anweisung: with pa as ( select * from parameter where laufnr = 9005 ) select /*+ opt_param('_OPTIMIZER_USE_FEEDBACK','FALSE') */ /* Mantis 12917 */ v2.*, /* ACHTUNG: analoge Logik in artikel_view z.B. für die Detailansicht */ count(*) over (partition by katgliederung) anzg, count(*) over (partition by katgliederung order by sequenzg) posg, count(*) over (partition by katgliederungp, katgliederungg) anza, count(*) over (partition by katgliederungp, katgliederungg order by sequenza) posa ,min(rowpos) over (partition by katgliederungp, katgliederungg) minrowposg -- 19.03.14 pg: damit Suchergebnisse innerhalb der Gliederung nach Katalog sortiert werden können from ( select v1.*, rownum rowpos, rank() over (partition by art_id order by prioritaeta, katgliederunga) rangkatgliederunga from ( select /*+ first_rows */ /*rownum rowpos,*/ ar.art_id, ar.artnr, ar.ankey1 originalnummer -- ,fusw_sum_laginvbest(null,ar.art_id) + nvl(al.bestand,0) lagerbestand -- ,case -- when ar.beibedarf = 'J' -- and papeg.zahl1 = al.liefnr then -- 19.03.14 pg: bei PEG-Artikeln den Bestand aus ... -- nvl((select lagbest from sw_peg_lagbest where artnr = ar.artnr),0) -- sw_peg_lagbest lesen. Falls null, als grau Behandeln -- when ar.beibedarf = 'J' -- and al.tonerbestand is not null then -- 03.05.19 pg: Bestand aus artlief lesen unter Umständen -- al.tonerbestand -- else -- fusw_sum_laginvbest(null,ar.art_id) -- end lagerbestand, ,case when al.liefnr is not null then fusw_sum_laginvbest(null,ar.art_id) + nvl(al.bestand,0) else verfalt.bestand end lagerbestand ,ar.mindverkmng, ar.mengeneinh, ar.eiggrp, ar.packeinheit, nvl(meht.bez,meh.bez) mengeneinhbez, replace (meh.FORMATMASKE,'9','#') mengeneinhformatmaske, nvl(meht.bezkurz,meh.bezkurz) mengeneinhbezkurz, ar.aktiv, fusw_verkeinh_umrechnen_impl(ar.preiseinheit,ar.packeinheit,ar.artnr,ar.mengeneinh,ar.zahl1 ,meh.bezkurz,al.packeinheit,null,null,pa.text1 || pa.text2,'multiblikator') multiplikator /* damit muss der Preis multipliziert werden für die Anzeige im Web */ /* 21.03.14 pg: Logik in function ausgelagert case when nvl(ar.packeinheit,1) > 1 then 1/ar.preiseinheit*ar.packeinheit when nvl(ar.preiseinheit,1) = 1 and instr(pa_param.text(9005,1)|| pa_param.text(9005,2),meh.bezkurz) < 1 and ar.zahl1 > 1 then 1 else nvl(1/ar.preiseinheit,1) end multiplikator, */ ,fusw_verkeinh_umrechnen2_impl(ar.packeinheit,ar.artnr,ar.mengeneinh,ar.zahl1,meht.bezkurz,meh.bezkurz ,meht.bez,ar.preiseinheit,meh.bez,al.packeinheit,al.mengeneinh,al.umrechfaktor,nvl(mehtal.bez,mehal.bez),nvl(meht.sprache,'D'),'preismengeshop') preismenge /* 21.03.14 pg: Login in function ausgelagert case when nvl(ar.packeinheit,1) > 1 then ' / ' || pa_bez.mengeneinhbezkurz(61,nvl(meht.sprache,'D')) || ' à ' || to_char(ar.packeinheit) || ' ' || nvl(meht.bezkurz,meh.bezkurz) when nvl(ar.preiseinheit,1) = 1 and instr(pa.text1 || pa.text2,meh.bezkurz) < 1 and ar.zahl1 > 1 then ' / 1 ' || nvl(meht.bezkurz,meh.bezkurz) || ' à ' || to_char(ar.zahl1) else ' / 1 ' || nvl(meht.bezkurz,meh.bezkurz) end preismenge, */ ,fusw_verkeinh_umrechnen_impl(ar.preiseinheit,ar.packeinheit,ar.artnr,ar.mengeneinh,ar.zahl1 ,meh.bezkurz,al.packeinheit,null,null,pa.text1 || pa.text2,'defaultmenge') defaultmenge /* 21.03.14 pg: Login in function ausgelagert ,nvl(al.packeinheit,1) defaultmenge, -- 30.5.08 pg: packeinheit nicht mehr umrechnen gem. Tf. tsc nvl(al.packeinheit / nvl(ar.packeinheit,1),1) defaultmenge, */ ,fusw_verkeinh_umrechnen2_impl(ar.packeinheit,ar.artnr,ar.mengeneinh,ar.zahl1,meht.bezkurz,meh.bezkurz ,meht.bez,ar.preiseinheit,meh.bez,al.packeinheit,al.mengeneinh,al.umrechfaktor,nvl(mehtal.bez,mehal.bez),nvl(meht.sprache,'D'),'defaultmenge') defaultmengeneinh /* 21.03.14 pg: Login in function ausgelagert case when al.mengeneinh is not null and al.mengeneinh <> ar.mengeneinh and al.umrechfaktor > 1 then nvl(mehtal.bez,mehal.bez) || ' à ' || to_char(al.umrechfaktor) || ' ' || nvl(meht.bez,meh.bez) else '' end defaultmengeneinh, -- pg 11.11.11 dieses Feld wird im neuen Shop für Umpack verwendet, die Logik ist aber noch nicht ganz perfekt! */ ,ar.preiseinheit, case when papeg.zahl1 = al.liefnrhl then 'J' when ar.beibedarf = 'J' and al.bestand is not null then 'J' -- 03.05.19:wird für die Beurteilung des Lagerbestandes verwendet. Falls wir Bestand im Artlief haben, wie peg behandeln else 'N' end pegartikel, ar.beibedarf, ar.logisch1 oeko, ar.logisch2 spartipp, ar.logisch7 schnelldreher, ar.logisch8 staples, katga.katgliederung katgliederunga, katga.prioritaet prioritaeta, katga.sequenz sequenza, katgta.sprache sprachea, katgta.titel titela, nvl(katgta.text,katga.bez) texta, katgmma.pfad bilda, vars.selectedkatalog, vars.sparalshaupt, katgt.sprache, tmp.kundnr, katg.katgliederung, -- 13.03.12 pg: frueher war tmp an katg gebunden; für den Filter nach sortimentsartikel ist aber katga richtig. Fuer die Rueckeaertskompatiblitltaet katgliederung aus katg nehmen statt aus tmp tmp.anzhaupt, tmp.anzspar, tmp.anzkunden, tmp.anztemp, tmp.anzaktion, tmp.anzstempel, tmp.anzvisiten, case when vars.selectedkatalog = -1 then -- 08.01.13 fuer suche in allen sortimente 1 when vars.selectedkatalog = 1 then DECODE (vars.sparalshaupt, 1, tmp.anzspar, tmp.anzhaupt) when vars.selectedkatalog = 2 then tmp.anzspar when vars.selectedkatalog = 3 then tmp.anzaktion when vars.selectedkatalog = 4 or vars.selectedkatalog = 8 or vars.selectedkatalog = 9 then tmp.anzkunden when vars.selectedkatalog = 5 and vars.isroche = 'J' then tmp.anztemp when vars.selectedkatalog = 5 then tmp.anzaktion when vars.selectedkatalog = 6 then tmp.anzstempel when vars.selectedkatalog in (7,12,13) then /* 21.08.19 erweiterungen für Roche */ tmp.anzvisiten else tmp.anzhaupt end anz, katg.katalog, -- 13.03.12 pg katg.parent, -- 13.03.12 pg katg.sequenz, -- 13.03.12 pg katg.katgliederung katgliederungg, katg.parent katgliederungp, -- die Katgliederung des Parents, für die Filterung katg.sequenz sequenzg, katg.BEZ, katg.PUBLIZIEREN, katg.KATGLIEDART, NVL (katgt.titel, katg.BEZ) titel, katgt.text, katgt.fuss, katgmm2.pfad farbe, katgmmmarke.pfad marke, katgtp.titel titel_parent, cast ( multiset( select pfad from katgliedmultimedia katgmm where katgmm.katgliederung = katga.katgliederung AND katgmm.katgliedmmtyp LIKE 'BILD%' order by katgmm.katgliedmmtyp ) as varchar2array) artikeldetailBilder, cast (multiset ( -- die 1 bis 4 (hier: umbeschränkt) Bilder als Varchar2array holen select pfad from katgliedmultimedia katgmm where katgmm.katgliederung = katg.katgliederung and katgmm.katgliedmmtyp like 'BILD%' order by katgmm.katgliedmmtyp ) as varchar2array) bilder, --rank() over (partition by ar.art_id order by katga.prioritaet, katga.katgliederung) rangVonKatgInArt ( select katgr.katgliederung from katgliederung katgr where connect_by_isleaf = 1 -- wir wollen nur die letzte Row der Hierarchie (vor dem Root), das wird das Register sein start with katgr.katgliederung = katg.parent connect by katgr.katgliederung = prior katgr.parent and katgr.parent is not null -- den root wollen wir nicht mehr ) katgliederungregister , /* ar.logisch12 konfigurierbar -- nicht mehr konfigurierbar, weil mehrere punchouts: utopia/trivet */ ar.lovid3 konfigurierbar ,ar.bewirtsch , -- pa_basis.add_tage( -- 31.01.17 pg: Lieferterm einer ev. offenen Bestellung berücksichtigen Mantis 10513 01.04.17 pg: pa_basis.add_tage aus Performancegründen nicht mehr hier aufrufen, sondern aus CacheUtil case when al.liefnr is not null then case when al.datum3 > trunc(sysdate) then al.datum3 - trunc(sysdate) end else case when verfalt.liefterm > trunc(sysdate) then verfalt.liefterm - trunc(sysdate) end -- 15.08.22 pg: umbau auf Mantis 27866; Konfigurierbare werden in ViewRowImpl gesondert behandelt auf der Basis von beschzeit end verfuegbartage -- case -- when ar.beibedarf = 'J' -- and papeg.zahl1 = al.liefnr then -- 05.10.19 pg: Mantis 16710: bei PEG-Artikeln den Stichtag aus der entsprechenen Tabelle lesen -- nvl(dppapedis.liefterm,trunc(sysdate)) -- Kommt zum Zug wenn rot ist, d.h., lagerbestand <= 0 nvl ist nicht inhaltlich, nur defensiv -- else -- nvl (dp.liefterm, TRUNC(SYSDATE)) -- end verfuegbarstichtag -- wenn wir einen geplanten Eingang in der Dispo haben, den verwenden, sonst das Tagesdatum -- ,case -- when ar.beibedarf = 'J' -- and papeg.zahl1 = al.liefnrhl -- 05.10.19 pg: Mantis 16710: Falls wir die Verfügbarkeit von Papedis brauchen -- and dppapedis.liefterm is not null then -- 1 -- gem. Mantis 16710 1 Tag wenn verfügbarkeit von papedis (der Tag kommt dann zur Verfügbarkeit hinzu) -- when ar.beibedarf = 'J' and al.streckengesch = 'J' -- and Coalesce(al.beschzeit, li.beschzeit) is not null -- and li.liefnrhl = pa.zahl2 -- then -- Coalesce(al.beschzeit, li.beschzeit) -- gem. Mantis 22419 bei Streckengeschäft -- when dp.liefterm is not null then -- 2 -- beim geplanten Eingang keine Vorlaufzeit addieren, aber die 2 Tage -- else -- Coalesce(al.beschzeit, li.beschzeit, 1) + 2 -- sonst eben die Vorlaufzeit und zwei Tage sowieso -- end verfuegbartage -- -- ,'N','N') verfuegbarkeitsdatum 31.03.17 pg Aus den verfuegbartage in ViewRowImpl einen getter machen, der die gecachten pa_basis.add_tage ausnutzt ,case when paeco.zahl1 = al.liefnrhl then 'J' else 'N' end ecomediaartikel ,al.liefartnrha liefartnr ,cast ( fusw_katgliederung_serie(katg.katgliederung, katga.katgliederung, katgta.sprache) as varchar2array) serienlogo -- 24.01.14 jk/pg: subselect in eine FU ausgelagert, aus Performancegründen ,ar.fibugrp lageraufanfrage , ar.lovid5 /* drittprodukte */ ,ar.logisch18 keinrueckgaberecht -- 13.01.19 pg: Mantis 13726 ,Coalesce(al.beschzeit, li.beschzeit, 0) beschzeit -- 29.01.19 pg Mantis 15499 ,ar.lovid7 pfandartnr -- 06.11.20 Mantis 21175 ,case when al.streckengeschhl = 'J' and al.liefnrhl = pa.zahl2 then 'J' else 'N' end streckengesch -- 02.12.20 Mantis 22419 from artikel ar, mengeneinh meh, mengeneinhtext meht ,(select al.art_id, min(case when al.liefnr = 3669 and al.datum2 is not null then liefnr end) liefnr ,case when min(case when al.liefnr = 3669 and al.datum2 is not null then al.liefnr end) is not null then '###' end pseudoverfalt -- verhindert wegen coalesce unten den Aufruf der FU ,min(case when al.liefnr = 3669 and al.datum2 is not null then al.packeinheit end) packeinheit ,min(case when al.liefnr = 3669 and al.datum2 is not null then al.mengeneinh end) mengeneinh ,min(case when al.liefnr = 3669 and al.datum2 is not null then al.beschzeit end) beschzeit ,min(case when al.liefnr = 3669 and al.datum2 is not null then al.umrechfaktor end) umrechfaktor ,min(case when al.liefnr = 3669 and al.datum2 is not null and sysdate - al.datum2 <= pa.zahl1 then al.zahl2 end) bestand ,min(case when al.liefnr = 3669 and al.datum2 is not null and sysdate - al.datum2 <= pa.zahl1 then al.datum3 end) datum3 ,min(case when al.isthauptlief = 'J' then al.liefnr end) liefnrhl ,min(case when al.isthauptlief = 'J' then al.packeinheit end) packeinheithl ,min(case when al.isthauptlief = 'J' then al.mengeneinh end) mengeneinhhl ,min(case when al.isthauptlief = 'J' then al.beschzeit end) beschzeithl ,min(case when al.isthauptlief = 'J' then al.umrechfaktor end) umrechfaktorhl ,min(case when al.isthauptlief = 'J' then al.streckengesch end) streckengeschhl ,min(case when al.isthauptlief = 'J' then al.liefartnr end) liefartnrha from artlief al cross join pa group by al.art_id ) al -- 03.05.19 pg: nicht mehr artlief mit isthauptlief ='J',weil der höchste Bestand aus zahl2 verwendet werden soll 15.08.22 pg: doch wieder mit group by, da wir Hauptlief für Stempel und 3669 für die übrigen Artikel brauchen Mantis 27866 ,lateral (select coalesce(al.pseudoverfalt,toscak.pasw_kat.fallback_verf(ar.art_id)) verfalt from dual) verfaltintern ,lateral (select to_number(regexp_substr(verfaltintern.verfalt,'[^#]+',1,1)) bestand ,to_date(regexp_substr(verfaltintern.verfalt,'[^#]+',1,2),'YYYYMMDD') liefterm ,regexp_substr(verfaltintern.verfalt,'[^#]+',1,3) ampel from dual ) verfalt ,pa, mengeneinh mehal, mengeneinhtext mehtal ,parameter papeg ,parameter paeco , lieferant li, (SELECT -- wenn Sparsortiment als Hauptsortiment angezeigt, dann 1 (z.Z. nur Passanten) :p1selectedkatalog selectedkatalog, :p2sparalshaupt sparalshaupt, :p3sprache sprache, :p4isroche isroche FROM DUAL ) vars, toscak.sw_sortimentkatgliederung tmp, katgliederung katga, katgliedtext katgta, katgliedmultimedia katgmma, -- fuer Artikel katgliederung katg, katgliedtext katgt, katgliedtext katgtp, --Text für Parent katgliedmultimedia katgmm2, katgliedmultimedia katgmmmarke ,( -- 31.01.17 pg: offene Bestellzeilen gem. Mantis 10513 wie in pasw_schoch.aufzeile_lieferm ermitteln. Wir verwenden allerdings die DISPO, da z.B. offene Liefmng auf Rückstand sonst auch mitgerechnet werden select dp.art_id, min(dp.liefterm) liefterm from dispo dp where dp.appl = 'E' and dp.menge > 0 -- nur Lagereingänge and dp.wahrschdispo >= 75 group by dp.art_id ) dp ,( -- 05.10.19 pg: Mantis 16710: ggf. Verfügbarkeitsdatum von Papedis berücksichtigen select text1 artnr, case when regexp_like(nvl(text2, text3),'\d{2}\.\d{2}\.\d{2}') then to_date(nvl(text2, text3),'DD.MM.RR') end liefterm from sw_temporaer where tempart = 'PEG_TERMINCODE' ) dppapedis where meh.mengeneinh = ar.mengeneinh and meht.mengeneinh (+) = meh.mengeneinh and meht.sprache (+) = :p4sprache and al.art_id (+) = ar.art_id -- and al.isthauptlief (+) = 'J' 03.05.19 pg: wird in Inline-View analysiert and li.liefnr (+) = al.liefnrhl -- and pa.laufnr = 9005 03.05.19 pg: in With and mehal.mengeneinh(+) = al.mengeneinh and mehtal.mengeneinh (+) = mehal.mengeneinh and mehtal.sprache (+) = :p5sprache and papeg.laufnr = 181 and paeco.laufnr = 182 and katga.art_id = ar.art_id and katga.katalog = :p5aKatalog and katgta.katgliederung(+) = katga.katgliederung and katgta.sprache(+) = :p6sprache and katgmma.katgliederung(+) = katga.katgliederung and katgmma.katgliedmmtyp(+) = 'BILD' and katg.katgliederung = katga.parent -- katg ist der Parent über dem Artikel and katgt.katgliederung(+) = katg.katgliederung and katgt.sprache (+) = :p7sprache and katgtp.katgliederung(+) = katg.parent -- das ist der Text des Parents and katgtp.sprache (+) = :p8sprache AND katgmm2.katgliederung (+) = katga.katgliederung AND katgmm2.katgliedmmtyp (+) LIKE 'FARBE%' AND katgmmmarke.katgliederung (+) = katg.katgliederung AND katgmmmarke.katgliedmmtyp (+) = 'MARKE' and tmp.kundnr = :p9kundnr and tmp.sortimentgrp = :p9aSortimentgrp and tmp.katgliederung = katga.katgliederung and (tmp.anzspar > 0 or tmp.anzkunden > 0 or :p10nurSortiment = 'N') -- 10.03.12 pg: Benutzer mit nur Sortiment dürfen nichts anderes sehen and dp.art_id (+) = ar.art_id and dppapedis.artnr(+) = ar.artnr -- bei Papedis nicht auf Liefartnr gehen, da identisch and /* WHEREBEGINN */katg.katgliederung in (select /*+ cardinality (tab,1) */ column_value from table(cast( :katgliederung as tosca.numbertable)) tab)/* WHEREENDE */ ) v1 where anz > 0 ) v2 where (:p11selectbyartid = 'N' or rangkatgliederunga = 1) order by (Select sequenz from katgliederung katgliedp where katgliedp.katgliederung = parent), sequenzg, sequenza
Cookies:
