Craig Rutledge - Utility Downloads

Back to SiteMap.

JCRANZD - Print DSPF Field Layout

Uses the insanely complicated QDFRTVFD, Retrieve display file description API, to provide a representational report with the field names printed on the data layout. The record formats are listed in the order they appear in the DDS source.

Thanks to Randy Gevedon for suggesting this extension to the JCRANZP utility.

JCRANZO - Print OSPEC Layout Report

Reads your RPG4 source O specs to provide a representational report with the field names printed on the data layout. This is a very easy way to determine which fields are positioned where on the report.

JCRANZP - Print PRTF Field Report Layout

Reads your PRTF source to provide a representational report with the field name printed under the data positions..

JCRLOG - Select Previously Executed Commands

Addresses the problem of having to press F9 repeatedly on the command line to cycle back through previously executed commands. This command executes an API to retrieve all commands executed from command line. (Never press F9 Again!). A subfile list is presented to execute or prompt each command. 11/13/2001: Thanks to Brignoli Luca for coding a change that shows only distinct commands regardless of the number of times a command has been executed.

JCRDUMP - Summarize RPG Dump Listings

Prints a list of all RPG programs that have generated a Dump spooled file and the count of how many times that program has dumped.

This command uses several spooled file APIs to efficiently "read" through the selected outq and extract desired information from each spooled file.

JCRDQD - Display Data Queue Description

Displays Text, Data Length, Sequence, and Key Length (if any), current number of entries and maximum entries ever in the selected data queue.

JCRDQE - Display Data Queue Entries

Displays the dataq entries in a subfile without touching or disturbing the entries. This is an important feature. A page navigational field is used to allow quick access to desired entry.

05/08/2001: Rewrite: Use new api QMHRDQM to retrieve queue entries as messages.
10/22/2001: Thanks to Dennis Lovelady for sharing a technique to use the user space as the receive variable.
11/13/2001: Thanks to Thomas Raddatz for coding some powerful enhancements like a hexadecimal display mode, and the ability to window over for longer entries.
06/26/2002: Thanks to Rory Hewitt for coding a toggle (F14) between keyed dataq keys and the data queue entries

JCRIND - List Indicators Used

Quick view of indicators used in the selected RPG3, RPGLE, /free, CLP, PRTF or DSPF source code. Multiple members can be entered at one time to see cumulative indicator usage.

Just for the record, I originally wrote the JCRIND display indicator utility in 1985 on a Wang VS80 in RPGII!. This is the oldest surviving utility on this page. 

JCROBJD - Expanded Object Descriptions

Work with a list of objects similar to the WRKOBJ command along with additional information about an object.  Excellent utility for cleanup as you can sort by last used date.

In the generated subfile, you may sort any column, like last used date, either ascending or descending by placing the cursor on the column and pressing a command key.

JCRFFD - File Field Descriptions

Displays,  prints, places in a outfile, or generates into RPGLE source the file-field level information for the selected file in the selected library.

09/16/2002: Thanks to suggestions by Ewart Desouza this utility now has full keylist information and a neat search through field name/text capability!

JCRNOTPOP - List Fields Not Populated

Prints of listing of fields that are not populated in the selected data file.

This utility is very handy when searching for an unused field or as a testing tool to verify all fields in a file are being populated.

JCRLJOBD - Find Library on JOBD libl

Determine if a library is on the library list of any jobd.

This is very helpful when wanting to cleanup or delete a library as you check to see if there will be any problems before hand. End result is a spooled file listing all JOBDs that use the selected library.

JCRQJOBD - Find Job Queue on Jobd

Generates list of the Job Descriptions that use the selected Job Queue name. The Output option allows either print or display of the list.

Thanks to Marti Riera at AS/400 Recursos iSeries for submitting the code for this utility. I really like it when a person replies with something useful they have created based on one of these utilities! (in this case, Marti used an adaptation of the above JCRLJOBD utility).

JCRLKEY - Find Desired Access Path

Shows a subfile of all keys over the selected file and all data base relations (logicals) of that PF. You can select a field in any klist sequence or selected klist sequence to show the desired logical. Enter the file name (logical or physical) then the command will prompt to select the keys, then list every dependent file meeting your criteria. You can also select to exclude files with select/omit from your search.

JCRPRTF - Generate external Print File DDS source

Generate a DDS external PRTF source member from the selected RPG4 program's O specs.

Please be aware the generated DDS will probably need some minor editing before the output perfectly matches the original O specs.  Things like array indexed name in O specs are not legal in DDS.

JCRPATTR - Create from PRTF Attributes

Extracts the creation attributes from an existing PRTF and applies them to the CRTPRTF of the selected source member.

JCRNUMB - Number Source - Reformat /Free

Powerful / free refomatting tool!  Updates your RPG source code with the structured logic statements numbered in the left margin. It will optionally highlight comments lines, code matching ENDxx opcodes, and reformat /free code. I use this utility many times a day while working on code. With the addition of source code reformatting, it has superseded it's original usefulness into an absolutely essential tool for working with /free source!

JCRSDENT - Print Indented Source Listing

Prints a CL or RPG source listing with structured programming operations indented for improved readability.

JCRRTVRPG - Retrieve RPGLE Source

Retrieves the source member from any V5 or V6 RPGLE object compiled with DBGVIEW *LIST or *ALL. Note: There are some quirks with the IBM dump so please read the help text with this command.

JCRBND - List Procedure Names

Outputs a list of procedures/symbols that are exported by a selected *BNDDIR, *SRVPGM or *MODULE.

JCRSUBR -Print Subroutine Structure Listing

Reads the selected source and creates a summary listing of subroutine names and subroutines that are executed from within subroutines. It produces a compact listing that will be a big help when analyzing a program.

If you are looking for a recursive subprocedure call example, the print program in this utility uses that concept to run down the EXSR trees.

JCRJOB - Work With Selected Job List

Loads a subfile with a list of jobs that meet your selection criteria. From the subfile, you can select various options to perform.

This command also includes a nifty job file I/O monitor.. You can sort the open files by number of I/Os or file name.
07/22/2002: Use new v5 api QDMLOPNF to list open files.

JCRSPLF - List Spool Files with Options

Loads a subfile with a list of spooled files that meet your selection criteria. From the subfile, you can select various options to perform. Added a API driven dupicate spooled file option. Creates a new spooled file from selected spooled file and lets you override the creation attributes, like page rotation and outq.

JCRDTAARA - List Data Area Values and Rollover Distances

Lists selected or *all *DECimal type data areas in selected library. It shows the current value in the dtaara and how many more (whole number integer) values are available before the data area rolls back over to zero. Also included is the creation date of the dtaara, last date used, and number of days used.

If you use dtaaras to control things like next order number, next package number, etc.. It can be extremely useful to know what value is in these data areas and how many more values are available before the data area rolls back over to zero.

JCRLOBJ - List generic objects example with user index

An example of using APIs get object names into a list for processing then using a User Index to sort the list. This command will display a subfile of all objects meeting the selection criteria.

JCRLSRC - List Program Source/Modules

Prints a list of the selected program objects showing the source code lib/file/member that was used to compile the program. If the program was created with modules, then all modules that are bound in the program are listed. Also included is the creation date of the object, last date used, and number of days used.

Thanks to Pete Priefer for suggesting this very useful utility.

JCROLCK - List Jobs with Object Locks

Displays a subfile of jobs with a lock on the selected object. The big advantage is ability to SNDBRKMSG to an offending user. The ENDJOB option defaults to *IMMED as opposed to the whimpy *CNTRLD option of the WRKJCROLCK command.

JCRCALL - Command Prompt Entry Parms

Generates/prompts a command definition created from the entry parm field names and attributes required by selected program. The generated command designates the selected program as the command processing program, so you can enter the parm values and execute the program if you wish.

This utility is very helpful for easy viewing entry parm lists. It will process CLP parms, RPG4 *Entry PLISTS, and RPG4 MAIN procedures.

JCRRECRT - Recreate Command

Uses an API to retrieve the original parameters used to define the selected command. You then have a CRTCMD (Create Command) prompt with the creation parameters already filled in.

JCRRFLD - Field Attributes in RPG Source

Display a subfile of all fields, field attributes and where-from file names used in selected RPG program.

JCRRFIL - Record Format / File Name Xref

Display a list of all Files / Record Formats / Record Format Renames / and Based-On-Physicals used in a selected RPG source. This is great when set up as a PDM option! If you only get one command from this page, consider getting this one.

JCR4MAX - Maximize Conversion to RPG4

Designed to run immediately after the CVTRPGSRC command.   This utility does many things I feel the CVTRPGSRC command should have done.

NOTE: Attribute testing of each field is done to make sure only valid conversions take place.

Conversions include:

• All attribute eligible MOVE, Z-ADD, Z-SUB, SUBST, CAT, ADD, and MULTs are converted to EVAL opcode.
• All IF, WHEN, DO, AND, & OR logic structures are converted to Extended Factor2 definitions.
• All program defined fields generate Definition specs.
• Allows case (Upper/Lower) selection of source code.

Be sure and read the help text for this command. There is an editing step involved in positioning the generated D specs in the code.

JCR4PROTO - Generate Prototyped RPGLE

Reads your selected RPG4 source and generates a new RPG4 source member with the *entry and calls converted to main procedure interface and CALLP prototypes. All call opcodes are replaced with CALLP, all parm opcodes are replaced with prototype syntax.

Note: After conversion, 1) you may need to change some of the prototype definitions due to DSPF files returning all fields defined as signed. 2) if fields used as parms were defined in the calc specs, then you will need to define them in D specs. 3) if entry parm field was defined on a D spec, then the D spec will have to be deleted.

JCR5PFREE - Print RPG columnar and /Free source

Generates a report showing the original RPG4 columnar calc specs on the left side of the report and what the code would look like in /Free format on the right side.

Many opcodes have no free equivalent so ????????? beside an opcode means that code would have to be re-written. You will see way too many of these as they dropped many critical opcodes.

A summary page is produced at the bottom of each report showing each opcode that could not be converted and a count of the number of times it was used in the code.

JCR5FREE - Generate /FREE from v4 RPGLE

Reads your selected RPG4 source and generates a new RPG source member with the columnar converted to /free source.

NOTE:: There is NO such thing as a complete conversion program from V4 columnar to V5/free!! Way too many total incompatibilities between the two that will have to be rewritten. I would be extremely skeptical of anyone saying they have a 100% conversion tool.

This utility will take v4 source that has been PURPOSELY written to convert into /free, then convert the calc specs into that format.

I would strongly recommend getting the JCR5PFREE utility and print a listing of what will not convert. Then fix that in the original program before using this utility. The document A Path to /Free on the main page should be considered required reading before using this utility.

JCRFD - Retrieve File Description

Provides a quick method for viewing the most often requested information about a data file. Options are available to Display Data Base Relations, View/Remove members, List record formats, and view Trigger information.

The Remove member option is very handy as it will remove same named members from all logicals files built over selected physical.

JCRSMLT - Scan Multiple Files / Strings

Search up to ten character strings in selected members of up to nine source physical files. The results of the search are then printed or loaded into outfile.

8/23/01: Major new functionality with the If-Member-Contains parm!
 *ALL - member must contain ALL selected search strings. (AND relationship)
 *ANY - member contains ANY one of the search strings (OR relationship)
 *NONE - member contains NONE of the search strings
Thanks to Thomas Raddatz for suggesting this powerful idea.

04/11/2001: Thanks to Gerald Magnuson for his idea on predefining a list of files as a single keyword.
08/16/01: Thanks to Craig Ficik for his suggestion to optionally list all occurrences of scan string in the member and to optionally allow outfile.
10/30/01: Thanks to Carlos Kozuszko for his suggestion to add member type selection.

JCRFSET - Scan File Set Where Used

Enter a selected data file and up to nine source physical files. The utility retrieves all PF and LF file names associated with the selected data file and scans for those names in the selected source members.

The output can either be an informative report or an outfile. Very handy when tracking down all source that may need recompiling due to a file format change.

Note: (If you have previously installed JCRSMLT utility and have made modifications to the JCRSMLTRD program (define groups of source files as a single command keyword), you will want to copy that source elsewhere then recopy after uploading this utility.)

10/30/01: Added member type selection.

JCRIMPF - File Set - Implementer Lock Listing

Uses the outfile created by JCRFSET utility (see above) and the Implementer lock control data file to create a very useful report showing who has locks on those objects, what Design Tracker number is on the lock and if the member has an object created in your Production library.

This report, either in Design Tracker number sequence or source member sequence, is invaluable when considering mass recompiles due to file format changes

NOTE: This utility can only used by people who have Implementer change control software installed. The JCRFSET utility on this page must also be installed as this utility uses the outfile from that utility to generate the report. Implementer is a product of MKS software . If your company needs change control software, feel free to email Marty Acks who is the Product Manager - iSeries Products for MKS.

11/19/01: The SQLRPGLE compiler was originally required to compile this utility. Thanks to the prototype posting on Thomas Raddatz's page (see links) this utility now uses the SQL Call Level Interface to directly access the DB2 data base and will run on any as/400!

JCRIMPO - List Request Overrides Required

Generates a print of files requiring overrides to compile your Implementer request. (and I don't know why I didn't do this utility YEARS ago!)

The source lib1 and 2 thing is where the source code is located for this request. For mass recompiles, the source will still be in the production source library. If you have new programs then the source will be in your personal library. A request could have recompiles and new programs hence the two libraries on the command. Executing the command will scan all source files then print a report of file used that are not in your library list!

JCRSSQL - Scan Interactive SQL sessions

Search through past STRSQL sessions! then displays a subfile of SQL statements that meet your selection criteria. You can also search through someone else's SQL sessions and look at those statements as well! The utility allows for execution of a selected sql statement.*

• It uses the output of a DMPSYSOBJ (Dump System Object) command. Make sure you have authorization to the DMPSYSOBJ command on your system.

• You can execute all UPDATE, INSERT, DELETE sql statements directly from this utility.  * You would need to install Martin Rowe's EXCSQL utility to execute SELECT statements from the subfile.

David George contributed the code for the dmpsysobj command and the idea for allowing sql executions. Martin Rowe contributed the cool scan progress meter so you can see scan percentage completed and the EXCSQL interface. Thomas Raddatz contributed the sql execution program that uses SQL CLI direct DB2 interface coding. See the Links page to visit their AS/400 web sites!.

JCRNETFF - Send Multiple Network Files/Multiple To Userids

Send up to 10 files to 5 remote userids.

Back by request, it is a serious RPG-only rewrite of a 1992 CLP utility. This reincarnation uses advanced system APIs for validity checking, pointer arithmetic for list processing, and the extproc C function 'system' to send the netfiles. It is now a brutally efficient method to send multiple network files.

JCRNETFM - Send Multiple Network Members/Multiple To Userids

Send multiple members, selectable by specifying *ALL, *FIRST, generic* or by member name to 5 remote userids. This is a huge improvement over the stock sndnetf command.

JCRNETQ - Send Network Outq

Performs a SNDNETSPLF command for every spooled file in a selected outq. The spooled files are all sent to the selected userid and address.

JCRUSPACE - Show User Space Contents

Uses a whole bunch of pointers to allow you to scroll through a selected user space. You can Search for text and Position To a particular offest.

12/02/2002: Major enchantments of Hex display and improved search algorithm coded by Bill Reger, creator of WRKDBF, Work Data Base File.

XMLGEN - Generate XML download members

This utility offers a truly convenient way to package source code and object creation instructions of all objects required for a utility or application. Output is a well-formed, valid XML document with the Document Type Definition and XML parser/installer program embedded in the text.

This methodology was designed, with intellectual input from Martin Rowe (DBG/400) and David George (400times.Uk), to become a serious, standard method for transmitting source code and applications. A short overview of the process is available here. XMLGEN was also published in the May 2002 issue of Iseries News.

XMLPREVIEW - Preview XML before install

This utility offers you three very important functions. 1) allows you to preview the member names about to be installed 2) allows you to preview all commands that will be executed during the course of the install and 3) makes installation of any other utility or program from this page a very simple process.

This utility reads the source member you uploaded to your 400. It runs a subset of the installer/parser to load a subfile with information from the uploaded member. After you have reviewed the data, you have the option to exit without install or continue with install.

Personally, this would be the first utility I downloaded.

JCRIFS - Install From IFS Path

This utility is cool if you use the IFS drive for uploading things. Simply unzip any program on this page to your IFS directory and execute this command! It will list the directory entries in a subfile, then prompt the XMLPREVIEW utility and install directly from your IFS directory! You don't even have to load anything to your 400 to get an install! Truly the easiest install method on the web.

Note: XMLPREVIEW (see above) must be installed to use the install from IFS functionality.

XMLSVIEW - View XMLGEN script member in subfile

This utility offers an easy way to review script members you have defined for the XMLGEN utility. It reads the script member and presents all the values for xmlgenmbr commands into a single subfile record. The xmlgencmd records are parsed into as many subfile records as required.

XMLSRCFIL - All source file mbrs to single XML mbr

This utility places all members from a selected source file into a single well-formed XML mbr complete with all the information required to recreate your source members on another system. Note: XMLGEN utility a prerequisite.

There is a one-record-less-than-a-million restriction on the size of the output file.

©  1985-2010  Craig Rutledge.  

Back to JCRCMDS.

Last modified March 10, 2011.