7154a334-5485-4816-9ea1-3e58e85a979bBAZA_REKLAM21cmStringListaTytulowSYMBTytul:ListaTytulowSYMBSYMBStringPoprzedni numer:StringNowy numer:StringListaGrzbietowGrzbietGrzbiet:ListaGrzbietowGrzbietGrzbiettruetrue29.7cm0.25cmtrue1cm1cm1cmf14032e7-dc76-4ad8-bfd1-cc3955d874beimage/pngiVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAK3RFWHRDcmVhdGlvbiBUaW1lAERpIDMwIFNlcCAyMDAzIDIzOjU0OjI2ICswMTAwZdX/wQAAAAd0SU1FB9MJHhU2OF5bzowAAAAJcEhZcwAACxIAAAsSAdLdfvwAAAAEZ0FNQQAAsY8L/GEFAAACcElEQVR42q1TXUgUURg94/7goutC/iRoGT1YZphZoIRhBBUZsRRBVr5V0EM9RfTSU9BLiNRLRA9FJPQgBD2IhtpKFga57mq20CL+sGsotauz4+7O3Jl7b98uuaztq/Mw9873fefMOWfuANt9BYD2MaBvCmj+v/cZuD6kYGQAOHsfKCoAzwNPoxePCfPhZRlUlE/5vUngTKi+gsmr9TLS5JFDNiWQqW9hkbXl3prOZsXuBHaeOnDcD3Rn6rS2yBpPf0NHrQNpA6zEAYNLfwFBPBrrNxdXAMNAdeseWOUlvcPASVZZNnjU2+CGugHNMBGaikftwN0CgjLg9dLYrISkB53hsLexsrjCPdLW1VQFNQHBLcx8V4XbEDfOAWoBwT5gNjYxNw7LBEwLDpcD7V0HFag0y02EIxoSkeSzE8CHTUxBkmkuehbHwwRgWStIJImM4Xc8hR/fYkENuJc/v4WAkq5NA3eKPS4CkQrGsuDsPm3CklgjgC0fo2yuX4Gb2LXj8ZHzjR4714EUUVnWPxIikBzxdR2+L/HJMgHvaeBXjuAjcKGute7d3rYaYC1BQE4WONlmsFFwwqR9piYFdN2Ez6+tpFOiuwsYzVpYp0SFSX7/xCl9Pes9sZHEwPCyNb+k0Vs4YTkJsmBXJDpaiqtJ34NcBg6b0ru7rpR8prPgVTUJ39hqTGpmRyCoPl+IUl0ISFLBSNnkPAOdtZcZrD1zS3E5yrWNQ4ZLQZiGf06r0yVCXuoE5qg98X5Gs9h+1+0Mam6ZwYjxJ9eAN7kM+oCKUmfRoLArVXqKv6AU
em6Rlvy03wKP6BM63cCrK0Bo2/7ev40+Kr/ztfp4AAAAAElFTkSuQmCCimage/pngiVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAKnRFWHRDcmVhdGlvbiBUaW1lAE1vIDMgTXJ6IDIwMDMgMjI6NDI6MTAgKzAxMDD/JlV7AAAAB3RJTUUH0wQCEDEWKVi7+QAAAAlwSFlzAAAK8AAACvABQqw0mAAAAARnQU1BAACxjwv8YQUAAAG4SURBVHja1ZJNS5RRGIavc96PtBoTwXIqokAcJJjAiRlaVK4TCgoqKIQcCqHVzKI2/YN+QNA6rBQtSRwt7YOgpaC7oHKmtzRGpMZxvs771TuCRaSgq+g5cBbn3NfhPs9zw78usS31fQ4IxVPD101VcHq5w6zcMjzEPs0V07dP3Dje3dkRlSYP6sf6luBhWllkOp1IRia/PMGXAunLVg+PXw7a55qjh1+GznKPP109okUs8CIdTx6dWniGI33ef/xRcUzvav16Tdw+2XS9ayU2E/U6Rxvagp+u92aQZvI8TyWSx14tjmHj8uHTSrWyS50nxVRdotW3jktHModCodByzcLwzK58TzlMN28pMZGKX4u//pbBFjbz88Va2VAX6CezbnDtAXWmekrIagQhaJQGupKx74VaXyrRF3mzNIEKVjZbVCVDXeQmY3+P8TE7KTAeawuf3qFrKNch3HgQa9UKUIdcrmiXdHU5gEc2z8Eou7EYj+7fe1LTBTXbxdd9PueKTklTVwJ4cKMB/e74OVbZQ89cNv+urByEKfhqBbBQvZvBGyfxLk1UeGiYWsyWbppbDGwrrf9f/QSByZ9mbXvihAAAAABJRU5ErkJggg==29.7cmSYMBSystem.StringBAZA_REKLAMSELECT SYMB
FROM [LISTA TYTUŁÓW]
WHERE Active=1truereklamaIdSystem.Int32staryGrzbietSystem.Stringnrwyd1System.Objectgrzbiet1System.StringReklamaSystem.StringUwagiSystem.StringStronaSystem.Int16zatwierdzono do drukuSystem.BooleanDzialSystem.StringRozdzialSystem.StringLokalizacjaSystem.StringNastepnaReklamaSystem.StringNastepnyGrzbietSystem.StringBAZA_REKLAMDECLARE @NastepnyNumer TABLE
(
ReklamaId INT,
Reklama varchar(50),
StaryGrzbiet varchar(10)
)
INSERT INTO @NastepnyNumer
SELECT R.ReklamaId, R.[Id reklamy] AS Reklama, dbo.getSectionForDTP (T.Id, R.grzbiet, R.ogl_dzial) AS StaryGrzbiet FROM REKLAMA AS R
INNER JOIN [UKAŻE SIĘ W NR] ON R.ReklamaID = [UKAŻE SIĘ W NR].ReklamaId
INNER JOIN [Lista tytułów] T ON T.Symb=R.[Tytuł]
LEFT OUTER JOIN GRZBIETY AS G ON R.GRZBIET = G.ID
WHERE [UKAŻE SIĘ W NR].[Nr Wydania] = @nr2
AND R.tytuł =@tytul
AND R.[zatwierdzono do druku]=1
SELECT * FROM
(
SELECT
R.reklamaId,
dbo.getSectionForDTP (T.Id,R.grzbiet,R.ogl_dzial) AS staryGrzbiet,
[UKAŻE SIĘ W NR].[Nr Wydania] as nrwyd1,
G.[nazwa] as grzbiet1,
r.[id reklamy] as Reklama,
R.strona AS Uwagi,
REKLAMA_STRONA.Strona,
R.[zatwierdzono do druku],
D.Name AS Dzial, Roz.Name AS Rozdzial, Lok.Text AS Lokalizacja,
NastepnyNr.Reklama AS NastepnaReklama, NastepnyNr.StaryGrzbiet AS NastepnyGrzbiet
FROM REKLAMA AS R
INNER JOIN [UKAŻE SIĘ W NR] ON R.ReklamaID = [UKAŻE SIĘ W NR].ReklamaId
INNER JOIN [Lista tytułów] T ON T.Symb=R.[Tytuł]
LEFT OUTER JOIN REKLAMA_STRONA ON R.ReklamaID = REKLAMA_STRONA.ReklamaId AND [UKAŻE SIĘ W NR].[Nr Wydania] = REKLAMA_STRONA.NR_WYDANIA
LEFT OUTER JOIN GRZBIETY AS G ON R.GRZBIET = G.ID
LEFT OUTER JOIN Agenci AS A ON R.[SYMBOL AKWIZYTORA] = A.symbol
LEFT OUTER JOIN Agencje AS A2 ON A.id_agencji = A2.id_agencji
LEFT OUTER JOIN Dzial AS D ON R.ogl_dzial = D.Id
LEFT OUTER JOIN Rozdzial AS Roz ON R.ogl_rozdzial = Roz.Id
LEFT OUTER JOIN ReklamaLokalizacja AS Lok ON R.AdLocationId = Lok.Id
LEFT OUTER JOIN @NastepnyNumer AS NastepnyNr ON SUBSTRING(NastepnyNr.Reklama,1,7) COLLATE SQL_Latin1_General_CP1250_CI_AS = SUBSTRING(R.[Id reklamy],1,7) COLLATE SQL_Latin1_General_CP1250_CI_AS
WHERE
[UKAŻE SIĘ W NR].[Nr Wydania] = @nr1
AND r.tytuł =@tytul
AND REKLAMA_STRONA.strona is not null
UNION
SELECT
R.reklamaId,
dbo.getSectionForDTP (T.Id,R.grzbiet,R.ogl_dzial) AS staryGrzbiet,
@nr1 as nrwyd1,
G.[nazwa] as grzbiet1,
r.[id reklamy] as Reklama,
R.strona AS Uwagi,
REKLAMA_STRONA.Strona,
R.[zatwierdzono do druku],
D.Name AS Dzial, Roz.Name AS Rozdzial, Lok.Text AS Lokalizacja,
NULL AS NastepnaReklama, NULL AS NastepnyGrzbiet
FROM REKLAMA AS R
INNER JOIN [UKAŻE SIĘ W NR] ON R.ReklamaID = [UKAŻE SIĘ W NR].ReklamaId
INNER JOIN [Lista tytułów] T ON T.Symb=R.[Tytuł]
LEFT OUTER JOIN GRZBIETY AS G ON R.GRZBIET = G.ID
LEFT OUTER JOIN Agenci AS A ON R.[SYMBOL AKWIZYTORA] = A.symbol
LEFT OUTER JOIN Agencje AS A2 ON A.id_agencji = A2.id_agencji
LEFT OUTER JOIN Dzial AS D ON R.ogl_dzial = D.Id
LEFT OUTER JOIN Rozdzial AS Roz ON R.ogl_rozdzial = Roz.Id
LEFT OUTER JOIN ReklamaLokalizacja AS Lok ON R.AdLocationId = Lok.Id
LEFT OUTER JOIN REKLAMA_STRONA ON R.ReklamaID = REKLAMA_STRONA.ReklamaId AND REKLAMA_STRONA.Nr_Wydania = @nr1
WHERE
[UKAŻE SIĘ W NR].[Nr Wydania] = @nr2
AND r.tytuł =@tytul
AND [UKAŻE SIĘ W NR].Status<>0
) Reklama
WHERE StaryGrzbiet IN (@grzbiet) AND (NastepnaReklama IS NULL OR (NastepnaReklama IS NOT NULL AND StaryGrzbiet<>NastepnyGrzbiet))
ORDER BY Reklama.Strona=Parameters!nr1.Value=Parameters!tytul.Value=Parameters!nr2.Value=Parameters!grzbiet.ValuetrueGrzbietSystem.StringBAZA_REKLAMDECLARE @Grzbiety TABLE
(
Grzbiet varchar(10)
)
IF @tytul='AMT'
BEGIN
INSERT INTO @Grzbiety
SELECT Name FROM GrzbietyProdukcja WHERE TitleId=1
END
IF @tytul='GS'
BEGIN
INSERT INTO @Grzbiety
SELECT Name FROM GrzbietyProdukcja WHERE TitleId=2
END
INSERT INTO @Grzbiety VALUES ('-?-')
SELECT * FROM @Grzbiety=Parameters!tytul.Valuetrue27.27646cm1cmtextbox31.25cm4.75cm3true13.5cm0.63492cm="LICZBA: " & Count(Fields!grzbiet1.Value, "reklamyDoUsuniecia")textbox101.25cm12.5cm2true0.5cm0.63492cm="REKLAMY DO USUNIĘCIA Z WYDANIA: " &Parameters!nr1.Value