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],
p.EMPLOYMENTENDDATE,
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 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 ORDER 12 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 + '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',
AND ISNULL(pa.dateto, pa.TODATEESTIMATED) >= ( pay.CalculateTime '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) 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' THEN 'Zagrebancka'
+ '12' 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 = 'S' THEN 'PNC Bank'
CAST( WHEN P.Transferbalance = 'T' THEN 'Chase Insight'
WHEN P.Transferbalance = CASE'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 P.Transferbalance = 'Z' THEN 'Elektron'
WHEN CONVERT(INT, RIGHT(CAST(company.PERIODE AS VARCHAR), 2)) > 12 THEN WHEN P.Transferbalance = 'A1' THEN 'E-Banking (Maramut)'
WHEN P.Transferbalance = 'A2' THEN 'RBS Direct Access'
LEFT(CAST(company.PERIODE AS VARCHAR), 4) WHEN P.Transferbalance = 'A3' THEN 'Brazilian Banks'
WHEN P.Transferbalance = 'A4' THEN 'NETS'
+ '12' WHEN P.Transferbalance = 'A5' THEN 'NONE'
WHEN P.Transferbalance = 'A6' THEN 'JDP Morgan'
ELSE CAST(company.PERIODE AS VARCHAR(6)) 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'
) WHEN P.Transferbalance = 'B1' THEN 'Rabobank'
) THEN CAST( WHEN P.Transferbalance = 'B2' THEN 'Deutsche Bank'
WHEN P.Transferbalance CASE= 'B4' THEN 'ISO20022'
WHEN P.Transferbalance = 'B5' THEN 'Brightwell'
WHEN RIGHT(CAST(company.PERIODE AS VARCHAR), 2)END = '00' THEN LEFT(CAST(company.PERIODE AS VARCHAR), 4) AS 'PAYMENT METHOD',
CASE
WHEN ISNULL(
+ '01' ISNULL(pay.CURRENCYFORPAYMENT, p.CURRENCYFORPAYMENT),
WHEN CONVERT(INT, RIGHT(CAST(company.PERIODE AS VARCHAR), 2)) > 12 THEN p.CURRENCY
) = '' THEN company.CURRENCYCODE
LEFT(CAST(company.PERIODE AS VARCHAR), 4) ELSE ISNULL(
ISNULL(pay.CURRENCYFORPAYMENT, p.CURRENCYFORPAYMENT),
+ '12' p.CURRENCY
ELSE CAST(company.PERIODE AS VARCHAR(6)) )
END AS 'PAYMENT CURRENCY',
END + '01' AS DATETIME CASE
) WHEN p.EMAILPAYSLIP = 'F' THEN 'Off'
WHEN ELSEp.EMAILPAYSLIP (= 'T' THEN 'On'
END 'DISTRIBURE PAYSLIP OPTION',
SELECT MIN(DATEFROM) email.TELENO 'EMAIL',
CASE
FROM pw001p03 pa WHEN P.EMPLOYMENTSTARTDATE IS NULL THEN 'Employment Start Date missing'
ELSE ''
WHERE pa.PIN = p.PIN END Issue1,
CASE
AND pa.datefrom < ( WHEN P.EMPLOYMENTSTARTDATE > a.DATEFROM THEN
'Employment Start Date greater than Activity Start DATEADD(Date'
ELSE ''
END MMIssue2,
CASE
WHEN A.DATEFROM < CAST(GETDATE() AS DATE)
1, AND ISNULL(A.PLANNED, 'N') = 'Y'
OR A.TODATEESTIMATED < CAST(GETDATE() AS DATE)
CAST( AND A.DATETO IS NULL THEN 'Activity not confirmed'
ELSE ''
CASE 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'
+ELSE '12'
END AS Issue5,
CASE
ELSE CAST(company.PERIODE AS VARCHAR(6)) WHEN p20.DATESTART > periode.PEnd THEN 'Invalid Contract Start Date'
ELSE ''
END + '01' ASEND DATETIME 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
FROM PW001C12
CAST( WHERE OPTIONS LIKE '%S%')
CASE )
AND (
WHEN RIGHT(CAST(company.PERIODE AS VARCHAR), 2) = '00' THEN a.DATEFROM < (
CASE
LEFT(CAST(company.PERIODE AS VARCHAR), 4) WHEN p20.DATESTART > maincon.DATESTART THEN maincon.DATESTART
+ '01' ELSE p20.DATESTART
END
WHEN CONVERT(INT, RIGHT(CAST(company.PERIODE AS VARCHAR), 2)) )
) THEN 'No contract starting from ' + CONVERT(VARCHAR, a.DATEFROM, 1) + ' >to 12' THEN+ LEFT(CAST(company.PERIODE AS VARCHAR), 4CONVERT(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 END + '01' AS DATETIMEare missing.'
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(PERIODE AS VARCHAR), 4)
12 THEN LEFT(CAST(company.PERIODE AS VARCHAR), 4) + '12'
+ '12' ELSE CAST(PERIODE AS VARCHAR(6))
END + '01' AS DATETIME
ELSE CAST(company.PERIODE AS VARCHAR(6)) )
) END-1 +AS '01PEnd'
AS DATETIME FROM PWORGCMP
) WHERE PAYROLLENABLED = 'Y'
UNION ALL
) -1 SELECT NUMORGID,
)PERIODE,
CAST(
AND ISNULL(pa.dateto, pa.TODATEESTIMATED) >= ( CASE
CAST( WHEN RIGHT(CAST(PERIODE AS VARCHAR), 2) = '00' THEN LEFT(CAST(PERIODE AS VARCHAR), 4)
CASE +
WHEN RIGHT(CAST(company.PERIODE AS VARCHAR), 2) = '00' THEN '01'
WHEN CONVERT(INT, RIGHT(CAST(PERIODE AS VARCHAR), 2)) > 12 THEN LEFT(CAST(company.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,
CAST(
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( ELSE MM,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) WHERE PAYROLLENABLED = '00Y'
THEN LEFT(CAST(company.PERIODE AS VARCHAR), 4) ) periode
ON p.CLIENT = periode.NUMORGID
+ '01' JOIN PWORG ORGAN
ON p.CLIENT = ORGAN.NUMORGID
WHEN CONVERT(INT, RIGHT(CAST(company.PERIODE AS VARCHAR), 2)) > 12 THEN JOIN PWORGCMP company
ON p.CLIENT = company.NUMORGID
LEFT(CAST(company.PERIODE AS VARCHAR), 4) JOIN PW001P0P p0p
ON p0p.PIN = p.PIN
AND p0p.PNUMBER += '12A'
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
WHERE PAY.PIN = PAY2.PIN
MM, AND PAY2.PERIODEUSED = company.PERIODE
1, AND (
CAST( PAY2.CALCULATETIME > PAY.CALCULATETIME
CASE OR (
WHEN RIGHT(CAST(company.PERIODE AS VARCHAR), 2) = '00' THEN LEFT(CAST(company.PERIODE AS VARCHAR), 4) PAY2.CALCULATETIME = PAY.CALCULATETIME
+ '01' --AND PAY2.UUID > PAY.UUID
WHEN CONVERT(INT, RIGHT(CAST(company.PERIODE AS VARCHAR), 2)) > 12 THEN )
LEFT(CAST(company.PERIODE AS VARCHAR), 4) )
)
+ '12' LEFT JOIN PW001P1R p1r5
ON p1r5.PIN = p.PIN
ELSE CAST(company.PERIODE AS VARCHAR(6)) AND p1r5.RATENO = 5
LEFT JOIN pw001c02 c02
END + '01' AS DATETIME ON p.rank = c02.code
LEFT JOIN PW001P0Y P0Y
) ON p.PIN = P0Y.PIN
) -1 LEFT JOIN PW001P0T email
) ON email.PIN = p.PIN
ELSE ( AND email.TELETYPE = 6
AND NOT EXISTS (
SELECT MAX(ISNULL(pa.DATETO, pa.TODATEESTIMATED)) SELECT 1
FROM pw001p03 pa FROM pw001p0t t
WHERE pa.PIN = p.PIN WHERE t.PIN = email.PIN
AND pa.datefrom < ( AND t.TELETYPE = email.TELETYPE
AND (
DATEADD( t.TELEPRIORITY < email.TELEPRIORITY
MM, OR (
1, t.TELEPRIORITY = email.TELEPRIORITY
CAST( AND t.SEQUENCENO > email.SEQUENCENO
CASE )
WHEN RIGHT(CAST(company.PERIODE AS VARCHAR), 2)
= )
--Activity matching payroll period
'00' THEN LEFT(CAST(company.PERIODE AS VARCHAR), 4) JOIN PW001P03 a
ON a.PIN = p.PIN
AND a.CODE IN (SELECT CODE
+ '01' 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)
AND p20sub.CONTRACTIDABOVE IS NOT +NULL
'12' 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
WHERE t.pin = p20sub.pin
) -1 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
--AND NOT EXISTS (
CASE -- SELECT 1 FROM PW001p20. z
-- WHERE z.PIN = p20.PIN WHEN RIGHT(CAST(company.PERIODE AS VARCHAR), 2) = '00' THENAND 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
)
)
)
LEFT JOIN PW001P1R p1r5 -- AND z.DATESTART > p20.DATESTART)
ON p1r5.PIN = p.PIN --AND p1r5(p20.RATENOdateend =IS 5NULL LEFT JOIN pw001c02 c02
ON p.rank = c02.codeOR 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) |
