CREATE VIEW [dbo].[PW001SRV202]
AS
SELECT main.PIN,
main.EMPLOYMENTSTARTDATE,
main.EMPLOYMENTENDDATE,
main.NUMORGID,
main.[PAYSLIP STATUS],
main.[PAYMENT PERIOD],
main.[PERIOD START],
main.[PERIOD END],
main.NAME,
main.ORGANIZATION,
main.[RANK],
main.[RANK CODE],
main.[NATIONALITY CODE],
main.ACTIVITY,
main.[ACTIVITY START],
main.[ACTIVITY END],
main.[ACTIVITY ESTIMATED END],
main.[ACTIVITY DAYS],
main.[ACTIVITY VESSEL],
main.[ACTIVITY DEPARTMENT],
main.[ACTIVITY POSITION],
main.[ACTIVITY PAYSCALE TABLE],
main.[ACTIVITY PAYSCALE CODE],
--main.[Row#],
main.[Contract Type],
main.[Contract Name],
main.[Contract Rank],
main.[Contract Start],
main.[Contract End],
main.[CONTRACT PAYSCALE TABLE],
main.[CONTRACT PAYSCALE],
main.[CONTRACT PAYSCALE TABLE NAME],
main.[CONTRACT PAYSCALE NAME],
main.[CALCULATED BY],
main.[CALCULATE TIME],
main.[PAYMENT METHOD],
main.[PAYMENT CURRENCY],
--main.[DISTRIBURE PAYSLIP OPTION] as [DISTRIBUTE PAYSLIP OPTION],
main.EMAIL,
ISNULL(
STUFF(
ISNULL(NULLIF(', ' + main.issue1, ', '), '') +
ISNULL(NULLIF(', ' + main.issue2, ', '), '') +
ISNULL(NULLIF(', ' + main.issue3, ', '), '') +
ISNULL(NULLIF(', ' + main.issue4, ', '), '') +
ISNULL(NULLIF(', ' + main.issue5, ', '), '') +
ISNULL(NULLIF(', ' + main.issue6, ', '), '') +
ISNULL(NULLIF(', ' + main.issue7, ', '), ''), +
1ISNULL(NULLIF(', ' + main.issue8, ', '), '') +
1, ISNULL(NULLIF(', ' + main.issue9, ', '), ''),
), 1,
'' )1,
AS [ISSUES] FROM ( ''
SELECT p.PIN, ),
p.EMPLOYMENTSTARTDATE, ''
) AS [ISSUES],
main.[Department/Cost Place Code],
main.[Department/Cost Place]
FROM (
SELECT p.PIN,
p.EMPLOYMENTSTARTDATE,
p.EMPLOYMENTENDDATE,
p.CLIENT NUMORGID,
CASE
WHEN PayslipStatus.PAYSLIPSTATUS = 'Y' THEN 'Distributed'
ELSE 'Not Distributed'
END 'PAYSLIP STATUS',
company.PERIODE 'PAYMENT PERIOD',
periode.PStart 'PERIOD START',
periode.PEnd 'PERIOD END',
p.NAME,
ORGAN.NAME 'ORGANIZATIONp.COSTPLACE AS 'Department/Cost Place Code',
c02c43.NAME 'RANK AS 'Department/Cost Place',
dbo.ad_orgPosC02Code(
ORGAN.NAME 'ORGANIZATION',
c02.NAME 'RANK',
( dbo.ad_orgPosC02Code(
(
SELECT ORGCODE
FROM pworg
WHERE orgtype = 5
AND numorgid = a.NUMORGID
)
)'RANK CODE',
p.NATIONALITY 'NATIONALITY CODE',
(
SELECT TEXT
FROM pw001c12
WHERE code = a.code
) 'ACTIVITY',
a.DATEFROM 'ACTIVITY START',
a.DATETO 'ACTIVITY END',
a.TODATEESTIMATED 'ACTIVITY ESTIMATED END',
DATEDIFF(
DAY,
(CASE
CASE WHEN a.DATEFROM > periode.PStart THEN a.DATEFROM
WHEN ( ELSE periode.PStart
END,
SELECT MIN(DATEFROM) CASE
WHEN ISNULL(a.DATETO, a.TODATEESTIMATED) < periode.PEnd FROM THEN ISNULL(a.DATETO, a.TODATEESTIMATED)
pw001p03 pa ELSE periode.PEnd
WHERE pa.PIN = p.PIN END
) + 1 AS 'ACTIVITY DAYS',
AND pa.datefrom < ( (
SELECT NAME
FROM pworg
DATEADD( WHERE NUMORGID = a.VESSEL
) 'ACTIVITY VESSEL',
MM, (
SELECT NAME
FROM pworg
1, WHERE orgtype = 4
AND numorgid = (
CAST( SELECT NUMORGIDABOVE
CASE FROM pworg
WHERE orgtype = 5
WHEN RIGHT(CAST(company.PERIODE AS VARCHAR), 2) = AND numorgid = a.NUMORGID
)
'00' THEN LEFT(CAST(company.PERIODE AS VARCHAR), 4) 'ACTIVITY DEPARTMENT',
(
SELECT NAME
FROM pworg
+ '01' WHERE orgtype = 5
AND numorgid = a.NUMORGID
WHEN CONVERT(INT, RIGHT(CAST(company.PERIODE AS VARCHAR), 2)) 'ACTIVITY POSITION',
a.PAYSCALETABLE 'ACTIVITY PAYSCALE TABLE',
a.PAYSCALE 'ACTIVITY PAYSCALE CODE',
-- p0p.PAYSCALETABLE 'PD PAYSCALE >TABLE',
-- p0p.PAYSCALECODE 'PD PAYSCALE',
ROW_NUMBER() OVER(
PARTITION BY p20.PIN 12ORDER THEN LEFT(CAST(company.PERIODE AS VARCHAR), 4)BY p20.PIN,
p20.CONTRACTKIND DESC
) AS ROW#,
CASE +
'12' WHEN p20.CONTRACTKIND = 0 THEN 'Main Contract'
WHEN p20.CONTRACTKIND = 1 THEN 'Sub Contract'
ELSE CAST(company.PERIODE AS VARCHAR(6)) WHEN p20.CONTRACTKIND = 2 THEN 'Ammendment'
ELSE ''
END END + '01' AS DATETIME AS 'Contract Type',
C32CONT.Text 'Contract Name',
C02CONT.NAME 'Contract Rank',
) p20.DATESTART 'Contract Start',
p20.DATEEND 'Contract End',
p20.PAYSCALETABLE 'CONTRACT PAYSCALE TABLE',
) -1 p20.PAYSCALECODE 'CONTRACT PAYSCALE',
payscale.Table_Name 'CONTRACT PAYSCALE TABLE NAME',
) payscale.Payscale_Name 'CONTRACT PAYSCALE NAME',
pay.CALCULATEDBY 'CALCULATED BY',
pay.CalculateTime AND ISNULL(pa.dateto, pa.TODATEESTIMATED) >= ('CALCULATE TIME',
CASE
WHEN P.Transferbalance = '0' THEN 'Carry Forward To Next Month'
CAST( WHEN P.Transferbalance = '1' THEN 'Transfer To Bank Account'
WHEN P.Transferbalance = '2' THEN 'Interpay'
CASE WHEN P.Transferbalance = '3' THEN 'Alpha Credit Bank'
WHEN RIGHT(CAST(company.PERIODE AS VARCHAR), 2) WHEN P.Transferbalance = '004' THEN 'Cash'
WHEN P.Transferbalance = '5' THEN 'Citibank Direct Deposit'
WHEN P.Transferbalance = '6' THEN 'Citibank'
LEFT(CAST(company.PERIODE AS VARCHAR), 4) WHEN P.Transferbalance = '7' THEN 'Chase Manhattan'
WHEN P.Transferbalance = '8' THEN 'Hellenic Bank'
WHEN P.Transferbalance += '019' THEN 'Isabel Domestic'
WHEN P.Transferbalance = 'A' THEN 'Isabel International'
WHEN P.Transferbalance = 'B' THEN 'Bank Transfer'
WHEN CONVERT(INT, RIGHT(CAST(company.PERIODE AS VARCHAR), 2)) WHEN P.Transferbalance = 'C' THEN 'Swedish Domestic'
WHEN P.Transferbalance = 'D' THEN 'Swedish International'
> 12 THEN LEFT(CAST(company.PERIODE AS VARCHAR), 4)WHEN P.Transferbalance = 'E' THEN 'Philippine Banking'
WHEN P.Transferbalance = 'F' THEN 'Manual Bank'
WHEN P.Transferbalance = 'G' + '12THEN 'Zagrebancka'
WHEN P.Transferbalance = 'H' THEN 'ING Bank'
WHEN P.Transferbalance = 'I' THEN 'Direct Deposit E-Monee'
ELSE CAST(company.PERIODE AS VARCHAR(6)) WHEN P.Transferbalance = 'J' THEN 'Deutsche Bank'
WHEN P.Transferbalance = 'K' THEN 'SACS'
END + '01' AS DATETIME WHEN P.Transferbalance = 'L' THEN 'Hellenic Cyprus'
WHEN P.Transferbalance = 'M' THEN 'MT 100'
) WHEN P.Transferbalance = 'N' THEN 'Citibank (PL)'
WHEN P.Transferbalance = '0' THEN 'Agent ).R'
WHEN P.Transferbalance = 'P' THEN 'German Bank'
) WHEN P.Transferbalance = 'Q' THEN 'Trident Trust'
< ( WHEN P.Transferbalance = 'R' THEN 'Citibank (Asia)'
WHEN P.Transferbalance = CAST('S' THEN 'PNC Bank'
WHEN P.Transferbalance = 'T' THEN 'Chase Insight'
CASE WHEN P.Transferbalance = 'U' THEN 'Ocean Pay'
WHEN P.Transferbalance = 'V' THEN 'Banco de Oro'
WHEN RIGHT(CAST(company.PERIODE AS VARCHAR), 2) = '00' THEN LEFT(CAST(company.PERIODE AS VARCHAR), 4) WHEN P.Transferbalance = 'W' THEN 'Bank of Philippine Island'
WHEN P.Transferbalance = 'X' THEN 'CitiDirect (Onboard)'
+ '01' WHEN P.Transferbalance = 'Y' THEN 'Metrobank Direct (PH)'
WHEN CONVERT(INT, RIGHT(CAST(company.PERIODE AS VARCHAR), 2)) > 12 THEN P.Transferbalance = 'Z' THEN 'Elektron'
WHEN P.Transferbalance = 'A1' THEN 'E-Banking (Maramut)'
WHEN LEFT(CAST(company.PERIODE AS VARCHAR), 4)
P.Transferbalance = 'A2' THEN 'RBS Direct Access'
WHEN P.Transferbalance = 'A3' THEN 'Brazilian Banks'
+ '12'
WHEN P.Transferbalance = 'A4' THEN 'NETS'
WHEN P.Transferbalance = 'A5' THEN 'NONE'
ELSE CAST(company.PERIODE AS VARCHAR(6)) WHEN P.Transferbalance = 'A6' THEN 'JDP Morgan'
WHEN P.Transferbalance = 'A7' THEN 'J. P. Morgan Access'
END + '01' AS DATETIME WHEN P.Transferbalance = 'A8' THEN 'Spar Nord Domestic'
) WHEN P.Transferbalance = 'A9' THEN 'Spar Nord International'
) THEN CAST(WHEN P.Transferbalance = 'B1' THEN 'Rabobank'
WHEN P.Transferbalance = 'B2' THEN 'Deutsche Bank'
CASE WHEN P.Transferbalance = 'B4' THEN 'ISO20022'
WHEN RIGHT(CAST(company.PERIODE AS VARCHAR), 2) = '00' THEN LEFT(CAST(company.PERIODE AS VARCHAR), 4)P.Transferbalance = 'B5' THEN 'Brightwell'
END AS 'PAYMENT METHOD',
CASE
+ '01' WHEN ISNULL(
WHEN CONVERTISNULL(INTpay.CURRENCYFORPAYMENT, RIGHT(CAST(company.PERIODE AS VARCHARp.CURRENCYFORPAYMENT),
2)) > 12 THEN p.CURRENCY
LEFT(CAST(company.PERIODE AS VARCHAR), 4) ) = '' THEN company.CURRENCYCODE
ELSE ISNULL(
+ '12' ISNULL(pay.CURRENCYFORPAYMENT, p.CURRENCYFORPAYMENT),
ELSE CAST(companyp.PERIODECURRENCY
AS VARCHAR(6)) )
END + '01' AS DATETIME END AS 'PAYMENT CURRENCY',
CASE
) WHEN p.EMAILPAYSLIP = 'F' THEN 'Off'
ELSE ( WHEN p.EMAILPAYSLIP = 'T' THEN 'On'
SELECT MIN(DATEFROM)
END 'DISTRIBURE PAYSLIP OPTION',
email.TELENO 'EMAIL',
FROMCASE
pw001p03 pa WHEN P.EMPLOYMENTSTARTDATE IS NULL THEN 'Employment Start Date missing'
WHERE pa.PIN = p.PIN ELSE ''
END Issue1,
AND pa.datefrom < ( CASE
WHEN P.EMPLOYMENTSTARTDATE > a.DATEFROM THEN
DATEADD( 'Employment Start Date greater than Activity Start Date'
ELSE ''
MM, END Issue2,
CASE
1,WHEN A.DATEFROM < CAST(GETDATE() AS DATE)
AND ISNULL(A.PLANNED, 'N') = 'Y'
CAST( OR A.TODATEESTIMATED < CAST(GETDATE() AS DATE)
AND A.DATETO IS NULL THEN 'Activity not confirmed'
CASE ELSE ''
END Issue3,
CASE
WHEN RIGHT(CAST(company.PERIODE AS VARCHAR), 2) = WHEN NULLIF(A.PAYSCALETABLE, '') IS NOT NULL
AND NULLIF(A.PAYSCALE, '') IS NULL THEN 'Activity Payscale Code missing'
'00' THEN LEFT(CAST(company.PERIODE AS VARCHAR), 4) ELSE ''
END Issue4,
CASE
+ '01' WHEN (
NULLIF(a.PAYSCALETABLE, '') IS NOT NULL
WHEN CONVERT(INT, RIGHT(CAST(company.PERIODE AS VARCHAR), 2)) AND NULLIF(a.PAYSCALE, '') IS NOT NULL
)
> AND (
(p20.PAYSCALECODE <> a.PAYSCALE)
12 THEN LEFT(CAST(company.PERIODE AS VARCHAR), 4) OR (p20.PAYSCALETABLE <> a.PAYSCALETABLE)
) THEN 'Payscale mismatch between Contract and Activity'
+ '12' ELSE ''
END AS Issue5,
CASE
ELSE CAST(company.PERIODE AS VARCHAR(6)) WHEN p20.DATESTART > periode.PEnd THEN 'Invalid Contract Start Date'
ELSE ''
END + '01' AS DATETIME END AS Issue6,
CASE
) WHEN p20.CONTRACTKIND IS NULL THEN 'No valid contract for this period'
ELSE ''
) -1 END Issue7,
CASE )
WHEN (
AND ISNULL(pa.dateto, pa.TODATEESTIMATED) >= ( a.CODE IN (SELECT CODE
CAST( FROM PW001C12
CASEWHERE OPTIONS LIKE '%S%')
)
WHENAND RIGHT(CAST(company.PERIODE
AS VARCHAR), 2) = '00' THEN a.DATEFROM < (
LEFT(CAST(company.PERIODE AS VARCHAR), 4)CASE
WHEN p20.DATESTART > maincon.DATESTART THEN maincon.DATESTART
+ '01' ELSE p20.DATESTART
WHEN CONVERT(INT, RIGHT(CAST(company.PERIODE AS VARCHAR), 2))END
)
) THEN 'No contract starting >from 12' THEN+ LEFT(CAST(company.PERIODE AS VARCHAR), 4CONVERT(VARCHAR, a.DATEFROM, 1) + ' to ' + CONVERT(VARCHAR, p20.DATESTART, 1)
ELSE ''
END Issue8,
+ '12' CASE
WHEN (a.PAYSCALETABLE IS NULL OR a.PAYSCALETABLE = '')
ELSE CAST(company.PERIODE AS VARCHAR(6)) AND (a.PAYSCALE IS NULL OR a.PAYSCALE = '') THEN
'Activity Payscale Code and Activity Payscale Table are missing.'
END + '01' AS DATETIME WHEN a.PAYSCALETABLE IS NULL
OR a.PAYSCALETABLE )= '' THEN 'Activity Payscale Table is missing'
WHEN a.PAYSCALE IS NULL
) OR a.PAYSCALE = '' THEN 'Activity Payscale Code is missing'
) ELSE ''
END END Issue9
), FROM pw001p01 p
( JOIN (
CASE SELECT NUMORGID,
WHEN ( PERIODE,
SELECT MAX(ISNULL(pa.DATETO, pa.TODATEESTIMATED)) CAST(
FROM pw001p03 pa CASE
WHERE pa.PIN = p.PIN WHEN RIGHT(CAST(PERIODE AS VARCHAR), 2) = '00' THEN LEFT(CAST(PERIODE AS VARCHAR), 4)
AND pa.datefrom < ( +
DATEADD( '01'
MM, WHEN CONVERT(INT, RIGHT(CAST(PERIODE AS VARCHAR), 2)) > 12 THEN LEFT(CAST(PERIODE AS VARCHAR), 4)
1, + '12'
CAST( ELSE CAST(PERIODE AS VARCHAR(6))
END + '01' AS DATETIME
CASE ) AS 'PStart',
WHEN RIGHT(CAST(company.PERIODE AS VARCHAR), 2) =DATEADD(
MM,
'00' THEN LEFT(CAST(company.PERIODE AS VARCHAR), 4) 1,
CAST(
+ '01' CASE
WHEN CONVERT(INT, RIGHT(CAST(company.PERIODE AS VARCHAR), 2)) = '00' THEN LEFT(CAST(PERIODE AS VARCHAR), 4)
+ '01'
> WHEN CONVERT(INT, RIGHT(CAST(PERIODE AS VARCHAR), 2)) > 12 THEN LEFT(CAST(company.PERIODE AS VARCHAR), 4)
+ '12'
+ '12' ELSE CAST(PERIODE AS VARCHAR(6))
ELSE CAST(company.PERIODE AS VARCHAR(6)) END + '01' AS DATETIME
)
END + '01' AS DATETIME ) -1 AS 'PEnd'
FROM ) PWORGCMP
WHERE PAYROLLENABLED = 'Y'
) -1 UNION ALL
SELECT NUMORGID,
) PERIODE,
AND ISNULL(pa.dateto, pa.TODATEESTIMATED) >= ( CAST(
CAST( CASE
WHEN RIGHT(CAST(PERIODE AS VARCHAR), 2) = '00' THEN LEFT(CAST(PERIODE AS VARCHAR), CASE4)
+
WHEN RIGHT(CAST(company.PERIODE AS VARCHAR), 2) = '00' THEN '01'
WHEN CONVERT(INT, LEFTRIGHT(CAST(company.PERIODE AS VARCHAR), 42)) > 12 THEN LEFT(CAST(PERIODE AS VARCHAR), 4)
+ '12'
+ '01' ELSE CAST(PERIODE AS VARCHAR(6))
WHEN CONVERT(INT, RIGHT(CAST(company.PERIODE AS VARCHAR), 2)) END + '01' AS DATETIME
) AS 'PStart',
> 12 THEN LEFT(CAST(company.PERIODE AS VARCHAR), 4) DATEADD(
MM,
+ '12' 1,
ELSE CAST(company.PERIODE
AS VARCHAR(6)) CASE
END + '01' AS DATETIME WHEN RIGHT(CAST(PERIODE AS VARCHAR), 2) = '00' THEN LEFT(CAST(PERIODE AS VARCHAR), 4)
) + '01'
) ) WHEN CONVERT(INT, RIGHT(CAST(PERIODE AS VARCHAR), 2)) > 12 THEN LEFT(CAST(PERIODE AS VARCHAR), 4)
> ( + '12'
DATEADD( MM, ELSE CAST(PERIODE AS VARCHAR(6))
1, END + '01' AS DATETIME
CAST( )
) -1 AS 'PEnd'
CASE FROM PWORGVES
WHEN RIGHT(CAST(company.PERIODE AS VARCHAR), 2) = '00' THEN LEFT(CAST(company.PERIODE AS VARCHAR), 4)
WHERE PAYROLLENABLED = 'Y'
) periode
ON + '01'
p.CLIENT = periode.NUMORGID
JOIN PWORG ORGAN
ON WHEN CONVERT(INT, RIGHT(CAST(company.PERIODE AS VARCHAR), 2)) > 12 THENp.CLIENT = ORGAN.NUMORGID
JOIN PWORGCMP company
ON p.CLIENT = company.NUMORGID
LEFT(CAST(company.PERIODE AS VARCHAR), 4) LEFT JOIN PW001P0P p0p
ON p0p.PIN = p.PIN
+ '12' AND p0p.PNUMBER = 'A'
AND p0p.PAYSCALECODE IS NOT NULL
ELSE CAST(company.PERIODE AS VARCHAR(6)) AND p0p.PAYSCALECODE <> ''
LEFT JOIN PW001PAY pay
END + '01' AS DATETIME ON pay.PIN = p.PIN
) AND pay.CalculateTime IS NOT NULL
AND pay.PERIODEUSED = company.PERIODE
) -1 AND NOT EXISTS(
) THEN ( SELECT 1
DATEADD( FROM PW001PAY PAY2
MM, WHERE PAY.PIN = PAY2.PIN
1, AND PAY2.PERIODEUSED = company.PERIODE
CAST( AND (
CASE PAY2.CALCULATETIME > PAY.CALCULATETIME
WHEN RIGHT(CAST(company.PERIODE AS VARCHAR), 2) = '00' THENOR LEFT(CAST(company.PERIODE
AS VARCHAR), 4) PAY2.CALCULATETIME = PAY.CALCULATETIME
+ '01' WHEN CONVERT(INT, RIGHT(CAST(company.PERIODE AS VARCHAR), 2)) > 12 THEN--AND PAY2.UUID > PAY.UUID
)
LEFT(CAST(company.PERIODE AS VARCHAR), 4) )
+ '12' )
LEFT JOIN PW001P1R p1r5
ON ELSE CAST(companyp1r5.PERIODEPIN AS VARCHAR(6))= p.PIN
AND p1r5.RATENO = 5
END + '01' ASLEFT DATETIMEJOIN pw001c02 c02
ON p.rank = c02.code
) LEFT JOIN PW001P0Y P0Y
ON ) -1p.PIN = P0Y.PIN
LEFT JOIN PW001P0T email
) ON email.PIN = p.PIN
ELSE ( AND email.TELETYPE = 6
SELECT MAX(ISNULL(pa.DATETO, pa.TODATEESTIMATED)) AND NOT EXISTS (
SELECT FROM1
pw001p03 pa FROM pw001p0t t
WHERE pa.PIN = p.PIN WHERE t.PIN = email.PIN
AND pa.datefrom < ( AND t.TELETYPE = email.TELETYPE
DATEADD( AND (
MM,t.TELEPRIORITY < email.TELEPRIORITY
OR (
1, t.TELEPRIORITY = email.TELEPRIORITY
CAST( AND t.SEQUENCENO > email.SEQUENCENO
CASE )
WHEN RIGHT(CAST(company.PERIODE AS VARCHAR), 2) = )
)
'00' THEN LEFT(CAST(company.PERIODE AS VARCHAR), 4)--Activity matching payroll period
JOIN PW001P03 a
ON a.PIN = p.PIN
+ '01' AND a.CODE IN (SELECT CODE
FROM PW001C12
WHEN CONVERT(INT, RIGHT(CAST(company.PERIODE AS VARCHAR), 2)) WHERE TRANSACTIONCODE <> '')
AND a.datefrom <= periode.PEnd
> AND ISNULL(a.dateto, a.TODATEESTIMATED) >= periode.PStart
LEFT JOIN PW001p20 p20sub
ON p20sub.PIN = p.PIN
12 THEN LEFT(CAST(company.PERIODE AS VARCHAR), 4) --AND p20.HISTORICAL = 'F'
AND p20sub.DATESTART <= ISNULL(A.DATETO, A.TODATEESTIMATED)
+ '12' AND p20sub.CONTRACTIDABOVE IS NOT NULL
AND p20sub.DATESTART = A.DATEFROM
AND COALESCE(
ELSE CAST(company.PERIODE AS VARCHAR(6)) p20sub.DATEEND,
END +(
'01' AS DATETIME SELECT MIN(t.DATESTART) -1
) FROM PW001p20 t
) -1 WHERE t.pin = p20sub.pin
) AND t.DATESTART > p20sub.DATESTART
),
AND ISNULL(pa.dateto, pa.TODATEESTIMATED) >= ( a.datefrom
) >= A.DATEFROM
CAST( --AND ISNULL(p20.DATEEND, ISNULL(A.DATETO, A.TODATEESTIMATED)) >= periode.PStart
CASE --AND NOT EXISTS (
-- SELECT 1 FROM PW001p20. z
WHEN RIGHT(CAST(company.PERIODE AS VARCHAR), 2) = '00' THEN -- WHERE z.PIN = p20.PIN AND p20.DATESTART <= ISNULL(A.DATETO, A.TODATEESTIMATED)
-- AND COALESCE(p20.DATEEND,(SELECT MIN(t.DATESTART) -1 FROM PW001p20. t WHERE t.pin = p20.pin AND t.DATESTART > p20.DATESTART), a.DATEFROM) >= A.DATEFROM
LEFT(CAST(company.PERIODE AS VARCHAR), 4) + '01'
WHEN CONVERT(INT, RIGHT(CAST(company.PERIODE AS VARCHAR), 2))
> 12 THEN LEFT(CAST(company.PERIODE AS VARCHAR), 4)
+ '12'
ELSE CAST(company.PERIODE AS VARCHAR(6))
END + '01' AS DATETIME
)
)
)
END
)
) + 1 'ACTIVITY DAYS',
(
SELECT NAME
FROM pworg
WHERE NUMORGID = a.VESSEL
) 'ACTIVITY VESSEL',
(
SELECT NAME
FROM pworg
WHERE orgtype = 4
AND numorgid = (
SELECT NUMORGIDABOVE
FROM pworg
WHERE orgtype = 5
AND numorgid = a.NUMORGID
)
) 'ACTIVITY DEPARTMENT',
(
SELECT NAME
FROM pworg
WHERE orgtype = 5
AND numorgid = a.NUMORGID
) 'ACTIVITY POSITION',
-- a.PAYSCALETABLE 'ACTIVITY PAYSCALE TABLE',
-- a.PAYSCALE 'ACTIVITY PAYSCALE',
-- p0p.PAYSCALETABLE 'PD PAYSCALE TABLE',
-- p0p.PAYSCALECODE 'PD PAYSCALE',
CASE
WHEN p20.CONTRACTKIND = 0 THEN 'Main Contract'
WHEN p20.CONTRACTKIND = 1 THEN 'Sub Contract'
WHEN p20.CONTRACTKIND = 2 THEN 'Ammendment'
ELSE ''
END AS 'Contract Type',
C32CONT.Text 'Contract Name',
C02CONT.NAME 'Contract Rank',
p20.DATESTART 'Contract Start',
p20.DATEEND 'Contract End',
p20.PAYSCALETABLE 'CONTRACT PAYSCALE TABLE',
p20.PAYSCALECODE 'CONTRACT PAYSCALE',
payscale.Table_Name 'CONTRACT PAYSCALE TABLE NAME',
payscale.Payscale_Name 'CONTRACT PAYSCALE NAME',
pay.CALCULATEDBY 'CALCULATED BY',
pay.CalculateTime 'CALCULATE TIME',
CASE
WHEN P.Transferbalance = '0' THEN 'Carry Forward To Next Month'
WHEN P.Transferbalance = '1' THEN 'Transfer To Bank Account'
WHEN P.Transferbalance = '2' THEN 'Interpay'
WHEN P.Transferbalance = '3' THEN 'Alpha Credit Bank'
WHEN P.Transferbalance = '4' THEN 'Cash'
WHEN P.Transferbalance = '5' THEN 'Citibank Direct Deposit'
WHEN P.Transferbalance = '6' THEN 'Citibank'
WHEN P.Transferbalance = '7' THEN 'Chase Manhattan'
WHEN P.Transferbalance = '8' THEN 'Hellenic Bank'
WHEN P.Transferbalance = '9' THEN 'Isabel Domestic'
WHEN P.Transferbalance = 'A' THEN 'Isabel International'
WHEN P.Transferbalance = 'B' THEN 'Bank Transfer'
WHEN P.Transferbalance = 'C' THEN 'Swedish Domestic'
WHEN P.Transferbalance = 'D' THEN 'Swedish International'
WHEN P.Transferbalance = 'E' THEN 'Philippine Banking'
WHEN P.Transferbalance = 'F' THEN 'Manual Bank'
WHEN P.Transferbalance = 'G' THEN 'Zagrebancka'
WHEN P.Transferbalance = 'H' THEN 'ING Bank'
WHEN P.Transferbalance = 'I' THEN 'Direct Deposit E-Monee'
WHEN P.Transferbalance = 'J' THEN 'Deutsche Bank'
WHEN P.Transferbalance = 'K' THEN 'SACS'
WHEN P.Transferbalance = 'L' THEN 'Hellenic Cyprus'
WHEN P.Transferbalance = 'M' THEN 'MT 100'
WHEN P.Transferbalance = 'N' THEN 'Citibank (PL)'
WHEN P.Transferbalance = '0' THEN 'Agent .R'
WHEN P.Transferbalance = 'P' THEN 'German Bank'
WHEN P.Transferbalance = 'Q' THEN 'Trident Trust'
WHEN P.Transferbalance = 'R' THEN 'Citibank (Asia)'
WHEN P.Transferbalance = 'S' THEN 'PNC Bank'
WHEN P.Transferbalance = 'T' THEN 'Chase Insight'
WHEN P.Transferbalance = 'U' THEN 'Ocean Pay'
WHEN P.Transferbalance = 'V' THEN 'Banco de Oro'
WHEN P.Transferbalance = 'W' THEN 'Bank of Philippine Island'
WHEN P.Transferbalance = 'X' THEN 'CitiDirect (Onboard)'
WHEN P.Transferbalance = 'Y' THEN 'Metrobank Direct (PH)'
WHEN P.Transferbalance = 'Z' THEN 'Elektron'
WHEN P.Transferbalance = 'A1' THEN 'E-Banking (Maramut)'
WHEN P.Transferbalance = 'A2' THEN 'RBS Direct Access'
WHEN P.Transferbalance = 'A3' THEN 'Brazilian Banks'
WHEN P.Transferbalance = 'A4' THEN 'NETS'
WHEN P.Transferbalance = 'A5' THEN 'NONE'
WHEN P.Transferbalance = 'A6' THEN 'JDP Morgan'
WHEN P.Transferbalance = 'A7' THEN 'J. P. Morgan Access'
WHEN P.Transferbalance = 'A8' THEN 'Spar Nord Domestic'
WHEN P.Transferbalance = 'A9' THEN 'Spar Nord International'
WHEN P.Transferbalance = 'B1' THEN 'Rabobank'
WHEN P.Transferbalance = 'B2' THEN 'Deutsche Bank'
WHEN P.Transferbalance = 'B4' THEN 'ISO20022'
WHEN P.Transferbalance = 'B5' THEN 'Brightwell'
END AS 'PAYMENT METHOD',
pay.CURRENCYFORPAYMENT 'PAYMENT CURRENCY',
CASE
WHEN p.EMAILPAYSLIP = 'F' THEN 'Off'
WHEN p.EMAILPAYSLIP = 'T' THEN 'On'
END 'DISTRIBURE PAYSLIP OPTION',
email.TELENO 'EMAIL',
CASE
WHEN P.EMPLOYMENTSTARTDATE IS NULL THEN 'Employment Start Date missing'
ELSE ''
END Issue1,
CASE
WHEN P.EMPLOYMENTSTARTDATE > a.DATEFROM THEN
'Employment Start Date greater than Activity Start Date'
ELSE ''
END Issue2,
CASE
WHEN A.DATEFROM < CAST(GETDATE() AS DATE)
AND ISNULL(A.PLANNED, 'N') = 'Y'
OR A.TODATEESTIMATED < CAST(GETDATE() AS DATE)
AND A.DATETO IS NULL THEN 'Activity not confirmed'
ELSE ''
END Issue3,
CASE
WHEN NULLIF(A.PAYSCALETABLE, '') IS NOT NULL
AND NULLIF(A.PAYSCALE, '') IS NULL THEN 'Activity Payscale Code missing'
ELSE ''
END Issue4,
CASE
WHEN (
NULLIF(a.PAYSCALETABLE, '') IS NOT NULL
AND NULLIF(a.PAYSCALE, '') IS NOT NULL
)
AND (
(p20.PAYSCALECODE <> a.PAYSCALE)
OR (p20.PAYSCALETABLE <> a.PAYSCALETABLE)
) THEN 'Payscale mismatch between Contract and Activity'
ELSE ''
END AS Issue5,
CASE
WHEN p20.DATESTART > periode.PEnd THEN 'Invalid Contract Start Date'
ELSE ''
END AS Issue6,
CASE
WHEN p20.CONTRACTKIND IS NULL THEN 'No valid contract for this period'
ELSE ''
END Issue7
FROM pw001p01 p
JOIN (
SELECT NUMORGID,
PERIODE,
CAST(
CASE
WHEN RIGHT(CAST(PERIODE AS VARCHAR), 2) = '00' THEN LEFT(CAST(PERIODE AS VARCHAR), 4)
+
'01'
WHEN CONVERT(INT, RIGHT(CAST(PERIODE AS VARCHAR), 2)) > 12 THEN LEFT(CAST(PERIODE AS VARCHAR), 4)
+ '12'
ELSE CAST(PERIODE AS VARCHAR(6))
END + '01' AS DATETIME
) AS 'PStart',
DATEADD(
MM,
1,
CAST(
CASE
WHEN RIGHT(CAST(PERIODE AS VARCHAR), 2) = '00' THEN LEFT(CAST(PERIODE AS VARCHAR), 4)
+ '01'
WHEN CONVERT(INT, RIGHT(CAST(PERIODE AS VARCHAR), 2)) > 12 THEN LEFT(CAST(PERIODE AS VARCHAR), 4)
+ '12'
ELSE CAST(PERIODE AS VARCHAR(6))
END + '01' AS DATETIME
)
) -1 AS 'PEnd'
FROM PWORGCMP
WHERE PAYROLLENABLED = 'Y'
UNION ALL
SELECT NUMORGID,
PERIODE,
CAST(
CASE
WHEN RIGHT(CAST(PERIODE AS VARCHAR), 2) = '00' THEN LEFT(CAST(PERIODE AS VARCHAR), 4)
+
'01'
WHEN CONVERT(INT, RIGHT(CAST(PERIODE AS VARCHAR), 2)) > 12 THEN LEFT(CAST(PERIODE AS VARCHAR), 4)
+ '12'
ELSE CAST(PERIODE AS VARCHAR(6))
END + '01' AS DATETIME
) AS 'PStart',
DATEADD(
MM,
1,
CAST(
CASE
WHEN RIGHT(CAST(PERIODE AS VARCHAR), 2) = '00' THEN LEFT(CAST(PERIODE AS VARCHAR), 4)
+ '01'
WHEN CONVERT(INT, RIGHT(CAST(PERIODE AS VARCHAR), 2)) > 12 THEN LEFT(CAST(PERIODE AS VARCHAR), 4)
+ '12'
ELSE CAST(PERIODE AS VARCHAR(6))
END + '01' AS DATETIME
)
) -1 AS 'PEnd'
FROM PWORGVES
WHERE PAYROLLENABLED = 'Y'
) periode
ON p.CLIENT = periode.NUMORGID
JOIN PWORG ORGAN
ON p.CLIENT = ORGAN.NUMORGID
JOIN PWORGCMP company
ON p.CLIENT = company.NUMORGID
LEFT JOIN PW001P0P p0p
ON p0p.PIN = p.PIN
AND p0p.PNUMBER = 'A'
AND p0p.PAYSCALECODE IS NOT NULL
AND p0p.PAYSCALECODE <> ''
LEFT JOIN PW001PAY pay
ON pay.PIN = p.PIN
AND pay.CalculateTime IS NOT NULL
AND pay.PERIODEUSED = company.PERIODE
AND NOT EXISTS(
SELECT 1
FROM PW001PAY PAY2
WHERE PAY.PIN = PAY2.PIN
AND PAY2.PERIODEUSED = company.PERIODE
AND (
PAY2.CALCULATETIME > PAY.CALCULATETIME
OR (
PAY2.CALCULATETIME = PAY.CALCULATETIME
--AND PAY2.UUID > PAY.UUID
)
)
)
-- AND z.DATESTART > p20.DATESTART)
LEFT JOIN PW001P1R p1r5 ON p1r5.PIN = p.PIN
AND p1r5.RATENO = 5
LEFT JOIN pw001c02 c02
ON p.rank = c02.code --AND (p20.dateend IS NULL OR ISNULL(p20.DATEEND,GETDATE()) >= periode.PStart)
LEFT JOIN PW001P0Y P0Y ON p.PIN = P0Y.PIN
--AND ISNULL(p20.DATEEND,GETDATE()) >= periode.PStart
LEFT JOIN PW001P0T email ON email.PIN = p.PIN AND email.TELETYPE
= 6 AND NOT EXISTS ( LEFT JOIN PW001p20 maincon
SELECT 1 ON maincon.PIN = p.PIN
FROM pw001p0t t WHERE AND tmaincon.PINCONTRACTKIND = email.PIN0
AND tmaincon.TELETYPECONTRACTIDABOVE =IS email.TELETYPENULL
AND maincon.DATESTART <= A.DATEFROM--ISNULL(a.DATETO, a.TODATEESTIMATED)
AND (maincon.DATEEND IS NULL OR maincon.DATEEND >= t.TELEPRIORITY < email.TELEPRIORITYISNULL(a.DATETO, a.TODATEESTIMATED))--IS NULL
LEFT JOIN PW001p20 p20
OR ( ON p20.SEQUENCENO = ISNULL(p20sub.SEQUENCENO, maincon.SEQUENCENO)
LEFT JOIN PW001C02 C02CONT
t.TELEPRIORITY = email.TELEPRIORITY ON p20.RANK = C02CONT.CODE
AND t.SEQUENCENO > email.SEQUENCENOLEFT JOIN PW001C32 C32CONT
ON p20.CONTRACTTYPE = C32CONT.code
) LEFT JOIN PWPSC000 PT
) ) ON ISNULL(a.PAYSCALETABLE, p20.PAYSCALETABLE) = pt.REGULATIVECODE
--Activity matching payroll period AND (
JOIN PW001P03 a ON a.PIN = p.PIN AND aPT.CODEINCLUDEPLANNEDACTIVITY IN (SELECT CODE= 'Y'
FROM PW001C12 OR (PT.INCLUDEPLANNEDACTIVITY <> 'Y' AND a.PLANNED <> 'Y')
WHERE TRANSACTIONCODE <> '') )
AND a.datefrom <= periode.PEnd AND ISNULL(a.dateto, a.TODATEESTIMATED) >= periode.PStart LEFT JOIN PWPSC001 PS
LEFT JOIN PW001P20 p20 ON ONISNULL(a.PAYSCALE, p20.PINPAYSCALECODE) = pPS.PINPAYSCALECODE
AND p20.HISTORICAL = 'F' AND P20PS.DATESTARTSEQNO <= ISNULL(A.DATETO, A.TODATEESTIMATED)pt.SEQNO
AND COALESCE( LEFT JOIN PWORGVES v
P20.DATEEND, ON (a.VESSEL = v.NUMORGID
SELECT MIN(t.DATESTART) -1
LEFT JOIN PW001C43 c43
FROM PW001P20 tON c43.CODE = P.COSTPLACE
WHERE t.pinLEFT =JOIN p20.pin(
ANDSELECT t.DATESTART > p20.DATESTARTC0.REGULATIVECODE AS 'Table_Code',
), C0.REGULATIVENAME AS 'Table_Name',
a.datefrom ) >= A.DATEFROM C1.PAYSCALECODE AS 'Payscale_Code',
LEFT JOIN PW001C02 C02CONT ON p20.RANK = C02CONT.CODE C1.PAYSCALENAME AS 'Payscale_Name'
LEFT JOIN PW001C32 C32CONT ON p20.CONTRACTTYPE = C32CONT.code FROM PWPSC000 C0
LEFT JOIN PWPSC000 PT ON ISNULL(a.PAYSCALETABLE, p20.PAYSCALETABLE) = pt.REGULATIVECODE LEFT JOIN PWPSC001 C1
AND ( PT.INCLUDEPLANNEDACTIVITY = 'Y' ON OR (PTC1.INCLUDEPLANNEDACTIVITYSEQNO <> 'Y' AND a.PLANNED <> 'Y')= C0.SEQNO
) ) payscale
LEFT JOIN PWPSC001 PS ON ISNULL(a.PAYSCALE, p20.PAYSCALECODE) payscale.Table_Code = PSp20.PAYSCALECODEPAYSCALETABLE
AND PS.SEQNO = pt.SEQNO AND payscale.Payscale_Code = p20.PAYSCALECODE
LEFT JOIN PWORGVES v ON a.VESSEL =LEFT v.NUMORGIDJOIN (
LEFT JOIN PW001C43 c43 SELECT OLE.PIN,
ON c43.CODE = P.COSTPLACE LEFT JOIN ( DOCS.DOCTYPE,
SELECT C0.REGULATIVECODE AS 'Table_Code', C0.REGULATIVENAME AS 'Table_Name', DOCS.[DESCRIPTION],
C1.PAYSCALECODE AS 'Payscale_Code', DOCS.SOURCEDOC,
C1.PAYSCALENAME AS 'Payscale_Name' FROM PWPSC000 C0
--RIGHT(CAST(DOCS.[DESCRIPTION] AS VARCHAR), 6) AS PAYPERIOD,
LEFT JOIN PWPSC001 C1 CASE
ON C1.SEQNO = C0.SEQNO ) payscale
WHEN ISNUMERIC(LEFT(RIGHT(CAST(DOCS.SOURCEDOC AS VARCHAR), 11), 6)) = 1 THEN
ON payscale.Table_Code = p20.PAYSCALETABLE AND payscale.Payscale_Code = p20.PAYSCALECODE LEFT JOIN ( LEFT(RIGHT(CAST(DOCS.SOURCEDOC AS VARCHAR), 11), 6)
SELECT OLE.PIN, DOCS.DOCTYPE, ELSE 0
DOCS.[DESCRIPTION], END AS PAYPERIOD,
DOCS.SOURCEDOC, RIGHT(CAST(DOCS.[DESCRIPTION] AS VARCHAR), 6) AS PAYPERIOD--),
--), CASE
CASE WHEN DOCS.[DESCRIPTION] IS NOT NULL THEN 'Y'
ELSE 'N'
END AS PAYSLIPSTATUS
FROM PW001P01OLE--left join PW001OLEDOCS PAYSL on PAYSL.pin= pin and DOCTYPE='payslip' and SOURCEDOC like '%periodeused%'
OLE
LEFT JOIN PW001OLEDOCS DOCS
ON OLE.DOCNO = DOCS.DOCNO
AND DOCS.DOCTYPE = 'payslip'
--AND DOCS.DESCRIPTION LIKE '%PAYSLIP_202308%'
) PayslipStatus
ON PayslipStatus.PIN = p.PIN
AND PayslipStatus.PAYPERIOD = company.PERIODE
WHERE WHERE (
(
(
CHARINDEX(a.CODE, pt.ACTIVITYCODES, 0) > 0
OR pt.ACTIVITYCODES IS NULL
)
)
OR (
(
CHARINDEX(a.CODE, PS.ACTIVITYCODES, 0) > 0
OR ps.ACTIVITYCODES IS NULL
)
)
)
) Main
--WHERE Main.NUMORGID NOT IN (10012602) |