Het is mogelijk om een afbeelding in Label-it te gebruiken, die verandert bij een bepaalde waarde.

Dit is handig voor bijvoorbeeld allergene stoffen afbeeldingen.




! LET OP:  Dit werkt niet in Label-it 1.21. Je zult Label-it moeten updaten naar 1.30.





Dit doe je met deze instelling in de afbeelding tool:



Stap 1:

De allergenen afbeeldingen kun je hier vinden:

kleur          "V:\Graphics\Bake-it\AllergenenIconen\AllergenenIconenKLEUR"

zwartwit     "V:\Graphics\Bake-it\AllergenenIconen\AllergenenIconenZW"


Kopieer de afbeeldingen naar de afbeeldingenmap van de lokale Bake-it.


Zover ik kan zien komt het nooit voor dat alle 14 allergene stoffen in één recept zitten.

6 allergenen is het maximum.

Daarom maken we 6 variabelen aan in het etiket, met de optie "Variables"



Geef de variabelen de naam "AllergenenNR" met een volgnummer 1 t/m 6.

Vul alles in zoals onderstaand voorbeeld:



In het veld "Update Expression" vul je de volgende formule in:


Val(

SubStr( 

StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(

StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(  

StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(

StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(

StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(

StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(

StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(


iif( Recepten.ReceptGoedgekeurdEtiketten = .T. , Upper(Recepten.Notitie_Allergeen) , 

upper(Alltrim(Artikelen.Etiket_Allergenen_Handmatig)))


, CHR(13)+CHR(10) , "")

, "'S","")

, "TARWE" , "")

, "ROGGE" , "")

, "GERST" , "")

, "HAVER" , "")

, "SPELT" , "")

, "KAMUT" , "")

, "AMANDELEN" , "")

, "HAZELNOTEN" , "")

, "WALNOTEN" , "")

, "CASHEWNOTEN" , "")

, "PECANNOTEN" , "")

, "PISTACHENOTEN" , "")

, "MACADEMIANOTEN" , "")

, "LACTOSE" , "")

, "CACAO" , "")

, "GLUTAMAAT" , "")

, "KIPPENVLEES" , "")

, "KORIANDER" , "")

, "MAIS" , "")

, "PEULVRUCHTEN" , "")

, "RUNDVLEES" , "")

, "VARKENSVLEES" , "")

, "WORTEL" , "")

, "ROGGE" , "")

, "Allergene stoffen" , "")

, ":" , "")

, "GLUTEN" , "01")

, "SCHAALDIEREN" , "02")

, "EI" , "03")

, "VIS" , "04")

, "PINDA" , "05")

, "SOJA" , "06")

, "MELK" , "07")

, "NOTEN" , "08")

, "SELDERIJ" , "09")

, "MOSTERD" , "10")

, "SESAM" , "11")

, "SULFIET" , "12")

, "ZWAVELDIOXIDE" , "12")

, "LUPINE" , "13")

, "WEEKDIEREN" , "14")

,",","")," ","")


, "A" , "")

, "B" , "")

, "C" , "")

, "D" , "")

, "E" , "")

, "F" , "")

, "G" , "")

, "H" , "")

, "I" , "")

, "J" , "")

, "K" , "")

, "L" , "")

, "M" , "")

, "N" , "")

, "O" , "")

, "P" , "")

, "Q" , "")

, "R" , "")

, "S" , "")

, "T" , "")

, "U" , "")

, "V" , "")

, "W" , "")

, "X" , "")

, "Y" , "")

, "Z" , "")


, 1 , 2 ))


Uitleg: als er een recept is gekoppeld EN deze is goedgekeurd, dan wordt het veld Recepten.Notitie_Allergeen genomen, anders het allergenenveld uit de artikelkaart.

De namen van de allergenen worden met StrTran omgezet naar een tweecijferig nummer (voor de verplichte allergenen) of vervangen met niets (de overige allergenen). Dit gebeurt voor iedere mogelijke allergeen apart (vandaar dat StrTran zo vaak in de formule staat).

Alle informatie in de velden die geen allergene stoffen zijn, worden vervangen door een Niets

( CHR(13)+CHR(10) (=een Enter), Allergene stoffen, een dubbele punt en alle letters van het alfabet die geen woord vormen die in de lijst staan.

Je krijgt dan een lange rij met nummers.


Met SubStr( ) worden vervolgens 2 tekens eruit gehaald, bij AllergenenNR1 vanaf positie 1, AllergenenNR2 vanaf positie 3, etc. en met Val wordt er een nummerieke waarde van gemaakt, die we verder in het rapport kunnen gebruiken.


In de afbeelding kunnen we dan de volgende formule gebruiken:


iif(

AllergenenNR1=01 , 

"C:\Program Files\Bake-it\Afbeeldingen\AllergenenIconenZW\01-Gluten.png",

iif(

AllergenenNR1=02 , 

"C:\Program Files\Bake-it\Afbeeldingen\AllergenenIconenZW\02-Schaaldieren.png",

iif(

AllergenenNR1=03 , 

"C:\Program Files\Bake-it\Afbeeldingen\AllergenenIconenZW\03-Ei.png",

iif(

AllergenenNR1=04 , 

"C:\Program Files\Bake-it\Afbeeldingen\AllergenenIconenZW\04-Vis.png",

iif(

AllergenenNR1=05 , 

"C:\Program Files\Bake-it\Afbeeldingen\AllergenenIconenZW\05-Pinda.png",

iif(

AllergenenNR1=06 , 

"C:\Program Files\Bake-it\Afbeeldingen\AllergenenIconenZW\06-Soja.png",

iif(

AllergenenNR1=07 , 

"C:\Program Files\Bake-it\Afbeeldingen\AllergenenIconenZW\07-Melk.png",

iif(

AllergenenNR1=08 , 

"C:\Program Files\Bake-it\Afbeeldingen\AllergenenIconenZW\08-Noten.png",

iif(

AllergenenNR1=09 , 

"C:\Program Files\Bake-it\Afbeeldingen\AllergenenIconenZW\09-Selderij.png",

iif(

AllergenenNR1=10 , 

"C:\Program Files\Bake-it\Afbeeldingen\AllergenenIconenZW\10-Mosterd.png",

iif(

AllergenenNR1=11 , 

"C:\Program Files\Bake-it\Afbeeldingen\AllergenenIconenZW\11-Sesam.png",

iif(

AllergenenNR1=12 , 

"C:\Program Files\Bake-it\Afbeeldingen\AllergenenIconenZW\12-Sulfiet.png",

iif(

AllergenenNR1=13 , 

"C:\Program Files\Bake-it\Afbeeldingen\AllergenenIconenZW\13-Lupine.png",

iif(

AllergenenNR1=14 , 

"C:\Program Files\Bake-it\Afbeeldingen\AllergenenIconenZW\14-Weekdieren.png",

"")


LET OP: ALS JE DE AFBEELDING OPENT, DAN SCHIET DE INSTELLING TERUG NAAR "Directly from file".




Dat is een bug in Label-it.

Open de afbeelding instelling opnieuw en zet de instelling weer goed.

Dan wordt hij wel weer onthouden



Overzicht van alle benodigde formules:


(LET OP: als de klant geen gebruik maakt van Calc-it, maar de allergenen handmatig invult in de artikelkaart, tabblad Etiket, veld Allergenen, dan moeten er andere variabelen gebruikt worden. Deze staan onderaan deze solution)


AllergenenNR1


Val(

SubStr( 

StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(

StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(  

StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(

StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(

StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(

StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(

StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(StrTran(


iif( Recepten.ReceptGoedgekeurdEtiketten = .T. , Upper(Recepten.Notitie_Allergeen) , 

upper(Alltrim(Artikelen.Etiket_Allergenen_Handmatig)))


, CHR(13)+CHR(10) , "")

, "'S","")

, "TARWE" , "")

, "ROGGE" , "")

, "GERST" , "")

, "HAVER" , "")

, "SPELT" , "")

, "KAMUT" , "")

, "AMANDELEN" , "")

, "HAZELNOTEN" , "")

, "WALNOTEN" , "")

, "CASHEWNOTEN" , "")

, "PECANNOTEN" , "")

, "PISTACHENOTEN" , "")

, "MACADEMIANOTEN" , "")

, "LACTOSE" , "")

, "CACAO" , "")

, "GLUTAMAAT" , "")

, "KIPPENVLEES" , "")

, "KORIANDER" , "")

, "MAIS" , "")

, "PEULVRUCHTEN" , "")

, "RUNDVLEES" , "")

, "VARKENSVLEES" , "")

, "WORTEL" , "")

, "ROGGE" , "")

, "Allergene stoffen" , "")

, ":" , "")

, "GLUTEN" , "01")

, "SCHAALDIEREN" , "02")

, "EI" , "03")

, "VIS" , "04")

, "PINDA" , "05")

, "SOJA" , "06")

, "MELK" , "07")

, "NOTEN" , "08")

, "SELDERIJ" , "09")

, "MOSTERD" , "10")

, "SESAM" , "11")

, "SULFIET" , "12")

, "LUPINE" , "13")

, "WEEKDIEREN" , "14")

,",","")," ","")


, "A" , "")

, "B" , "")

, "C" , "")

, "D" , "")

, "E" , "")

, "F" , "")

, "G" , "")

, "H" , "")

, "I" , "")

, "J" , "")

, "K" , "")

, "L" , "")

, "M" , "")

, "N" , "")

, "O" , "")

, "P" , "")

, "Q" , "")

, "R" , "")

, "S" , "")

, "T" , "")

, "U" , "")

, "V" , "")

, "W" , "")

, "X" , "")

, "Y" , "")

, "Z" , "")


, 1 , 2 ))


AllergenenNR2


idem als AllergenenNR1

alleen de laatste regel is

,3,2))


AllergenenNR3


idem als AllergenenNR1

alleen de laatste regel is

,5,2))


AllergenenNR4


idem als AllergenenNR1

alleen de laatste regel is

,7,2))


AllergenenNR5


idem als AllergenenNR1

alleen de laatste regel is

,9,2))


AllergenenNR6


idem als AllergenenNR1

alleen de laatste regel is

,11,2))


in het bijgevoegde rapport "Prijskaart Allergeen" zijn de variabelen toegevoegd t/m AllergenenNR14 

(de andere rapporten zijn ouder en daarom niet aangevuld)


Afbeelding 1


iif(

AllergenenNR1=01 , 

"C:\Program Files\Bake-it\Afbeeldingen\AllergenenIconenZW\01-Gluten.png",

iif(

AllergenenNR1=02 , 

"C:\Program Files\Bake-it\Afbeeldingen\AllergenenIconenZW\02-Schaaldieren.png",

iif(

AllergenenNR1=03 , 

"C:\Program Files\Bake-it\Afbeeldingen\AllergenenIconenZW\03-Ei.png",

iif(

AllergenenNR1=04 , 

"C:\Program Files\Bake-it\Afbeeldingen\AllergenenIconenZW\04-Vis.png",

iif(

AllergenenNR1=05 , 

"C:\Program Files\Bake-it\Afbeeldingen\AllergenenIconenZW\05-Pinda.png",

iif(

AllergenenNR1=06 , 

"C:\Program Files\Bake-it\Afbeeldingen\AllergenenIconenZW\06-Soja.png",

iif(

AllergenenNR1=07 , 

"C:\Program Files\Bake-it\Afbeeldingen\AllergenenIconenZW\07-Melk.png",

iif(

AllergenenNR1=08 , 

"C:\Program Files\Bake-it\Afbeeldingen\AllergenenIconenZW\08-Noten.png",

iif(

AllergenenNR1=09 , 

"C:\Program Files\Bake-it\Afbeeldingen\AllergenenIconenZW\09-Selderij.png",

iif(

AllergenenNR1=10 , 

"C:\Program Files\Bake-it\Afbeeldingen\AllergenenIconenZW\10-Mosterd.png",

iif(

AllergenenNR1=11 , 

"C:\Program Files\Bake-it\Afbeeldingen\AllergenenIconenZW\11-Sesam.png",

iif(

AllergenenNR1=12 , 

"C:\Program Files\Bake-it\Afbeeldingen\AllergenenIconenZW\12-Sulfiet.png",

iif(

AllergenenNR1=13 , 

"C:\Program Files\Bake-it\Afbeeldingen\AllergenenIconenZW\13-Lupine.png",

iif(

AllergenenNR1=14 , 

"C:\Program Files\Bake-it\Afbeeldingen\AllergenenIconenZW\14-Weekdieren.png",

"")


Afbeelding 2

idem als Afbeelding 1, alleen moet de tekst AllergenenNR1 vervangen worden door Allergenen2


Afbeelding 3

idem als Afbeelding 1, alleen moet de tekst AllergenenNR1 vervangen worden door Allergenen3


Afbeelding 4

idem als Afbeelding 1, alleen moet de tekst AllergenenNR1 vervangen worden door Allergenen4


Afbeelding 5

idem als Afbeelding 1, alleen moet de tekst AllergenenNR1 vervangen worden door Allergenen5


Afbeelding 6

idem als Afbeelding 1, alleen moet de tekst AllergenenNR1 vervangen worden door Allergenen6