Barkod Yazdırma İşlemleri

Merhaba,

Canias ortamında barkod yazdırmak için öncelikli olarak Bartender, NiceLabel ve ZebraDesigner tarzında yazıcınıza uygun bir programı yüklemeniz gerekir. İlgili programı yükledikten sonra barkod dizaynı yapılır.

Dizayn yapıldıktan sonra Canias ortamında kullanmak üzere prn çıktısı almamız gerekiyor. Bunun için kullandığınız program lisanslıysa yazdırma ekranında dosyaya yazdır seçeneğini seçerek prn çıktısını alabiliriz. Deneme sürümleri veya lite sürümler için yazıcınızın Bağlantı noktasını file olarak seçmeniz veya file noktalı bir yazıcı kurmanız gerekir

Şimdi, Canias tarafında yapmış olduğumuz tasarımların prn çıktılarını tutmak için bir destek tablosu oluşturabiliriz veya direk kodumuzun içine gömebiliriz. Destek tablosunda tutmak daha profesyonel olacağından ben bu yönde anlatıma devam edeceğim.

Troia tarafında barkod yazdırmak için PRINTEXT komutunu kullanırız. Komutun söz dizimi aşağıdaki şekildedir.

PRINTTEXT PRINTSOURCE TO PRINTPATCH CODEPAGE 'Cp1252';


PRINTSOURCE : prn dosyasındaki kod blogunun geleceği kısımı,

PRINTPATCH : yazıcı yolunu ifade eden değişkenlerimizdir.

Örnek Kod Blogu:

OBJECT :
STRING PRINTSOURCE,
STRING PRINTPATCH;

IF SCMATERIAL == '' THEN
MESSAGE KDT E0 WITH 'Lütfen Malzeme Seçiniz.';
RETURN;
ENDIF;

/*YAZICININ YOLUNU ALIYORUZ */
SELECT *
FROM SYSPRINTER
WHERE CLIENT = SYS_CLIENT
AND PRINTERNAME = SCPRINTER
INTO TMPATH;

PRINTPATCH = TMPATH_PRINTERPATH ;

/*BARKOD TASARIM İÇERİĞİNİ ALDIĞIMIZ TABLO*/
SELECT *
FROM LABELSTYLE
WHERE CLIENT = '00'
AND COMPANY = '01'
AND LBCODE = 'ETIKET'
INTO TMPLABEL;

PRINTSOURCE = TMPLABEL_LBEPLCODE+ TOCHAR(10)+ TOCHAR(13);
PRINTSOURCE = REPLACE(PRINTSOURCE,'[MN]',SCMATERIAL);
PRINTSOURCE = REPLACE(PRINTSOURCE,'[STEXT]',TXTSTEXT1);
PRINTSOURCE = REPLACE(PRINTSOURCE,'[LTEXT]',TXTSTEXT2);
PRINTSOURCE = REPLACE(PRINTSOURCE,'[LN]',TXTLOTNO);
PRINTSOURCE = REPLACE(PRINTSOURCE,'LN',TRIM(TXTLOTNO));
PRINTSOURCE = REPLACE(PRINTSOURCE,'MN',TRIM(SCMATERIAL));
PRINTSOURCE = REPLACE(PRINTSOURCE,'[TEDARIKCI]',TRIM(TEDARIKCI));

PRINTTEXT PRINTSOURCE TO PRINTPATCH CODEPAGE 'Cp1252';

Veriler bu ekrandan girilen değerlere göre yazdırma işlemi öncesi ilgili alanlara replace edilir. Özetle canias ortamında barkod yazdırma bu şekildedir.