Barcode 128 / Strichcode drucken (einfache Variante)

Voraussetzungen

Es gelten die ähnlichen Voraussetzungen, wie sie unter Barcode 39 beschrieben sind. Siehe auch Barcode 128 .

Druckfunktion

SRText01:=PRM_BarCode_Print_String([s0_Artikel]s_Strichcode__Verkauf;"Code128") Auch hier (wie beim Barcode 39) ist die Vielfalt der auf dem Markt erhältlichen Schriftarten für den Code 128 vielfältig. Es gibt gewisse, die zwar einen Barcode andrucken, der aber mit Lesern nicht eingelesen werden kann. Wir verwenden Code128.tiff und muss aber fallweise ausprobiert werden, ob die Schriftart wirklich das gewünschte Leseergebnis wiedergibt.

Beispiel eines SuperReports mit Barcode 128

SR: Mitarbeiter: Elcode: Mitarbeiterstrichcode Code128.pff

• Das Textfeld mit dem Strichcode muss die Schriftart "Code128" 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;"Code128")   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;"Code128") End if   End if