[NEWSboard IBMi Forum]
  1. #1
    Registriert seit
    Jun 2007
    Beiträge
    77

    QR barcode in RPG4-DDS

    Hallo,
    ich muss eine QR barcode programmieren.
    Habe schon meine DDS gemacht.
    Aber ich habe etwas Probleme mit das ausfullen von die QR barcode:
    Wie muss ich in RPGLE der CR/LF programmieren ?
    ich dachte mit ein Constante x'0d25' aber der macht mir keine Line feed wenn ich die Barcode lese.

    zB.
    D CRLF C const(x'0d25')
    Field = 'field1' + CRLF + 'field2'
    write Field


    output(wenn ich die QR Barcode lese) gibt mir :
    field1 field2

    Aber ich möchte haben :
    field1
    field2


    Weiss jemand mehr darüber ?
    oder haben sie mir ein Beispeil von wie sie QR barcodes programmieren/ausfullen

  2. #2
    Registriert seit
    Feb 2001
    Beiträge
    20.206
    Ein Barcode enthält i.d.R. keine Tastenfunktionen.
    Wenn du das Feld dann ausliest, musst du die Daten selber am CRLF dann teilen.
    Dienstleistungen? Die gibt es hier: http://www.fuerchau.de
    Das Excel-AddIn: https://www.ftsolutions.de/index.php/downloads
    BI? Da war doch noch was: http://www.ftsolutions.de

  3. #3
    Registriert seit
    Jun 2007
    Beiträge
    77
    Wenn ich eine bestehende QR inlese (also eine die ich nicht gemacht habe on Power I-RPG) dann kommt alles under einander :

    SPC
    CHxxxxxxxx
    Name
    Strasse

    usw usw.

    Ich versuche jetzt die selber zu schreiben in RPG4 ,
    und wenn ich die lese mit Scanner gibt die mir :

    SPC CHxxxxxxxx NAME Strasse etc etc etc

    alles nebeneinander ... also das will ich nicht,
    Wer hat Erfahrung mit QR Programming ?
    Wie muss ich der CR/LF machen ?

  4. #4
    Registriert seit
    Jan 2003
    Beiträge
    746

  5. #5
    Registriert seit
    Jun 2019
    Beiträge
    26
    Hallo


    rpg:
    D qr_code s 200
    d l_f c const(X'0D25') cr lf


    QR_CODE='BCD'+l_f+'002'+l_f+'1'+l_f+'SCT'+l_f+l_f+
    'Firma XYZ '+l_f+'BE44 1234 4567 1234'+l_f +
    'EUR'+%char(tt)+l_f+l_f+l_f+%char(comvcs) ;


    dds printerfile:

    A QR_CODE 200 BARCODE(QRCODE 2 *NOHRI X'02' +
    A (*WIDTH 0.15) (*SWIDTH 0.7) +
    A (*QRCODE 4 1 *TRIM))
    A POSITION(9.05 7.20)

    so gehts bei mir
    war VIEL Fummel, eh das lief

    CHRID(*jobccsid) spielt auch noch mit, mein ich


    versuchs mal
    jotho

  6. #6
    Registriert seit
    Jun 2007
    Beiträge
    77
    Danke an allen :

    @jotho : ja stimmt ich habe +/- das gleiche in DDS und RPG.
    @RobertMack : Danke : das könnte es vielleicht sein : RPLUNPRT *no

    Ich arbeite nächste Woche weiter dran, und dann gebe ich Bescheid.
    bis dann..

  7. #7
    Registriert seit
    Jun 2019
    Beiträge
    26
    Hallo

    ja, RPLUNPRT *no hab ich auch

  8. #8
    Registriert seit
    Jun 2007
    Beiträge
    77
    Hallo,
    Habe Heute weiter gearbeitet .
    Ich musste nur noch RPLUNPRT *no setzen , und dann hat alles funktioniert.
    Danke @jotho @RobertMack

Similar Threads

  1. Cobol Makro in RPG4 umschreiben
    By MederA in forum NEWSboard Programmierung
    Antworten: 5
    Letzter Beitrag: 26-02-18, 12:25
  2. DDS und Barcode
    By malzusrex in forum NEWSboard Programmierung
    Antworten: 1
    Letzter Beitrag: 10-05-16, 11:40
  3. Tabellen in RPG4/RPGLE
    By Chris.jan in forum IBM i Hauptforum
    Antworten: 1
    Letzter Beitrag: 17-02-09, 17:33
  4. Barcode Druck mit IBM 6400
    By cicero22 in forum IBM i Hauptforum
    Antworten: 4
    Letzter Beitrag: 14-01-03, 09:02
  5. Barcode auf Laserdrucker
    By kareil in forum IBM i Hauptforum
    Antworten: 2
    Letzter Beitrag: 13-01-03, 14:14

Berechtigungen

  • Neue Themen erstellen: Nein
  • Themen beantworten: Nein
  • You may not post attachments
  • You may not edit your posts
  •