RE: [U2] PCL problem on U2

2009-05-21 Thread Colin Alfke 
Sorry - it's the UniData command to run the following statement at the OS
level.

Colin Alfke
Calgary, Canada

-Original Message-
From: owner-u2-us...@listserver.u2ug.org
[mailto:owner-u2-us...@listserver.u2ug.org] On Behalf Of Eric Armstrong

Colin,
What's the bang sign for? We would use EXECUTE "DOS /C COPY etc."

Eric Armstrong
Lobel Financial


-Original Message-
From: Colin Alfke

David;

It looks like you're missing the point of the macro - simply load it into
the
printer once and print multiple times. Your converter may allow you to load
it
to the printer, otherwise you actually copy it to the printer (not print
it).
Under Windows we simply:

EXECUTE "!COPY /B \UD\LOGOS\LOGO.MAC \\UNCPathToPrinter"

Sorry, not sure of the Linux syntax. It only needs to be done when the
printer
is powered off an loses the macro so you can do it from a screen etc.
Although we have one very distributed site that preferred we send the macro
before 
the print job to make sure it was there.

In your code you simply do a:

PRINT CHAR(27):'&f':LOGONUM:'y2X'

to print the logo. This simply specifies and executes the macro.

hth

Colin Alfke
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/

Re: [U2] PCL problem on U2

2009-05-21 Thread Bill Haskett 
   I think Colin has this right.  There's no point in using a sledgehammer to
   tap in a nail to hang a picture on the wall.  Using UV to manipulate a PCL
   image is using a sledgehammer.
   You should simply be able to download a picture and assign this image an
   ID.  Then use PCL code (or HP-GL/2 code) to call the image within the print
   job.  Thus you would use the standard binary copy to upload the image to the
   printer, then the printer language to position the image on your paper
   during each print.
   We do this all the time with checks and signatures.
   Bill
   __

   From: George Gallen 
   Sent: 5/20/2009 3:26 PM
   To: u2-users@listserver.u2ug.org 
   Subject: Re: [U2] PCL problem on U2

oopS. (the second file should have been /tmp/fileb.pcl not /tmp/filea.pcl)

Try this:
write the preceeding part of the UV data to /tmp/filea.pcl write the trailing p
art of the uv data to /tmp/filea.pcl

SHOULD HAVE READ

Try this:
write the preceeding part of the UV data to /tmp/filea.pcl write the trailing p
art of the uv data to /tmp/fileb.pcl

-Original Message-
From: owner-u2-us...@listserver.u2ug.org [mailto:owner-u2-
us...@listserver.u2ug.org] On Behalf Of George Gallen
Sent: Wednesday, May 20, 2009 2:13 PM
To: u2-users@listserver.u2ug.org
Cc: dhoo...@illinoislock.com
Subject: RE: [U2] PCL problem on U2

Try this:
write the preceeding part of the UV data to /tmp/filea.pcl
write the trailing part of the uv data to /tmp/filea.pcl

To unsubscribe please visit http://listserver.u2ug.org/

---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/

RE: [U2] PCL problem on U2

2009-05-21 Thread Eric Armstrong 
Colin,
What's the bang sign for? We would use EXECUTE "DOS /C COPY etc."

Eric Armstrong
Lobel Financial


-Original Message-
From: Colin Alfke [mailto:alfke...@hotmail.com]
Sent: Wednesday, May 20, 2009 11:29 AM
To: u2-users@listserver.u2ug.org
Subject: RE: [U2] PCL problem on U2


David;



It looks like you're missing the point of the macro - simply load it into
the
printer once and print multiple times. Your converter may allow you to load
it
to the printer, otherwise you actually copy it to the printer (not print
it).
Under Windows we simply:



EXECUTE "!COPY /B \UD\LOGOS\LOGO.MAC \\UNCPathToPrinter"



Sorry, not sure of the Linux syntax. It only needs to be done when the
printer
is powered off an loses the macro so you can do it from a screen etc.
Although
we have one very distributed site that preferred we send the macro before
the
print job to make sure it was there.



In your code you simply do a:



PRINT CHAR(27):'&f':LOGONUM:'y2X'



to print the logo. This simply specifies and executes the macro.



hth

Colin Alfke

Calgary, Canada



LOBEL FINANCIAL PRIVACY NOTICE: 
This communication may contain confidential company information that is 
protected by federal law. Federal regulations prohibit the disclosure (or 
re-disclosure) of confidential information without the written consent of the 
person(s) to whom it pertains. Additionally, the views or opinions presented in 
this email are solely those of the author and do not necessarily represent 
those of the company.
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/

RE: [U2] PCL problem on U2

2009-05-20 Thread Tony G 
All of the other comments look right on.  In addition to
reworking to those suggestions, I'm also thinking there is a CRLF
at the end of each of your lines which may affect processing of
the commands.  I'd build the entire string and then output with a
single PRINT.  I haven't touched this stuff in years, sorry if
it's correct.

Having said that, I'd rather stick an ice pick in my eye than
write PCL.  There are many tools available where you can just use
an HTML-like image tag, and as time permits I recommend you look
into them:


HTH

Tony Gravagno
Nebula Research and Development
TG@ remove.pleaseNebula-RnD.com
Nebula R&D sells mv.NET and other Pick/MultiValue products
worldwide, and provides related development services
Visit PickWiki.com!  Contribute!

> 0004:   PRINT ON 11 CHAR(27):"E"
> 0005:   PRINT ON 11 CHAR(27):"&f100Y"
> 0006:   PRINT ON 11 CHAR(27):"&f0X"
> 0007:   PRINT ON 11 CHAR(27):"&a540h780V"
> 0008:   PRINT ON 11 CHAR(27):"*t300R"
> 0009:   PRINT ON 11 CHAR(27):"*r100A"
> 0010:   EXECUTE "SH -c 'lp -d PR33
/area1/dh.temp/M100_3Logo.pcl'"
> 0011:   PRINT ON 11 CHAR(27):"*rC"
> 0012:   PRINT ON 11 CHAR(27):"&f100X"
> 0013:   PRINT ON 11 CHAR(27):"&f4X"
> 0014:   PRINT ON 11 "THIS IS A TEST OF THE MACRO"
> 0015:   PRINT ON 11 CHAR(27):"E"
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/

Re: [U2] PCL problem on U2

2009-05-20 Thread Dave Taylor 

That's true!  I didn't look at his code.

Does he have to print it from outsided U2?

Dave

Dave Taylor
Sysmark Information Systems, Inc.
Authorized IBM Business Partner
49 Aspen Way
Rolling Hills Estates, CA 90274
(O) 800-SYSMARK (800-797-6275)
(F) 310-377-3550
(C) 310-561-5200
www.sysmarkinfo.com
- Original Message - 
From: "Anthony W. Youngman" 

To: 
Sent: Wednesday, May 20, 2009 2:29 PM
Subject: Re: [U2] PCL problem on U2


In message <87e76198607940c7b663e669a8fc1...@w2kappserver>, Dave Taylor 
 writes

Wol stated:

"This is sending the logo as a DIFFERENT print job. That's your problem."

You can use the OPEN option in SETPTR to accumulate multiple print jobs 
into the same print file before closing the print file.


But to do that, you need to send everything from inside U2. If you look at 
what he's doing, he's actually sending the logo by calling the unix lp 
command... U2 doesn't get a look-in ...


hth,

Dave


hth
Wol
--
Anthony W. Youngman 
'Yings, yow graley yin! Suz ae rikt dheu,' said the blue man, taking the
thimble. 'What *is* he?' said Magrat. 'They're gnomes,' said Nanny. The 
man

lowered the thimble. 'Pictsies!' Carpe Jugulum, Terry Pratchett 1998
Visit the MaVerick web-site - <http://www.maverick-dbms.org> Open Source 
Pick

---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/

---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/

Re: [U2] PCL problem on U2

2009-05-20 Thread Anthony W. Youngman 
In message <87e76198607940c7b663e669a8fc1...@w2kappserver>, Dave Taylor 
 writes

Wol stated:

"This is sending the logo as a DIFFERENT print job. That's your problem."

You can use the OPEN option in SETPTR to accumulate multiple print jobs 
into the same print file before closing the print file.


But to do that, you need to send everything from inside U2. If you look 
at what he's doing, he's actually sending the logo by calling the unix 
lp command... U2 doesn't get a look-in ...


hth,

Dave


hth
Wol
--
Anthony W. Youngman 
'Yings, yow graley yin! Suz ae rikt dheu,' said the blue man, taking the
thimble. 'What *is* he?' said Magrat. 'They're gnomes,' said Nanny. The man
lowered the thimble. 'Pictsies!' Carpe Jugulum, Terry Pratchett 1998
Visit the MaVerick web-site -  Open Source Pick
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/

Re: [U2] PCL problem on U2

2009-05-20 Thread Dave Taylor 

Wol stated:

"This is sending the logo as a DIFFERENT print job. That's your problem."

You can use the OPEN option in SETPTR to accumulate multiple print jobs into 
the same print file before closing the print file.


hth,

Dave

Dave Taylor
Sysmark Information Systems, Inc.
Authorized IBM Business Partner
49 Aspen Way
Rolling Hills Estates, CA 90274
(O) 800-SYSMARK (800-797-6275)
(F) 310-377-3550
(C) 310-561-5200
www.sysmarkinfo.com
Home of SpoolerPlus

- Original Message - 
From: "Anthony W. Youngman" 

To: 
Sent: Wednesday, May 20, 2009 11:23 AM
Subject: Re: [U2] PCL problem on U2


In message , David Hoover 
 writes
I am trying to place a logo that is stored at 
/area1/dh.temp/M100_3Logo.pcl

on a form that I am creating in PCL5. I have no problem with the shading,
boxes, or data. I am having a problem getting the logo to be printed.



Base information:



OS - RedHat Linux

Running U2

Printer is IBM InfoPrint 1464 Color

Logo file original name: 3Logo.jpg

After running thru IPX20xx converter from IBM: M100_3Logo.pcl

(Set this up as Macro 100)



Here's the code that I am currently trying to work with:

0001:   EXECUTE 'SETPTR 11,, NHEAD, FORM IBM, AT PR33'

0002:   PRINTER ON

0003: *

0004:   PRINT ON 11 CHAR(27):"E"

0005:   PRINT ON 11 CHAR(27):"&f100Y"

0006:   PRINT ON 11 CHAR(27):"&f0X"

0007:   PRINT ON 11 CHAR(27):"&a540h780V"

0008:   PRINT ON 11 CHAR(27):"*t300R"

0009:   PRINT ON 11 CHAR(27):"*r100A"


Okay, this is setting up your print job ...


0010:   EXECUTE "SH -c 'lp -d PR33 /area1/dh.temp/M100_3Logo.pcl'"


This is sending the logo as a DIFFERENT print job. That's your problem.
I'm not sure how you'll fix this, but you need to read the logo file into 
U2, and then dump it to your print job without the binary getting 
corrupted.


The other way to do it (I'm pretty sure it's possible but I've never done 
it) is to download the logo to the printer as a logo or font or whatever, 
then have a code in your print job to print the prestored logo.


Cheers,
Wol
--
Anthony W. Youngman 
'Yings, yow graley yin! Suz ae rikt dheu,' said the blue man, taking the
thimble. 'What *is* he?' said Magrat. 'They're gnomes,' said Nanny. The 
man

lowered the thimble. 'Pictsies!' Carpe Jugulum, Terry Pratchett 1998
Visit the MaVerick web-site - <http://www.maverick-dbms.org> Open Source 
Pick

---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/ 

---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/

Re: [U2] PCL problem on U2

2009-05-20 Thread jjuser ud2 
Also, whip out your hex editor and make sure the PCL is in the correct
format.  I've had to do that even when using the converter.  Let us
know how you finally get it to work.

On Wed, May 20, 2009 at 2:29 PM, Colin Alfke  wrote:
> David;
>
>
>
> It looks like you're missing the point of the macro - simply load it into the
> printer once and print multiple times. Your converter may allow you to load it
> to the printer, otherwise you actually copy it to the printer (not print it).
> Under Windows we simply:
>
>
>
> EXECUTE "!COPY /B \UD\LOGOS\LOGO.MAC \\UNCPathToPrinter"
>
>
>
> Sorry, not sure of the Linux syntax. It only needs to be done when the printer
> is powered off an loses the macro so you can do it from a screen etc. Although
> we have one very distributed site that preferred we send the macro before the
> print job to make sure it was there.
>
>
>
> In your code you simply do a:
>
>
>
> PRINT CHAR(27):'&f':LOGONUM:'y2X'
>
>
>
> to print the logo. This simply specifies and executes the macro.
>
>
>
> hth
>
> Colin Alfke
>
> Calgary, Canada
>
>
>> From: David Hoover
>>
>> I am trying to place a logo that is stored at /area1/dh.temp/M100_3Logo.pcl
>> on a form that I am creating in PCL5. I have no problem with the shading,
>> boxes, or data. I am having a problem getting the logo to be printed.
>>
>> Base information:
>>
>> OS - RedHat Linux
>>
>> Running U2
>>
>> Printer is IBM InfoPrint 1464 Color
>>
>> Logo file original name: 3Logo.jpg
>>
>> After running thru IPX20xx converter from IBM: M100_3Logo.pcl
>>
>> (Set this up as Macro 100)
>>
>>
>>
>> Here's the code that I am currently trying to work with:
>>
>> 0001: EXECUTE 'SETPTR 11,, NHEAD, FORM IBM, AT PR33'
>>
>> 0002: PRINTER ON
>>
>> 0003: *
>>
>> 0004: PRINT ON 11 CHAR(27):"E"
>>
>> 0005: PRINT ON 11 CHAR(27):"&f100Y"
>>
>> 0006: PRINT ON 11 CHAR(27):"&f0X"
>>
>> 0007: PRINT ON 11 CHAR(27):"&a540h780V"
>>
>> 0008: PRINT ON 11 CHAR(27):"*t300R"
>>
>> 0009: PRINT ON 11 CHAR(27):"*r100A"
>>
>> 0010: EXECUTE "SH -c 'lp -d PR33 /area1/dh.temp/M100_3Logo.pcl'"
>>
>> 0011: PRINT ON 11 CHAR(27):"*rC"
>>
>> 0012: PRINT ON 11 CHAR(27):"&f100X"
>>
>> 0013: PRINT ON 11 CHAR(27):"&f4X"
>>
>> 0014: PRINT ON 11 "THIS IS A TEST OF THE MACRO"
>>
>> 0015: PRINT ON 11 CHAR(27):"E"
>>
>> 0016: PRINTER OFF
>>
>> 0017: END
>>
>> Thanks in advance for any and all help you can offer.
>>
>> David Hoover
>
> _
> Create a cool, new character for your Windows Live  Messenger.
> http://go.microsoft.com/?linkid=9656621
> ---
> u2-users mailing list
> u2-users@listserver.u2ug.org
> To unsubscribe please visit http://listserver.u2ug.org/
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/

RE: [U2] PCL problem on U2

2009-05-20 Thread George Gallen 
oopS. (the second file should have been /tmp/fileb.pcl not /tmp/filea.pcl)

Try this:
write the preceeding part of the UV data to /tmp/filea.pcl write the trailing 
part of the uv data to /tmp/filea.pcl

SHOULD HAVE READ

Try this:
write the preceeding part of the UV data to /tmp/filea.pcl write the trailing 
part of the uv data to /tmp/fileb.pcl

> -Original Message-
> From: owner-u2-us...@listserver.u2ug.org [mailto:owner-u2-
> us...@listserver.u2ug.org] On Behalf Of George Gallen
> Sent: Wednesday, May 20, 2009 2:13 PM
> To: u2-users@listserver.u2ug.org
> Cc: dhoo...@illinoislock.com
> Subject: RE: [U2] PCL problem on U2
>
> Try this:
> write the preceeding part of the UV data to /tmp/filea.pcl
> write the trailing part of the uv data to /tmp/filea.pcl
>
> To unsubscribe please visit http://listserver.u2ug.org/
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/

RE: [U2] PCL problem on U2

2009-05-20 Thread Colin Alfke 
David;



It looks like you're missing the point of the macro - simply load it into the
printer once and print multiple times. Your converter may allow you to load it
to the printer, otherwise you actually copy it to the printer (not print it).
Under Windows we simply:



EXECUTE "!COPY /B \UD\LOGOS\LOGO.MAC \\UNCPathToPrinter"



Sorry, not sure of the Linux syntax. It only needs to be done when the printer
is powered off an loses the macro so you can do it from a screen etc. Although
we have one very distributed site that preferred we send the macro before the
print job to make sure it was there.



In your code you simply do a:



PRINT CHAR(27):'&f':LOGONUM:'y2X'



to print the logo. This simply specifies and executes the macro.



hth

Colin Alfke

Calgary, Canada


> From: David Hoover
>
> I am trying to place a logo that is stored at /area1/dh.temp/M100_3Logo.pcl
> on a form that I am creating in PCL5. I have no problem with the shading,
> boxes, or data. I am having a problem getting the logo to be printed.
>
> Base information:
>
> OS - RedHat Linux
>
> Running U2
>
> Printer is IBM InfoPrint 1464 Color
>
> Logo file original name: 3Logo.jpg
>
> After running thru IPX20xx converter from IBM: M100_3Logo.pcl
>
> (Set this up as Macro 100)
>
>
>
> Here's the code that I am currently trying to work with:
>
> 0001: EXECUTE 'SETPTR 11,, NHEAD, FORM IBM, AT PR33'
>
> 0002: PRINTER ON
>
> 0003: *
>
> 0004: PRINT ON 11 CHAR(27):"E"
>
> 0005: PRINT ON 11 CHAR(27):"&f100Y"
>
> 0006: PRINT ON 11 CHAR(27):"&f0X"
>
> 0007: PRINT ON 11 CHAR(27):"&a540h780V"
>
> 0008: PRINT ON 11 CHAR(27):"*t300R"
>
> 0009: PRINT ON 11 CHAR(27):"*r100A"
>
> 0010: EXECUTE "SH -c 'lp -d PR33 /area1/dh.temp/M100_3Logo.pcl'"
>
> 0011: PRINT ON 11 CHAR(27):"*rC"
>
> 0012: PRINT ON 11 CHAR(27):"&f100X"
>
> 0013: PRINT ON 11 CHAR(27):"&f4X"
>
> 0014: PRINT ON 11 "THIS IS A TEST OF THE MACRO"
>
> 0015: PRINT ON 11 CHAR(27):"E"
>
> 0016: PRINTER OFF
>
> 0017: END
>
> Thanks in advance for any and all help you can offer.
>
> David Hoover

_
Create a cool, new character for your Windows Live Messenger.
http://go.microsoft.com/?linkid=9656621
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/

Re: [U2] PCL problem on U2

2009-05-20 Thread Anthony W. Youngman 
In message , David Hoover 
 writes

I am trying to place a logo that is stored at /area1/dh.temp/M100_3Logo.pcl
on a form that I am creating in PCL5. I have no problem with the shading,
boxes, or data. I am having a problem getting the logo to be printed.



Base information:



OS - RedHat Linux

Running U2

Printer is IBM InfoPrint 1464 Color

Logo file original name: 3Logo.jpg

After running thru IPX20xx converter from IBM: M100_3Logo.pcl

(Set this up as Macro 100)



Here's the code that I am currently trying to work with:

0001:   EXECUTE 'SETPTR 11,, NHEAD, FORM IBM, AT PR33'

0002:   PRINTER ON

0003: *

0004:   PRINT ON 11 CHAR(27):"E"

0005:   PRINT ON 11 CHAR(27):"&f100Y"

0006:   PRINT ON 11 CHAR(27):"&f0X"

0007:   PRINT ON 11 CHAR(27):"&a540h780V"

0008:   PRINT ON 11 CHAR(27):"*t300R"

0009:   PRINT ON 11 CHAR(27):"*r100A"


Okay, this is setting up your print job ...


0010:   EXECUTE "SH -c 'lp -d PR33 /area1/dh.temp/M100_3Logo.pcl'"


This is sending the logo as a DIFFERENT print job. That's your problem.
I'm not sure how you'll fix this, but you need to read the logo file 
into U2, and then dump it to your print job without the binary getting 
corrupted.


The other way to do it (I'm pretty sure it's possible but I've never 
done it) is to download the logo to the printer as a logo or font or 
whatever, then have a code in your print job to print the prestored 
logo.


Cheers,
Wol
--
Anthony W. Youngman 
'Yings, yow graley yin! Suz ae rikt dheu,' said the blue man, taking the
thimble. 'What *is* he?' said Magrat. 'They're gnomes,' said Nanny. The man
lowered the thimble. 'Pictsies!' Carpe Jugulum, Terry Pratchett 1998
Visit the MaVerick web-site -  Open Source Pick
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/

RE: [U2] PCL problem on U2

2009-05-20 Thread George Gallen 
Is the SETPTR set to send any data "NOW", or will it be buffered
until you close the program?

If it's buffered, then you sending the logo, then the UV data
instead of sandwiching the logo between the UV data.

Try this:
write the preceeding part of the UV data to /tmp/filea.pcl
write the trailing part of the uv data to /tmp/filea.pcl

then try:

(cat /tmp/filea.pcl ; cat /area1/dh.temp/M100_3Logo.pcl ; cat /tmp/fileb.pcl) | 
lp -d PR33

If that works, then it's the sandwiching issue.

George

> -Original Message-
> From: owner-u2-us...@listserver.u2ug.org [mailto:owner-u2-
> us...@listserver.u2ug.org] On Behalf Of David Hoover
> Sent: Wednesday, May 20, 2009 1:05 PM
> To: u2-users@listserver.u2ug.org
> Subject: [U2] PCL problem on U2
>
> I am trying to place a logo that is stored at
> /area1/dh.temp/M100_3Logo.pcl
> on a form that I am creating in PCL5. I have no problem with the
> shading,
> boxes, or data. I am having a problem getting the logo to be printed.
>
>
>
> Base information:
>
>
>
> OS - RedHat Linux
>
> Running U2
>
> Printer is IBM InfoPrint 1464 Color
>
> Logo file original name: 3Logo.jpg
>
> After running thru IPX20xx converter from IBM: M100_3Logo.pcl
>
> (Set this up as Macro 100)
>
>
>
> Here's the code that I am currently trying to work with:
>
> 0001:   EXECUTE 'SETPTR 11,, NHEAD, FORM IBM, AT PR33'
>
> 0002:   PRINTER ON
>
> 0003: *
>
> 0004:   PRINT ON 11 CHAR(27):"E"
>
> 0005:   PRINT ON 11 CHAR(27):"&f100Y"
>
> 0006:   PRINT ON 11 CHAR(27):"&f0X"
>
> 0007:   PRINT ON 11 CHAR(27):"&a540h780V"
>
> 0008:   PRINT ON 11 CHAR(27):"*t300R"
>
> 0009:   PRINT ON 11 CHAR(27):"*r100A"
>
> 0010:   EXECUTE "SH -c 'lp -d PR33 /area1/dh.temp/M100_3Logo.pcl'"
>
> 0011:   PRINT ON 11 CHAR(27):"*rC"
>
> 0012:   PRINT ON 11 CHAR(27):"&f100X"
>
> 0013:   PRINT ON 11 CHAR(27):"&f4X"
>
> 0014:   PRINT ON 11 "THIS IS A TEST OF THE MACRO"
>
> 0015:   PRINT ON 11 CHAR(27):"E"
>
> 0016:   PRINTER OFF
>
> 0017:END
>
>
>
> Thanks in advance for any and all help you can offer.
>
>
>
> David Hoover
>
> Illinois Lock
>
> (847) 537-1800 x293
> ---
> u2-users mailing list
> u2-users@listserver.u2ug.org
> To unsubscribe please visit http://listserver.u2ug.org/
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/

RE: [U2] PCL problem on U2

2009-05-20 Thread Barry Rutherford 
I suspect your issue is in using the execute statement on line 10.

Here's how we print logos on our customer facing documents:

***
GET.IMAGE: 
**
   OPENSEQ UNIX.FILE TO IMAGE.FILE ELSE RETURN
   LOOP.END = 0
   ESC = CHAR(27)
   IMAGE = ''
   LOOP
  READBLK DATA FROM IMAGE.FILE,64 ELSE LOOP.END = 1
   UNTIL LOOP.END DO
  IMAGE := DATA
   REPEAT
   IF IMAGE[1,1] = ESC THEN IMAGE = IMAGE[2,LEN(IMAGE)]
   DCNT = DCOUNT(IMAGE,ESC)
   FOR D = 1 TO DCNT
  ITEM = FIELD(IMAGE,ESC,D)
  BEGIN CASE
 CASE INDEX(ITEM,'p0x',1)
XPOS = FIELD(FIELD(ITEM,"x",1),"p",2)
YPOS = FIELD(FIELD(ITEM,"x",2),"Y",1)
PRINT ON 1 ESC:'*p':XPOS+XOFF:'x':YPOS+YOFF:'Y':
 CASE ITEM = '*p0x'
PRINT ON 1 ESC:'*p':XOFF:'x':
 CASE 1
PRINT ON 1 ESC:ITEM:
  END CASE
   NEXT D
   CLOSE IMAGE.FILE
   RETURN

This is subroutine is contained within a particular report program we
use - however, we have an external subroutine that we often call that
does exactly the same thing.  We simply call the subroutine to print the
logo on the document.

Note: you'll have to change the printer # - we use 1, I see you're using
11

UNIX.FILE = the full UNIX path to the .pcl logo file we have stored on
our system.

Good luck.  Hope this helps.

Barry Rutherford
Programmer / Analyst
MobilexUSA
920 Ridgebrook Rd, Sparks, MD 21152
Direct: 443-662-4162
Toll Free: 800-786-8015 ext. 4162
Fax: 443-662-4225
http://www.mobilexusa.com

-Original Message-
From: owner-u2-us...@listserver.u2ug.org
[mailto:owner-u2-us...@listserver.u2ug.org] On Behalf Of David Hoover
Sent: Wednesday, May 20, 2009 1:05 PM
To: u2-users@listserver.u2ug.org
Subject: [U2] PCL problem on U2

I am trying to place a logo that is stored at
/area1/dh.temp/M100_3Logo.pcl
on a form that I am creating in PCL5. I have no problem with the
shading,
boxes, or data. I am having a problem getting the logo to be printed.

 

Base information:

 

OS - RedHat Linux

Running U2

Printer is IBM InfoPrint 1464 Color

Logo file original name: 3Logo.jpg

After running thru IPX20xx converter from IBM: M100_3Logo.pcl

(Set this up as Macro 100)

 

Here's the code that I am currently trying to work with:

0001:   EXECUTE 'SETPTR 11,, NHEAD, FORM IBM, AT PR33'

0002:   PRINTER ON

0003: *

0004:   PRINT ON 11 CHAR(27):"E"

0005:   PRINT ON 11 CHAR(27):"&f100Y"

0006:   PRINT ON 11 CHAR(27):"&f0X"

0007:   PRINT ON 11 CHAR(27):"&a540h780V"

0008:   PRINT ON 11 CHAR(27):"*t300R"

0009:   PRINT ON 11 CHAR(27):"*r100A"

0010:   EXECUTE "SH -c 'lp -d PR33 /area1/dh.temp/M100_3Logo.pcl'"

0011:   PRINT ON 11 CHAR(27):"*rC"

0012:   PRINT ON 11 CHAR(27):"&f100X"

0013:   PRINT ON 11 CHAR(27):"&f4X"

0014:   PRINT ON 11 "THIS IS A TEST OF THE MACRO"

0015:   PRINT ON 11 CHAR(27):"E"

0016:   PRINTER OFF

0017:END

 

Thanks in advance for any and all help you can offer.

 

David Hoover

Illinois Lock

(847) 537-1800 x293
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/

Re: [U2] PCL problem on U2

2009-05-20 Thread Steve Romanow 

David Hoover wrote:

I am trying to place a logo that is stored at /area1/dh.temp/M100_3Logo.pcl
on a form that I am creating in PCL5. I have no problem with the shading,
boxes, or data. I am having a problem getting the logo to be printed.

  
One thought I has is maybe try it as ps or something liek that.  Is pcl 
a hard requirement?


I am working on a project that will use Unidata on RH, has your 
experience with U2 + RH been positive?

---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/

[U2] PCL problem on U2

2009-05-20 Thread David Hoover 
I am trying to place a logo that is stored at /area1/dh.temp/M100_3Logo.pcl
on a form that I am creating in PCL5. I have no problem with the shading,
boxes, or data. I am having a problem getting the logo to be printed.

 

Base information:

 

OS - RedHat Linux

Running U2

Printer is IBM InfoPrint 1464 Color

Logo file original name: 3Logo.jpg

After running thru IPX20xx converter from IBM: M100_3Logo.pcl

(Set this up as Macro 100)

 

Here's the code that I am currently trying to work with:

0001:   EXECUTE 'SETPTR 11,, NHEAD, FORM IBM, AT PR33'

0002:   PRINTER ON

0003: *

0004:   PRINT ON 11 CHAR(27):"E"

0005:   PRINT ON 11 CHAR(27):"&f100Y"

0006:   PRINT ON 11 CHAR(27):"&f0X"

0007:   PRINT ON 11 CHAR(27):"&a540h780V"

0008:   PRINT ON 11 CHAR(27):"*t300R"

0009:   PRINT ON 11 CHAR(27):"*r100A"

0010:   EXECUTE "SH -c 'lp -d PR33 /area1/dh.temp/M100_3Logo.pcl'"

0011:   PRINT ON 11 CHAR(27):"*rC"

0012:   PRINT ON 11 CHAR(27):"&f100X"

0013:   PRINT ON 11 CHAR(27):"&f4X"

0014:   PRINT ON 11 "THIS IS A TEST OF THE MACRO"

0015:   PRINT ON 11 CHAR(27):"E"

0016:   PRINTER OFF

0017:END

 

Thanks in advance for any and all help you can offer.

 

David Hoover

Illinois Lock

(847) 537-1800 x293
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/