ZDDLB Bulletin clarifié

select A.CDREGL, A.CDCODE "Code",
RTRIM(B.LIBLON) "Libellé", RTRIM(B.LBCMP1) "Libellé agrégé",
C.TETABU "Agrégation des rubriques", -- Titre en gras avec montant
C.TEGROU "Groupe de positions", -- Titre de groupe en gras sans montant
C.POSGRO "Position titre du groupe", -- Ligne avec montant attaché à un titre de groupe,
CASE 
WHEN C.TETABU = '0' AND C.TEGROU = '1'
	THEN 'Titre en gras sans montant'
WHEN C.TETABU = '1' AND C.TEGROU = '1'
	THEN 'Titre en gras avec montant'
WHEN C.TETABU = '1' AND C.TEGROU = '0'
	THEN 'Ligne simple (une position titre du groupe doit être renseignée)'
WHEN C.TETABU = '0' AND C.TEGROU = '0'
	THEN 'Affichage détaillé inchangé'
ELSE 'Cas non traité dans le SQL => Pb'
END "Résultat bulletin",
D.POSTAB "Bloc dans le corps du bulletin",
E.LIBLON "Libellé bloc"
from HR.ZD00 A, HR.ZD01 B, HR.ZDAQ C, HR.ZDF1 D,
(select ZA.CDCODE, ZB.LIBLON from HR.ZD00 ZA, HR.ZD01 ZB
	where ZA.NUDOSS = ZB.NUDOSS and ZA.CDSTCO = 'PCA' and ZB.CDLANG = 'F') E
where A.NUDOSS = B.NUDOSS
and A.NUDOSS = C.NUDOSS
and A.NUDOSS = D.NUDOSS
and A.CDSTCO = 'DLB'
and B.CDLANG = 'F'
and D.POSTAB = E.CDCODE
order by A.CDREGL, A.CDCODE ;