Skillnad mellan versioner av "Fakturering"

Från Svenska kohanätverkets wiki
Hoppa till navigering Hoppa till sök
Rad 13: Rad 13:
 
Vi använder inte cronjobbet Long overdues
 
Vi använder inte cronjobbet Long overdues
  
−
Pocessen består av fyra rapporter som körs i denna ordning:
+
Pocessen består av tre rapporter som körs i denna ordning:
  
  
−
== 1 Försenade böcker som inte har blivit fakturerade, för att leta i hyllan ==
+
== 1 Leta-lista ==
 
Det första vi gör är att ta ut en lista på böcker som inte har blivit återlämnade, fast de är mer än 37 dagar sena, så vi kan leta efter dem i hyllan i fall vi missat att avregistrera dem i återlämningen.
 
Det första vi gör är att ta ut en lista på böcker som inte har blivit återlämnade, fast de är mer än 37 dagar sena, så vi kan leta efter dem i hyllan i fall vi missat att avregistrera dem i återlämningen.
 
<pre>
 
<pre>
Rad 22: Rad 22:
 
branches.branchname AS Bibliotek,
 
branches.branchname AS Bibliotek,
 
items.ccode AS Samling,
 
items.ccode AS Samling,
−
items.location AS Placering,
+
authorised_values.lib AS Placering,
 
items.itemcallnumber AS Hyllsignum,
 
items.itemcallnumber AS Hyllsignum,
 
biblio.author AS Författare,
 
biblio.author AS Författare,
−
biblio.title AS Titel,
+
CASE
−
items.barcode AS Streckkod,  
+
WHEN biblio.frameworkcode='SER' AND items.enumchron IS NOT NULL
 +
THEN
 +
CONCAT(biblio.title,'<br>',items.enumchron)
 +
ELSE
 +
biblio.title
 +
END
 +
AS Titel,
 +
items.barcode AS Streckkod,
 
items.itype AS Exemplartyp
 
items.itype AS Exemplartyp
  
Rad 32: Rad 39:
 
LEFT JOIN issues ON (borrowers.borrowernumber=issues.borrowernumber)  
 
LEFT JOIN issues ON (borrowers.borrowernumber=issues.borrowernumber)  
 
LEFT JOIN items ON (issues.itemnumber=items.itemnumber)  
 
LEFT JOIN items ON (issues.itemnumber=items.itemnumber)  
 +
LEFT JOIN authorised_values ON (items.location=authorised_values.authorised_value)
 
LEFT JOIN biblio ON (items.biblionumber=biblio.biblionumber)  
 
LEFT JOIN biblio ON (items.biblionumber=biblio.biblionumber)  
 
LEFT JOIN branches ON (items.homebranch=branches.branchcode)
 
LEFT JOIN branches ON (items.homebranch=branches.branchcode)
−
WHERE (TO_DAYS(curdate())-TO_DAYS(date_due)) > '37' AND items.itemlost !=1 AND items.itemlost !=2 AND items.itemlost !=3 AND items.itemlost !=4 AND issues.branchcode = <<Utlånande bibliotek|branches>> AND issues.date_due BETWEEN <<Förfallodatum från|date>>-INTERVAL 1 DAY AND <<Förfallodatum till |date>>+INTERVAL 1 DAY
+
WHERE (TO_DAYS(curdate())-TO_DAYS(date_due)) > '37' AND items.itemlost !=1 AND items.itemlost !=2 AND items.itemlost !=3 AND items.itemlost !=4 AND items.itemlost !=5 AND issues.branchcode = <<Utlånande bibliotek|branches>>  
−
ORDER BY items.homebranch ASC,items.ccode ASC, items.location ASC, items.itemcallnumber ASC, biblio.author ASC,biblio.title ASC
+
ORDER BY items.homebranch ASC,items.ccode ASC, items.location ASC, items.itemcallnumber ASC, biblio.author ASC,biblio.title ASC</pre>
−
</pre>
 
  
  
−
== 2 Försenade böcker som inte har blivit fakturerade, med länk för att ändra status och spärra låntagaren ==
+
== 2 Kontrolllista ==
 
Nästa steg är att vi manuellt ändrar status till "På räkning" för de böcker som ska faktureras och att vi lägger in en spärr på låntagaren under Begränsningar
 
Nästa steg är att vi manuellt ändrar status till "På räkning" för de böcker som ska faktureras och att vi lägger in en spärr på låntagaren under Begränsningar
  
 
<pre>
 
<pre>
 
SELECT   
 
SELECT   
−
branches.branchname AS 'ägande bibliotek',
+
CONCAT(branches.branchname,'<br>',
−
items.ccode AS samling,
+
CASE WHEN items.ccode IS NULL
−
items.location AS placering,
+
THEN '--'
−
items.itemcallnumber AS hyllsignum,
+
ELSE items.ccode
−
biblio.author AS författare,
+
END,'<br>',
−
biblio.title AS titel,   
+
CASE WHEN items.location IS NULL
−
items.barcode As streckkod,
+
THEN '--'
−
borrowers.cardnumber AS lånekortsnummer,  
+
ELSE
−
borrowers.surname AS efternamn,
+
authorised_values.lib
−
borrowers.firstname AS förnamn,
+
END,'<br>',
 +
items.itemcallnumber) AS Placering,  
 +
CONCAT(CASE WHEN biblio.author IS NULL
 +
THEN ''
 +
ELSE biblio.author
 +
END,'<br>',
 +
biblio.title,'<br>',   
 +
items.barcode) AS Bok,
 +
CONCAT(borrowers.cardnumber,'<br>',
 +
borrowers.surname,'<br>',
 +
borrowers.firstname) AS 'Låntagare',
 
issues.date_due AS förfallodatum,  
 
issues.date_due AS förfallodatum,  
 
items.itype AS exemplartyp,
 
items.itype AS exemplartyp,
 
CASE  
 
CASE  
−
         WHEN items.itype = 'BARN LJUD'  
+
WHEN items.itype IN ('BARN TIDSK','TIDSKRIFT')
 +
            THEN '50'
 +
         WHEN items.itype IN ('BARN LJUD','BARNBOK','BARNMP3','BARNTAL','BOKCDBARN','BOKDAISYBA','BOKMP3BARN','MUSCDBARN','MUSIKBARN')
 
             THEN '100'
 
             THEN '100'
−
WHEN items.itype = 'BARN TIDSK'  
+
WHEN items.itype IN ('BLURAY','TV-SPEL','FILM','Fjarrlan')
 +
            THEN '600'
 +
WHEN items.itype = 'LANGLAN'
 +
            THEN '150'
 +
WHEN items.ccode IN ('Vux','Mag','Tillf')
 +
            THEN '250'
 +
WHEN items.ccode IN ('Barn','BoU','Skoldepa','Ungdom')
 
             THEN '100'
 
             THEN '100'
−
WHEN items.itype = 'BARNBOK'  
+
        ELSE ' 999'
−
             THEN '100'  
+
    END AS 'Schablonpris',
−
         WHEN items.itype = 'BARNKORT'  
+
items.price AS 'Inköpspris',
−
            THEN '100'  
+
CASE
−
WHEN items.itype = 'BARNMP3'  
+
WHEN
 +
items.price
 +
/
 +
(CASE
 +
WHEN items.itype IN ('BARN TIDSK','TIDSKRIFT')
 +
             THEN '50'
 +
         WHEN items.itype IN ('BARN LJUD','BARNBOK','BARNMP3','BARNTAL','BOKCDBARN','BOKDAISYBA','BOKMP3BARN','MUSCDBARN','MUSIKBARN')
 
             THEN '100'
 
             THEN '100'
−
WHEN items.itype = 'BLURAY'  
+
WHEN items.itype IN ('BLURAY','TV-SPEL','FILM','Fjarrlan')
 
             THEN '600'
 
             THEN '600'
−
WHEN items.itype = 'BOK'
+
WHEN items.itype = 'LANGLAN'  
 +
            THEN '150'
 +
WHEN items.ccode IN ('Vux','Mag','Tillf')
 
             THEN '250'
 
             THEN '250'
−
WHEN items.itype = 'BOKCD'  
+
WHEN items.ccode IN ('Barn','BoU','Skoldepa','Ungdom')
−
            THEN '250'
 
−
WHEN items.itype = 'BOKCDBARN'  
 
 
             THEN '100'
 
             THEN '100'
−
WHEN items.itype = 'BOKDAISY'  
+
        ELSE ' 999'
−
             THEN '250'
+
    END)
−
WHEN items.itype = 'BOKDAISYBARN'  
+
    > '2'
 +
    THEN
 +
    'Mer än dubbla schablonpriset'
 +
    WHEN
 +
    items.price
 +
/
 +
(CASE
 +
WHEN items.itype IN ('BARN TIDSK','TIDSKRIFT')
 +
             THEN '50'
 +
        WHEN items.itype IN ('BARN LJUD','BARNBOK','BARNMP3','BARNTAL','BOKCDBARN','BOKDAISYBA','BOKMP3BARN','MUSCDBARN','MUSIKBARN')
 
             THEN '100'
 
             THEN '100'
−
WHEN items.itype = 'BOKMP3'  
+
WHEN items.itype IN ('BLURAY','TV-SPEL','FILM','Fjarrlan')
 +
            THEN '600'
 +
WHEN items.itype = 'LANGLAN'
 +
            THEN '150'
 +
WHEN items.ccode IN ('Vux','Mag','Tillf')
 
             THEN '250'
 
             THEN '250'
−
WHEN items.itype = 'BOKMP3BARN'  
+
WHEN items.ccode IN ('Barn','BoU','Skoldepa','Ungdom')
 
             THEN '100'
 
             THEN '100'
−
WHEN items.itype = 'FILM'
+
        ELSE ' 999'
−
            THEN '600'
+
    END)
−
WHEN items.itype = 'KORTLON'
+
    < '0.5'
−
            THEN '250'
+
    THEN  
−
WHEN items.itype = 'LJUDBOK'
+
    'Mindre än halva schablonpriset'
−
            THEN '250'
+
    ELSE ''
−
WHEN items.itype = 'MP3'
 
−
            THEN '250'
 
−
WHEN items.itype = 'STORSTIL'
 
−
            THEN '250'
 
−
WHEN items.itype = 'TIDSKRIFT'
 
−
            THEN '50'
 
−
WHEN items.itype = 'TV-SPEL'
 
−
            THEN '600'
 
−
              WHEN items.itype = 'SPRAKKURS'
 
−
            THEN '600'
 
−
        ELSE 'Schablonpris saknas'
 
 
     END
 
     END
−
     AS 'schablonpris',
+
     AS 'Större avvikelse?'
−
items.replacementprice AS pris,
+
    ,
−
CONCAT('<a href=\"/cgi-bin/koha/catalogue/moredetail.pl?itemnumber=', items.itemnumber, '&biblionumber=',biblio.biblionumber,'\" target="_blank">', items.barcode, '</a>' ) AS 'redigera status',
+
CONCAT('<a href=\"/cgi-bin/koha/cataloguing/additem.pl?op=edititem&biblionumber=', items.biblionumber, '&itemnumber=',items.itemnumber,'\" target="_blank">',  
−
CONCAT('<a href=\"/cgi-bin/koha/members/moremember.pl?borrowernumber=', borrowers.borrowernumber, '#reldebarments','\" target="_blank">', borrowers.cardnumber, '</a>' ) AS 'Spärra låntagaren'
+
CASE
−
 
+
WHEN items.replacementprice IS NULL
 +
THEN '--'
 +
ELSE
 +
items.replacementprice
 +
END, '</a>' ) AS 'Annat pris än schablon?',
 +
CONCAT('<a href=\"/cgi-bin/koha/catalogue/moredetail.pl?itemnumber=', items.itemnumber, '&biblionumber=',biblio.biblionumber,'\" target="_blank">', items.barcode, '</a>' ) AS 'Sätt Hopplöst fall på det som inte ska faktureras.',
 +
items.itemnumber
  
 
FROM borrowers  
 
FROM borrowers  
 
LEFT JOIN issues ON (borrowers.borrowernumber=issues.borrowernumber)  
 
LEFT JOIN issues ON (borrowers.borrowernumber=issues.borrowernumber)  
 
LEFT JOIN items ON (issues.itemnumber=items.itemnumber)  
 
LEFT JOIN items ON (issues.itemnumber=items.itemnumber)  
 +
LEFT JOIN authorised_values ON (items.location=authorised_values.authorised_value)
 
LEFT JOIN biblio ON (items.biblionumber=biblio.biblionumber)  
 
LEFT JOIN biblio ON (items.biblionumber=biblio.biblionumber)  
 
LEFT JOIN branches ON (items.homebranch=branches.branchcode)
 
LEFT JOIN branches ON (items.homebranch=branches.branchcode)
−
WHERE (TO_DAYS(curdate())-TO_DAYS(date_due)) > '37' AND items.itemlost !=1 AND items.itemlost !=2 AND items.itemlost !=3 AND items.itemlost !=4 AND issues.branchcode = <<Utlånande bibliotek|branches>> AND issues.date_due BETWEEN <<Förfallodatum från|date>>-INTERVAL 1 DAY AND <<Förfallodatum till|date>>+INTERVAL 1 DAY
+
WHERE (TO_DAYS(curdate())-TO_DAYS(date_due)) > '37' AND items.itemlost !=1 AND items.itemlost !=2 AND items.itemlost !=3 AND items.itemlost !=4 AND items.itemlost !=5 AND issues.branchcode = <<Utlånande bibliotek|branches>>  
−
ORDER BY borrowers.cardnumber ASC, items.homebranch ASC,items.ccode ASC, items.location ASC, items.itemcallnumber ASC, biblio.author ASC,biblio.title ASC
+
ORDER BY borrowers.cardnumber ASC, items.homebranch ASC,items.ccode ASC, items.location ASC, items.itemcallnumber ASC, biblio.author ASC,biblio.title ASC</pre>
−
</pre>
 
  
  
−
== 3 Fakturaunderlag ==
+
== 3 Fakturautskrift, spärra låntagaren, bevakning ==
 
Tredje steget är att skapa ett fakturaunderlag.
 
Tredje steget är att skapa ett fakturaunderlag.
−
<pre>
 
−
SELECT p.attribute AS personnummer,
 
−
CASE
 
−
WHEN g.categorycode = 'BARN'
 
−
THEN 'målsman för'
 
−
WHEN g.categorycode = 'ELEVTIDA'
 
−
THEN 'målsman för'
 
−
ELSE ''
 
−
END
 
−
AS 'Till',
 
−
g.surname AS Efternamn,
 
−
g.firstname AS Förnamn,
 
−
g.address AS Adress,
 
−
g.address2 AS adress,
 
−
g.zipcode AS Postnummer,
 
−
g.city AS Postort,
 
−
b.author AS Författare,
 
−
b.title AS Titel,
 
−
i.barcode AS Streckkod,
 
−
m.date_due AS Återlämningsdatum,
 
−
CASE
 
−
        WHEN i.itype = 'BARN LJUD'
 
−
            THEN '100'
 
−
WHEN i.itype = 'BARN TIDSK'
 
−
            THEN '100'
 
−
WHEN i.itype = 'BARNBOK'
 
−
            THEN '100'
 
−
        WHEN i.itype = 'BARNKORT'
 
−
            THEN '100'
 
−
WHEN i.itype = 'BARNMP3'
 
−
            THEN '100'
 
−
WHEN i.itype = 'BLURAY'
 
−
            THEN '600'
 
−
WHEN i.itype = 'BOK'
 
−
            THEN '250'
 
−
WHEN i.itype = 'BOKCD'
 
−
            THEN '250'
 
−
WHEN i.itype = 'BOKCDBARN'
 
−
            THEN '100'
 
−
WHEN i.itype = 'BOKDAISY'
 
−
            THEN '250'
 
−
WHEN i.itype = 'BOKDAISYBARN'
 
−
            THEN '100'
 
−
WHEN i.itype = 'BOKMP3'
 
−
            THEN '250'
 
−
WHEN i.itype = 'LAROMDL'
 
−
            THEN '250'
 
−
WHEN i.itype = 'LAROMTERM'
 
−
            THEN '250'
 
−
WHEN i.itype = 'BOKMP3BARN'
 
−
            THEN '100'
 
−
WHEN i.itype = 'FILM'
 
−
            THEN '600'
 
−
WHEN i.itype = 'KORTLON'
 
−
            THEN '250'
 
−
WHEN i.itype = 'LJUDBOK'
 
−
            THEN '250'
 
−
WHEN i.itype = 'MP3'
 
−
            THEN '250'
 
−
WHEN i.itype = 'STORSTIL'
 
−
            THEN '250'
 
−
WHEN i.itype = 'TIDSKRIFT'
 
−
            THEN '50'
 
−
WHEN i.itype = 'TV-SPEL'
 
−
            THEN '600'
 
−
        ELSE 'Schablonpris saknas'
 
−
    END
 
−
    AS 'Pris',
 
−
i.replacementprice AS 'Faktiskt pris'
 
−
 
−
FROM items i
 
−
 
−
LEFT JOIN biblio b ON (i.biblionumber=b.biblionumber)
 
−
LEFT JOIN issues l ON (i.itemnumber=l.itemnumber)
 
−
LEFT JOIN issues m ON (i.itemnumber=m.itemnumber)
 
−
LEFT JOIN borrowers g ON (l.borrowernumber=g.borrowernumber)
 
−
LEFT JOIN borrower_attributes p ON (l.borrowernumber=p.borrowernumber)
 
−
LEFT JOIN branches u ON (l.branchcode=u.branchcode)
 
−
LEFT JOIN branches e ON (i.homebranch=e.branchcode)
 
−
LEFT JOIN authorised_values v ON (i.itemlost=v.authorised_value)
 
−
 
−
WHERE i.itemlost = 1 AND v.category='LOST' AND u.branchcode = <<Välj utlånande bibliotek|branches>> AND i.itemlost_on BETWEEN (<<Faktureringsdatum från (åååå-mm-dd)|date>>-INTERVAL 1 DAY) AND (<<Faktureringsdatum till (åååå-mm-dd)|date>>+INTERVAL 1 DAY)
 
−
 
−
ORDER By g.cardnumber DESC
 
−
</pre>
 
−
 
−
Det halvfärdiga underlaget öppnar man som Makroaktiverad Excelbok och sparar på ett lämpligt ställe. Än så länge är det inte användbart eftersom alla låntagare ligger i samma flik.
 
−
Det problemet löser man genom att köra ett Excelmakro - kod följer nedan. För att det makrot ska funka behöver alla låntagare ha ett personnummer (eller något liknande) och alla förekomster a "Schablonpris saknas" måste ersättas med ett riktigt pris.
 
−
 
−
<pre>
 
−
Sub Fakturautskrift()
 
−
    Dim wshS As Worksheet
 
−
    Dim wshT As Worksheet
 
−
    Dim s As Long
 
−
    Dim m As Long
 
−
    Dim t As Long
 
−
    Dim c As Long
 
−
    Dim d As Double
 
−
    Dim Lastrow As Long
 
−
    Dim x As Long
 
−
   
 
−
    Application.ScreenUpdating = False
 
−
    Set wshS = ActiveSheet
 
−
    wshS.Range("A1").CurrentRegion.Sort Key1:=wshS.Range("A1"), Header:=xlYes
 
−
    m = wshS.Range("A" & wshS.Rows.Count).End(xlUp).Row
 
−
    For s = 2 To m
 
−
        If s > 2 Then
 
−
            t = t + 2
 
−
            wshT.Cells(t, 1).Value = "Summa"
 
−
            wshT.Cells(t, 2).Value = d
 
−
        End If
 
−
        If wshS.Range("A" & s).Value <> wshS.Range("A" & s - 1).Value Then
 
−
            Set wshT = Worksheets.Add(After:=Worksheets(Worksheets.Count))
 
−
            For c = 1 To 1
 
−
                wshT.Cells(c, 1).Value = wshS.Cells(1, c).Value
 
−
                wshT.Cells(c, 2).Value = wshS.Cells(s, c).Value
 
−
                wshT.Cells(c, 2).NumberFormat = "0000000000"
 
−
                wshT.Cells(c, 2).HorizontalAlignment = xlLeft
 
−
                'Personnummer
 
−
            Next c
 
−
            t = 1
 
−
            d = 0
 
−
           
 
−
            For c = 2 To 6
 
−
                wshT.Cells(c, 1).Value = wshS.Cells(1, c).Value
 
−
                wshT.Cells(c, 2).Value = wshS.Cells(s, c).Value
 
−
            Next c
 
−
            t = 6
 
−
            d = 0
 
−
           
 
−
            For c = 7 To 7
 
−
                wshT.Cells(c, 1).Value = wshS.Cells(1, c).Value
 
−
                wshT.Cells(c, 2).Value = wshS.Cells(s, c).Value
 
−
                wshT.Cells(c, 2).HorizontalAlignment = xlLeft
 
−
                'Postnummer
 
−
            Next c
 
−
            t = 7
 
−
            d = 0
 
−
           
 
−
            For c = 8 To 8
 
−
                wshT.Cells(c, 1).Value = wshS.Cells(1, c).Value
 
−
                wshT.Cells(c, 2).Value = wshS.Cells(s, c).Value
 
−
            Next c
 
−
            t = 8
 
−
            d = 0
 
−
        End If
 
−
       
 
−
        t = t + 1
 
−
        For c = 9 To 13
 
−
            t = t + 1
 
−
            wshT.Cells(t, 1).Value = wshS.Cells(1, c).Value
 
−
            wshT.Cells(t, 2).Value = wshS.Cells(s, c).Value
 
−
            wshT.Cells(c, 1).EntireColumn.AutoFit
 
−
            wshT.Cells(c, 2).EntireColumn.AutoFit
 
−
        Next c
 
−
       
 
−
        d = d + wshS.Cells(s, 13).Value
 
−
       
 
−
        Lastrow = wshT.Cells(Rows.Count, "B").End(xlUp).Row
 
−
        For x = 12 To Lastrow Step 8
 
−
        With wshT.Range("B" & x)
 
−
        .NumberFormat = "0000000000000"
 
−
        .HorizontalAlignment = xlLeft
 
−
        End With
 
−
        With wshT.Range("B" & x + 1)
 
−
        .NumberFormat = "m/d/yyyy"
 
−
        .HorizontalAlignment = xlLeft
 
−
        End With
 
−
        Next
 
−
     
 
−
    Next s
 
−
   
 
−
    ' Last total
 
−
    t = t + 2
 
−
    wshT.Cells(t, 1).Value = "Summa"
 
−
    wshT.Cells(t, 2).Value = d
 
−
   
 
−
    Application.ScreenUpdating = True
 
−
   
 
−
   
 
−
End Sub
 
−
</pre>
 
−
 
−
När man har kört makrot finns det en flik för varje låntagare. Vi sparar ner varje flik som en pdf och laddar sedan upp den i kommunens ekonomisystem Raindance så att låntagaren får sin faktura därifrån. Man skulle också kunna jobba vidare med sidhuvud/sidfot och använda det här som en riktig faktura
 
−
 
−
 
−
== 4 Bevakning/reservation av fakturerade böcker ==
 
−
Det sista steget är att lägga en reservation på de fakturerade böckerna, så vi vet vilka fakturor vi ska dra tillbaks från ekonomisystemet. För det har vi skapat särskilda bevakningskort.
 
−
 
 
<pre>
 
<pre>
 
SELECT  
 
SELECT  
Rad 318: Rad 168:
 
lant.surname AS 'Lånad av efternamn',
 
lant.surname AS 'Lånad av efternamn',
 
lant.firstname AS 'Lånad av förnamn',
 
lant.firstname AS 'Lånad av förnamn',
−
qu.cardnumber AS 'Reserverad av streckkod',
+
CASE WHEN SUBSTRING(items.itemlost_on,1,10)=CURDATE()
−
qu.surname AS 'Reserverad av efternamn',
+
THEN
−
qu.firstname AS 'Reserverad av förnamn',
+
CONCAT('<a href=\"/cgi-bin/koha/reports/guided_reports.pl?reports=705&phase=Run+this+report&param_name=Borrowernumber&sql_params=',lant.borrowernumber,'\" target="_blank">Skriv ut faktura</a>' )
 +
ELSE ''
 +
END
 +
as 'Skriv ut faktura',
 +
CONCAT('<a href=\"/cgi-bin/koha/members/moremember.pl?borrowernumber=', lant.borrowernumber, '#reldebarments','\" target="_blank">', CASE
 +
WHEN borrower_debarments.comment IS NULL
 +
THEN '--'
 +
ELSE (SELECT GROUP_CONCAT( DISTINCT BlocksInnerDets.BlocksDetails SEPARATOR '</br>')
 +
            FROM
 +
          (SELECT blocksInner.comment
 +
                    AS BlocksDetails, blocksInner.borrowernumber
 +
            FROM borrower_debarments blocksInner         
 +
) BlocksInnerDets
 +
        WHERE BlocksInnerDets.borrowernumber = lant.borrowernumber)
 +
END, '</a>' ) AS 'Spärra låntagaren',
 
CONCAT('<a href=\"/cgi-bin/koha/reserve/request.pl?biblionumber=', items.biblionumber, '&findborrower=',  
 
CONCAT('<a href=\"/cgi-bin/koha/reserve/request.pl?biblionumber=', items.biblionumber, '&findborrower=',  
 
CASE
 
CASE
Rad 436: Rad 300:
 
THEN 'kbrobevakning'
 
THEN 'kbrobevakning'
 
WHEN issues.branchcode = 'lkav'
 
WHEN issues.branchcode = 'lkav'
−
THEN 'lkavbevakning'
+
THEN 'kbrobevakning'
 
ELSE ''
 
ELSE ''
−
END, '</a>' ) AS 'Reservera för bevakning'
+
END, '</a>' ) AS 'Reservera för bevakning',
 +
qu.surname AS 'Reserverad av'
  
 
FROM items
 
FROM items
Rad 447: Rad 312:
 
LEFT JOIN borrowers lant ON (issues.borrowernumber = lant.borrowernumber)
 
LEFT JOIN borrowers lant ON (issues.borrowernumber = lant.borrowernumber)
 
LEFT JOIN borrowers qu ON (reserves.borrowernumber = qu.borrowernumber)
 
LEFT JOIN borrowers qu ON (reserves.borrowernumber = qu.borrowernumber)
 +
LEFT JOIN borrower_debarments ON (borrower_debarments.borrowernumber=lant.borrowernumber)
  
 
WHERE items.itemlost = 1 AND issues.branchcode = <<Utlånande bibliotek|branches>>  
 
WHERE items.itemlost = 1 AND issues.branchcode = <<Utlånande bibliotek|branches>>  
  
−
ORDER BY qu.cardnumber ASC, lant.borrowernumber DESC
+
GROUP BY items.itemnumber
 +
 
 +
ORDER BY SUBSTRING(items.itemlost_on,1,10) DESC,qu.cardnumber ASC, lant.borrowernumber DESC</pre>
 +
 
 +
==4 Faktura==
 +
<pre>
 +
SELECT
 +
concat(CASE
 +
WHEN adressat.categorycode = 'BARN'
 +
THEN 'målsman för <br>'
 +
WHEN adressat.categorycode = 'ELEVTIDA'
 +
THEN 'målsman för <br>'
 +
ELSE ''
 +
END,
 +
adressat.firstname, ' ', adressat.surname,'<br>', adressat.address,'<br>',
 +
adressat.address2,'<br>',
 +
adressat.zipcode,' ',
 +
adressat.city) AS Adress,
 +
p.attribute AS Personnummer
 +
 
 +
FROM borrowers adressat
 +
LEFT JOIN issues ON issues.borrowernumber=adressat.borrowernumber
 +
LEFT JOIN items ON items.itemnumber=issues.itemnumber
 +
LEFT JOIN biblio ON (biblio.biblionumber=items.biblionumber)
 +
LEFT JOIN borrower_attributes p ON (adressat.borrowernumber=p.borrowernumber)
 +
WHERE items.itemlost = 1 AND adressat.borrowernumber = <<Borrowernumber>> AND SUBSTRING(items.itemlost_on,1,10) = CURDATE()
 +
 
 +
UNION
 +
 
 +
SELECT
 +
CASE
 +
WHEN
 +
COUNT(items.itemnumber) = '1'
 +
THEN
 +
'<b>En försenad bok</b>'
 +
ELSE
 +
CONCAT('<b>',COUNT(items.itemnumber),' försenade böcker</b>') END
 +
AS 'Lån',
 +
'<b>Summa att betala</b>' AS 'Summa att betala'
 +
FROM borrowers fakturerat
 +
LEFT JOIN issues ON issues.borrowernumber=fakturerat.borrowernumber
 +
LEFT JOIN items ON items.itemnumber=issues.itemnumber
 +
LEFT JOIN biblio ON (biblio.biblionumber=items.biblionumber)
 +
WHERE items.itemlost = 1 AND fakturerat.borrowernumber = <<Borrowernumber>> AND SUBSTRING(items.itemlost_on,1,10) = CURDATE()
 +
 
 +
UNION
 +
 
 +
SELECT
 +
CASE
 +
WHEN
 +
COUNT(items.itemnumber) > '8'
 +
THEN
 +
CONCAT(SUBSTRING_INDEX(GROUP_CONCAT(DISTINCT biblio.title,' <br>streckkod: ',items.barcode,' <br>återlämningsdatum: ',items.onloan,' <br>pris: ',CASE
 +
        WHEN items.replacementprice IS NOT NULL
 +
THEN CONCAT(items.replacementprice,' kronor')
 +
WHEN items.itype IN ('BARN TIDSK','TIDSKRIFT')
 +
            THEN '50.00 kronor'
 +
        WHEN items.itype IN ('BARN LJUD','BARNBOK','BARNMP3','BARNTAL','BOKCDBARN','BOKDAISYBA','BOKMP3BARN','MUSCDBARN','MUSIKBARN')
 +
            THEN '100.00 kronor'
 +
WHEN items.itype IN ('BLURAY','TV-SPEL','FILM','Fjarrlan')
 +
            THEN '600.00 kronor'
 +
WHEN items.itype = 'LANGLAN'
 +
            THEN '150.00 kronor'
 +
WHEN items.ccode IN ('Vux','Mag','Tillf')
 +
            THEN '250.00 kronor'
 +
WHEN items.ccode IN ('Barn','BoU','Skoldepa','Ungdom')
 +
            THEN '100.00 kronor'
 +
        ELSE ' 999.00 kronor'
 +
    END
 +
    SEPARATOR '<p>'), '<p>', 8),'<p> och ytterligare ',COUNT(items.itemnumber) -8,' böcker, se ditt konto för fullständiga uppgifter')
 +
ELSE
 +
GROUP_CONCAT(DISTINCT biblio.title,' <br>streckkod: ',items.barcode,' <br>återlämningsdatum: ',items.onloan,' <br>pris: ',CASE
 +
        WHEN items.replacementprice IS NOT NULL
 +
THEN CONCAT(items.replacementprice,' kronor')
 +
WHEN items.itype IN ('BARN TIDSK','TIDSKRIFT')
 +
            THEN '50.00 kronor'
 +
        WHEN items.itype IN ('BARN LJUD','BARNBOK','BARNMP3','BARNTAL','BOKCDBARN','BOKDAISYBA','BOKMP3BARN','MUSCDBARN','MUSIKBARN')
 +
            THEN '100.00 kronor'
 +
WHEN items.itype IN ('BLURAY','TV-SPEL','FILM','Fjarrlan')
 +
            THEN '600.00 kronor'
 +
WHEN items.itype = 'LANGLAN'
 +
            THEN '150.00 kronor'
 +
WHEN items.ccode IN ('Vux','Mag','Tillf')
 +
            THEN '250.00 kronor'
 +
WHEN items.ccode IN ('Barn','BoU','Skoldepa','Ungdom')
 +
            THEN '100.00 kronor'
 +
        ELSE ' 999.00 kronor'
 +
    END
 +
    SEPARATOR '<p>')
 +
END
 +
,
 +
   
 +
SUM(CASE
 +
        WHEN items.replacementprice IS NOT NULL
 +
THEN items.replacementprice
 +
WHEN items.itype IN ('BARN TIDSK','TIDSKRIFT')
 +
            THEN 50.00
 +
        WHEN items.itype IN ('BARN LJUD','BARNBOK','BARNMP3','BARNTAL','BOKCDBARN','BOKDAISYBA','BOKMP3BARN','MUSCDBARN','MUSIKBARN')
 +
            THEN 100.00
 +
WHEN items.itype IN ('BLURAY','TV-SPEL','FILM','Fjarrlan')
 +
            THEN 600.00
 +
WHEN items.itype = 'LANGLAN'
 +
            THEN 150.00
 +
WHEN items.ccode IN ('Vux','Mag','Tillf')
 +
            THEN 250.00
 +
WHEN items.ccode IN ('Barn','BoU','Skoldepa','Ungdom')
 +
            THEN 100.00
 +
        ELSE 999.00
 +
    END)
 +
 
 +
FROM borrowers fakturerat
 +
LEFT JOIN issues ON issues.borrowernumber=fakturerat.borrowernumber
 +
LEFT JOIN items ON items.itemnumber=issues.itemnumber
 +
LEFT JOIN biblio ON (biblio.biblionumber=items.biblionumber)
 +
WHERE items.itemlost = 1 AND fakturerat.borrowernumber = <<Borrowernumber>> AND SUBSTRING(items.itemlost_on,1,10) = CURDATE()
 +
 
 +
UNION
 +
 
 +
SELECT '<b>Lämna tillbaks boken/böckerna så fort som möjligt så slipper du betala den här fakturan</b>' AS 'One',
 +
'' AS 'Two'
 +
 
 +
UNION
 +
 
 +
SELECT CONCAT(branches.branchname,'<br>',branches.branchphone,'<br>',branches.branchemail),
 +
        CASE
 +
        WHEN branches.branchcode IN ('GULL','8BYO','8REG','FGBS','HOVA')
 +
        THEN '<img src="https://www.skovde.se/globalassets/_2018/kultur--fritid/stadsbiblioteket/bibliotek-mellansjo/gullspang-35px.jpg">'
 +
        WHEN branches.branchcode IN ('HJO')
 +
        THEN '<img src="https://www.skovde.se/globalassets/_2018/kultur--fritid/stadsbiblioteket/bibliotek-mellansjo/hjo-35px.jpg">'
 +
        WHEN branches.branchcode IN ('KABO','8BYL','8BYM','KSTR')
 +
        THEN '<img src="https://www.skovde.se/globalassets/_2018/kultur--fritid/stadsbiblioteket/bibliotek-mellansjo/karlsborg-35px.jpg">'
 +
        WHEN branches.branchcode IN ('MARI','8BYQ','MKRI','MVAN','VAGY')
 +
        THEN '<img src="https://www.skovde.se/globalassets/_2018/kultur--fritid/stadsbiblioteket/bibliotek-mellansjo/mariestad-35px.jpg">'
 +
        WHEN branches.branchcode IN ('SKSB','8BXQ','8BXZ','8BYA','8BYB','8BYC','8BYR','KBRO','LKAV','SKGY','SKGZ','SKBO','SKKO','SKPO')
 +
        THEN '<img src="https://www.skovde.se/globalassets/_2018/kultur--fritid/stadsbiblioteket/bibliotek-mellansjo/skovde-35px.jpg">'
 +
        WHEN branches.branchcode IN ('TIKF','8NYB','TIBOALDRE')
 +
        THEN '<img src="https://www.skovde.se/globalassets/_2018/kultur--fritid/stadsbiblioteket/bibliotek-mellansjo/tibro-35px.jpg">'
 +
        WHEN branches.branchcode IN ('TIDA','TEKE','TFOR','THOK','TKRI','TVAL')
 +
        THEN '<img src="https://www.skovde.se/globalassets/_2018/kultur--fritid/stadsbiblioteket/bibliotek-mellansjo/tidaholm-35px.jpg">'
 +
        WHEN branches.branchcode IN ('TORE','8BYI','8BYS')
 +
        THEN '<img src="https://www.skovde.se/globalassets/_2018/kultur--fritid/stadsbiblioteket/bibliotek-mellansjo/toreboda-35px.jpg">'
 +
        ELSE
 +
        ''
 +
        END
 +
 
 +
FROM borrowers adressat
 +
LEFT JOIN issues ON issues.borrowernumber=adressat.borrowernumber
 +
LEFT JOIN items ON items.itemnumber=issues.itemnumber
 +
LEFT JOIN branches ON (branches.branchcode=issues.branchcode)
 +
WHERE items.itemlost = 1 AND adressat.borrowernumber = <<Borrowernumber>> AND SUBSTRING(items.itemlost_on,1,10) = CURDATE()
 
</pre>
 
</pre>

Versionen från 2 december 2020 kl. 14.22

Beskrivning av Bibliotek Mellansjös faktureringsprocess

Bibliotek Mellansjös faktureringsprocess är lite halvmanuell, det är inte ett fullfjädrat faktureringssystem, utan slutresultatet är en pdf som går att ladda upp i kommunens ekonomisystem. Låntagaren ska få faktura från det bibliotek man lånade boken på, oavsett var den egentligen hör hemma.

vi har gjort följande inställningar i systempreferenserna:

DefaultLongOverdueChargeValue är tomt, eftersom vi inte vill att ersättningsbeloppet ksa synas i systemet

DefaultLongOverdueLostValue är tomt, eftersom vi vill ha kontroll över vilka böcker som blir fakturerade

MarkLostItemsAsReturned skulle vi helst vilja ha helt tomt, men tyvärr måste man välja något där, så vi har valt "from the holds to pull list". Vi vill nämligen att böckerna ska finnas kvar på låntagarens konto

Vi använder inte cronjobbet Long overdues

Pocessen består av tre rapporter som körs i denna ordning:


1 Leta-lista

Det första vi gör är att ta ut en lista på böcker som inte har blivit återlämnade, fast de är mer än 37 dagar sena, så vi kan leta efter dem i hyllan i fall vi missat att avregistrera dem i återlämningen. 

SELECT  
branches.branchname AS Bibliotek,
items.ccode AS Samling,
authorised_values.lib AS Placering,
items.itemcallnumber AS Hyllsignum,
biblio.author AS Författare,
CASE 
WHEN biblio.frameworkcode='SER' AND items.enumchron IS NOT NULL
THEN 
CONCAT(biblio.title,'<br>',items.enumchron)
ELSE
biblio.title
END 
AS Titel,
items.barcode AS Streckkod,
items.itype AS Exemplartyp

FROM borrowers 
LEFT JOIN issues ON (borrowers.borrowernumber=issues.borrowernumber) 
LEFT JOIN items ON (issues.itemnumber=items.itemnumber) 
LEFT JOIN authorised_values ON (items.location=authorised_values.authorised_value)
LEFT JOIN biblio ON (items.biblionumber=biblio.biblionumber) 
LEFT JOIN branches ON (items.homebranch=branches.branchcode)
WHERE (TO_DAYS(curdate())-TO_DAYS(date_due)) > '37' AND items.itemlost !=1 AND items.itemlost !=2 AND items.itemlost !=3 AND items.itemlost !=4 AND items.itemlost !=5 AND issues.branchcode = <<Utlånande bibliotek|branches>> 
ORDER BY items.homebranch ASC,items.ccode ASC, items.location ASC, items.itemcallnumber ASC, biblio.author ASC,biblio.title ASC


2 Kontrolllista

Nästa steg är att vi manuellt ändrar status till "På räkning" för de böcker som ska faktureras och att vi lägger in en spärr på låntagaren under Begränsningar 

SELECT  
CONCAT(branches.branchname,'<br>',
CASE WHEN items.ccode IS NULL 
THEN '--'
ELSE items.ccode
END,'<br>',
CASE WHEN items.location IS NULL 
THEN '--'
ELSE
authorised_values.lib
END,'<br>',
items.itemcallnumber) AS Placering, 
CONCAT(CASE WHEN biblio.author IS NULL 
THEN ''
ELSE biblio.author
END,'<br>',
biblio.title,'<br>',  
items.barcode) AS Bok,
CONCAT(borrowers.cardnumber,'<br>',
borrowers.surname,'<br>',
borrowers.firstname) AS 'Låntagare',
issues.date_due AS förfallodatum, 
items.itype AS exemplartyp,
CASE 
		WHEN items.itype IN ('BARN TIDSK','TIDSKRIFT')
            THEN '50'
        WHEN items.itype IN ('BARN LJUD','BARNBOK','BARNMP3','BARNTAL','BOKCDBARN','BOKDAISYBA','BOKMP3BARN','MUSCDBARN','MUSIKBARN')
            THEN '100'
		WHEN items.itype IN ('BLURAY','TV-SPEL','FILM','Fjarrlan')
            THEN '600'
		WHEN items.itype = 'LANGLAN' 
            THEN '150'
		WHEN items.ccode IN ('Vux','Mag','Tillf')
            THEN '250'
		WHEN items.ccode IN ('Barn','BoU','Skoldepa','Ungdom') 
            THEN '100'
        ELSE ' 999'
    END AS 'Schablonpris',
items.price AS 'Inköpspris',
CASE 
WHEN
items.price
/
(CASE 
		WHEN items.itype IN ('BARN TIDSK','TIDSKRIFT')
            THEN '50'
        WHEN items.itype IN ('BARN LJUD','BARNBOK','BARNMP3','BARNTAL','BOKCDBARN','BOKDAISYBA','BOKMP3BARN','MUSCDBARN','MUSIKBARN')
            THEN '100'
		WHEN items.itype IN ('BLURAY','TV-SPEL','FILM','Fjarrlan')
            THEN '600'
		WHEN items.itype = 'LANGLAN' 
            THEN '150'
		WHEN items.ccode IN ('Vux','Mag','Tillf')
            THEN '250'
		WHEN items.ccode IN ('Barn','BoU','Skoldepa','Ungdom') 
            THEN '100'
        ELSE ' 999'
    END)
    > '2'
    THEN 
    'Mer än dubbla schablonpriset'
    WHEN
    items.price
/
(CASE 
		WHEN items.itype IN ('BARN TIDSK','TIDSKRIFT')
            THEN '50'
        WHEN items.itype IN ('BARN LJUD','BARNBOK','BARNMP3','BARNTAL','BOKCDBARN','BOKDAISYBA','BOKMP3BARN','MUSCDBARN','MUSIKBARN')
            THEN '100'
		WHEN items.itype IN ('BLURAY','TV-SPEL','FILM','Fjarrlan')
            THEN '600'
		WHEN items.itype = 'LANGLAN' 
            THEN '150'
		WHEN items.ccode IN ('Vux','Mag','Tillf')
            THEN '250'
		WHEN items.ccode IN ('Barn','BoU','Skoldepa','Ungdom') 
            THEN '100'
        ELSE ' 999'
    END)
    < '0.5'
    THEN 
    'Mindre än halva schablonpriset'
    ELSE ''
    END
    AS 'Större avvikelse?'
    ,
CONCAT('<a href=\"/cgi-bin/koha/cataloguing/additem.pl?op=edititem&biblionumber=', items.biblionumber, '&itemnumber=',items.itemnumber,'\" target="_blank">', 
CASE 
WHEN items.replacementprice IS NULL
THEN '--'
ELSE
items.replacementprice
END, '</a>' ) AS 'Annat pris än schablon?',
CONCAT('<a href=\"/cgi-bin/koha/catalogue/moredetail.pl?itemnumber=', items.itemnumber, '&biblionumber=',biblio.biblionumber,'\" target="_blank">', items.barcode, '</a>' ) AS 'Sätt Hopplöst fall på det som inte ska faktureras.',
items.itemnumber

FROM borrowers 
LEFT JOIN issues ON (borrowers.borrowernumber=issues.borrowernumber) 
LEFT JOIN items ON (issues.itemnumber=items.itemnumber) 
LEFT JOIN authorised_values ON (items.location=authorised_values.authorised_value)
LEFT JOIN biblio ON (items.biblionumber=biblio.biblionumber) 
LEFT JOIN branches ON (items.homebranch=branches.branchcode)
WHERE (TO_DAYS(curdate())-TO_DAYS(date_due)) > '37' AND items.itemlost !=1 AND items.itemlost !=2 AND items.itemlost !=3 AND items.itemlost !=4 AND items.itemlost !=5 AND issues.branchcode = <<Utlånande bibliotek|branches>> 
ORDER BY borrowers.cardnumber ASC, items.homebranch ASC,items.ccode ASC, items.location ASC, items.itemcallnumber ASC, biblio.author ASC,biblio.title ASC


3 Fakturautskrift, spärra låntagaren, bevakning

Tredje steget är att skapa ett fakturaunderlag. 

SELECT 
biblio.author AS Författare,
biblio.title AS Titel,
items.barcode AS Streckkod,
issues.branchcode AS 'utlånande bibliotek',
items.itemlost_on AS 'Fakturerad den',
lant.cardnumber AS 'Lånad av streckkod',
lant.surname AS 'Lånad av efternamn',
lant.firstname AS 'Lånad av förnamn',
CASE WHEN SUBSTRING(items.itemlost_on,1,10)=CURDATE()
THEN 
CONCAT('<a href=\"/cgi-bin/koha/reports/guided_reports.pl?reports=705&phase=Run+this+report&param_name=Borrowernumber&sql_params=',lant.borrowernumber,'\" target="_blank">Skriv ut faktura</a>' ) 
ELSE ''
END
as 'Skriv ut faktura',
CONCAT('<a href=\"/cgi-bin/koha/members/moremember.pl?borrowernumber=', lant.borrowernumber, '#reldebarments','\" target="_blank">', CASE
WHEN borrower_debarments.comment IS NULL
THEN '--'
ELSE (SELECT GROUP_CONCAT( DISTINCT BlocksInnerDets.BlocksDetails SEPARATOR '</br>')
            FROM
           (SELECT blocksInner.comment
                    AS BlocksDetails, blocksInner.borrowernumber 
            FROM borrower_debarments blocksInner           
			) BlocksInnerDets
         WHERE BlocksInnerDets.borrowernumber = lant.borrowernumber)
END, '</a>' ) AS 'Spärra låntagaren',
CONCAT('<a href=\"/cgi-bin/koha/reserve/request.pl?biblionumber=', items.biblionumber, '&findborrower=', 
CASE
    WHEN issues.branchcode = '8bxq'
		THEN 'sksbbevakning'
	WHEN issues.branchcode = '8bxz'
		THEN 'sksbbevakning'
	WHEN issues.branchcode = '8bya'
		THEN 'sksbbevakning'
	WHEN issues.branchcode = '8byb'
		THEN 'sksbbevakning'
	WHEN issues.branchcode = '8byc'
		THEN 'sksbbevakning'
	WHEN issues.branchcode = '8byi'
		THEN 'torebevakning'
	WHEN issues.branchcode = '8byl'
		THEN 'kabobevakning'
	WHEN issues.branchcode = '8bym'
		THEN 'kabobevakning'
	WHEN issues.branchcode = '8byo'
		THEN 'gullbevakning'
	WHEN issues.branchcode = '8byq'
		THEN 'maribevakning'
	WHEN issues.branchcode = '8byr'
		THEN 'sksbbevakning'
	WHEN issues.branchcode = '8bys'
		THEN 'torebevakning'
	WHEN issues.branchcode = '8nyb'
		THEN 'tikfbevakning'
	WHEN issues.branchcode = '8reg'
		THEN 'gullbevakning'
    WHEN issues.branchcode = 'gull'
		THEN 'gullbevakning'
	WHEN issues.branchcode = 'hjo'
		THEN 'hjobevakning'
	WHEN issues.branchcode = 'hova'
		THEN 'gullbevakning'
	WHEN issues.branchcode = 'kabo'
		THEN 'kabobevakning'
    WHEN issues.branchcode = 'kstr'
		THEN 'kabobevakning'
	WHEN issues.branchcode = 'mari'
        THEN 'maribevakning'
    WHEN issues.branchcode = 'sksb'
        THEN 'sksbbevakning'
	WHEN issues.branchcode = 'tida'
		THEN 'tidabevakning'
	WHEN issues.branchcode = 'tikf'
         THEN 'tikfbevakning'
	WHEN issues.branchcode = 'tore'
		THEN 'torebevakning'
    WHEN issues.branchcode = 'skgy'
		THEN 'skgybevakning'
    WHEN issues.branchcode = 'skgz'
		THEN 'skgybevakning'
    WHEN issues.branchcode = 'kbro'
		THEN 'kbrobevakning'
    WHEN issues.branchcode = 'lkav'
		THEN 'kbrobevakning'
    ELSE ''
END,'\" target="_blank">', CASE
    WHEN issues.branchcode = '8bxq'
		THEN 'sksbbevakning'
	WHEN issues.branchcode = '8bxz'
		THEN 'sksbbevakning'
	WHEN issues.branchcode = '8bya'
		THEN 'sksbbevakning'
	WHEN issues.branchcode = '8byb'
		THEN 'sksbbevakning'
	WHEN issues.branchcode = '8byc'
		THEN 'sksbbevakning'
	WHEN issues.branchcode = '8byi'
		THEN 'torebevakning'
	WHEN issues.branchcode = '8byl'
		THEN 'kabobevakning'
	WHEN issues.branchcode = '8bym'
		THEN 'kabobevakning'
	WHEN issues.branchcode = '8byo'
		THEN 'gullbevakning'
	WHEN issues.branchcode = '8byq'
		THEN 'maribevakning'
	WHEN issues.branchcode = '8byr'
		THEN 'sksbbevakning'
	WHEN issues.branchcode = '8bys'
		THEN 'torebevakning'
	WHEN issues.branchcode = '8nyb'
		THEN 'tikfbevakning'
	WHEN issues.branchcode = '8reg'
		THEN 'gullbevakning'
    WHEN issues.branchcode = 'gull'
		THEN 'gullbevakning'
	WHEN issues.branchcode = 'hjo'
		THEN 'hjobevakning'
	WHEN issues.branchcode = 'hova'
		THEN 'gullbevakning'
	WHEN issues.branchcode = 'kabo'
		THEN 'kabobevakning'
    WHEN issues.branchcode = 'kstr'
		THEN 'kabobevakning'
	WHEN issues.branchcode = 'mari'
        THEN 'maribevakning'
    WHEN issues.branchcode = 'sksb'
        THEN 'sksbbevakning'
	WHEN issues.branchcode = 'tida'
		THEN 'tidabevakning'
	WHEN issues.branchcode = 'tikf'
        THEN 'tikfbevakning'
	WHEN issues.branchcode = 'tore'
		THEN 'torebevakning'
	WHEN issues.branchcode = 'skgy'
		THEN 'skgybevakning'
	WHEN issues.branchcode = 'skgz'
		THEN 'skgzbevakning'
	WHEN issues.branchcode = 'kbro'
		THEN 'kbrobevakning'
	WHEN issues.branchcode = 'lkav'
		THEN 'kbrobevakning'
	ELSE ''
END, '</a>' ) AS 'Reservera för bevakning',
qu.surname AS 'Reserverad av'

FROM items

LEFT JOIN reserves ON (items.itemnumber = reserves.itemnumber)
LEFT JOIN issues ON (items.itemnumber = issues.itemnumber)
LEFT JOIN biblio ON (items.biblionumber = biblio.biblionumber)
LEFT JOIN borrowers lant ON (issues.borrowernumber = lant.borrowernumber)
LEFT JOIN borrowers qu ON (reserves.borrowernumber = qu.borrowernumber)
LEFT JOIN borrower_debarments ON (borrower_debarments.borrowernumber=lant.borrowernumber)

WHERE items.itemlost = 1 AND issues.branchcode = <<Utlånande bibliotek|branches>> 

GROUP BY items.itemnumber

ORDER BY SUBSTRING(items.itemlost_on,1,10) DESC,qu.cardnumber ASC, lant.borrowernumber DESC

4 Faktura

SELECT 
concat(CASE
		WHEN adressat.categorycode = 'BARN'
			THEN 'målsman för <br>'
		WHEN adressat.categorycode = 'ELEVTIDA'
			THEN 'målsman för <br>'
		ELSE ''
	END,
adressat.firstname, ' ', adressat.surname,'<br>', adressat.address,'<br>',
adressat.address2,'<br>',
adressat.zipcode,' ',
adressat.city) AS Adress,
p.attribute AS Personnummer

FROM borrowers adressat
LEFT JOIN issues ON issues.borrowernumber=adressat.borrowernumber
LEFT JOIN items ON items.itemnumber=issues.itemnumber
LEFT JOIN biblio ON (biblio.biblionumber=items.biblionumber)
LEFT JOIN borrower_attributes p ON (adressat.borrowernumber=p.borrowernumber)
WHERE items.itemlost = 1 AND adressat.borrowernumber = <<Borrowernumber>> AND SUBSTRING(items.itemlost_on,1,10) = CURDATE()

UNION

SELECT 
CASE 
WHEN 
COUNT(items.itemnumber) = '1'
THEN 
'<b>En försenad bok</b>'
ELSE
CONCAT('<b>',COUNT(items.itemnumber),' försenade böcker</b>') END
AS 'Lån',
'<b>Summa att betala</b>' AS 'Summa att betala'
FROM borrowers fakturerat
LEFT JOIN issues ON issues.borrowernumber=fakturerat.borrowernumber
LEFT JOIN items ON items.itemnumber=issues.itemnumber
LEFT JOIN biblio ON (biblio.biblionumber=items.biblionumber)
WHERE items.itemlost = 1 AND fakturerat.borrowernumber = <<Borrowernumber>> AND SUBSTRING(items.itemlost_on,1,10) = CURDATE()

UNION

SELECT 
CASE
WHEN 
COUNT(items.itemnumber) > '8'
THEN 
CONCAT(SUBSTRING_INDEX(GROUP_CONCAT(DISTINCT biblio.title,' <br>streckkod: ',items.barcode,' <br>återlämningsdatum: ',items.onloan,' <br>pris: ',CASE 
        WHEN items.replacementprice IS NOT NULL
			THEN CONCAT(items.replacementprice,' kronor')
		WHEN items.itype IN ('BARN TIDSK','TIDSKRIFT')
            THEN '50.00 kronor'
        WHEN items.itype IN ('BARN LJUD','BARNBOK','BARNMP3','BARNTAL','BOKCDBARN','BOKDAISYBA','BOKMP3BARN','MUSCDBARN','MUSIKBARN')
            THEN '100.00 kronor'
		WHEN items.itype IN ('BLURAY','TV-SPEL','FILM','Fjarrlan')
            THEN '600.00 kronor'
		WHEN items.itype = 'LANGLAN' 
            THEN '150.00 kronor'
		WHEN items.ccode IN ('Vux','Mag','Tillf')
            THEN '250.00 kronor'
		WHEN items.ccode IN ('Barn','BoU','Skoldepa','Ungdom') 
            THEN '100.00 kronor'
        ELSE ' 999.00 kronor'
    END
    SEPARATOR '<p>'), '<p>', 8),'<p> och ytterligare ',COUNT(items.itemnumber) -8,' böcker, se ditt konto för fullständiga uppgifter')
ELSE
GROUP_CONCAT(DISTINCT biblio.title,' <br>streckkod: ',items.barcode,' <br>återlämningsdatum: ',items.onloan,' <br>pris: ',CASE 
        WHEN items.replacementprice IS NOT NULL
			THEN CONCAT(items.replacementprice,' kronor')
		WHEN items.itype IN ('BARN TIDSK','TIDSKRIFT')
            THEN '50.00 kronor'
        WHEN items.itype IN ('BARN LJUD','BARNBOK','BARNMP3','BARNTAL','BOKCDBARN','BOKDAISYBA','BOKMP3BARN','MUSCDBARN','MUSIKBARN')
            THEN '100.00 kronor'
		WHEN items.itype IN ('BLURAY','TV-SPEL','FILM','Fjarrlan')
            THEN '600.00 kronor'
		WHEN items.itype = 'LANGLAN' 
            THEN '150.00 kronor'
		WHEN items.ccode IN ('Vux','Mag','Tillf')
            THEN '250.00 kronor'
		WHEN items.ccode IN ('Barn','BoU','Skoldepa','Ungdom') 
            THEN '100.00 kronor'
        ELSE ' 999.00 kronor'
    END
    SEPARATOR '<p>')
END
,
    
SUM(CASE 
        WHEN items.replacementprice IS NOT NULL
			THEN items.replacementprice
		WHEN items.itype IN ('BARN TIDSK','TIDSKRIFT')
            THEN 50.00
        WHEN items.itype IN ('BARN LJUD','BARNBOK','BARNMP3','BARNTAL','BOKCDBARN','BOKDAISYBA','BOKMP3BARN','MUSCDBARN','MUSIKBARN')
            THEN 100.00
		WHEN items.itype IN ('BLURAY','TV-SPEL','FILM','Fjarrlan')
            THEN 600.00
		WHEN items.itype = 'LANGLAN' 
            THEN 150.00
		WHEN items.ccode IN ('Vux','Mag','Tillf')
            THEN 250.00
		WHEN items.ccode IN ('Barn','BoU','Skoldepa','Ungdom') 
            THEN 100.00
        ELSE 999.00
    END)

FROM borrowers fakturerat
LEFT JOIN issues ON issues.borrowernumber=fakturerat.borrowernumber
LEFT JOIN items ON items.itemnumber=issues.itemnumber
LEFT JOIN biblio ON (biblio.biblionumber=items.biblionumber)
WHERE items.itemlost = 1 AND fakturerat.borrowernumber = <<Borrowernumber>> AND SUBSTRING(items.itemlost_on,1,10) = CURDATE()

UNION

SELECT '<b>Lämna tillbaks boken/böckerna så fort som möjligt så slipper du betala den här fakturan</b>' AS 'One',
'' AS 'Two'

UNION

SELECT CONCAT(branches.branchname,'<br>',branches.branchphone,'<br>',branches.branchemail),
        CASE 
        WHEN branches.branchcode IN ('GULL','8BYO','8REG','FGBS','HOVA')
        THEN '<img src="https://www.skovde.se/globalassets/_2018/kultur--fritid/stadsbiblioteket/bibliotek-mellansjo/gullspang-35px.jpg">'
        WHEN branches.branchcode IN ('HJO')
        THEN '<img src="https://www.skovde.se/globalassets/_2018/kultur--fritid/stadsbiblioteket/bibliotek-mellansjo/hjo-35px.jpg">'
        WHEN branches.branchcode IN ('KABO','8BYL','8BYM','KSTR')
        THEN '<img src="https://www.skovde.se/globalassets/_2018/kultur--fritid/stadsbiblioteket/bibliotek-mellansjo/karlsborg-35px.jpg">'
        WHEN branches.branchcode IN ('MARI','8BYQ','MKRI','MVAN','VAGY')
        THEN '<img src="https://www.skovde.se/globalassets/_2018/kultur--fritid/stadsbiblioteket/bibliotek-mellansjo/mariestad-35px.jpg">'
        WHEN branches.branchcode IN ('SKSB','8BXQ','8BXZ','8BYA','8BYB','8BYC','8BYR','KBRO','LKAV','SKGY','SKGZ','SKBO','SKKO','SKPO')
        THEN '<img src="https://www.skovde.se/globalassets/_2018/kultur--fritid/stadsbiblioteket/bibliotek-mellansjo/skovde-35px.jpg">'
        WHEN branches.branchcode IN ('TIKF','8NYB','TIBOALDRE')
        THEN '<img src="https://www.skovde.se/globalassets/_2018/kultur--fritid/stadsbiblioteket/bibliotek-mellansjo/tibro-35px.jpg">'
        WHEN branches.branchcode IN ('TIDA','TEKE','TFOR','THOK','TKRI','TVAL')
        THEN '<img src="https://www.skovde.se/globalassets/_2018/kultur--fritid/stadsbiblioteket/bibliotek-mellansjo/tidaholm-35px.jpg">'
        WHEN branches.branchcode IN ('TORE','8BYI','8BYS')
        THEN '<img src="https://www.skovde.se/globalassets/_2018/kultur--fritid/stadsbiblioteket/bibliotek-mellansjo/toreboda-35px.jpg">'
        ELSE
        ''
        END

FROM borrowers adressat
LEFT JOIN issues ON issues.borrowernumber=adressat.borrowernumber
LEFT JOIN items ON items.itemnumber=issues.itemnumber
LEFT JOIN branches ON (branches.branchcode=issues.branchcode)
WHERE items.itemlost = 1 AND adressat.borrowernumber = <<Borrowernumber>> AND SUBSTRING(items.itemlost_on,1,10) = CURDATE()
Hämtad från "https://koha.se/wiki/index.php?title=Fakturering&oldid=761"