|
midrange.com
>>When using AFP objects like *PAGSEG or *OVERLAY, you use a PC to create the
>>graphic, then you print through an AFP printer driver to a PC file. You
>>put that PC file in a /400 shared folder, then do a CPYFRMPCD to get it into a
>>physical file on the /400..
>>
>>THAT file MUST BE created LVLCHK(*NO) per IBM's instructions....
>
>Can you point me at those instructions? I've done a little with AFP objects
>and have not used LVLCHK(*NO), AFAIK..
Sure thing! Looking at the IBM manual (on the 3.7 CD-ROM) entitled
AS/400 Guide to AFP and PSF (Document Number S544-5319-01),
section 7.5.5, there's a section for uploading and compiling an
image.
The basic steps are:
0. Use a PC application to create/scan/paint your image.
With that PC application, "print" the image with the AFP
printer driver. You'll create a PC file out of it...
Transfer that PC file to a shared folder.
1. Create a PF on the /400 to contain the image data
2. CPYFRMPCD to the PF
3. CRTPAGSEG from the PF
The details look best when viewed in a fixed font:
1. Create a resource database
Go to an AS/400 command line and use the following command to create a file
to
receive the PC resource:
CRTPF FILE(MYLIB/PAGESEG) RCDLEN(8201) LVLCHK(*NO)
The suggested record length is 8201 (32766 is the maximum) and the level
check
parameter must be *NO.
2. Transfer the PC resource to the AS/400 database
Use the CPYFRMPCD command to transfer the PC resource to the AS/400
database.
+----------------------------------------------------------------------------------+
¦
¦
¦ Copy From PC Document (CPYFRMPCD)
¦
¦
¦
¦ Type choices, press Enter.
¦
¦
¦
¦ From folder . . . . . . . . . . >
resource____________________________________ ¦
¦ ____________________________________
¦
¦ To file . . . . . . . . . . . . > pageseg___ Name
¦
¦ Library . . . . . . . . . . . mylib_____ Name, *LIBL, *CURLIB
¦
¦ From document . . . . . . . . . > sunlogo.img Name
¦
¦ To member . . . . . . . . . . . *FIRST____ Name, *FIRST, *FROMDOC
¦
¦ Replace or add records . . . . . *REPLACE *REPLACE, *ADD
¦
¦ Translate table . . . . . . . . > *NONE_____ Name, *DFT, *NONE
¦
¦ Library . . . . . . . . . . . __________ Name, *LIBL, *CURLIB
¦
¦ Format of PC data . . . . . . . > *NOTEXT__ *TEXT, *NOTEXT
¦
¦
¦
¦
¦
¦
¦
¦
¦
¦
¦
¦
¦
¦
Bottom ¦
¦ F3=Exit F4=Prompt F5=Refresh F12=Cancel F13=How to use this display
¦
¦ F24=More keys
¦
¦
¦
¦
¦
+----------------------------------------------------------------------------------+
From folder Enter the name of the AS/400 system where you copied the
PC image file
To file Enter the name of the resource file you created
From document Enter the name of the document from which you will make
the copy
Translate table Specify *NONE; the resource should not be translated
Format of PC data Specify *NOTEXT; the resource is not text
3. Create the Page Segment
Use the CRTPAGSEG command to create an AS/400 page segment (object type
*PAGSEG).
+----------------------------------------------------------------------------------+
¦
¦
¦ Create Page Segment (CRTPAGSEG)
¦
¦
¦
¦ Type choices, press Enter.
¦
¦
¦
¦ Page segment . . . . . . . . . . > SUNLOGO Name
¦
¦ Library . . . . . . . . . . . > MYLIB_____ Name, *CURLIB
¦
¦ File . . . . . . . . . . . . . . > PAGESEG___ Name
¦
¦ Library . . . . . . . . . . . > MYLIB_____ Name, *LIBL, *CURLIB
¦
¦ Member . . . . . . . . . . . . . *PAGSEG___ Name, *PAGSEG
¦
¦ Text 'description' . . . . . . . > Super Sun Seeds Logo
_____________________ ¦
¦ _______
¦
¦
¦
¦
¦
¦
¦
¦
¦
¦
¦
¦
¦
¦
¦
¦
¦
¦
¦
¦
Bottom ¦
¦ F3=Exit F4=Prompt F5=Refresh F10=Additional parameters F12=Cancel
¦
¦ F13=How to use this display F24=More keys
¦
¦
¦
¦
¦
+----------------------------------------------------------------------------------+
There are other commands available, but these work all the way down to 3.1
Buck Calabro
Commsoft
+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to "MIDRANGE-L@midrange.com".
| To unsubscribe from this list send email to MAJORDOMO@midrange.com
| and specify 'unsubscribe MIDRANGE-L' in the body of your message.
| Questions should be directed to the list owner/operator: david@midrange.com
+---
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2025 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.
