Barcode 39 / Strichcode drucken Barcode drucken

Voraussetzungen

  • In dieser Freischaltung, welche durch bossinfo.com vorzunehmen ist, wird zwischen Verkauf und Einkauf unterschieden.
  • Dort ist festzulegen, dass der Barcode 39 gilt.
  • Ferner ist der Code39-Font in den Schriftarten zu installieren. bossinfo.com arbeitet derzeit mit "IDAutomationHC39M.ttf". Er kann unter Windows und Mac (10.5.Leopard) eingesetzt werden.
  • Damit Strich- bzw. Barcodes gedruckt werden, müssen sie in den entsprechenden Feldern des Artikels (sowie in den (Bestell)Belegzeilen) vorhanden sein.
  • Sind sie nicht vorhanden, können sie entweder "eingeschossen" oder von Hand in die Felder eingetragen werden.
  • Oder sie werden mittels Menüpunkt Dateien - Artikel - Strichcode erzeugen eingesetzt, wobei er aus dem Artikelkürzel und der Artikelbezeichnung automatisch generiert wird.
  • Es sind in SuperReports die entsprechenden Druckfunktionen zu verwenden (siehe unten).

Funktionsweise

  • Der Barcode39 verlangt nach einem Asteriks (*) am Anfang und am Schluss. Dieses Zeichen ist nicht Bestandteil des Strichcodes in den Artikeln. Beim Drucken werden die Sterne automatisch eingesetzt, sofern die nachstehende Druckfunktion zur Anwendung kommt.

Druckfunktion

Will man im Superreport einen Code39 als Strichcode drucken, so wendet man im Body eine der folgenden (Druck-)Funktionen an:

  • Entweder SRText01:=PRM_BarCode_Print_String([s0_Artikel]s_Strichcode__Verkauf;"Code39")
  • oder SRText01:=PRM_BarCode_Print_String([s0_Artikel]s_Strichcode__Verkauf;<>c10_BarCode_Verkauf) In diesem Fall wird das Resultat (Strichcode mit *) in der Variablen "SRText01" gespeichert. Die Funktion "PRM_BarCode_Print_String" verlangt nach zwei Parametern:
  1. Der Strichcode (ohne *), welcher gedruckt werden soll (in diesem Fall das Feld "[s0_Artikel]s_Strichcode__Verkauf"
  2. entweder der verwendete Barcode "Code39"
  3. oder der verwendete Barcode, welcher in ERP immer in der Variablen "<>c10_BarCode_Verkauf" gehalten wird. Dies ist deshalb so, damit man (später) den Typ des Codes ändern kann und weil z.B. im Einkauf ein anderer Barcodetyp verwendet werden könnte. Das Resultat der Funktion, also die Variable "SRText01" muss dann im SR nur noch mit der richtigen Schrift gedruckt werden.
Information

Achtung: Es gibt viele Freeware-Fonts für Code39, es funktionieren aber anscheinend nicht alle.

Wir müssen also einige Codes ausdrucken und mit dem Belegleser wieder einlesen, um zu sehen, ob sie gut sind. Das ganze habe ich unter Mac aus Zeitgründen noch nicht getestet. Der Font sollte sich aber auch im Mac verwenden lassen.

Beispiel eines SuperReports mit Barcode 39

SR: Mitarbeiter: Elcode: Mitarbeiterstrichcode Code39.pff

  • Das Textfeld mit dem Strichcode muss die Schriftart für den Code 39 "IDAutomationHC39M.ttf" haben.

  • Das Body-Script sieht wie folgt aus:

SRText01:="" ===bemerkungen SRText02:=[s0\_Mitarbeiter]s\_Mitarbeiterkuerzel SRText03:=MA\_FullName\_Get ("p") t\_PRM\_Error:="" If (SRText02="") SRText01:="Mitarbeiterkürzel fehlt"   Else SRText02:=BarCode\_String\_Correct (SRText02;"Code39")   If (t\_PRM\_Error#"") t\_PRM\_Error:="Das Mitarbeiterkürzel enthält die verbotenen Zeichen: "+t\_PRM\_Error End if   If (SRText02="") SRText01:="Mitarbeiterkürzel ungeeignet" Else SRText02:=text\_AddSign (SRText02;"0";10;True) SRText02:="/"+SRText02 ==========plausibilitaetszeichen SRText02:=PRM_BarCode_Print_String (SRText02;"Code39") End if   End if