Hallo mott

Schu dir mal die DDS Schlüsselwörter trnspy cptdta an.

Hier ein Beispiel der DDS
A R ZEILEB1 SPACEB(1)
A SPACEA(1)
A BARFELD1 24 1
A TRNSPY
A CVTDTA
A BARFELD2 10 13
A TRNSPY
A CVTDTA
A BARWERT 11 13

und hier das RPG:
***************** Datenanfang ************************************************** **********
fVZBARCOD o e printer
****** 123456789012345678901234567890123456789
c eval barfeld1 = '1B1041080400000401010102'
c***************** eval barfeld2 = '1B10420C413031323334353637383967' ??67????
* Anzahl Werte
* Code 128 A
c eval barfeld2 = '1B10420C41'
c eval barwert = '0123456789g' ????????
c write seitanfang
c write zeileb1
c******** write zeileb2
c write seitenende
c eval *inlr = *on
******************Datenende *
Gruss Klaus.