Berichtsname |
AZUBDH |
Voraussetzungen |
Scanner-Controller Maschinendatenerfassung |
Tabelle(n) |
AZTUNB (Unterbrechungsjournal) FEBMIT (Betriebsmittelstamm) |
Prozedur |
AZE_Unterbrechungsjournal |
Parameter |
Firmennummer Von Betriebsmittelnummer Bis Betriebsmittelnummer Von Datum Bis Datum |
Ergebnistabelle |
Betriebsmittelnummer Bezeichnung des Betriebsmittels Unterbrechungsart Bezeichnung der Unterbrechungsart Unterbrechungsbeginn Unterbrechungsende Stunden Mitarbeiter Status |
Aufbereitung |
Keine |
Crystal-Reports |
AZJOUR.RPT |
Excel-Diagramme |
|
CREATE PROCEDURE AZE_Unterbrechungsjournal (@OUFIRM AS VARCHAR(2), @OVAGRP AS VARCHAR(6), @OBAGRP AS VARCHAR(6), @OUBBEG AS DATETIME, @OUBEND AS DATETIME)
AS
-- Meldungen des SQL-Servers abschalten
--
SET NOCOUNT ON
-- SQL ausführen
--
SELECT
FEBMIT.AM_GRP
,FEBMIT.AMBEZ1
,AZTUNB.OUUART
,PAUART.BGBEZ1
,AZTUNB.OUBBEG
,OUBEND = CASE WHEN YEAR(AZTUNB.OUBEND) <= 1900 THEN NULL ELSE AZTUNB.OUBEND END
,Stunden =
CASE
WHEN AZTUNB.OUSTAT = 'E' THEN ROUND(DATEDIFF(mi, AZTUNB.OUBBEG, AZTUNB.OUBEND) / 60.00, 2)
ELSE ROUND(DATEDIFF(mi, AZTUNB.OUBBEG, GETDATE()) / 60.00, 2)
END
,Mitarbeiter = LTRIM(FEPERS.PEVNAM + ' ' + FEPERS.PENAME)
,AZTUNB.OUSTAT
FROM AZTUNB
INNER JOIN FEBMIT ON
AZTUNB.OUFIRM = FEBMIT.AMFIRM AND AZTUNB.OUAGRP = FEBMIT.AM_GRP
INNER JOIN PAUART ON
AZTUNB.OUUART = PAUART.BG_KEY
INNER JOIN FEPERS ON
AZTUNB.OUFIRM = FEPERS.PEFIRM AND AZTUNB.OUPERS = FEPERS.PENUMM
WHERE
AZTUNB.OUFIRM = @OUFIRM
AND AZTUNB.OUBBEG >= @OUBBEG
AND AZTUNB.OUBEND <= @OUBEND
AND AZTUNB.OUAGRP >= @OVAGRP
AND AZTUNB.OUAGRP <= @OBAGRP
ORDER BY
FEBMIT.AM_GRP
,AZTUNB.OUUART
,AZTUNB.OUPERS
,AZTUNB.OUBBEG