FJDOÐs 2@ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿd/XANIA Formular ©FJD Information Technologies AGôõÀöÀ÷ÀøNeues Formularùúûdü2ý2þdÿ XYZ[Š‹Œ ! „…†èGéêGFJDOÑ™!'Arial',0,0,0,-10,0,0,0,400,0,0,0!'Arial',0,0,0,-10,0,0,0,800,0,0,0!'Arial',0,0,0,-12,0,0,0,400,0,0,0!'Arial',0,0,0,-12,0,0,0,800,0,0,0!'Arial',0,0,0,-14,0,0,0,400,0,0,0!'Arial',0,0,0,-14,0,0,0,800,0,0,0!'Arial',0,0,0,-16,0,0,0,400,0,0,0 !'Arial',0,0,0,-16,0,0,0,800,0,0,0 !'Arial',0,0,0,-18,0,0,0,400,0,0,0 !'Arial',0,0,0,-18,0,0,0,800,0,0,0 !'Arial',0,0,0,-20,0,0,0,400,0,0,0 !'Arial',0,0,0,-20,0,0,0,800,0,0,0!'Arial',0,0,0,-24,0,0,0,400,0,0,0!'Arial',0,0,0,-24,0,0,0,800,0,0,0!'Arial',0,0,0,-30,0,0,0,800,0,0,0!'Arial',0,0,0,-30,0,0,0,400,0,0,0!'Arial',0,0,0,-20,0,0,0,800,0,1,0!'Arial',0,0,0,-20,0,0,0,400,0,1,0%'Arial',0,0,0,-16,0,900,900,400,0,0,0%'Arial',0,0,0,-12,0,900,900,400,0,0,0!'Arial',0,0,0,-16,0,0,0,800,1,0,0!'Arial',0,0,0,-16,0,0,0,800,0,1,0!'Arial',0,0,0,-16,0,0,0,800,0,0,1FJDOX§+,dewueweb3.reg-ufr.bayern.defijklÈ WEINPROBEÉÊ’‘OMNIôõFJDRSA2 - 512 Bit [1728]÷^FJDCONTAINER TEU^b—´FJDTEUINFOTYPE XCONTAINERCRETIME0X‘14082002_1458CREPROC ?×s[unknown]FRZTIME0X‘14082002_1458CERTSCERT1 N @ä¢d EHFÑ°á4Hl'!ѪgËþ·Éy ;1ØuÈœU“OÙP•Ì2@aÚâùâ¶ÄSïOŒâuá Ù~'÷ E @Á»UID  Œ1728CRETIME 0X‘14082002_1458KEYSIZE ³³512TYPE´þPUBLICCREPROG?è^FJD-RSA Keyserver 2.0ALGOx&ŒFJDRSA2OWNER ?ÑÚFJD Information Technologies AGCERTSIGMAüÆô1XYZ[\]^_`abcdefghijkFJDO»d† Za[Regierung von Unterfranken – Prüfstelle für Qualitätswein – Peterplatz 7, 97070 Würzburg‚FJDOi 0èPiAg‹ŒFJDO}:äSgaZutreffendes bitte ankreuzen‚FJDOi ÝìUdAg‹ŒFJDOTÕßV`AgFJDOTÞëVcAgFJDOTÞëVcAgFJDO‹øSga+und ausfüllen, Nichtzuteffendes streichen!‚FJDOŠdࡹa*Antrag auf Erteilung einer Prüfungsnummer‚FJDOi 0ènÈAg‹ŒFJDOŠ0éxa*Antrag auf Erteilung einer Prüfungsnummer‚FJDOT0è– AgFJDOqnæ¾Öa1. Antragsteller‚FJDOi dèÒrAg‹ŒFJDOTdèúAgFJDOTdè",AgFJDOTdèJTAgFJDOnÖÒæa!Name, Vorname, Firmenbezeichnung‚FJDOznÖúaStraße, Hs,-Nr., Ortsteil‚FJDOdÒ,"6aOrt‚FJDOTX茖AgFJDOgd&Yl__TPA1a‚FJDOgd&m€__TPA2a‚FJDOgd&‚•__TPA3a‚FJDOT²¼"KAgFJDOƒ²'a#Landwirtschaftliche Betriebsnummer‚FJDOdnÈ"6aPLZ‚FJDOhn´J^aTelefon‚FJDOT|†JsAgFJDOTXbJsAgFJDOd†&J^aFax‚FJDOfb J^aeMail‚FJDO€n|”a 2. Bezeichnung des Erzeugnisses‚FJDOTdn AgFJDOTÜæ¹AgFJDOTdè¸ÂAgFJDOTdèàêAgFJDOTàê¸áAgFJDOTàêà AgFJDOTÐÚà1AgFJDOmnȤa 2.1 Jahrgang‚FJDOlâ<¤a 2.2 Weinart‚FJDOi÷Q¨¼a Weißwein‚FJDOhƒÝ¨¼aRotwein‚FJDOh_¨¼aRotling‚FJDOm}ר¼a Schillerwein‚FJDOim¨¼a Roséwein‚FJDOkŸù¨¼a Weißherbst‚FJDO{nh¸Ìa2.3 Bestimmtes Anbaugebiet‚FJDOhÙÐäaFranken‚FJDO~÷ÓÐäaWürttemberg (nur Lkr. Lindau)‚FJDOlêä¸Ìa 2.4 Bereich‚FJDOlûUÐäa Mainviereck‚FJDOl}×Ðäa Maindreieck‚FJDOlmÐäa Steigerwald‚FJDOuŸùÃëaBayerischer Bodensee‚FJDOvn"àôa2.5 Gemeinde/Ortsteil‚FJDOiêDàôa 2.6 Lage‚FJDOpÚ\àôa2.7 Rebsorte(n)‚FJDOTàê1AgFJDOTêé0:AgFJDOTèò1AgFJDOqêla2.8 Reifeangaben‚FJDOiûÍ 4a Barrique‚FJDOƒn&>a#3. Beantragte Qualitätsbezeichnung‚FJDOi dè:bAg‹ŒFJDOi÷QRfa Kabinett‚FJDOTÜæ:cAgFJDO{âÒ:NaQualitätswein mit Prädikat‚FJDOrjâ:Na3.1 Qualitätswein‚FJDOiyÓRfa Spätlese‚FJDOhñKRfaAuslese‚FJDOn‡ëRfaBeerenauslese‚FJDOxwCfaTrocken- beerenauslese‚FJDOhŸRfaEiswein‚FJDOTøb‹AgFJDOTçñb‹AgFJDOTø芔AgFJDOhwzŽaClassic‚FJDOjŸzŽa Selection‚FJDOtn€˜a4. Lese der Trauben‚FJDOi d蔼Ag‹ŒFJDOnj┨a4.1 Zeitpunkt‚FJDOTÜ攽AgFJDOTÖà”½AgFJDOT¼Æ”½AgFJDOxâÜ”¨a4.2 Zustand der Trauben‚FJDO€Ü”¨a 4.3 Mostgewicht in Grad Oechsle‚FJDOˆÂ¨”¨a(4.4 Bocksbeutelfüllung *s. Ziffer 12‚FJDOc×;¬Àaja‚FJDOecǬÀanein‚FJDO“nôÚòa35. Gesamtmenge, für die die Prüfung beantragt wird‚FJDOi dèî>Ag‹ŒFJDOT¼ÆÆïAgFJDOTçñÆïAgFJDOT¼èÆÐAgFJDOt½éÆÚanur bei Fassprüfung‚FJDOj×;Þòa Fassprobe‚FJDOjcÇÞòa Füllprobe‚FJDOf€¨ÐäaLiter‚FJDOTdè AgFJDOdj~îa5.1‚FJDOw~ØîaAuf Flaschen abgefüllt‚FJDOTæðîAgFJDOThrîAgFJDOTêôîAgFJDOTlvîAgFJDOTîøîAgFJDOTpzîAgFJDOfìZîaDatum‚FJDOmnÜîa 5.2 Wein-Nr.‚FJDOjð^îa á 1 Liter‚FJDOmràîa á 0,75 Liter‚FJDOmôbîa á 0,25 Liter‚FJDOpvÚîasonstige Größen‚FJDOTêô?AgFJDOTîø?AgFJDOdj~*a5.3‚FJDO¯~ >aONicht auf Flaschen abgefüllt (Nur bei Teilfüllungen oder Faßproben ausfüllen)‚FJDOfð^*aLiter‚FJDOnôX*aBehältnis-Nr.‚FJDOƒnH`a#6. Zusammensetzung der Erzeugnisse‚FJDOi dè\„Ag‹ŒFJDO†jn\pa&6.1 Wurde das Erzeugnis verschnitten?‚FJDOeÙtˆaNein‚FJDOc)[tˆaJa‚FJDOThr\…AgFJDOvnr\pa6.2 Verschnittanteile‚FJDOÔïÙ>\atJahrgang, Lage, Rebsorte, Qualitätsstufe und Menge in Litern angeben, auch bei bezeichnungsunschädlichem Verschnitt‚FJDOTêô>]AgFJDOTçñ>]AgFJDOTêè>HAgFJDO„n˜°a$7. Besondere An- und Ausbauhinweise‚FJDOi dè¬ÔAg‹ŒFJDOpnèa8. Anreicherung‚FJDOi dèü$Ag‹ŒFJDOTêôü%AgFJDOxjnüa8.1 Natürlicher Alkohol‚FJDOeã $aGrad‚FJDOo—ñ$aGramm in Liter‚FJDOTpzü%AgFJDOdðüa8.2‚FJDOk^üa Ausmaß der‚FJDOo^aAnreicherung ‚FJDOp^&a(g / l Alkohol)‚FJDOc‘ëüaum‚FJDOd ;üaauf‚FJDOjvîüa 8.3 Datum‚FJDOTäî$CAgFJDOTçñ$CAgFJDOTäèBLAgFJDOm w(<a Umkehrosmose‚FJDOk‹ù%9a Vakuumver-‚FJDOi‹ù/Ca dampfung‚FJDOonð8Pa9. Entsäuerung‚FJDOi d@LtAg‹ŒFJDOc±dxaJa‚FJDOkrÌ8Pa 10. Süßung‚FJDOe3dxaNein‚FJDOi hèLtAg‹ŒFJDOŠÌÐ8Pa*(Wenn nicht zutreffend, bitte streichen.)‚FJDOnàL`a=10.1 Herkunft und Qualitätsgruppe des Süßmostes (Süßreserve)‚FJDOTäîLuAgFJDOTpzLuAgFJDOsêlL`a10.2 Menge (Liter)‚FJDOkväL`a 10.3 Datum‚FJDOtn~–a11. Weitere Angaben‚FJDOi dè’ºAg‹ŒFJDOŸj"’¦a?Wurde für denselben Wein schon einmal eine A.P.-Nr. beantragt?‚FJDOeÙª¾aNein‚FJDOyy-ª¾aJa, unter Prüfungsnummer‚FJDOT0:’»AgFJDOT`2– ( SYS_SCRIPTö_//============================== // Übersicht zu den Flagwerten: //============================== //0x0001 1 FLAG_PRINT / Drucken //0x0002 2 FLAG_LOCK //0x0004 4 FLAG_NOTAB //0x0008 8 FLAG_STICK //0x0010 16 FLAG_STUCK //0x0020 32 FLAG_NOBG // Kein Hintergrund //0x0040 64 FLAG_ON // Enable / Disable //0x0100 256 FLAG_PASSIVE //0x0200 512 FLAG_GLOBALIN //0x0400 1024 FLAG_GLOBALOUT //0x0800 2048 FLAG_GLOBALOUT //0x1000 4096 FLAG_CARRIER //0x2000 8192 FLAG_PRINTONLY //============================== // Formularfelder ( Objects ) //============================== runtime ObjectGetFlag(char *Objectname,long FlagMask,long *Flagvalue); runtime ObjectSetFlag(char *Objectname,long FlagMask,long Flagvalue); runtime ObjectGetData (char *Feldname, char *Inhalt,long maxlen); runtime ObjectSetData (char *Feldname, char *Inhalt); runtime ObjectGetAttribute(char *AttributName,char *FeldName,char *Inhalt,long maxlen); runtime ObjectSetAttribute(char *AttributName,char *FeldName,char *Inhalt); //============================== // Formularseiten (Pages)a //============================== runtime PageInc(); runtime PageDec(); runtime PageSet(long ZeroBasedPageNum); //============================== // Hilfsfunktionen //============================== runtime AttributeGetData(char *Attributname, char *Inhalt,long maxlen); runtime AttributeSetData(char *Attributname, char *Inhalt); runtime StringGetAt(char *sourcebuffer,long ZeroBasedCharPos,long len,char*targetbuffer); runtime StringSetAt(char *targetbuffer,long maxlen,long ZeroBasedCharPos,char*sourcebuffer); runtime itoa(long intvalue,char *targetbuffer); runtime atoi(char *targetbuffer,long *intvalue); runtime strcpy(char *targetbuffer,char *sourcebuffer); runtime strcat(char *targetbuffer,char *sourcebuffer); // Achtung verhält sich analog zur Ansi C Funktion von strcmp() ... // ==> bei Gleichheit steht in nach dem Aufruf der Wert 0 (Strings unterscheiden sich nicht) runtime strcmp(char *buffer1,char *buffer2,long *pDelta); runtime CharGetAt(char *source, long Pos, char *target); runtime CharSetAt(char *target, long Pos, char *source); //=================================== // Interaktion mit dem Formular-USER //=================================== runtime Beep(long LaengeInMilliSec,long FrequenzInHz); runtime MessageAssert(char *Message,long AssertionValue); runtime ParseEntry(char *src, long nr, char *breaker, char *dest, long maxlen, long *pSuccess); runtime ConfigSetValue(char *Name, char *Inhalt, char *IniFileName); runtime strlen(char *buffer, long *result); runtime replace(char *szContent, long maxlen, char *szForm, char *szTo); runtime TimeGetStamp(char *buffer,long maxlen, long Mode); void GetRebsorte(); void GetRebsorte() { char buf_data[50000]; //genügend Speicherplatz für alle Gemeinde und Lagendaten char buf_string[256]; //Speicherplatz für einen String char buf_token[50]; //enthält nur den Gemeindenamen oder Lagennamen char buf_list[10000]; //Speicher für Gemeinde oder Lagenliste char termination[10]; //Speicher dient als Template für \r\n long success = 1; //Returnwert von Funktionen long backvalue= 0; //Returnwert von Funktionen long ctr = 0; ObjectGetData("REBSORTEN",buf_data, 50000); strcpy(buf_list, ""); strcat(termination, "\n"); while(success == 1) { //Parse buf_data nach den Rebsorten ParseEntry(buf_data, ctr, termination, buf_string, 256, &success); //MessageAssert(buf_string, 0); if(success == 1) { ParseEntry(buf_string, 0, ";", buf_token , 50, &backvalue); //wenn Rebsorte gefunden wurde baue String für DD-Menü zusammen strcat(buf_list, buf_token); //Rebsorte strcat(buf_list, "$"); //Rebsorte$ strcat(buf_list, buf_token); //Rebsorte$Rebsorte strcat(buf_list, "@"); //Rebsorte$Rebsorte@ ctr = ctr + 1; } else{} } ObjectSetAttribute("DROPDOWN_OPTIONS","REBSORTE_22", buf_list); } //============================================================================================== // SysOnFormLoad() // ... wird vom System aufgerufen bevor das Formular zum ersten Mal abgezeigt wird-. //============================================================================================== void SysOnFormLoad() { char buf_data[50000]; //genügend Speicherplatz für alle Gemeinde und Lagendaten char buf_string[256]; //Speicherplatz für einen String char buf_token[50]; //enthält nur den Gemeindenamen oder Lagennamen char buf_list[10000]; //Speicher für Gemeinde oder Lagenliste char buf_list2[10000]; //Speicher für Gemeinde oder Lagenliste char termination[10]; //Speicher dient als Template für \r\n long success = 1; //Returnwert von Funktionen long backvalue= 0; //Returnwert von Funktionen long ctr = 0; ObjectGetData("LAGEN",buf_data, 50000); strcpy(buf_list, ""); strcat(termination, "\n"); while(success == 1) { //Parse buf_data nach den Gemeindenamen ParseEntry(buf_data, ctr, termination, buf_string, 256, &success); if(success == 1) { ParseEntry(buf_string, 0, ";", buf_token , 50, &backvalue); //wenn Gemeindename gefunden wurde baue String für DD-Menü zusammen strcat(buf_list, buf_token); //Gemeindename strcat(buf_list, "$"); //Gemeindename$ strcat(buf_list, buf_token); //Gemeindename$Gemeindename strcat(buf_list, "@"); //Gemeindename$Gemeindename@ ctr = ctr + 1; } else { } } ObjectSetAttribute("DROPDOWN_OPTIONS","GEMEINDE_2", buf_list); ObjectGetData("REBSORTEN",buf_data, 50000); strcpy(buf_list2, ""); success = 1; ctr= 0; while(success == 1) { //Parse buf_data nach den Rebsorten ParseEntry(buf_data, ctr, termination, buf_string, 256, &success); //MessageAssert(buf_string, 0); if(success == 1) { ParseEntry(buf_string, 0, ";", buf_token , 50, &backvalue); //wenn Rebsorte gefunden wurde baue String für DD-Menü zusammen strcat(buf_list2, buf_token); //Rebsorte strcat(buf_list2, "$"); //Rebsorte$ strcat(buf_list2, buf_token); //Rebsorte$Rebsorte strcat(buf_list2, "@"); //Rebsorte$Rebsorte@ ctr = ctr + 1; } else{} } ObjectSetAttribute("DROPDOWN_OPTIONS","REBSORTE_21", buf_list2); ObjectSetAttribute("DROPDOWN_OPTIONS","REBSORTE_22", buf_list2); ObjectSetFlag("REBSORTE_22", 64, 0); // schreibe das akutelle Jahr 2stellig in die Prüfungsnummer TimeGetStamp(buf_token,50, 5); strcat(buf_token, "."); strcat(buf_token, "."); strcpy(termination, ""); strcat(termination, "."); ParseEntry(buf_token, 2,termination, buf_string, 256, &success); //Nachfolgendes Objekt wurde auskommentiert, da Vorbelegung mit dem laufenden Jahr nicht sinnvoll erscheint (Wendorff, Gebhardt 18.03.04) //ObjectSetData("JAHR", buf_string); } //============================================================================================== // SysOnFormSave() // ...wird vom System aufgerufen bevor das Formular abgespeichert wird. // In Abhängigkeit vom zurückgegebenen Wert in wird der Abspeichervorgang // anschliessend fortgesetzt ,oder unterbrochen-. //============================================================================================== void SysOnFormSave(long *pSuccess) { char value[50]; long erg = 0; ObjectGetData("GEMEINDE_2", value, 50); strcmp(value, "", &erg); if(erg == 0) { MessageAssert("Bitte wählen Sie eine Gemeinde/Ortsteil aus.", 0); *pSuccess=0; } else { erg = 0; ObjectGetData("LAGE_2", value, 50); strcmp(value, "", &erg); if(erg == 0) { MessageAssert("Bitte wählen Sie eine Lage aus.", 0); *pSuccess=0; } else { *pSuccess=1; } } } void SysOnFormSend(long *pSuccess) { char value[50]; char store[150]; long erg = 0; long ctr = 0; char help1[3]; long inthelp = 0; //prüfe weinart ObjectGetData("WEIßWEIN_2", help1, 50); erg = 0; strcmp(help1, "1", &erg); if(erg == 0){ctr = ctr+1;}else{} ObjectGetData("ROTWEIN_2", help1, 50); erg = 0; strcmp(help1, "1", &erg); if(erg == 0){ctr = ctr+1;}else{} ObjectGetData("ROTLING_2", help1, 50); erg = 0; strcmp(help1, "1", &erg); if(erg == 0){ctr = ctr+1;}else{} ObjectGetData("SCHILLERWEIN_2", help1, 50); erg = 0; strcmp(help1, "1", &erg); if(erg == 0){ctr = ctr+1;}else{} ObjectGetData("ROSE_2", help1, 50); erg = 0; strcmp(help1, "1", &erg); if(erg == 0){ctr = ctr+1;}else{} ObjectGetData("WEISSHERBST_2", help1, 50); erg = 0; strcmp(help1, "1", &erg); if(erg == 0){ctr = ctr+1;}else{} //Blanc de Noirs berücksichtigt, 23.4.08 ObjectGetData("BLANCDENOIRS_2", help1, 50); erg = 0; strcmp(help1, "1", &erg); if(erg == 0){ctr = ctr+1;}else{} if(ctr < 1) { MessageAssert("Bitte wählen Sie eine Weinart aus. (Punkt 2.2 des Antrags)", 0); *pSuccess = 0; } else { if(ctr > 1) { MessageAssert("Bitte wählen Sie maximal 1 Weinart aus. (Punkt 2.2 des Antrags)", 0); *pSuccess = 0; } else {*pSuccess = 1;} } //prüfe anbaugebiet ctr = 0; if(pSuccess == 1) { ObjectGetData("GEBIET_FRANKEN_2", help1, 50); erg = 1; strcmp(help1, "1", &erg); if(erg == 0){ctr = ctr+1;}else{} ObjectGetData("GEBIET_WUERTTEMBERG_2", help1, 50); erg = 1; strcmp(help1, "1", &erg); if(erg == 0){ctr = ctr+1;}else{} if(ctr < 1) { MessageAssert("Bitte wählen Sie ein Anbaugebiet aus. (Punkt 2.3 des Antrags)", 0); *pSuccess = 0; } else { if(ctr > 1) { MessageAssert("Bitte wählen Sie maximal 1 Anbaugebiet aus. (Punkt 2.3 des Antrags)", 0); *pSuccess = 0; } else {*pSuccess = 1;} } } else {} //prüfe anbaugebiet ctr = 0; if(pSuccess == 1) { ObjectGetData("BEREICH_MAINVIERECK_2", help1, 50); erg = 1; strcmp(help1, "1", &erg); if(erg == 0){ctr = ctr+1;}else{} ObjectGetData("BEREICH_MAINDREIECK_2", help1, 50); erg = 1; strcmp(help1, "1", &erg); if(erg == 0){ctr = ctr+1;}else{} ObjectGetData("BEREICH_STEIGERWALD_2", help1, 50); erg = 1; strcmp(help1, "1", &erg); if(erg == 0){ctr = ctr+1;}else{} ObjectGetData("BEREICH_BODENSEE_2", help1, 50); erg = 1; strcmp(help1, "1", &erg); if(erg == 0){ctr = ctr+1;}else{} if(ctr < 1) { MessageAssert("Bitte wählen Sie einen Bereich aus. (Punkt 2.4 des Antrags)", 0); *pSuccess = 0; } else { if(ctr > 1) { MessageAssert("Bitte wählen Sie maximal 1 Bereich aus. (Punkt 2.4 des Antrags)", 0); *pSuccess = 0; } else {*pSuccess = 1;} } } else {} //prüfe gemeinde und ortsteil ctr = 0; if(pSuccess == 1) { ObjectGetData("GEMEINDE_2", value, 50); strcmp(value, "", &erg); if(erg == 0) { MessageAssert("Bitte wählen Sie eine Gemeinde / Ortsteil aus. (Punkt 2.5 des Antrags)", 0); *pSuccess = 0; } else { erg = 0; ObjectGetData("LAGE_2", value, 50); strcmp(value, "", &erg); if(erg == 0) { MessageAssert("Bitte wählen Sie eine Lage aus. (Punkt 2.6 des Antrags)", 0); *pSuccess = 0; } else { *pSuccess = 1; } } } else {} //prüfe Qualitätswein ctr = 0; if(pSuccess == 1) { ObjectGetData("QUALITAETSWEIN_3", help1, 50); erg = 1; strcmp(help1, "1", &erg); if(erg == 0){ctr = ctr+1;}else{} ObjectGetData("WEIN_KABINETT_3", help1, 50); erg = 1; strcmp(help1, "1", &erg); if(erg == 0){ctr = ctr+1;}else{} ObjectGetData("WEIN_SPAETLESE_3", help1, 50); erg = 1; strcmp(help1, "1", &erg); if(erg == 0){ctr = ctr+1;}else{} ObjectGetData("WEIN_AUSLESE_3", help1, 50); erg = 1; strcmp(help1, "1", &erg); if(erg == 0){ctr = ctr+1;}else{} ObjectGetData("WEIN_BEEREN_3", help1, 50); erg = 1; strcmp(help1, "1", &erg); if(erg == 0){ctr = ctr+1;}else{} ObjectGetData("WEIN_BEEREN_TROCKEN_3", help1, 50); erg = 1; strcmp(help1, "1", &erg); if(erg == 0){ctr = ctr+1;}else{} ObjectGetData("WEIN_EIS_3", help1, 50); erg = 1; strcmp(help1, "1", &erg); if(erg == 0){ctr = ctr+1;}else{} if(ctr < 1) { MessageAssert("Bitte wählen Sie eine Qualitätsbezeichnung aus. (Punkt 3.1 des Antrags)", 0); *pSuccess = 0; } else { if(ctr > 1) { MessageAssert("Bitte wählen Sie maximal 1 Qualitätsbezeichnung aus. (Punkt 3.1 des Antrags)", 0); *pSuccess = 0; } else {*pSuccess = 1;} } } else {} // überprüfe ob Gewicht korrekt nach format XXX.YY // neu: Gewicht muß ganzzahlig eingegeben werden und darf max. 3-stellig sein // 13.10.05, gdt ctr = 0; if(pSuccess == 1) { ObjectGetData("GEWICHT_4", value, 50); strlen(value, &erg); if(erg > 3) { MessageAssert("Die Gewichtsangabe darf max. 3-stellig sein! (Punkt 4.3 des Antrags)", 0); *pSuccess = 0; } else{*pSuccess = 1;} } else{} //prüfe Bocksbeutel ctr = 0; if(pSuccess == 1) { ObjectGetData("BOCKSBEUTEL_JA_4", help1, 50); erg = 1; strcmp(help1, "1", &erg); if(erg == 0){ctr = ctr+1;}else{} ObjectGetData("BOCKSBEUTEL_NEIN_4", help1, 50); erg = 1; strcmp(help1, "1", &erg); if(erg == 0){ctr = ctr+1;}else{} if(ctr < 1) { MessageAssert("Bitte geben Sie an, ob es sich um einen Bocksbeutel handelt. (Punkt 4.4 des Antrags)", 0); *pSuccess = 0; } else { if(ctr > 1) { MessageAssert("Widersprüchliche Angaben im Formular. Es darf maximal 1 Wert ausgewählt werden (Punkt 4.4 des Antrags)", 0); *pSuccess = 0; } else {*pSuccess = 1;} } } else {} //prüfe Flaschenabfüllung ctr = 0; if(pSuccess == 1) { ObjectGetData("FLASCHEN_5", help1, 50); erg = 1; strcmp(help1, "1", &erg); if(erg == 0){ctr = ctr+1;}else{} ObjectGetData("KEINEFLASCHENFUELLUNG_5", help1, 50); erg = 1; strcmp(help1, "1", &erg); if(erg == 0){ctr = ctr+1;}else{} if(ctr < 1) { MessageAssert("Bitte geben Sie die Art der Abfüllung des Weines an. (Punkt 5.1/5.3 des Antrags)", 0); *pSuccess = 0; } else {*pSuccess = 1;} } else {} //prüfe Verschnitt ctr = 0; if(pSuccess == 1) { ObjectGetData("VERSCHNITT_NEIN_6", help1, 50); erg = 1; strcmp(help1, "1", &erg); if(erg == 0){ctr = ctr+1;}else{} ObjectGetData("VERSCHNITT_JA_6", help1, 50); erg = 1; strcmp(help1, "1", &erg); if(erg == 0){ctr = ctr+1;}else{} if(ctr < 1) { MessageAssert("Bitte geben Sie an, ob das Erzeugnis verschnitten wurde. (Punkt 6.1 des Antrags)", 0); *pSuccess = 0; } else { if(ctr > 1) { MessageAssert("Widersprüchliche Angaben im Formular. Es darf maximal 1 Wert ausgewählt werden (Punkt 6.1 des Antrags)", 0); *pSuccess = 0; } else {*pSuccess = 1;} } } else {} // überprüfe ob im Feld UM_MENGE_8 in punkt 8.2 der maximal wert nicht überschritten ist ctr = 0; if(pSuccess == 1) { ObjectGetData("UM_MENGE_8", value, 50); strcmp(value, "", &erg); if(erg != 0) { atoi(value, &inthelp); if(inthelp > 28) { MessageAssert("Das Ausmaß der Anreicherung darf 28 g/l nicht übersteigen. (Punkt 8.2 des Antrags)", 0); *pSuccess = 0; } else{*pSuccess = 1;} } else{} } else{} // überprüfe ob Datum korrekt nach format tt.mm.yyyy ctr = 0; if(pSuccess == 1) { ObjectGetData("DATUM_8", value, 50); strlen(value, &erg); if(erg != 10 && erg != 0) { MessageAssert("Datumsangaben müssen folgendes Format aufweisen. TT.MM.YYYY (Punkt 8.3 des Antrags)", 0); *pSuccess = 0; } else{*pSuccess = 1;} } else{} //prüfe entsäuerung ctr = 0; if(pSuccess == 1) { ObjectGetData("ENTSAEUERUNG_JA_9", help1, 50); erg = 1; strcmp(help1, "1", &erg); if(erg == 0){ctr = ctr+1;}else{} ObjectGetData("ENTSAEUERUNG_NEIN_9", help1, 50); erg = 1; strcmp(help1, "1", &erg); if(erg == 0){ctr = ctr+1;}else{} if(ctr < 1) { MessageAssert("Bitte machen Sie Angaben zur Entsäuerung. (Punkt 9. des Antrags)", 0); *pSuccess = 0; } else { if(ctr > 1) { MessageAssert("Widersprüchliche Angaben im Formular. Es darf maximal 1 Wert ausgewählt werden (Punkt 9. des Antrags)", 0); *pSuccess = 0; } else {*pSuccess = 1;} } } else {} // überprüfe ob Datum korrekt nach format tt.mm.yyyy ctr = 0; if(pSuccess == 1) { ObjectGetData("DATUM_10", value, 50); strlen(value, &erg); if(erg != 10 && erg != 0) { MessageAssert("Datumsangaben müssen folgendes Format aufweisen. TT.MM.YYYY (Punkt 10.3 des Antrags)", 0); *pSuccess = 0; } else{*pSuccess = 1;} } else{} //prüfe prüfungsnummer ctr = 0; if(pSuccess == 1) { ObjectGetData("NUMMER_NEIN_11", help1, 50); erg = 1; strcmp(help1, "1", &erg); if(erg == 0){ctr = ctr+1;}else{} ObjectGetData("NUMMER_JA_11", help1, 50); erg = 1; strcmp(help1, "1", &erg); if(erg == 0){ctr = ctr+1;}else{} if(ctr < 1) { MessageAssert("Bitte machen Sie Angaben zur Prüfungsnummer. (Punkt 11. des Antrags)", 0); *pSuccess = 0; } else { if(ctr > 1) { MessageAssert("Widersprüchliche Angaben im Formular. Es darf maximal 1 Wert ausgewählt werden (Punkt 11. des Antrags)", 0); *pSuccess = 0; } else {*pSuccess = 1;} } } else {} //prüfe punkt 12 //ctr = 0; //if(pSuccess == 1) { // ObjectGetData("JA_12", help1, 50); // erg = 1; strcmp(help1, "1", &erg); if(erg == 0){ctr = ctr+1;}else{} // ObjectGetData("NEIN_12", help1, 50); // erg = 1; strcmp(help1, "1", &erg); if(erg == 0){ctr = ctr+1;}else{} // if(ctr < 1) { // MessageAssert("Bitte machen Sie Angaben zu Punkt 12. des Antrags)", 0); // *pSuccess = 0; // } // else { // if(ctr > 1) { // MessageAssert("Widersprüchliche Angaben im Formular. Es darf maximal 1 Wert ausgewählt werden (Punkt 12. des Antrags)", 0); // *pSuccess = 0; // } // else // {*pSuccess = 1;} // } //} //else //{} //wenn alle plausis erfolgreich waren, dann gib erklärungstext aus if(pSuccess == 1){ strcat(store, "ACHTUNG Bitte beachten Sie folgende Punkte:\r\n\r\nFür die weitere Bearbeitung wird eine ausgedruckte und unterschriebene Version Ihres Antrags benötigt. Bitte drucken Sie Ihren Antrag nach dem Versand aus und geben Ihn unterschrieben ab.\r\n\r\nIhre Weinprüfstelle."); MessageAssert(store, 0); } else{} } void SysOnFormPrint(long *pSuccess) { char value[50]; long erg = 0; ObjectGetData("GEMEINDE_2", value, 50); strcmp(value, "", &erg); if(erg == 0) { MessageAssert("Bitte wählen Sie eine Gemeinde / Ortsteil aus.", 0); *pSuccess=0; } else { erg = 0; ObjectGetData("LAGE_2", value, 50); strcmp(value, "", &erg); if(erg == 0) { MessageAssert("Bitte wählen Sie eine Lage aus.", 0); *pSuccess=0; } else { *pSuccess=1; } } } void SysOnChanged(char *ObjektName) { char buf_gemeinde[50]; char buf_data[50000]; //genügend Speicherplatz für alle Gemeinde und Lagendaten char buf_string[256]; //Speicherplatz für einen String char buf_token[50]; //enthält nur den Gemeindenamen oder Lagennamen char buf_list[2000]; //Speicher für Gemeinde oder Lagenliste char termination[10]; //Speicher dient als Template für \r\n char escapesigns[10]; long success = 1; //Returnwert von Funktionen long backvalue= 0; //Returnwert von Funktionen long ctr = 0; long isgemeinde = 0; long len = 0; strcpy(buf_gemeinde, ""); strcpy(buf_list, ""); strcat(termination, "\n"); //leere das DD-Menü ObjectSetAttribute("DROPDOWN_OPTIONS","LAGE_2", ""); ObjectSetData("LAGE_2", ""); //lade ausgewählten Gemeindenamen ObjectGetData("GEMEINDE_2", buf_gemeinde, 50); //lade komplette Lagenliste ObjectGetData("LAGEN",buf_data, 50000); //ersetze escapezeichen innerhalb des ganzen buf_data strlen(buf_data, &len); strcat(escapesigns, "\r\n"); replace(buf_data, len, escapesigns, termination); strcat(escapesigns, "\n\r"); replace(buf_data, len, escapesigns, termination); //solange parseentry noch ein ergebnis zurückliefert while(success != 0) { //lade zeilenweise aus der kompletten gemeindenamen und lagenliste ParseEntry(buf_data, ctr, termination, buf_string, 256, &success); if(success != 0) { //lade gemeindenamen aus der zeile ParseEntry(buf_string, 0, ";", buf_token , 50, &backvalue); strcmp(buf_gemeinde, buf_token, &isgemeinde); //wenn gemeinde in der zeile gefunden wurde if(isgemeinde == 0) { // setze den Wert ohne Angabe für jede Gemeinde in die Lagen DD strcat(buf_list, "OHNE ANGABEN$OHNE ANGABEN@"); ctr = 1; //der counter wird auf das 2te trennzeichen gesetzt (1 Lage) //solange noch eine lage in der eingelesenen zeile gefunden wird while(success != 0) { ParseEntry(buf_string, ctr, ";", buf_token, 256, &success); strcmp(buf_token, "", &backvalue); //überprüfe ob keine trennzeichen hintereinander kommen if(backvalue != 0) { backvalue = 0; //setze backvalue auf einen unkritischen wert strcmp(buf_token, termination, &backvalue); //überprüfe das kein \n in buf_token steht if(backvalue != 0) { //wenn Lagenname gefunden wurde baue String für DD-Menü zusammen strcat(buf_list, buf_token); //Lagenname strcat(buf_list, "$"); //Lagenname$ strcat(buf_list, buf_token); //Lagenname$Lagenname strcat(buf_list, "@"); //Lagenname$Lagenname@ } else { } } else { } ctr = ctr + 1; } success = 0; //Gemeindename und alle Lagen gefunden abbruch der Schleife und hole nächsten String } else { } ctr = ctr + 1; } else { } } ObjectSetAttribute("DROPDOWN_OPTIONS","LAGE_2", buf_list); } void SysOnClicked(char *ObjektName) { long erg = 1; long erg2 = 1; char value[10]; // wenn rotling, dann 2 dd-menü aktivieren ObjectGetData("ROTLING_2", value, 10); erg = 1; strcmp(value, "1", &erg); if(erg == 0) { ObjectSetFlag("REBSORTE_22", 64, 1); GetRebsorte(); } else { ObjectSetData("REBSORTE_22", ""); ObjectSetFlag("REBSORTE_22", 64, 0); } // wenn qualitätswein angekreuzt wird, dann messagebox strcmp(ObjektName, "WEIN_KABINETT_3", &erg); ObjectGetData("WEIN_KABINETT_3", value, 10); strcmp(value, "1", &erg2); if(erg == 0 && erg2 == 0) {MessageAssert("Der zur Süßung verwendete Traubenmost muss der gleichen Prädikatsstufe entsprechen wie der zu süßende Wein.", 0);}else {} strcmp(ObjektName, "WEIN_SPAETLESE_3", &erg); ObjectGetData("WEIN_SPAETLESE_3", value, 10); strcmp(value, "1", &erg2); if(erg == 0 && erg2 == 0) {MessageAssert("Der zur Süßung verwendete Traubenmost muss der gleichen Prädikatsstufe entsprechen wie der zu süßende Wein.", 0);}else {} strcmp(ObjektName, "WEIN_AUSLESE_3", &erg); ObjectGetData("WEIN_AUSLESE_3", value, 10); strcmp(value, "1", &erg2); if(erg == 0 && erg2 == 0) {MessageAssert("Der zur Süßung verwendete Traubenmost muss der gleichen Prädikatsstufe entsprechen wie der zu süßende Wein.", 0);}else {} strcmp(ObjektName, "WEIN_BEEREN_3", &erg); ObjectGetData("WEIN_BEEREN_3", value, 10); strcmp(value, "1", &erg2); if(erg == 0 && erg2 == 0) {MessageAssert("Der zur Süßung verwendete Traubenmost muss der gleichen Prädikatsstufe entsprechen wie der zu süßende Wein.", 0);}else {} strcmp(ObjektName, "WEIN_BEEREN_TROCKEN_3", &erg); ObjectGetData("WEIN_BEEREN_TROCKEN_3", value, 10); strcmp(value, "1", &erg2); if(erg == 0 && erg2 == 0) {MessageAssert("Der zur Süßung verwendete Traubenmost muss der gleichen Prädikatsstufe entsprechen wie der zu süßende Wein.", 0);}else {} strcmp(ObjektName, "WEIN_EIS_3", &erg); ObjectGetData("WEIN_EIS_3", value, 10); strcmp(value, "1", &erg2); if(erg == 0 && erg2 == 0) {MessageAssert("Der zur Süßung verwendete Traubenmost muss der gleichen Prädikatsstufe entsprechen wie der zu süßende Wein.", 0);}else {} // wenn Bocksbeutel angekreuzt wird // neu: für Bocksbeutel muß das Mostgew. mind. 72 anstelle bisher 70° Oechsle betragen // 13.10.2005, dg erg = 1; strcmp(ObjektName, "BOCKSBEUTEL_JA_4", &erg); if(erg == 0) { ObjectGetData("BOCKSBEUTEL_JA_4", value, 10); strcmp(value, "1", &erg); if(erg == 0) {MessageAssert("Beachten Sie bitte, dass bei Bocksbeutelfüllung das Mostgewicht mindestens 72° Oechsle betragen muss!", 0);} else{} } else{} } FJDOddxÄÜa12.‚FJDOxèÄKa¶Erklärung: Das vorstehende Erzeugnis wurde nach geltendem Recht hergestellt und bezeichnet. Die vorgeschriebenen Meldungen nach den EG-Bestimmungen und die Eintragungen in das Herbstbuch sind erfolgt. Die zur beiligenden Analysenerstattung vorgestellte Probe ist mit den beigegebenen Proben identisch. Die Angaben sind in der Weinbuchführung eingetragen. Das vorliegende Muster ist eine Durchnschnittsprobe und entspricht der tatsächlichen Zusammensetzung und der Beschaffenheit der betreffenden Abfüllung der Partie. Die vorstehenden Angaben erfolgen nach bestem Wissen und Gewissen. Der zuständigen Behörde wird zur Überprüfung Einblick in die Weinbuchführung gewährt.Erhobene Daten können in Datenverarbeitungsanlagen gespeichert und für das Prüfungsverfahren verarbeitet werden. * Bei Bocksbeutelfüllungen wird bestätigt, dass die Weine von Flächen stammen, auf denen der zulässige Hektarhöchstertrag um höchstens 10 v. H. überschritten wird.‚FJDOkdhPda Ort, Datum‚FJDO€X\Pda Unterschrift des Antragstellers‚FJDO ´ GEMEINDE_2AnÛïfghÇei|‚‘ŠœFJDO °LAGE_2AêÌïfghÇei|‚‘ŠœFJDOk+–  LAGENA+OHNE ANGABEN; Abtswind;Altenberg/Abtswind;Schild; Adelshofen/Tauberzell;Hasennestle/Adelshofen;Hasennestle/Tauberzell; Albertshofen;Herrgottsweg;Hofrat; Alzenau;Aloisengarten;; Alzenau/Hörstein;Abtsberg;Reuschberg; Alzenau/Michelbach;Aloisengarten;Apostelgarten;Steinberg Alzenau/Wasserlos;Luhmännchen;Schloßberg/Wasserlos; Arnstein;Bischofsberg/Arnstein;Roßtal; Arnstein/Halsheim;Bischofsberg/Arnstein;; Arnstein/Heugrumbach;Bischofsberg/Arnstein;; Arnstein/Müdesheim;Bischofsberg/Arnstein;; Arnstein/Reuchelheim;Bischofsberg/Arnstein;; Aschaffenburg;Badberg;Godelsberg;Pompejaner Aschaffenburg/Obernau;Sanderberg;; Aub;Lämmerberg/Aub;; Bad Windsheim/Berolzheim;Rosenberg/Bad Windsheim;; Bad Windsheim/Ickelheim;Burgberg;Schloßberg/Bad Windsheim;Schloßberg/Ickelheim;;;;;;; Bad Windsheim/Külsheim;Burgberg;Rosenberg/Bad Windsheim;;;;;;;; Bad Windsheim/Humprechtsau;Burgberg;Rosenberg/Bad Windsheim;;;;;;;; Bad Windsheim/Rüdisbronn;Burgberg;Rosenberg/Bad Windsheim;;;;;;;; Bad Windsheim/Oberntief;Burgberg;Rosenberg/Bad Windsheim;Rosenberg/Oberntief;;;;;;; Bad Windsheim/Unterntief;Burgberg;Rosenberg/Bad Windsheim;;;;;;;; Bad Windsheim/Wiebelsheim;Rosenberg/Bad Windsheim;;;;;;;;; Bamberg;Alter Graben;;;;;;;;; Bergtheim;Harfenspie;;;;;;;;; Bodolz;Seegarten;;;;;;;;; Buchbrunn;Heißer Stein;Hofrat;;;;;;;; Bürgstadt;Centgrafenberg;Mainhölle;;;;;;;; Castell;Bausch;Feuerbach;Herrenberg/Castell;Hohnart;Kirchberg/Castell;Kugelspiel;Reitsteig;Schild;Schloßberg/Castell;Trautberg Castell/Greuth;Bastel;Schild;;;;;;;; Dettelbach;Berg-Rondell;Sonnenleite/Dettelbach;;;;;;;; Dettelbach/Bibergau;Honigberg;;;;;;;;; Dettelbach/Brück;Honigberg;Sonnenleite/Dettelbach;;; Dettelbach/Neusetz;Fürstenberg;Kirchberg/Volkach;;; Dettelbach/Neuses a. Berg;Glatzen/Dettelbach;Kirchberg/Volkach;;; Dettellbach/Schnepfenbach;Honigberg;Sonnenleite/Dettelbach;;; Dietersheim/Dottenheim;Burg Hoheneck;;;; Dietersheim/Walddachsbach;Burgberg;Burg Hoheneck;;; Dingolshausen;Köhler;Zabelstein;;; Dingolshausen/Bischwind;Köhler;;;; Donnersdorf/Falkenstein;Falkenberg/Falkenstein;Zabelstein;;; Donnersdorf/Traustadt;Falkenberg/Donnersdorf;Falkenberg/Traustadt;Zabelstein;; Dorfprozelten;Predigtstuhl;;;; Ebelsbach;Nonnenberg;;;; Ebelsbach/Steinbach;Kapellenberg/Zeil;Nonnenberg;;; Eibelstadt;Kapellenberg/Eibelstadt;Mönchsleite;Ölspiel;Steinbach;Teufelstor Eichenbühl;Hoher Berg;;;; Eisenheim/Obereisenheim;Höll/Eisenheim;Kirchberg/Volkach;Höll/Obereisenheim; Eisenheim/Untereisenheim;Berg;Höll/Untereisenheim;Kirchberg/Volkach;Sonnenberg/Untereisenheim Elfershausen;Schloßberg/Elfershausen;;; Elfershausen/Engental;Burg;Schloßberg/Engenthal;; Elfershausen/Machtilshausen;Burg;Sommerleite;; Elfershausen/Trimberg;Burg;Schloßberg/Trimberg;; Elsenfeld/Rück;Jesuitenberg;Johannisberg/Elsenfeld;Schalk;Johannisberg/Rück Eltmann;Schloßleite;;; Ergersheim;Altenberg/Ergersheim;Fischer;; Erlabrunn;Ravensburg;Weinsteig;; Erlenbach bei Marktheidenfeld;Krähenschnabel;;; Erlenbach b Marktheidenfeld/Tiefental;Krähenschnabel;;; Erlenbach/Main;Hochberg;;; Euerdorf/Wirmsthal;Burg;Scheinberg;; Eußenheim;First;Roßtal;; Frankenwinheim;Kirchberg/Volkach;Rosenberg/Frankenwinheim;; Frickenhausen;Fischer;Kapellenberg/Frickenhausen;Markgraf Babenberg Fuchsstadt;Rubenhöll;; Gemünden/Adelsberg;Wernleite;; Gemünden/Main;Scherenberg;; Gerbrunn;Hummelberg;; Gerolzhofen;Arlesgarten;Köhler;Zabelstein Gössenheim;Homburg;Roßtal; Greußenheim;Geisberg;; Großheubach;Bischofsberg/Großheubach;; Großheubach/Engelberg;Klostergarten;; Großlangheim;Kiliansberg;Schloßberg/Rödelsee; Großostheim;Harstell;Heiligenthal;Reischklingeberg Großostheim/Pflaumheim;Pflaumheimer Weingarten;Großostheimer Weingarten; Großwallstadt;Lützeltalerberg;; Güntersleben;Ravensburg;Sommerstuhl; Hammelburg;Burg;Heroldsberg;Trautlestal Hammelburg/Feuerthal;Burg;Kreuz;;;; Hammelburg/Saaleck;Burg;Schloßberg/Saaleck;;;; Hammelburg/Westheim;Burg;Längberg;;;; Hammelburg/Westheim/Feuerthal;Altenberg/Westheim;;;;; Haßfurt/Prappach;Henneberg;;;;; Herbolzheim/Freimakung Osing;Burgberg;Rosenberg/Wiebelsheim;;;; Himmelstadt;Kelter;Roßtal;;;; Hösbach/Rottenberg;Gräfenstein;;;;; Iphofen;Burgweg;Domherr;Julius-Echter-Berg;Kalb;Kronsberg;Schloßberg/Rödelsee Iphofen/Possenheim;Burgweg;Mönchshütte;Mönchshütte;;; Ippesheim;Fischer;Herrschaftsberg/Ippesheim;;;; Ippesheim/Bullenheim;Fischer;Paradies/Ippesheim;Paradies/Bullenheim;;; Ipsheim;Burgberg;Burg Hoheneck;;;; Ipsheim/Kaubenheim;Burgberg;Burg Hoheneck;;;; Ipsheim/Weimersheim;Burgberg;Roter Berg;;;; Karlstadt;Im Stein;Roßtal;;;; Karlstadt/Gambach;Kalbenstein;Roßtal; Karlstadt/Karlburg;Roßtal;; Karlstadt/Laudenbach;Roßtal;Stein/Stetten; Karlstadt/Mühlbach;Fronberg/Karlstadt;Roßtal;Fronberg/Mühlbach Karlstadt/Stetten;Stein/Stetten;; Karsbach;Kreuzweg;; Kitzingen;Eselsberg/Kitzingen;Hofrat;Wilhelmsberg Kitzingen/Eherieder Mühle;Eherieder Berg;Hofrat; Kitzingen/Hoheim;Schloßberg/Rödelsee;; Kitzingen/Repperndorf;Hofrat;Kaiser Karl; Kitzingen/Sickershausen;Schloßberg/Rödelsee;Storchenbrünnle; Kleinlangheim;Schloßberg/Rödelsee;Wutschenberg; Klingenberg/Main;Einsiedel;Hochberg;Schloßberg/Klingenberg Klingenberg/Main/Röllfeld;Schloßberg/Klingenberg;; Knetzgau/Oberschwappach;Kapellenberg/Zeil;Sommertal; Knetzgau/Zell am Ebersberg;Schloßberg/Zell;; Kolitzheim/Lindach;Kirchberg/Volkach;Kreuzpfad; Kolitzheim/Stammheim;Eselsberg/Stammheim;Kirchberg/Volkach; Kolitzheim/Zeilitzheim;Heiligenberg;Kirchberg/Volkach; Königsberg i.Bay./Unfinden;Kinnleitenberg;; Kreuzwertheim;Kaffelstein;; Leinach/Oberleinach;Himmelberg;Ravensburg;Weinsteig Leinach/Unterleinach;Himmelberg;Ravensburg; Lindau;Seegarten;Spitalhalde; Mainbernheim;Schloßberg/Rödelsee;Dornberg; Mainstockheim;Hofrat;Hofstück;Honigberg Margetshöchheim;Bärental;; Markt Einersheim;Burgweg;Stüblein;Vogelsang Markt Nordheim;Fischer;Hohenkottenheim; Markt Nordheim/Ulsenheim;Fischer;Huttenberg/Markt Nordheim;Huttenberg/Ulsenheim Marktbreit;Hofrat;Sonnenberg/Marktbreit; Marktheidenfeld;Kreuzberg/Marktheidenfeld;; Martinsheim;Langenstein;; Michelau i.St.;Zabelstein;; Michelau i. St./Altmannsdorf;Zabelstein;; Michelau i. St./Hundelshausen;Zabelstein;; Michelau/Steigerw.;Vollburg;; Michelau/Steigerw.Altmannsdorf;Sonnenwinkel;; Miltenberg;Steingrübler;; Neubrunn/Böttigheim;Wurmberg;; Nonnenhorn;Seegarten;Seehalde;Sonnenbichl Nordheim/Main;Kirchberg/Volkach;Kreuzberg/Nordheim;Vögelein Obernbreit;Hofrat;Kanzel; Obernbreit/Unterhaid;Röthla;; Obernbreit/Staffelbach;Spitzelberg;; Oberschwarzach;Herrenberg/Oberschwarzach;Steige;Stollberg Oberschwarzach/Breitbach;Steige;; Oberschwarzach/Düttingsfeld;Herrenberg/Oberschwarzach;Steige; Oberschwarzach/Handthal;Steige;Stollberg;;;;; Oberschwarzach/Kammerforst;Steige;Teufel;;;;; Oberschwarzach/Mutzenroth;Dachs;Herrenberg/Oberschwarzach;Steige;;;; Oberschwarzach/Wiebelsberg;Dachs;Stollberg;;;;; Ochsenfurt/Kleinochsenfurt;Herrenberg/Ochsenfurt;Herrenberg/Kleinochsenfurt;;;;; Ochsenfurt/Neues am Berg;Glatzen/Neuses a. Berg;;;;;; Prichsenstadt;Krone;;;;;; Prichsenstadt/Kirchschönbach;Mariengarten/Prichsenstadt;Schild;Mariengarten/Kirchschönbach;;;; Ramsthal;Burg;Sankt Klausen;;;;; Randersacker;Dabug/Randersacker;Ewig Leben;Lämmerberg/Randersacker;Marsberg;Pfülben;Sonnenstuhl;Teufelskeller Randersacker/Lindelbach;Dabug/Lindelbach;Teufelstor;;;;; Remlingen;Krähenschnabel;Sonnenhain;;;;; Retzstadt;Langenberg;Roßtal;;;;; Rimpar;Kobersberg;;;;;; Rödelsee;Küchenmeister;Schloßberg/Rödelsee;Schwanleite;;;; Röllbach;Deutschordensberg;;;;;; Rothenburg ob der Tauber;Eich;;; Rottendorf;Kehlberg;;; Röttingen;Feuerstein;;; Sand/Main;Himmelsbühl;Kapellenberg/Zeil;Kronberg; Schonungen/Mainberg;Mainleite/Schonungen;Schloßberg/Mainberg;Mainleite/Mainberg; Schwanfeld;Mühlberg;;; Schwarzach/Main/Gerlachshausen;Engelsberg;;; Schwarzach/Main/Schwarzenau;Kirchberg/Volkach;Rosengarten;; Schweinfurt;Mainleite/Schweinfurt;Peterstirn;; Segnitz;Hofrat;Pfaffensteig;Zobelsberg; Seinsheim;Fischer;Hohenbühl;; Seinsheim/Tiefenstockheim;Stiefel;;; Sommerach;Engelsberg;Katzenkopf;Kirchberg/Volkach;Rosenberg/Sommerach Sommerhausen;Ölspiel;Reifenstein;Steinbach; Sugenheim/Ingolstadt;Fischer;Rotenberg;; Sugenheim/Krassolzheim;Fischer;Pfaffenberg/Sugenheim;Pfaffenberg/Krassolzheim; Sugenheim/Neundorf;Herrenberg/Castell;Hüßberg/Sugenheim;Mönchsbuck/Sugenheim;Sonneberg;Wonne/Sugenheim;Hüßberg/Neundorf;Mönchsbruck/Neundorf;Wonne/Neundorf Sulzfeld/Main;Cyriakusberg;Hofrat;Maustal;;;;; Sulzheim/Mönchstockheim;Köhler;Mönchberg/Mönchstockheim;Mönchberg/Sulzheim;Zabelstein;;;; Sulzthal;Schlangenberg;;;;;;; Tauberrettersheim;Königin;;;;;;; Theilheim;Altenberg/Theilheim;Ewig Leben;;;;;; Thüngersheim;Johannisberg/Thüngersheim;Ravensburg;Scharlachberg;;;;; Triefenstein/Homburg Main;Edelfrau;Kallmuth;;;;;; Lengfurt;Alter Berg;Oberrot;;;;;; Uettingen;Kirchberg/Uettingen;;;;;;; Veitshöchheim;Ravensburg;Sonnenschein;Wölflein;;;;; Viereth/Weiher;Weinberge;;;;;;; Volkach;Kirchberg/Volkach;Ratsherr;Sonnenleite/Volkach;;;;; Volkach/Astheim;Karthäuser/Volkach;Karthäuser/Astheim;;;;;; Volkach/Escherndorf;Berg;Fürstenberg;Kirchberg/Volkach;Lump;;;; Volkach/Fahl;Kirchberg/Volkach;Ratsherr;;;;;; Volkach/Gaibach;Kapellenberg/Volkach;Kirchberg/Volkach;Kapellenberg/Gaibach; Volkach/Hallburg;Kirchberg/Volkach;Kreuzberg/Nordheim;Rosenberg/Sommerach;Schloßberg/Hallburg Volkach/Köhler;Fürstenberg;Kirchberg/Volkach;; Volkach/Krautheim;Kirchberg/Volkach;Sonnenleite/Krautheim;; Volkach/Obervolkach;Kirchberg/Volkach;Landsknecht/Volkach;Landsknecht/Obervolkach; Volkach/Rimbach;Kirchberg/Volkach;Landsknecht/Rimbach;; Volkach/Vogelsburg;Pforte;;; Waigolshausen/Hergolshausen;Kirchberg/Volkach;Mainleite/Hergolshausen;Mainleite/Waigolshausen; Waigolshausen/Theilheim;Kirchberg/Volkach;Mainleite/Theilheim;; Wasserburg;Spitalhalde;;; Wasserburg/Hattenau;Seegarten;Weinhalde;; Weigenheim;Hohenlandsberg/Weigenheim;Frankenberger Schloßstück;; Weigenheim/Frankenberg;Fischer;Herrschaftsberg/Weigenheim;Herrschaftsberg/Frankenberg; Weigenheim/Reusch;Fischer;Hohenlandsberg/Reusch;Hohenlandsberg/Weigenheim; Weigenheim/Wenigumstadt;Heiligenthal;;; Wiesenbronn;Vollburg;Schloßberg/Rödelsee;Wachhügel; Willanzheim/Hüttenheim;Fischer;Tannenberg;;;; Winterhausen;Kaiser Wilhelm;;;;; Wipfeld;Kirchberg/Volkach;Zehntgraf;;;; Wörth am Main;Galgenbuckel;;;;; Würzburg;Abtsleite;Innere Leiste;Marienberg;Pfaffenberg/Würzburg;Stein/Würzburg;Stein/Harfe Würzburg/Heidingsfeld;Kirchberg/Würzburg;Marienberg;Kirchberg/Heidingsfeld;;; Würzburg/Unterdürrbach;Marienberg;Pfaffenberg/Würzburg;;;; Zeil;Eulengrund/Zeil;;;;; Zeil/Schmachtenberg;Eulengrund/Schmachtenberg;;;;; Zeil/Main;Kapellenberg/Zeil;Mönchshang;Pfarrersplöck'n;;; Zeil/Main/Krum;Himmelreich;;;;; Zeil/Main/Schmachtenberg;Eulengrund/Schmachtenberg;Kapellenberg/Zeil;;;; Zeil/Main/Ziegelanger;Kapellenberg/Zeil;Ölschnabel;;;; Zellingen;Ravensburg;Sonnleite;;;; Zellingen/Retzbach;Benediktusberg;Ravensburg;;;;FJDO µ REBSORTE_21AÚäñfghÇei|‚‘ŠœFJDOcäø§¿a--‚FJDOcH\§¿a--‚FJDOTèò AgFJDOTdèšAgFJDOTdÒAgFJDO µ REBSORTE_22AÚä(fghÇei|‚‘ŠœFJDOµ Ž  REBSORTENAXOHNE REBSORTE; Acolon; Albalonga; Auxerrois; AZ 64-2-254; Bacchus; Blauburger; Blauer Silvaner; Blaufränkisch; Cabernet Cubin; Cabernet Dorio; Cabernet Dorsa; Cabernet franc; Cabernet Mitos; Cabernet Sauvignon; Cantaro; Carmina; Chardonnay; Domina; Dornfelder; Dunkelfelder; Ehrenfelser; Elbling; Faberrebe; Färber; Fontanara; Forta; Frühburgunder; Gelber Muskatteller; Gewürztraminer; Grauer Burgunder; Gutedel; Gutenborner; Helfensteiner; Helios; Huxelrebe; Johanniter; Jubiläumsrebe; Kanzler; Kerner; Limberger; Marechal Foch; Mariensteiner; Merlot; Merzling; Morio Muskat; Müller-Thurgau; Muscabona; Muskat Ottonel; Muskateller; Noblessa; ohne Sorte; Optima; Ortega; Perle; Phoenix; Portugieser; Regent; Regner; Reichensteiner; Rieslaner; Riesling; Rondo; Ruländer; Saint Laurent; Sauvignon blanc; Scheurebe; Schönburger; Schwarzriesling; Siegerrebe; Silvaner; Spätburgunder; Solaris; Tauberschwarz; Tauberzell; Traminer; Weißer Burgunder; Würzer; Zweigeltrebe; FJDOc¦º±a-- ‚FJDOcö ±a-- ‚FJDOb<F¢¶a. ‚FJDO©BETRNRA€Úœ¬fghei|‚‘ŠžFJDO¬ ANSTELLNRAø>œ¬fghei|‚‘ŠžFJDO§JAHRA\Žœ¬fghei|‚‘ŠžFJDO©NAME_1AnÞâòfghFei|‚‘ŠžFJDO¬ STRASSE_1An¨ fgh#ei|‚‘ŠžFJDO¨PLZ_1AnÈ2Bfghei|‚‘ŠžFJDO¨ORT_1AÒ¨2Bfgh2ei|‚‘ŠžFJDO·LAND_BETRIEBNUMMER_1A¼Þ2Bfgh ei|‚‘ŠžFJDO¬ TELEFON_1AnrYifghÇei|‚‘ŠžFJDO¨FAX_1A†NYifghÇei|‚‘ŠžFJDOªEMAIL_1AbÞYifghÇei|‚‘ŠžFJDO­ JAHRGANG_2AnÒ °fghei|‚‘ŠžFJDO‘Ü𥹠WEIßWEIN_2A|jeÈÉŠ‚“žFJDOh|¥¹ ROTWEIN_2A|jeÈÉŠ‚“žFJDOêþ¥¹ ROTLING_2A|jeÈÉŠ‚“žFJDO•bv¥¹SCHILLERWEIN_2A|jeÈÉŠ‚“žFJDOø ¥¹ROSE_2A|jeÈÉŠ‚“žFJDO”„˜¥¹ WEISSHERBST_2A|jeÈÉŠ‚“žFJDO—dxÍáGEBIET_FRANKEN_2A|jeÈÉŠ‚“žFJDOœÜðÍáGEBIET_WUERTTEMBERG_2A|jeÈÉŠ‚“žFJDOœàôÍáBEREICH_MAINVIERECK_2A|jeÈÉŠ‚“žFJDOœbvÍáBEREICH_MAINDREIECK_2A|jeÈÉŠ‚“žFJDOœø ÍáBEREICH_STEIGERWALD_2A|jeÈÉŠ‚“žFJDO™„˜ÍáBEREICH_BODENSEE_2A|jeÈÉŠ‚“žFJDOŽàô1REIFE_2A|jeÈÉŠ‚“žFJDO—dxOcQUALITAETSWEIN_3A|jeÈÉŠ‚“žFJDO–ÜðOcWEIN_KABINETT_3A|jeÈÉŠ‚“žFJDO—^rOcWEIN_SPAETLESE_3A|jeÈÉŠ‚“žFJDO•ÖêOcWEIN_AUSLESE_3A|jeÈÉŠ‚“žFJDO”l€Oc WEIN_BEEREN_3A|jeÈÉŠ‚“žFJDOœø OcWEIN_BEEREN_TROCKEN_3A|jeÈÉŠ‚“žFJDO‘„˜Oc WEIN_EIS_3A|jeÈÉŠ‚“žFJDO•ø w‹WEIN_CLASSIC_3A|jeÈÉŠ‚“žFJDO—„˜w‹WEIN_SELECTION_3A|jeÈÉŠ‚“žFJDO® ZEITPUNKT_4AnÒ£³fghÇei|‚‘ŠžFJDO¬ TRAUBEN_4AæÌ£³fghÇei|‚‘ŠžFJDO­ GEWICHT_4Aಣ³f0ghei|‚‘ŠžFJDO—¼Ð©½BOCKSBEUTEL_JA_4A|jeÈÉŠ‚“žFJDO™H\©½BOCKSBEUTEL_NEIN_4A|jeÈÉŠ‚“žFJDOªLITER_5A yÉÙfghei|‚‘ŠžFJDO’¼ÐÛï FASSPROBE_5A|jeÈÉŠ‚“žFJDO“H\Ûï FUELLPROBE_5A|jeÈÉŠ‚“žFJDO‘dx FLASCHEN_5A|jeÈÉŠ‚“žFJDOªDATUM_5AìFþfghÇei|‚‘ŠžFJDO«WEINNR_5AnæþfghÇei|‚‘ŠžFJDO° ANZAHLLITER_5AðhþfghÇei|‚‘ŠžFJDO° DREIVIERTEL_5ArêþfghÇei|‚‘ŠžFJDO¬ VIERTEL_5AôlþfghÇei|‚‘ŠžFJDO® SONSTIGES_5AväþfghÇei|‚‘ŠžFJDOždx+?KEINEFLASCHENFUELLUNG_5A|jeÈÉŠ‚“žFJDOªMENGE_5Aðê%5fghÇei|‚‘ŠžFJDO® BEHAELTER_5Aôä%5fghÇei|‚‘ŠžFJDO˜dxq…VERSCHNITT_NEIN_6A|jeÈÉŠ‚“žFJDO–"q…VERSCHNITT_JA_6A|jeÈÉŠ‚“žFJDO¶VERSCHNITTANTEILE_6ArÞk‚fghÇei|‚‘ŠžFJDO­ HINWEISE_7AnÞ»Òfghdei|‚‘ŠžFJDO•dx%ALKOHOL_GRAD_8A|jeÈÉŠ‚“žFJDO¶ GRADANZAHL_8A„Þ "fghei#F%3.2f|‚‘ŠžFJDO•.%ALKOHOLGRAMM_8A|jeÈÉŠ‚“žFJDO¸ALKOHOLMENGE_8A8’ "fghei#F%3.2f|‚‘ŠžFJDO˜vŠ%ANREICHERUNG_UM_8A|je ÈÉŠ‚“žFJDO´ UM_MENGE_8Aà fghei#F%2.2f|‚‘ŠžFJDO™î%ANREICHERUNG_AUF_8A|je ÈÉŠ‚“žFJDOµ AUF_MENGE_8AX fghei#F%2.2f|‚‘ŠžFJDOªDATUM_8AvÚ fghÇei|‚‘ŠžFJDO•î%9UMKEHROSMOSE_8A|jeÈÉŠ‚“žFJDOšp„%9VAKUUMVERDAMPFUNG_8A|jeÈÉŠ‚“žFJDO˜dxauENTSAEUERUNG_JA_9A|je ÈÉŠ‚“žFJDOšæúauENTSAEUERUNG_NEIN_9A|je ÈÉŠ‚“žFJDO® HERKUNFT_10Anà\lfghÇei|‚‘ŠžFJDO²MENGE_10Aêl\lfghei#F%4.2f|‚‘ŠžFJDO«DATUM_10AvÐ\lfghÇei|‚‘ŠžFJDO•dx§»NUMMER_NEIN_11A|jeÈÉŠ‚“žFJDO“^r§» NUMMER_JA_11A|jeÈÉŠ‚“žFJDO® NUMMER_11_1AYŸ—§fg hei|‚‘ŠžFJDO® NUMMER_11_2A½ï—§fg hei|‚‘ŠžFJDO® NUMMER_11_3A 5—§fg hei|‚‘ŠžFJDO® NUMMER_11_4AIq—§fg hei|‚‘ŠžFJDO¬ ORT_DATUMAdôx‹fghÇei|‚‘ŠžFJDOxFYìwa30. Auflage, 01.07.2009‚FJDOi.ã9MSYS_SHA1a‚FJDO•ø |BLANCDENOIRS_2A|jeÈÉŠ‚“žFJDOoŒ|ABlanc de noirs‚