Facebook
From Crimson Ibis, 3 Years ago, written in Plain Text.
Embed
Download Paste or View Raw
Hits: 196
  1. USE [PRECIZO]
  2. GO
  3. /****** Object:  UserDefinedFunction [dbo].[FUN_R_Brak_Jakości]    Script Date: 24.04.2020 10:43:51 ******/
  4. SET ANSI_NULLS ON
  5. GO
  6. SET QUOTED_IDENTIFIER ON
  7. GO
  8. -- =============================================
  9. -- Author:              <Radosław Sniegocki>
  10. -- Create date: <13-06-2018>
  11. -- Description: <Funkcja zwraca dane do raportu karty zużycia narzędzi>
  12. -- =============================================
  13. ALTER FUNCTION [dbo].[FUN_R_Brak_Jakości]
  14. (
  15.         @ID_Podmiotu bigint
  16.         ,@ID_Przeciwnej_Transakcji_Magazynowej bigint
  17.         ,@ID_Magazynu_Uruchamiania_Zlecen bigint
  18.         ,@ID_Produktu bigint
  19. )
  20. RETURNS @TABELA TABLE
  21. (
  22.                 [Źródło złej jakości] nvarchar(10)
  23.                 ,[Data analityczna] datetime
  24.                 ,[Tydzień roku daty analitycznej] int
  25.                 ,[Data wystawienia] datetime
  26.                 ,[Data zgłoszenia przez pracownika] datetime
  27.                 ,[Zakończył] nvarchar(150)
  28.                 ,[Data zakończenia] datetime
  29.                 ,[Tydzień roku] int
  30.                 ,[Indeks wyrobu] nvarchar(30)
  31.                 ,[Wariant wyrobu] bigint
  32.                 ,[Nazwa wyrobu] nvarchar(200)
  33.                 ,[Rodzaj] varchar(10)
  34.                 ,[Nr zlecenia] nvarchar(20)
  35.                 ,[Status WT] bigint
  36.                 ,[Koncern] nvarchar(50)
  37.                 ,[Ilość zlecona] numeric(18,6)
  38.                 ,[Ilość zabrakowana/naprawiona] numeric(18,6)
  39.                 ,[Nr operacji] nvarchar(4)
  40.                 ,[Nazwa operacji] nvarchar(50)
  41.                 ,[Przyczyna] nvarchar(30)
  42.                 ,[Powód] nvarchar(100)
  43.                 ,[Obszar] nvarchar(200)
  44.                 ,[Zasób] nvarchar(200)
  45.                 ,[Symbol obrabiarki] nvarchar(30)
  46.                 ,[Nr inwentarzowy] nvarchar(50)
  47.                 ,[Koszt materiału na sztukę] money
  48.                 ,[Wartość zabr. materiałów] money
  49.                 ,[Suma Tj złej jakości] numeric(18,2)
  50.                 ,[Suma Tpz złej jakości] numeric(18,2)
  51.                 ,[Suma Tj+Tpz złej jakości] numeric(18,2)
  52.                 ,[Indeks materiału]  nvarchar(30)
  53.                 ,[Nazwa materiału]  nvarchar(200)
  54.                 ,[Nr PZ]  nvarchar(70)
  55.                 ,[Dostawca]  nvarchar(200)
  56.                 ,[Pracownik]  nvarchar(70)
  57.                 ,[Status pracownika]  nvarchar(30)
  58.                 ,[Lider]  nvarchar(70)
  59.                 ,[Bezpośredni przełożony]  nvarchar(70)
  60.                 ,[Koszt robocizny] money
  61.                 ,[Godziny robocizny] numeric(18,6)
  62.                 ,[Kierownik procesu]  nvarchar(70)
  63.                 ,[Wystawił]  nvarchar(70)
  64.                 ,[Uwagi operacji]  nvarchar(300)
  65.                 ,[ID Zlecenia] bigint
  66. )
  67. AS
  68.         BEGIN
  69.  
  70.                 DECLARE @ZN TABLE
  71.                 (
  72.                 [Źródło złej jakości] nvarchar(10)
  73.                 ,[Data analityczna] datetime
  74.                 ,[Tydzień roku daty analitycznej] int
  75.                 ,[Data wystawienia] datetime
  76.                 ,[Data zgłoszenia przez pracownika] datetime
  77.                 ,[Zakończył] nvarchar(150)
  78.                 ,[Data zakończenia] datetime
  79.                 ,[Tydzień roku] int
  80.                 ,[Indeks wyrobu] nvarchar(30)
  81.                 ,[Wariant wyrobu] bigint
  82.                 ,[Nazwa wyrobu] nvarchar(200)
  83.                 ,[Rodzaj] varchar(10)
  84.                 ,[Nr zlecenia] nvarchar(20)
  85.                 ,[Status WT] bigint
  86.                 ,[Koncern] nvarchar(50)
  87.                 ,[Ilość zlecona] numeric(18,6)
  88.                 ,[Ilość zabrakowana/naprawiona] numeric(18,6)
  89.                 ,[Nr operacji] nvarchar(4)
  90.                 ,[Nazwa operacji] nvarchar(50)
  91.                 ,[Przyczyna] nvarchar(30)
  92.                 ,[Powód] nvarchar(100)
  93.                 ,[Obszar] nvarchar(200)
  94.                 ,[Zasób] nvarchar(200)
  95.                 ,[Symbol obrabiarki] nvarchar(30)
  96.                 ,[Nr inwentarzowy] nvarchar(50)
  97.                 ,[Koszt materiału na sztukę] money
  98.                 ,[Wartość zabr. materiałów] money
  99.                 ,[Suma Tj złej jakości] numeric(18,2)
  100.                 ,[Suma Tpz złej jakości] numeric(18,2)
  101.                 ,[Suma Tj+Tpz złej jakości] numeric(18,2)
  102.                 ,[Indeks materiału]  nvarchar(30)
  103.                 ,[Nazwa materiału]  nvarchar(200)
  104.                 ,[Nr PZ]  nvarchar(70)
  105.                 ,[Dostawca]  nvarchar(200)
  106.                 ,[Pracownik]  nvarchar(70)
  107.                 ,[Status pracownika]  nvarchar(30)
  108.                 ,[Lider]  nvarchar(70)
  109.                 ,[Bezpośredni przełożony]  nvarchar(70)
  110.                 ,[Koszt robocizny] money
  111.                 ,[Godziny robocizny] numeric(18,6)
  112.                 ,[Kierownik procesu]  nvarchar(70)
  113.                 ,[Wystawił]  nvarchar(70)
  114.                 ,[Uwagi operacji]  nvarchar(300)
  115.                 ,[ID Zlecenia] bigint
  116.                 )
  117.  
  118.                 DECLARE @OP TABLE
  119.                 (
  120.                 [Źródło złej jakości] nvarchar(10)
  121.                 ,[Data analityczna] datetime
  122.                 ,[Tydzień roku daty analitycznej] int
  123.                 ,[Data wystawienia] datetime
  124.                 ,[Data zgłoszenia przez pracownika] datetime
  125.                 ,[Zakończył] nvarchar(150)
  126.                 ,[Data zakończenia] datetime
  127.                 ,[Tydzień roku] int
  128.                 ,[Indeks wyrobu] nvarchar(30)
  129.                 ,[Wariant wyrobu] bigint
  130.                 ,[Nazwa wyrobu] nvarchar(200)
  131.                 ,[Rodzaj] varchar(10)
  132.                 ,[Nr zlecenia] nvarchar(20)
  133.                 ,[Status WT] bigint
  134.                 ,[Koncern] nvarchar(50)
  135.                 ,[Ilość zlecona] numeric(18,6)
  136.                 ,[Ilość zabrakowana/naprawiona] numeric(18,6)
  137.                 ,[Nr operacji] nvarchar(4)
  138.                 ,[Nazwa operacji] nvarchar(50)
  139.                 ,[Przyczyna] nvarchar(30)
  140.                 ,[Powód] nvarchar(100)
  141.                 ,[Obszar] nvarchar(200)
  142.                 ,[Zasób] nvarchar(200)
  143.                 ,[Symbol obrabiarki] nvarchar(30)
  144.                 ,[Nr inwentarzowy] nvarchar(50)
  145.                 ,[Koszt materiału na sztukę] money
  146.                 ,[Wartość zabr. materiałów] money
  147.                 ,[Suma Tj złej jakości] numeric(18,2)
  148.                 ,[Suma Tpz złej jakości] numeric(18,2)
  149.                 ,[Suma Tj+Tpz złej jakości] numeric(18,2)
  150.                 ,[Indeks materiału]  nvarchar(30)
  151.                 ,[Nazwa materiału]  nvarchar(200)
  152.                 ,[Nr PZ]  nvarchar(70)
  153.                 ,[Dostawca]  nvarchar(200)
  154.                 ,[Pracownik]  nvarchar(70)
  155.                 ,[Status pracownika]  nvarchar(30)
  156.                 ,[Lider]  nvarchar(70)
  157.                 ,[Bezpośredni przełożony]  nvarchar(70)
  158.                 ,[Koszt robocizny] money
  159.                 ,[Godziny robocizny] numeric(18,6)
  160.                 ,[Kierownik procesu]  nvarchar(70)
  161.                 ,[Wystawił]  nvarchar(70)
  162.                 ,[Uwagi operacji]  nvarchar(300)
  163.                 ,[ID Zlecenia] bigint
  164.                 )
  165.  
  166.  
  167.                 DECLARE @KB TABLE
  168.                 (
  169.                 [Źródło złej jakości] nvarchar(10)
  170.                 ,[Data analityczna] datetime
  171.                 ,[Tydzień roku daty analitycznej] int
  172.                 ,[Data wystawienia] datetime
  173.                 ,[Data zgłoszenia przez pracownika] datetime
  174.                 ,[Zakończył] nvarchar(150)
  175.                 ,[Data zakończenia] datetime
  176.                 ,[Tydzień roku] int
  177.                 ,[Indeks wyrobu] nvarchar(30)
  178.                 ,[Wariant wyrobu] bigint
  179.                 ,[Nazwa wyrobu] nvarchar(200)
  180.                 ,[Rodzaj] varchar(10)
  181.                 ,[Nr zlecenia] nvarchar(20)
  182.                 ,[Status WT] bigint
  183.                 ,[Koncern] nvarchar(50)
  184.                 ,[Ilość zlecona] numeric(18,6)
  185.                 ,[Ilość zabrakowana/naprawiona] numeric(18,6)
  186.                 ,[Nr operacji] nvarchar(4)
  187.                 ,[Nazwa operacji] nvarchar(50)
  188.                 ,[Przyczyna] nvarchar(30)
  189.                 ,[Powód] nvarchar(100)
  190.                 ,[Obszar] nvarchar(200)
  191.                 ,[Zasób] nvarchar(200)
  192.                 ,[Symbol obrabiarki] nvarchar(30)
  193.                 ,[Nr inwentarzowy] nvarchar(50)
  194.                 ,[Koszt materiału na sztukę] money
  195.                 ,[Wartość zabr. materiałów] money
  196.                 ,[Suma Tj złej jakości] numeric(18,2)
  197.                 ,[Suma Tpz złej jakości] numeric(18,2)
  198.                 ,[Suma Tj+Tpz złej jakości] numeric(18,2)
  199.                 ,[Indeks materiału]  nvarchar(30)
  200.                 ,[Nazwa materiału]  nvarchar(200)
  201.                 ,[Nr PZ]  nvarchar(70)
  202.                 ,[Dostawca]  nvarchar(200)
  203.                 ,[Pracownik]  nvarchar(70)
  204.                 ,[Status pracownika]  nvarchar(30)
  205.                 ,[Lider]  nvarchar(70)
  206.                 ,[Bezpośredni przełożony]  nvarchar(70)
  207.                 ,[Koszt robocizny] money
  208.                 ,[Godziny robocizny] numeric(18,6)
  209.                 ,[Kierownik procesu]  nvarchar(70)
  210.                 ,[Wystawił]  nvarchar(70)
  211.                 ,[Uwagi operacji]  nvarchar(300)
  212.                 ,[ID Zlecenia] bigint
  213.                 )
  214.                 DECLARE @RE TABLE
  215.                 (
  216.                 [Źródło złej jakości] nvarchar(10)
  217.                 ,[Data analityczna] datetime
  218.                 ,[Tydzień roku daty analitycznej] int
  219.                 ,[Data wystawienia] datetime
  220.                 ,[Data zgłoszenia przez pracownika] datetime
  221.                 ,[Zakończył] nvarchar(150)
  222.                 ,[Data zakończenia] datetime
  223.                 ,[Tydzień roku] int
  224.                 ,[Indeks wyrobu] nvarchar(30)
  225.                 ,[Wariant wyrobu] bigint
  226.                 ,[Nazwa wyrobu] nvarchar(200)
  227.                 ,[Rodzaj] varchar(10)
  228.                 ,[Nr zlecenia] nvarchar(20)
  229.                 ,[Status WT] bigint
  230.                 ,[Koncern] nvarchar(50)
  231.                 ,[Ilość zlecona] numeric(18,6)
  232.                 ,[Ilość zabrakowana/naprawiona] numeric(18,6)
  233.                 ,[Nr operacji] nvarchar(4)
  234.                 ,[Nazwa operacji] nvarchar(50)
  235.                 ,[Przyczyna] nvarchar(30)
  236.                 ,[Powód] nvarchar(100)
  237.                 ,[Obszar] nvarchar(200)
  238.                 ,[Zasób] nvarchar(200)
  239.                 ,[Symbol obrabiarki] nvarchar(30)
  240.                 ,[Nr inwentarzowy] nvarchar(50)
  241.                 ,[Koszt materiału na sztukę] money
  242.                 ,[Wartość zabr. materiałów] money
  243.                 ,[Suma Tj złej jakości] numeric(18,2)
  244.                 ,[Suma Tpz złej jakości] numeric(18,2)
  245.                 ,[Suma Tj+Tpz złej jakości] numeric(18,2)
  246.                 ,[Indeks materiału]  nvarchar(30)
  247.                 ,[Nazwa materiału]  nvarchar(200)
  248.                 ,[Nr PZ]  nvarchar(70)
  249.                 ,[Dostawca]  nvarchar(200)
  250.                 ,[Pracownik]  nvarchar(70)
  251.                 ,[Status pracownika]  nvarchar(30)
  252.                 ,[Lider]  nvarchar(70)
  253.                 ,[Bezpośredni przełożony]  nvarchar(70)
  254.                 ,[Koszt robocizny] money
  255.                 ,[Godziny robocizny] numeric(18,6)
  256.                 ,[Kierownik procesu]  nvarchar(70)
  257.                 ,[Wystawił]  nvarchar(70)
  258.                 ,[Uwagi operacji]  nvarchar(300)
  259.                 ,[ID Zlecenia] bigint
  260.                 )
  261.  
  262.                 DECLARE @Pracownicy TABLE
  263.                 (
  264.                 [ID Pracownika] bigint
  265.                 ,[ID Kolekcji Pracownika] bigint
  266.                 ,[Dane] nvarchar(70)
  267.                 ,[Status] nvarchar(30)
  268.                 )
  269.  
  270.                 DECLARE @Koszt TABLE
  271.                 (
  272.                 [ID Produktu] bigint,
  273.                 [Koszt] numeric (18,6)
  274.                 )
  275.  
  276. ;WITH CTE_Koszty AS
  277. (
  278.         SELECT P.[ID Produktu], [Koszt] = WNKNH.[Koszt netto]
  279.         FROM [Produkty] P
  280.         OUTER APPLY dbo.[Wyroby_Normatywny_Koszt_Materialow_Historia](@ID_Podmiotu,P.[ID Produktu],1,'Materiały podstawowe',17,P.[Data utworzenia]) WNKNH
  281.         WHERE P.[Przeznaczenie] = 'Wyroby' AND (P.[ID Produktu] = @ID_Produktu OR @ID_Produktu = 0)
  282. )
  283.  
  284. INSERT INTO @Koszt
  285.         SELECT * FROM CTE_Koszty
  286.  
  287. ;WITH  CTE_Pracownicy AS
  288. (
  289.         SELECT
  290.                 [ID Pracownika] = P.[ID Pracownika],
  291.                 [ID Kolekcji Pracownika] = PU.[ID Kolekcji Pracownika],
  292.                 [Dane] = P.[Imię] + ' ' + PU.[Nazwisko],
  293.                 [Status]
  294.         FROM
  295.                 [Pracownicy] P
  296.                 INNER JOIN [Pracownicy-Ustawienia] PU ON PU.[ID Pracownika] = P.[ID Pracownika]
  297.                         AND PU.[ID Kolekcji Pracownika] = [dbo].[Pobierz_ID_Ustawienia_Pracownika](P.[ID Pracownika], GETDATE())
  298.                 LEFT JOIN [Słowniki-Statusy] SS ON SS.[ID Statusu] = PU.[ID Statusu]
  299.         WHERE
  300.                 P.[ID Podmiotu] = @ID_Podmiotu
  301. )
  302.  
  303. INSERT INTO @Pracownicy
  304.         SELECT * FROM CTE_Pracownicy
  305.        
  306. ;WITH BASE_CTS AS
  307. (
  308.     SELECT
  309.                 PZP.[ID Zlecenia],
  310.                 PZP.[Data wystawienia],
  311.                 PZP.[Data uruchomienia],
  312.                 PZP.[Data zamknięcia],
  313.                 P.[Indeks],
  314.                 P.[Wariant],
  315.                 P.[Nazwa],
  316.                 PZP.[Numer],
  317.                 SPOP.[Przyczyna],
  318.                 SPZN.[Powód],
  319.                 U.[Login],
  320.                 [TjM] = (SUM(PZP_ON.[TjM]) * PZP.[Ilość] / 3600),
  321.                 [TpzM] = (SUM(CAST(PZP_ON.[TpzM] AS numeric(18,2)) / 60)),
  322.                 PZP.[Ilość],
  323.                 vWR.[Rodzaj]
  324.     FROM
  325.                 [Produkcja-Zlecenia produkcyjne] PZP
  326.                 INNER JOIN [Produkty] P ON PZP.[ID Produktu] = P.[ID Produktu]
  327.                 INNER JOIN [dbo].[Wyroby_Rodzaj] vWR ON P.[ID Produktu] = vWR.[ID Produktu]
  328.                 INNER JOIN [Produkcja-Zlecenia produkcyjne-Operacje naprawcze] PZP_ON ON PZP.[ID Zlecenia] = PZP_ON.[ID Zlecenia]
  329.                 LEFT JOIN [Kontrahenci-Produkty] KP ON PZP.[ID Produktu] = KP.[ID Produktu]
  330.                 LEFT JOIN [Kontrahenci] K ON KP.[ID Kontrahenta] = K.[ID Kontrahenta]
  331.                 LEFT JOIN [Słowniki-Statusy] SS ON PZP.[ID Statusu] = SS.[ID Statusu]
  332.                 LEFT JOIN [Aktualne_Statusy_WT_Wyrobow_K] ASWTW ON PZP.[ID Produktu] = ASWTW.[ID Produktu]  
  333.                 LEFT JOIN [Słowniki-Przyczyny operacji naprawczych] SPOP ON SPOP.[ID Przyczyny] = PZP.[ID Przyczyny]
  334.                 LEFT JOIN [Słowniki-Powody zleceń naprawczych] SPZN ON SPZN.[ID Powodu] = PZP.[ID Powodu]
  335.                 LEFT JOIN [Użytkownicy] U ON U.[ID Użytkownika] = PZP.[ID Użytkownika Wystawił]
  336.     WHERE
  337.                 PZP.[ID Podmiotu] = @ID_Podmiotu
  338.                 AND PZP.[Naprawcze] = 1
  339.                 AND PZP.[Data uruchomienia] IS NOT NULL
  340.                 AND (P.[ID Produktu] = @ID_Produktu OR @ID_Produktu = 0)
  341.     GROUP BY
  342.                 PZP.[ID Zlecenia],
  343.                 PZP.[Data wystawienia],
  344.                 PZP.[Data uruchomienia],
  345.                 PZP.[Data zamknięcia],
  346.                 P.[Indeks],
  347.                 P.[Wariant],
  348.                 P.[Nazwa],
  349.                 PZP.[Numer],
  350.                 SPOP.[Przyczyna],
  351.                 SPZN.[Powód],
  352.                 U.[Login],
  353.                 PZP.[Ilość],
  354.                 vWR.[Rodzaj]
  355. )
  356.  
  357. ,Koszt_Materiału_CTE AS
  358. (
  359. SELECT
  360.         PZP.[ID Zlecenia],
  361.         [Koszt] = SUM(PMO_P.[Ilość] * PMO_P.[Cena netto])
  362. FROM
  363.         [Produkcja-Zlecenia produkcyjne] PZP
  364.         INNER JOIN [Produkty-Magazyn-Obroty-Pozycje] AS PMO_P ON PZP.[ID Zlecenia] = PMO_P.[ID Zlecenia Produkcyjnego]
  365.                 AND PZP.[ID Produktu] <> PMO_P.[ID Produktu]
  366.         INNER JOIN [Produkty-Magazyn-Obroty] PMO ON PMO.[ID Obrotu] = PMO_P.[ID Obrotu]
  367. WHERE
  368.         PMO_P.[ID Zlecenia Produkcyjnego] IN (SELECT [ID Zlecenia] FROM BASE_CTS)
  369.         AND PMO.[ID Transakcji] = @ID_Przeciwnej_Transakcji_Magazynowej -- ID_Przeciwnej_Transakcji_Magazynowej(Ustawienia_Glowne.Produkcja.ID_Transkacji_Uruchamiania_Zlecen)
  370.         AND PMO.[ID Magazynu] = @ID_Magazynu_Uruchamiania_Zlecen -- Ustawienia_Glowne.Produkcja.ID_Magazynu_Uruchamiania_Zlecen & _
  371.         AND (PZP.[ID Produktu] = @ID_Produktu OR @ID_Produktu = 0)
  372. GROUP BY
  373.         PZP.[ID Zlecenia]
  374. )
  375.  
  376. ,CTE_ALL_ZN AS
  377.  (
  378.         SELECT
  379.                 [Źródło złej jakości] = 'ZN',
  380.                 [Data analityczna] = BCTE.[Data zamknięcia],
  381.                 [Tydzień roku daty analitycznej] = DATEPART(WEEK,BCTE.[Data zamknięcia]),
  382.                 [Data wystawienia] = BCTE.[Data wystawienia],
  383.                 [Data zgłoszenia przez pracownika] = null,
  384.                 [Zakończył] = null,
  385.                 [Data zakończenia] = BCTE.[Data zamknięcia],
  386.                 [Tydzień roku] = DATEPART(WEEK,BCTE.[Data uruchomienia]),
  387.                 [Indeks wyrobu] = BCTE.[Indeks],
  388.                 [Wariant wyrobu] = BCTE.[Wariant],
  389.                 [Nazwa wyrobu] = BCTE.[Nazwa],
  390.                 [Rodzaj] = BCTE.[Rodzaj],
  391.                 [Nr zlecenia] = BCTE.[Numer],
  392.                 [Status WT] = null,
  393.                 [Koncern] = null,
  394.                 [Ilość zlecona] = SUM(BCTE.[Ilość]),
  395.                 [Ilość zabrakowana/naprawiona] = null,
  396.                 [Nr operacji] = null,
  397.                 [Nazwa operacji] = null,
  398.                 [Przyczyna] = BCTE.[Przyczyna],
  399.                 [Powód] = BCTE.[Powód],
  400.                 [Obszar] = null,
  401.                 [Zasób] = null,
  402.                 [Symbol obrabiarki] = null,
  403.                 [Nr inwentarzowy] = null,
  404.                 [Koszt materiału na sztukę] = SUM(KMCTE.[Koszt] / BCTE.[Ilość]),
  405.                 [Wartość zabr. materiałów] = null,
  406.                 [Suma Tj złej jakości] = SUM(BCTE.[TjM]),
  407.                 [Suma Tpz złej jakości] = SUM(BCTE.[TpzM]),
  408.                 [Suma Tj+Tpz złej jakości]= SUM(BCTE.[TjM] + BCTE.[TpzM] ),
  409.                 [Indeks materiału] = null,
  410.                 [Nazwa materiału] = null,
  411.                 [Nr PZ] = null,
  412.                 [Dostawca] = null,
  413.                 [Pracownik] = null,
  414.                 [Status pracownika] = null,
  415.                 [Lider] = null,
  416.                 [Bezpośredni przełożony] = null,
  417.                 [Koszt robocizny] = null,
  418.                 [Godziny robocizny] = null,
  419.                 [Kierownik procesu] = null,
  420.                 [Wystawił] = BCTE.[Login],
  421.                 [Uwagi operacji] = null,
  422.                 [ID Zlecenia] = BCTE.[ID Zlecenia]
  423.         FROM
  424.                 BASE_CTS AS BCTE
  425.                 LEFT JOIN Koszt_Materiału_CTE KMCTE ON KMCTE.[ID Zlecenia] = BCTE.[ID Zlecenia]
  426.         GROUP BY
  427.                 BCTE.[ID Zlecenia],
  428.                 BCTE.[Data wystawienia],
  429.                 BCTE.[Data uruchomienia],
  430.                 BCTE.[Data zamknięcia],
  431.                 BCTE.[Indeks],
  432.                 BCTE.[Wariant],
  433.                 BCTE.[Nazwa],
  434.                 BCTE.[Numer],
  435.                 BCTE.[Przyczyna],
  436.                 BCTE.[Powód],
  437.                 BCTE.[Login],
  438.                 BCTE.[Ilość],
  439.                 BCTE.[Rodzaj]
  440. )
  441. INSERT INTO @ZN
  442.         SELECT * FROM CTE_ALL_ZN
  443.  
  444. ;WITH CTE_ALL_OP AS
  445. (
  446.         SELECT
  447.                 [Źródło złej jakości] = 'OP'
  448.                 ,[Data analityczna] = OA.[Data zakończenie]
  449.                 ,[Tydzień roku daty analitycznej] = DATEPART(WEEK,OA.[Data zakończenie])
  450.                 ,[Data wystawienia] = P_ZP_ON.[Data utworzenia]
  451.                 ,[Data zgłoszenia przez pracownika] = PROP.[Data rozliczenia]
  452.                 ,[Zakończył] = OA.[Zakończył]
  453.                 ,[Data zakończenia] = OA.[Data zakończenie]
  454.                 ,[Tydzień roku] = DATEPART(WEEK,P_ZP_ON.[Data utworzenia])
  455.                 ,[Indeks wyrobu] = P.[Indeks]
  456.                 ,[Wariant wyrobu] = P.[Wariant]
  457.                 ,[Nazwa wyrobu] = P.[Nazwa]
  458.                 ,[Rodzaj] = vWR.[Rodzaj]
  459.                 ,[Nr zlecenia] = P_ZP.[Numer]
  460.                 ,[Status WT] = ISNULL(SSWT.[ID Statusu],0)
  461.                 ,[Koncern] = null
  462.                 ,[Ilość zlecona] = P_ZP_ON.[Ilość]
  463.                 ,[Ilość zabrakowana/naprawiona] = PROP.[Ilość wykonana]
  464.                 ,[Nr operacji] = P_ZP_ON.[Nr operacji]
  465.                 ,[Nazwa operacji] = ISNULL(S_OP.Operacja,null)
  466.                 ,[Przyczyna] = ISNULL(S_KON.[Przyczyna],null)
  467.                 ,[Powód] = ISNULL(S_PON.[Powód],null)
  468.                 ,[Obszar] = ISNULL(POb.[Nazwa], null)
  469.                 ,[Zasób] = ISNULL(PZ.[Nazwa], null)
  470.                 ,[Symbol obrabiarki] = OS.[Indeks]
  471.                 ,[Nr inwentarzowy] = OS.[Nr inwentarzowy]
  472.                 ,[Koszt materiału na sztukę] = ISNULL(KOSZT.Koszt,0)
  473.                 ,[Wartość zabr. materiałów] = null
  474.                 ,[Suma Tj złej jakości] = CAST((PROP.[Ilość wykonana] * P_ZP_ON.[TjM]) as numeric(18,2)) / 3600
  475.                 ,[Suma Tpz złej jakości] = CAST((PROP.[Uwzględnij Tpz] * P_ZP_ON.[TpzM]) as numeric(18,2)) / 60
  476.                 ,[Suma Tj+Tpz złej jakości] = (CAST((PROP.[Ilość wykonana] * P_ZP_ON.[TjM]) as numeric(18,2)) / 3600) + (CAST((PROP.[Uwzględnij Tpz] * P_ZP_ON.[TpzM]) as numeric(18,2)) / 60)
  477.                 ,[Indeks materiału] = null
  478.                 ,[Nazwa materiału] = null
  479.                 ,[Nr PZ] = null
  480.                 ,[Dostawca] = null
  481.                 ,[Pracownik] = CASE WHEN PROP.[ID Pracownika] IS NOT NULL THEN
  482.                                                         PU.[Nazwisko] + ' ' + PRAC.[Imię]
  483.                                                 ELSE
  484.                                                         UZYT.[Login]
  485.                                                 END
  486.                 ,[Status pracownika] = (SELECT [Status] FROM @Pracownicy WHERE [ID Pracownika] = PU.[ID Pracownika])
  487.                 ,[Lider] = (SELECT [Dane] FROM @Pracownicy WHERE [ID Kolekcji Pracownika] = PU.[ID Kolekcji Pracownika lidera])
  488.                 ,[Bezpośredni przełożony] = (SELECT [Dane] FROM @Pracownicy WHERE [ID Kolekcji Pracownika] = PU.[ID Kolekcji Pracownika Przełożonego])
  489.                 ,[Koszt robocizny] = ISNULL((PROP.[Ilość wykonana] * convert(numeric(18,6),P_ZP_ON.[TjM]) / 3600) + (CONVERT(int,PROP.[Uwzględnij Tpz]) * convert(numeric(18,6),P_ZP_ON.[TpzM]) / 60),0) * 150
  490.                 ,[Godziny robocizny] = ISNULL((PROP.[Ilość wykonana] * convert(numeric(18,6),P_ZP_ON.[TjM]) / 3600) + (CONVERT(int,PROP.[Uwzględnij Tpz]) * convert(numeric(18,6),P_ZP_ON.[TpzM]) / 60),0)
  491.                 ,[Kierownik procesu] = null
  492.                 ,[Wystawił] = P_ZP_ON.[Utworzył użytkownik]
  493.                 ,[Uwagi operacji] = P_ZP_ON.[Uwagi operacji]
  494.                 ,[ID Zlecenia] = P_ZP.[ID Zlecenia]
  495.         FROM
  496.                 [Produkcja-Zlecenia produkcyjne-Operacje naprawcze] AS P_ZP_ON
  497.                 INNER JOIN [Produkcja-ROP] PROP ON PROP.[ID Kolekcji operacji naprawczej] = P_ZP_ON.[ID Kolekcji operacji]
  498.                 INNER JOIN [Produkcja-Zlecenia produkcyjne] P_ZP ON P_ZP.[ID Zlecenia] = P_ZP_ON.[ID Zlecenia] AND P_ZP.[Naprawcze] = 0 AND P_ZP.[ID Podmiotu] = @ID_Podmiotu
  499.                 INNER JOIN [Produkty] P ON P.[ID Produktu] = P_ZP.[ID Produktu]
  500.                 INNER JOIN [Technologia-Procesy technologiczne] T_PT ON T_PT.[ID Procesu] = P_ZP.[ID Procesu technologicznego]
  501.                 INNER JOIN [Słowniki-Wersje PW] S_WP ON S_WP.[ID Wersji] = T_PT.[ID Wersji]
  502.                 INNER JOIN [dbo].[Wyroby_Rodzaj] vWR ON P.[ID Produktu] = vWR.[ID Produktu]
  503.                 LEFT JOIN @Koszt KOSZT ON KOSZT.[ID Produktu] = P.[ID Produktu]
  504.                 LEFT JOIN [Pracownicy] PRAC ON PRAC.[ID Pracownika] = PROP.[ID Pracownika]
  505.                 LEFT JOIN [Pracownicy-Ustawienia] PU ON PU.[ID Kolekcji Pracownika] = [dbo].[Pobierz_ID_Ustawienia_Pracownika](PRAC.[ID Pracownika],PROP.[Data rozliczenia])
  506.                 LEFT JOIN [Użytkownicy] UZYT ON UZYT.[ID Użytkownika] = PROP.[ID Użytkownika]
  507.                 LEFT JOIN [Słowniki-Statusy wymagań technicznych] SSWT ON SSWT.[ID Statusu] = P_ZP.[ID Statusu wymagań technicznych]
  508.                 LEFT JOIN [Słowniki-Przyczyny operacji naprawczych] S_KON ON P_ZP_ON.[ID Przyczyny] = S_KON.[ID Przyczyny]
  509.                 LEFT JOIN [Słowniki-Powody operacji naprawczych] S_PON ON P_ZP_ON.[ID Powodu] = S_PON.[ID Powodu]
  510.                 LEFT JOIN [Produkty-Usługi produkcyjne] P_UP ON P_ZP_ON.[ID Kolekcji Produkt-Usługa] = P_UP.[ID Kolekcji]
  511.                 LEFT JOIN [Usługi produkcyjne] UP ON P_UP.[ID Usługi produkcyjnej] = UP.[ID Usługi]
  512.                 LEFT JOIN [Obrabiarki i stanowiska] OS ON P_ZP_ON.[ID Obrabiarki] = OS.[ID Obrabiarki]
  513.                 LEFT JOIN [Słowniki-Operacje produkcyjne] S_OP ON P_ZP_ON.[ID Operacji] = S_OP.[ID Operacji]
  514.                 LEFT JOIN [Produkcja-Zasoby-Obrabiarki] PZO ON P_ZP_ON.[ID Obrabiarki] = PZO.[ID Obrabiarki]
  515.                 LEFT JOIN [Produkcja-Zasoby] PZ ON PZO.[ID Zasobu] = PZ.[ID Zasobu]
  516.                 LEFT JOIN [Produkcja-Obszary-Zasoby] POZ ON PZ.[ID Zasobu] = POZ.[ID Zasobu]
  517.                 LEFT JOIN [Produkcja-Obszary] POb ON POZ.[ID Obszaru] = POb.[ID Obszaru]
  518.                 OUTER APPLY (
  519.                         SELECT TOP 1
  520.                                 [Data zakończenie] = FIRST_VALUE(xPROP.[Data modyfikacji]) OVER (ORDER BY xPROP.[Data modyfikacji] DESC),
  521.                                 [Zakończył] = FIRST_VALUE(xPROP.[Zmodyfikował użytkownik]) OVER (ORDER BY xPROP.[Data modyfikacji] DESC)
  522.                         FROM
  523.                                 [Produkcja-ROP] xPROP
  524.                         WHERE
  525.                                 xPROP.[Operacja zakończona] = 1
  526.                                 AND xPROP.[ID Kolekcji operacji naprawczej] = P_ZP_ON.[ID Kolekcji operacji]
  527.                 ) OA
  528.                 WHERE (P.[ID Produktu] = @ID_Produktu OR @ID_Produktu = 0)
  529.                
  530.         )
  531.  
  532. INSERT INTO @OP
  533.         SELECT * FROM CTE_ALL_OP
  534.  
  535. ;WITH CTE_ALL_KB AS
  536. (
  537.         SELECT
  538.                 [Źródło złej jakości] = 'KB',
  539.                 [Data analityczna] = P_KB.[Data],
  540.                 [Tydzień roku daty analitycznej] = DATEPART(WEEK,P_KB.[Data]),
  541.                 [Data wystawienia] = P_KB.[Data],
  542.                 [Data zgłoszenia przez pracownika] = PROP.[Data rozliczenia],
  543.                 [Zakończył] = null,
  544.                 [Data zakończenia] = P_KB.[Data],
  545.                 [Tydzień roku] = DATEPART(WEEK,PROP.[Data rozliczenia]),
  546.                 [Indeks wyrobu] = P.[Indeks],
  547.                 [Wariant wyrobu] = P.[Wariant],
  548.                 [Nazwa wyrobu] = P.[Nazwa],
  549.                 [Rodzaj] = vWR.[Rodzaj],
  550.                 [Nr zlecenia] = P_ZP.[Numer],
  551.                 [Status WT] = ISNULL(P_ZP.[ID Statusu WT-Wystawione],0),
  552.                 [Koncern] = null,
  553.                 [Ilość zlecona] = P_ZP.[Ilość],
  554.                 [Ilość zabrakowana/naprawiona] = P_KB.[Ilość],
  555.                 [Nr operacji] = ISNULL(T_PTO.[Nr operacji], P_ZPON.[Nr operacji]),
  556.                 [Nazwa operacji] = SOP.[Operacja],
  557.                 [Przyczyna] = P_KB.[Przyczyna braku],
  558.                 [Powód] = P_KB.[Powód braku],
  559.                 [Obszar] = PO.Nazwa,
  560.                 [Zasób] = PZ.[Nazwa],
  561.                 [Symbol obrabiarki] = O.[Indeks],
  562.                 [Nr inwentarzowy] = O.[Nr inwentarzowy],
  563.                 [Koszt materiału na sztukę] = ISNULL(KOSZT.Koszt,0),
  564.                 [Wartość zabr. materiałów] = P_KB.[Koszt materiałów],
  565.                 [Suma Tj złej jakości] = CAST(P_KB.[Zabrakowany Tj całkowity] AS numeric(18,2))  / 3600,
  566.                 [Suma Tpz złej jakości] = CAST(P_KB.[Zabrakowany Tpz całkowity] AS numeric(18,2))  / 3600,
  567.                 [Suma Tj+Tpz złej jakości] = (CAST(P_KB.[Zabrakowany Tj całkowity] AS numeric(18,2))  / 3600) + (CAST(P_KB.[Zabrakowany Tpz całkowity] AS numeric(18,2))  / 3600),
  568.                 [Indeks materiału] = null,
  569.                 [Nazwa materiału] = null,
  570.                 [Nr PZ] = null,
  571.                 [Dostawca] = null,
  572.                 [Pracownik] = (SELECT [Dane] FROM @Pracownicy WHERE [ID Pracownika] = P_KB.[ID Pracownika]),
  573.                 [Status pracownika] = (SELECT [Status] FROM @Pracownicy WHERE [ID Pracownika] = P_KB.[ID Pracownika]),
  574.                 [Lider] = (SELECT [Dane] FROM @Pracownicy WHERE [ID Kolekcji Pracownika] = PRAC_U.[ID Kolekcji Pracownika lidera]),
  575.                 [Bezpośredni przełożony] = (SELECT [Dane] FROM @Pracownicy WHERE [ID Kolekcji Pracownika] = PRAC_U.[ID Kolekcji Pracownika Przełożonego]),
  576.                 [Koszt robocizny] = P_KB.[Koszt robocizny],
  577.                 [Godziny robocizny] = null,
  578.                 [Kierownik procesu] = (SELECT [Login] FROM [Użytkownicy] WHERE [ID Użytkownika] = T_PT.[ID Użytkownika kierownik]),
  579.                 [Wystawił] = P_KB.[Utworzył użytkownik],
  580.                 [Uwagi operacji],
  581.                 [ID Zlecenia] = P_ZP.[ID Zlecenia]
  582.         FROM
  583.                 [Produkcja-Karty braków] AS P_KB
  584.                 INNER JOIN [PRodukcja-Braki] PB ON PB.[ID Braku] = P_KB.[ID Braku]  
  585.                 INNER JOIN [Produkcja-ROP] PROP ON PROP.[ID Rozliczenia] = PB.[ID Rozliczenia]
  586.                 INNER JOIN [Produkcja-Zlecenia produkcyjne] P_ZP ON P_KB.[ID Zlecenia] = P_ZP.[ID Zlecenia]
  587.                 INNER JOIN [Produkty] P ON P_KB.[ID Produktu] = P.[ID Produktu]
  588.                 INNER JOIN [Słowniki-Jednostki miary] SJM ON P.[ID Jednostki podstawowej] = SJM.[ID Jednostki]
  589.                 INNER JOIN [dbo].[Wyroby_Rodzaj] vWR ON P.[ID Produktu] = vWR.[ID Produktu]
  590.                 LEFT JOIN @Koszt KOSZT ON KOSZT.[ID Produktu] = P.[ID Produktu]
  591.                 LEFT JOIN [Technologia-Procesy technologiczne] T_PT ON P_ZP.[ID Procesu technologicznego] = T_PT.[ID Procesu]
  592.                 LEFT JOIN [Obrabiarki i stanowiska] O ON P_KB.[ID Obrabiarki] = O.[ID Obrabiarki]
  593.                 LEFT JOIN [Produkcja-Zasoby-Obrabiarki] PZO ON O.[ID Obrabiarki] = PZO.[ID Obrabiarki]
  594.                 LEFT JOIN [Produkcja-Zasoby] PZ ON PZ.[ID Zasobu] = PZO.[ID Zasobu]
  595.                 LEFT JOIN [Produkcja-Obszary-Zasoby] POZ ON PZO.[ID Zasobu] = POZ.[ID Zasobu]
  596.                 LEFT JOIN [Produkcja-Obszary] PO ON PO.[ID Obszaru] = POZ.[ID Obszaru]
  597.                 LEFT JOIN [Słowniki-Grupy] AS S_G ON O.[ID Grupy] = S_G.[ID Grupy]
  598.                 LEFT JOIN [Produkcja-Zlecenia produkcyjne-Operacje naprawcze] AS P_ZPON ON P_KB.[ID Kolekcji Operacji zlecenia naprawczego] = P_ZPON.[ID Kolekcji operacji]
  599.                 LEFT JOIN [Technologia-Procesy technologiczne-Operacje] AS T_PTO ON P_KB.[ID Kolekcji Operacji procesu technologicznego] = T_PTO.[ID Kolekcji operacji]
  600.                 LEFT JOIN [Słowniki-Operacje produkcyjne] SOP ON SOP.[ID Operacji] = T_PTO.[ID Operacji]
  601.                 LEFT JOIN [Pracownicy] PRAC ON PRAC.[ID Pracownika] = P_KB.[ID Pracownika]
  602.                 LEFT JOIN [Pracownicy-Ustawienia] PRAC_U ON PRAC_U.[ID Pracownika] = PRAC.[ID Pracownika] AND PRAC_U.[ID Kolekcji Pracownika] = dbo.Pobierz_ID_Ustawienia_Pracownika(PRAC.[ID Pracownika], GETDATE())
  603.         WHERE
  604.                 P_KB.[ID Podmiotu] = @ID_Podmiotu
  605.                 AND (P.[ID Produktu] = @ID_Produktu OR @ID_Produktu = 0)
  606. )
  607.  
  608. INSERT INTO @KB
  609.         SELECT * FROM CTE_ALL_KB
  610.  
  611.  ;WITH CTE_ALL_RE AS
  612.  (
  613.         SELECT
  614.                 [Źródło złej jakości] = 'RE'
  615.                 ,[Data analityczna] = PB.[Data weryfikacji]
  616.                 ,[Tydzień roku daty analitycznej] = DATEPART(WEEK,PB.[Data weryfikacji])
  617.                 ,[Data wystawienia] = PB.[Data weryfikacji]
  618.                 ,[Data zgłoszenia przez pracownika] = PB.[Data utworzenia]
  619.                 ,[Zakończył] = null
  620.                 ,[Data zakończenia] = PB.[Data akceptacji]
  621.                 ,[Tydzień roku] = DATEPART(WEEK,PB.[Data weryfikacji])
  622.                 ,[Indeks wyrobu] = P.[Indeks]
  623.                 ,[Wariant wyrobu] = P.[Wariant]
  624.                 ,[Nazwa wyrobu] = P.[Nazwa]
  625.                 ,[Rodzaj] = vWR.[Rodzaj]
  626.                 ,[Nr zlecenia] = PZP.[Numer]
  627.                 ,[Status WT] = null
  628.                 ,[Koncern] = null
  629.                 ,[Ilość zlecona] = PZP.[Ilość]
  630.                 ,[Ilość zabrakowana/naprawiona] = PB.[Ilość]
  631.                 ,[Nr operacji] = TPTO.[Nr operacji]
  632.                 ,[Nazwa operacji] = SOP.[Operacja]
  633.                 ,[Przyczyna] = PB.[Przyczyna]
  634.                 ,[Powód] = PB.[Powód]
  635.                 ,[Obszar] = PO.[Nazwa]
  636.                 ,[Zasób] = PZ.[Nazwa]
  637.                 ,[Symbol obrabiarki] = O.[Indeks]
  638.                 ,[Nr inwentarzowy] = O.[Nr inwentarzowy]
  639.                 ,[Koszt materiału na sztukę] = ISNULL(KOSZT.Koszt,0)
  640.                 ,[Wartość zabr. materiałów] = null
  641.                 ,[Suma Tj złej jakości] = CAST((PB.[Ilość] * X.[Suma TjM]) as numeric(18,2)) / 3600
  642.                 ,[Suma Tpz złej jakości] = CAST((PROP.[Uwzględnij Tpz] * X.[Suma TpZ]) as numeric(18,2)) / 60
  643.                 ,[Suma Tj+Tpz złej jakości]= (CAST((PB.[Ilość] * X.[Suma TjM]) as numeric(18,2)) / 3600) + (CAST((PROP.[Uwzględnij Tpz] * TPTO.[TpzM]) as numeric(18,2)) / 60)
  644.                 ,[Indeks materiału] = null
  645.                 ,[Nazwa materiału] = null
  646.                 ,[Nr PZ] = null
  647.                 ,[Dostawca] = null
  648.                 ,[Pracownik] = null
  649.                 ,[Status pracownika] = null
  650.                 ,[Lider] = null
  651.                 ,[Bezpośredni przełożony] = null
  652.                 ,[Koszt robocizny] = (CAST((PB.[Ilość] * X.[Suma TjM]) as numeric(18,2)) / 3600) * O.[Koszt roboczogodziny]
  653.                 ,[Godziny robocizny] = (CAST((PB.[Ilość] * X.[Suma TjM]) as numeric(18,2)) / 3600)
  654.                 ,[Kierownik procesu] = null
  655.                 ,[Wystawił] = (SELECT [Login] FROM [Użytkownicy] WHERE [ID Użytkownika] = PB.[ID Użytkownika Zaakceptował])
  656.                 ,[Uwagi operacji] = null
  657.                 ,[ID Zlecenia] = PZP.[ID Zlecenia]
  658.         FROM
  659.                 [Produkcja-Braki] PB
  660.                 INNER JOIN [Produkcja-ROP] PROP ON PROP.[ID Rozliczenia] = PB.[ID Rozliczenia]
  661.                 INNER JOIN [Produkcja-Zlecenia produkcyjne] PZP ON PZP.[ID Zlecenia] = PROP.[ID Zlecenia]
  662.                 INNER JOIN [Technologia-Procesy technologiczne] TPT ON TPT.[ID Procesu] = PZP.[ID Procesu technologicznego]
  663.                 INNER JOIN [Technologia-Procesy technologiczne-Operacje] TPTO ON TPTO.[ID Procesu] = TPT.[ID Procesu] AND TPTO.[ID Kolekcji operacji] = PROP.[ID Kolekcji operacji]
  664.                 INNER JOIN [Produkty] P ON P.[ID Produktu] = PZP.[ID Produktu]
  665.                 INNER JOIN [Obrabiarki i stanowiska] O ON PROP.[ID Obrabiarki] = O.[ID Obrabiarki]
  666.                 INNER JOIN [Słowniki-Operacje produkcyjne] SOP ON SOP.[ID Operacji] = TPTO.[ID Operacji]
  667.                 INNER JOIN [Produkcja-Zasoby-Obrabiarki] PZO ON O.[ID Obrabiarki] = PZO.[ID Obrabiarki]
  668.                 INNER JOIN [Produkcja-Zasoby] PZ ON PZ.[ID Zasobu] = PZO.[ID Zasobu]
  669.                 INNER JOIN [Produkcja-Obszary-Zasoby] POZ ON PZO.[ID Zasobu] = POZ.[ID Zasobu]
  670.                 INNER JOIN [Produkcja-Obszary] PO ON PO.[ID Obszaru] = POZ.[ID Obszaru]
  671.                 INNER JOIN [dbo].[Wyroby_Rodzaj] vWR ON P.[ID Produktu] = vWR.[ID Produktu]
  672.                 LEFT JOIN @Koszt KOSZT ON KOSZT.[ID Produktu] = P.[ID Produktu]
  673.                 OUTER APPLY (SELECT [Suma TjM] = SUM([TjM]), [Suma TpZ] = SUM([TpzM]) FROM [Technologia-Procesy technologiczne-Operacje] xTPTO WHERE xTPTO.[ID Procesu] = TPT.[ID Procesu] ) X
  674.         WHERE
  675.                 PB.[Decyzja] = 'Reklamacja'
  676.                 AND P.[ID Podmiotu] = @ID_Podmiotu
  677.                 AND (P.[ID Produktu] = @ID_Produktu OR @ID_Produktu = 0)
  678. )
  679.  
  680. INSERT INTO @RE
  681.         SELECT * FROM CTE_ALL_RE
  682.  
  683. INSERT INTO @TABELA
  684.         SELECT * FROM @OP
  685.         UNION ALL
  686.         SELECT * FROM @KB
  687.         UNION ALL
  688.         SELECT * FROM @ZN
  689.         UNION ALL
  690.         SELECT * FROM @RE
  691.         RETURN
  692. END
  693.  

Replies to Untitled rss

Title Name Language When
Re: Untitled Bistre Capybara sql 3 Years ago.