Barcode EAN128

[Joe]

Hallo Forum.

Für ein EAN128 Transportetikett benötige ich den Barcode
EAN/UCC 128. Wie erzeuge ich den mit einer AS/400 PRTF?

Gruss Joe

[Fuerchau]

Hierzu gibts bereits mehrere Beiträge.

Nur mittels AFPDS, Schlüsselwort BARCODE(CODE128 ...).
Per Hosttransform wird der Barcode auf fast allen HP5/6-kompatiblen Druckern ausgedruckt. Ansonsten geht nur IPDS-Drucker mit der Lizenz "PSF/400 IBM Printer Support".

[Joe]

Wo finde ich denn diese Beiträge?

Bevor ich ein neues Thema aufmache, suche ich im Forum nach entsprechenden Beiträgen.
Unter den Suchbegriffen Barcode, EAN, CODE128 ... bin
ich bisher nicht fündig geworden.

Gruss
Joe

Hierzu gibts bereits mehrere Beiträge.

Nur mittels AFPDS, Schlüsselwort BARCODE(CODE128 ...).
Per Hosttransform wird der Barcode auf fast allen HP5/6-kompatiblen Druckern ausgedruckt. Ansonsten geht nur IPDS-Drucker mit der Lizenz "PSF/400 IBM Printer Support".

[TARASIK]

Hallo Joe,
ich habe diesen Beitrag noch:





Barcode EAN128
Hallo Forum,

auf ein Formular soll mit einem IPDS-Drucker ein EAN128-
Barcode gedruckt werden. Der gleiche Barcode wird auf einem
speziellen Barcodedrucker auf Palettenetiketten gedruckt.

Vor die Zeichenfolge (Datenbezeichner und Nutzzeichen) habe ich
das FNC1 (8F), danach das SPZ gesetzt und in der Printerfile
mit BARCODE(CODE128) ausgegeben.

Das SPZ habe ich aus FNC1 und Zeichenfolge errechnet.

Der Barcode stimmt aber im hinteren Bereich, unmittelbar vor dem
Stopzeichen, nicht mit dem Barcode der Etiketten überein. Die
Etiketten werden richtig eingelesen, der Barcode auf dem Formular nicht.

Kann jemand weiterhelfen?

Im Voraus schon mal Danke.

Herbert
Diesen Beitrag einem Moderator melden | IP: Gespeichert

01-08-03 15:11










daniel.ritzmann@waser.ch
[new_User]
Registriert seit: Aug 2003
Wohnort:
Beiträge: 1

Hi Joe

Ich hatte mal ein ähnliches Problem. Bei mir hing es mit dem Fehlen des Parameters CHECK-DIGIT im Printerfile-Schlüsselwort BARCODE zusammen.

Versuchs doch einfach mal mit der Angabe (Wert 02) von diesem Parameter:
BARCODE(CODE128 ......... X '02')

(siehe DDS-Reference unter BARCODE)

Gruss
Daniel
Diesen Beitrag einem Moderator melden | IP: Gespeichert
04-08-03 14:50










herbert52
[User]
Registriert seit: Aug 2003
Wohnort:
Beiträge: 7

Danke Daniel,
bin bis 18.8. im Urlaub. Werde es dann probieren und
Feedback geben.
Gruß Herbert
Diesen Beitrag einem Moderator melden | IP: Gespeichert
08-08-03 09:44










herbert52
[User]
Registriert seit: Aug 2003
Wohnort:
Beiträge: 7
Prüfziffer X'02'
Hallo Daniel,

leider ist das Problem mit der Prüfziffer X'02' nicht gelöst.
Der Barcode hat vor dem Stopcode mehr Zeichen als der
Code aus dem Etikettendrucker (der ist richtig).
Bitte weiter um Hilfe.

Gruß
Herbert
Diesen Beitrag einem Moderator melden | IP: Gespeichert
18-08-03 12:11










Fuerchau
Moderator
Registriert seit: Feb 2001
Wohnort:
Beiträge: 739

Schau Dir mal folgenden Link an:

http://www.strichcodeservice.at/zeichensatz_code128.htm

Die Berechnung des Prüfzeichens erfolgt mit dem ASCII-Wert und nicht mit dem EBCDIC-Wert. Du musst also erst eine Übersetzung in ASCII durchführen, die PZ berechnen und das Ergebnis wieder in EBCDIC. Dies gilt auch für das FNC.

Für die Codewandlung kannst du QDCXLATE verwenden, du musst nur noch die richtige Tabelle wählen (WRKTBL *ALL, und dann nach Q273337xxx suchen, wobei xxx für den ASCII-Code steht).

PS:
Vielleicht berechnet ja die AS/400 die Prüfziffer automatisch, dann versuche es mal mit der Angabe X'00'/X'01' statt X'02'.
__________________
http://www.fuerchau.de
Diesen Beitrag einem Moderator melden | IP: Gespeichert
23-08-03 09:09










Fuerchau
Moderator
Registriert seit: Feb 2001
Wohnort:
Beiträge: 739

Ich habe nun selbst die Anforderung bekommen, EAN128 zu drucken. Mit folgender Einstellung funktioniert es einwandfrei:

DDS: PTBARC 8 BARCODE(CODE128 4 *NOHRI X'02')

RPG: X'8F' CAT BCINFO PTBARC P

Ich berechne KEINE Prüfziffer, sondern dies macht das System selber.
__________________
http://www.fuerchau.de
Diesen Beitrag einem Moderator melden | IP: Gespeichert
27-08-03 14:40










herbert52
[User]
Registriert seit: Aug 2003
Wohnort:
Beiträge: 7

Hallo Forum,

dank Eurer Unterstützung, insbesondere von Fuerchau, kann ich die Lösung der Aufgabe "EAN128" hier aufzeigen.

Es handelt sich bei den Nutzdaten um die NVE (Nummer der Versandeinheit). Die Grunddaten stehen in meinem Fall in einer Palettendatei (wg. der Größe) und werden von Palette zu Palette um eine lfd.Nr. ergänzt. Diese Daten werden mit einer Prüziffer (Modulo 10 mit der Gewichtung 31313131..... .) ergänzt und ergeben die komplette NVE.
Vor die NVE wird das Kennzeichen FNC1(x'8F') und der Datenbezeichner (DB=00) gestellt.

Kompletter String:

FNC1 DB NVE

Die Ausgabe in der Printerfile wie vorstehend von Fuerchau beschrieben.

Danke an alle Helfer

Herbert