Version: VPE3.5
Software: Progress 9.1D
Printer: Zebra LP 2844 (paper size in Windows defined as 6.25" x
1.5")
We're trying to print 6.25" x 1.5" barcode labels using a Zebra
printer. We are printing labels to adhere to our inventory bins.
The barcodes themselves will be 2-4 characters and a check digit i.e.
A1 or AF6 or DB89 (1-2 characters + 1-2 numbers)
If I define the paper size as Letter, go to the preview page, and
print from there it looks and prints fine.
If I print directly to the printer using PrintDoc, it apparently
tries to add a 1.25" margin, thereby leaving me with only .25" of the
barcode and text printed.
I tried adding:
chReport:SetDefOutRect(0, 0, 380, 1580).
but it seemed to have no effect.
Why would the preview window print it differently than printing
directly?
Now, if I define the paper size within VPE as user-defined 380 x
1580, it will lock up and become a runaway process if I try to define
the text size greater than 40. I want the letters of the bin to be
as big as possible. If I don't go higher than 40 it prints fine
either directly or through the preview.
Question 2 would be why does it lock up if I go higher than 40?
If anyone has a solution for either method, I'll be happy!
The code looks like this:
chReport:opendoc.
chReport:PenSize = 0.
chReport:TextAlignment = {&ALIGN_CENTER}.
chReport:Write(0,805,380,1575, SUBST("[B S 92 'ARIAL']
&1", "A1")).
chReport:setbarcodeparms(2,2).
chReport:barcode(10,10,800,375, 6, c_bin + STRING(iLoop),"").
IF c_preview THEN DO:
chReport:Previewdoc(-1,-1,-1,-1,1).
PAUSE 60000.
END.
ELSE DO:
chReport:SetUpPrinter(c_prt,{&PRINTDLG_ONFAIL}).
chReport:PrintDoc(FALSE).
END.
chReport:closedoc.
Regards,
Ron