Thank you for visiting Lets Go Publish! (LGP!)
In this section we offer a download for RPG material that can be used in a number of LGP! RPG book products.
Though some who have bought the AS/400 and IBM i RPP & RPG Developers Guide have found value in downloading one of the three libraries that were built specifically for the Book titled, The System i RPG & RPG IV Tutorial & Lab Exercises, LGP has no specific files for the RPG Developers Guide. We will however, for a minimal consulting fee, send a text file of some of the book so that you can copy the text files into your source files as need be.
Originally, the Lab book was offered with a CD along with PowerPoint presentations on RPG as well as the library used for perfroming the lab exercises.
In the recent packaging of the libraries and subsequent testing, the distribution appeared to be clean. However when received by implementers, there were some missing objects. As it turns out, these were found in other libraries on the development system and so a documentation patch was issued that permitted the exercises to be performed.
Thank you for your patience
V5R4 Save File
V6R1 Save File
A rough dialogue between one implementer of the labs in their original version and the author is included as is below as it may help if you encounter issues. The files have not been updated since this time.
X-Spam-Status: No, score=0.0 required=5.0
X-Mailer: Novell GroupWise Internet Agent 7.0.2 HP
Date: Tue, 19 Feb 2008 14:10:56 -0600
Subject: Re: CPF4101 error "System i RPG & RPGIV Tutorial and Lab
Brian, We can now get to the RPGMenu so that's progress. Thank you for helping.
Missed the library
Put this in STURPGSTR
Create a library called RPGStudent
Compile this to that library and you should be in business
DSPSIZ(24 80 *DS3)
2 25'RPG ONLINE University RPG CLASS'
4 3'Hello Mr. / MS. '
USER 10A O 4 22
7 9'Do You want to continue? (Y or N)'
YORN 1A I 7 48
Window SEU at 10 with A in column 6
At 02:18 PM 2/19/2008, you wrote:
>Still no STURPGSTR. Can I create it from the source RPGSTART?
>Here you go Bob
>I amplified the CD instructions
>Hopefully, this will do it for you.
>You have to get he save file to the System i in order to restore it.
>Either via OPS NAV, Mapping a Drive or pure FTP
>This will get you there if you have NetServer running:
>Copyright law applies to the contents of this CD as well as the book itself.
>If you have need to copy any of this material, please contact the author.
>The SOURCE source file in RPGOBJ holds all of the programs and file
>(Not QRPGLESRC or QCLSRC or QDDSSRC -- SOURCE)
>Follow these instructions to load the labs
>Restore the RPGOBJ library from the CD by doing the following:
> Create Save File RPGOBJ in library QGPL
> Copy the save file (FTP or otherwise) to the System i
>from the command line type:
>md '/upload' to create an upload directory in the IFS root
>Using OPS Navigator, create a share called upload pointing to the /upload
>Right click on My Network Places
>Pick map a drive
>Map a drive, say "Z" to \\youripaddress\ uploads
>Now, Z will pretend to be on your PC but will be AS400 IFS
>Right click on the CD folder named RPGOBJ
>Righ Click on the Z drive inside the folder
>The folder will go to the AS/400
>Now to get it in the QGPL save file RPGOBJ
> Sign on to FTP with security officer capable profile
>Use binary command then the FTP put command
>200 Representation type is binary IMAGE.
>put /BK/rpgobj/rpgobjv5r4.sav /QSYS.LIB/QGPL.LIB/RPGOBJ.FILE
>227 Entering Passive Mode (10,100,0,254,118,191).
>150 Sending file to member RPGOBJ in file RPGOBJ in library QGPL.
>226 File transfer completed successfully.
>10703616 bytes transferred in 0.335 seconds. Transfer rate 31954.818 KB/sec.
>Now the CD Save file is where it should be in QGPL
>Now, you have to restore the library rpgobj
>RSTLIB SAVLIB(RPGOBJ) DEV(*SAVF) SAVF(QGPL/RPGOBJ) MBROPT(*ALL)
>The following are leftover instructions from the CD
> If you bring it to the IFS via a NetServer COPY
> Use the AS/400 FTP to AS/400 FTP Server to get IFS file to QGPL
> Use Binary FTP transfer
>Restore the RPGOBJ library with a RSTOBJ command
> There are lots more artifacts than needed for the book
> Object Files have data in that may help the exercises
>Create a user profile for each person in the class
> Use RPGStart in RPGOBJ as the startup program in the profile
> It will create a library for each profile with lots of objects
>The Lab book / Tutorial is ready to use with one profile
> When you sign on or a student signs on you will get a menu
> If you have been on before, your objecs remain intact
> When you are finished with the tutorial or the Labs
> You may delete your profile and the library.
>If you have problems send an email to
>The PowerPoints slides provided have a wealth of information for your use.
>The chapters in the Powerpoints correspond to the chapters in the System i
>RPG & RPGIV Guidde published by LetsGoPublish in October, 2006. This lab
>book and these exercises are an excellent complement for that text book if
>you as a professor choose to adopt the book.
>If you choose this book for the labs alone, the Powerpoints can still help
>in that they contain just about all of the information that is in the text
>book -- other than the large charts. So, a student can use the Powerpoints
>as a reference document if the text has not been adopted.
>This book is structured as a 1-2-3 tutorial and can serve as a tutorial for
>those needing an inexpensive way to learn RPG 7 RPG IV on their own..
>At 09:14 AM 2/19/2008, you wrote:
> >Hi Brian,
> >Thank you for responding quickly to my problem. However, we were off
> >yesterday for the holiday so I couldn't reply until now. The new library
> >is RPGBOBW. The object STURPGSTR is not anywhere on our system. We have
> >just started using the book. Training is scheduled to start today for our
> >new employee so I wanted to get things setup. My supervisor has ordered
> >another copy of the book so both myself and Bob W can have a copy.
> >Thank you.
> >Hi Bob
> >Having packaged it up and never having used it myself from its packaged
> >state, may I ask a few questions?
> >Hoping the answer is yes, (and I will get the book to review out
> >immediately if I need to)
> >What library is installed on your system that was not installed before
> >running the startup instructions for the lab?
> >Please look for STURPGSTR in that library
> >Otherwise do a WRKOBJ using the name of the object STURPGSTR and permit the
> >library and object type be *ALL and tell me if you get anything.
> >Thank you for using this book and I will help you get this stuff functional.
> >(Where are you now in the book so I may offer the best guidance?)
> >The best.
> >At 05:25 PM 2/15/2008, you wrote:
> > >We purchased the book "System i RPG & RPGIV Tutorial and Lab Exercises". I
> > >loaded the RPGOBJ library and created a user profile RPGBOBW that calls
> > >rpgobj/rpgstart. When I sign on I get the library list displayed. But when
> > >I hit enter I get an error, CPF4101. It says RPGSTUDENT/STURPGSTR not
> > >found. Can you help?
> > >
> > >************************************
> > > Message . . . . : CPF4101 received by RPGSTART at 1600. (C D I
> > > R)
> > >
> > >
> > > Cause . . . . . : Control language (CL) program RPGSTART in library
> > > RPGOBJ
> > > detected an error at statement number 1600. Message text for CPF4101
> > > is:
> > > File STURPGSTR in library RPGSTUDENT not found or inline data file
> > > missing.
> > >************************************
> > >library list:
> > >QSYS
> > >QSYS2
> > >QHLPSYS
> > >QUSRSYS
> > >CLIFF
> > >LXITMS
> > >LXIBMS
> > >LXI
> > >MMAIL
> > >RPGBOBW
> > >QTEMP
> > >QGPL
> > >HTEGPL
> > >
> > >Thank you.
> > >Inquiry
> >Brian Kelly, Information Technology Consultant,
> >Assistant Professor, Business Information Technology
> >Marywood University, Scranton, Pennsylvania 18509