0 pts.
 Convert Spooled file to Hexadecimal Values
RPG
Is their a way that a spooled file be converted to hexadecimal values?

Software/Hardware used:
ASKED: February 16, 2005  10:05 PM
UPDATED: October 20, 2009  2:12 AM

Answer Wiki:
Not exactly sure what you want but you can copy a spooled file to a database physical file(CPYSPLF) then look at the contents of that in Hex(DSPPFM file, then F10,F11).
Last Wiki Answer Submitted:  February 17, 2005  3:46 am  by  Nevster   0 pts.
All Answer Wiki Contributors:  Nevster   0 pts.
To see all answers submitted to the Answer Wiki: View Answer History.


Discuss This Question:
_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _


 

It sounds like you might be trying to look at the ‘control-code’ values, etc. (To do this you must have enough authority to get into the files and members in QSPL. I usually have our Security Officer do this for me.) You can get a dump of the whole spoolfile:

Display the spoolfile (via WRKJOB, WRKSBMJOB, WRKUSRJOB, WRKSPLF, etc.), do a system-request 3 (DSPJOB).

Select option 12 – Display Locks….

Page through the locked objects for your job. You’ll see one for a file in QSPL.

Select option ’5=Display job member locks’. This will show you the file and member name in the QSPL library.

Do a CPYF from this file and member to *PRINT with OUTFMT(*HEX). This will show you everything you want to know about the spoolfile and more.

 0 pts.

 

What precisely are you trying to look for/do with the hex values?

Are you trying to find the printer control characters or so something else?

 0 pts.

 

Thanks for your reply…

Im trying to print a big characters using RLU in an emulated epson printer. Is there some way to print it.

 0 pts.

 

Hope this helps. This is really old code that I used to change fonts on IBM 3812 printers. I had to output hex codes to the printer. This code has since been replaced with Font overrides in my DDS.

* REF MANUAL: USING The IBM 3812 pageprinter with the IBM S36/S38
* PAGE 4-62, APPENDIX A, Appendix B
d hexzro s 1
d fnt1 s 1 dim(9)
d fnt2 s 1 dim(9)
c exsr $font
c movea fnt1 ldfnt1
c movea fnt2 ldfnt2
c $font begsr
c bitoff ’01234567′ hexzro
c move hexzro fnt1
c move hexzro fnt2
* SONORAN SERIF 24-PT Roman Bold Font 5707
c biton ’2467′ fnt1(1)
c biton ’0137′ fnt1(2)
c biton ’567′ fnt1(3)
c biton ’57′ fnt1(4)
c biton ’356′ fnt1(5)
c biton ’1467′ fnt1(6)
c biton ’02′ fnt1(8)
c endsr

 0 pts.

 

Thanks for all your reply. I’m just trying to change the font size(BIGGER) of a field in RLU when printing to an EPSON printer that is emulated. I need to kno how to use the hex values is it in the printer file or in the program? thank you very much..

 0 pts.

 

Never access the QSPL files directly. There is never a reason for anyone but IBM Support to do this and it has always been clearly recommended against by IBM.

As for the original question, it’s still not clear what converting a spooled file to hex values is for. How does converting to hex have anything to do with “print a big characters using RLU”?

I’ve needed to convert spooled output to hex before. I simply copied the spooled file to a database file. Then I used REXX to read each record and output with the C2X (Character to Hexadecimal) function.

Tom

 107,735 pts.