Craig Rutledge - Utility Downloads

Back to SiteMap.

JCRANZD - Print DSPF Fields Report

The Analyze DSPF Fields command processes your DSPF source 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 Fields Report

The Analyze OSPEC Fields (JCRANZO) command reads your RPG4 source's 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 without having to dig through source code.

JCRANZP - Print PRTF Fields Report

The Analyze PRTF Fields (JCRANZP) command reads your PRTF source to provide a representational report with the field name printed under the data.

JCRBND - List Procedure Names

The List Procedure Names (JCRBND) command outputs a list of procedures/symbols that are exported by a selected *BNDDIR, *SRVPGM or *MODULE.

JCRCALL - Command Prompt Entry Parms

The Command Prompt Entry Parms(JCRCALL) utility 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.

JCRCDENT - Indented CLP Source Listing

The Indented CLP Source Listing (JCRCDENT) command allows you to print a source listing with DO and ENDDO operations indented for improved readability.

JCRDBR - Expanded Data Base Relations

The Expanded Data Base Relations (JCRDBR) command allows you to view/print the data base relation list of a file. The keys and the select/omit statements of the logicals are included.

02/16/01 - If initial selection is a join logical, a screen with two subfiles (top subfile with JFILEs and bottom subfile with JFLDS) will prompt you to select which based-on physical file you wish to process.
08/13/01 - If WRKDBF is installed on system, show it as an available option.

JCRDELIM - Generate RPG4 code to delimit file.

This utility generates RPG4 program source code that will parse/convert data from the selected input file into an ASCII flat file using whatever delimiter you have selected.

The generated code uses character fields defined as VARYING.   If you are unfamiliar with these type fields, you may wish to devote a little study time.   Run times, for converting a 40,000 record file, dropped from 3 minutes (using trim biffs) to 6 seconds using varying fields!   Thanks to Martin Rowe for suggesting this technique.

07/03/2002: Changed code generator to output /free rpg.

JCRDQD - Retrieve Dataq Description

The Retrieve Dataq Description (JCRDQD) displays Text, Data Length, Sequence, and Key Length (if any) of the selected data queue.

JCRDQE - Display Data Queue Entries

The Display Data Queue Entries (JCRDQE) 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

JCRDTAARA - List Data Area Values and Rollover Distances

The List Data Area Values and Rollover Distances (JCRDTAARA) will list 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.

JCRDUMP - Count RPG Dump Spooled Files

The Count RPG Dump Spooled File command (JCRDUMP) 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.

JCRFD - Retrieve File Description

The Retrieve File Description (JCRFD) command 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.

JCRFFD - Print File Field Descriptions

The Print File Field Descriptions (JCRFFD) command 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!

JCRFJOBDL - Find Library on JOBD libl

The Find Library on JOBD libl (JCRFJOBDL) command makes to easy to 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.

JCRFJOBDQ - Find JOBDs using selected JOBQ

The Find JOBDs using selecting JOBQ (JCRFJOBDQ) command generates a 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 JCRFJOBDL utility).

JCRFSET - Scan File Set Where Used

The Scan File Set Where Used command allows you to 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.)

JCRIFSCPY - 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.

JCRIFSMBR - Copy member to IFS Drive

This utility copies a selected source member to a selected directory on the IFS drive. It then uses the Qshell JAR command to create a .zip file from the copied source member. After execution you will have a .txt file and a .zip file in the selected directory.

JCRIFSSAV - Copy SAVF to IFS Drive and.zip

This utility copies a selected savf to a selected directory on the IFS drive. It then uses the Qshell JAR command to create a .zip file from the copied source member. After execution you will have a .savf file and a .zip file in the selected directory.

JCRIND - Display Indicators Used

The Display Indicators Used (JCRIND) command allows you to view the 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, this is the oldest surviving utility on this page. The original was done back in 1984 using RPGII on a Wang VS80.

01/07/2002: Full V5 RPG /free functionality.

JCRJOB - List Job Names with Options

The List Job Names with Options (JCRJOB) command 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.

JCRLKEY - Find Desired Access Path

The Find Desired Access Path (JCRLKEY) command 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.

JCRLOBJ - List of Objects - Example

The List Of Objects (JCRLOBJ) command is an example of using APIs get object names into a list for processing. This command will display a subfile of all objects meeting the selection criteria.

JCRLOG - Select Previously Executed Commands

The Select Previously Executed Commands utility addresses the problem of having to press F9 repeatedly on the command line to cycle back through previously executed commands. This utility pulls all the commands you have executed during your current session into a subfile and allows you to run or prompt the commands. Simply key JCRLOG on the command line to execute.

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.

JCRLSRC - List Program Source/Module Information

The List Where From Source Code (JCRLSRC) utility 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.

JCRNETFF - Send Multiple Network Files/Multiple To Userids

The Send Multiple Network Files/Multiple To Userids utility allows you to send, at one time, up to 10 files to 5 remote userids. Very handy.

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

The Send Multiple Network Members/Multiple To Userids utility allows you to 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

The Send Network Outq (JCRNETQ) commands performs a JCRNETSPLF command for every spooled file in a selected outq. The spooled files are all sent to the selected userid and address.

JCRNOTPOP - List Fields Not Populated

The List Fields Not Populated (JCRNOTPOP) utility 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.

JCRNUMB - RPG Source Structure Numbering

The RPG Source Structure Numbering (JCRNUMB) command is a powerful /free logic indention reformat utility. It 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!

Note: Everything on this page, in fact, every program I have ever worked on since 1986, has been updated by this utility.

JCROBJD - Expanded Object Descriptions

The Expanded Object Descriptions (EXPOBJ) command allows you to work with a list of objects similar to the WRKOBJ command along with additional information about an object. Extremely handy tool to identify objects that are no longer needed.

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.

JCROLCK - List Jobs with Object Locks

The List Jobs with Object Locks (JCROLCK) command displays a subfile of jobs with a lock on the selected object.

The big advantage of this utility is it allows SNDBRKMSG to an offending user. The ENDJOB option defaults to *IMMED as opposed to the whimpy *CNTRLD option of the WRKJCROLCK command.

JCRPARTI Retrieve Partition Info

The Retrieve Partition Info (MHKPARTI) command returns system name, serial number, partition number (very important for licensing this days), OS version, User, and Job Name. Extremely useful command when working on multiple systems/multiple partitions to help keep track of what system/partition you are on.

There are no parameters for this command. Execute it on the target system.

JCRPATTR - CRTPRTF With Existing Attributes

The Create Print File with Existing Attributes (JCRPATTR) command extracts the creation attributes from an existing PRTF and applies them to the CRTPRTF of the selected source member.

JCRPRTF - Generate external Print File DDS source

The Generate External Print File (JCRPRTF) command allows you to generate a DDS external print file source member from the selected RPG4 program's O specs.

Please note this is not a 100% conversion tool. More like 95 to 99%. It will convert way more than enough to be worth your while, but be aware the generated DDS will probably need some minor editing before the output perfectly matches the original O specs.

JCRRDENT - Indented RPG Source Listing

The Indented RPG Source Listing (JCRRDENT) command allows you to print a source listing with structured programming operations indented for improved readability.

JCRRECRT - Recreate Command

The Recreate Command (JCRRECRT) command uses an API to retrieve the parameters used to define the selected command. The user is then presented a CRTCMD (Create Command) prompt with the creation parameters already filled in.

JCRRFIL - Record Format / File Name Xref

The Record Format / File Name Xref (JCRRFIL) command will display a list a 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.

04/25/2000: Process multiformat INCLUDE and IGNORE keywords before presenting the subfile.
08/13/2001: If WRKDBF is installed on system, show it as an available option.

JCRRFLD - Lengths of Fields Used in RPG

The Length of Fields Used in RPG (JCRRFLD) command will display a subfile of all fields, field attributes and where-from file names used in selected RPG program.

JCRRTVRPG Retrieve V5 RPG Source

The Retrieve V5 RPG Source (MHKRTVRPG) command will retrieve the source file from any RPGLE object compiled with DBGVIEW *LIST or *ALL.

One really weird behaviour if a retrieving a fixed format program (not /free) and the program has F specs. The program will not retrieve the first First C spec and you will have to delete the last line in the generated code.

Note: This program uses an IBM generated dump file. IBM has been known to change the format of dumps on different release levels. This version works correctly for programs compiled since v5r1.

JCRSMLT - Scan Multiple Files / Strings

The Scan Multiple Files / Strings command allows you to search for 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.

JCRSO - Quick File Keys-Select/Omit Display

The Quick File Keys-Select/Omit Display (JCRSO) command allows fast viewing of the key fields and any select/omit clauses of the selected data file.

Many times, I needed to know this information and had to go through a cumbersome process to get it. This utility, though simple, addresses that on-demand need.

JCRSPLF - List Spool Files with Options

The List Spool Files with Options (JCRSPLF) command loads a subfile with a list of spooled files that meet your selection criteria. From the subfile, you can select various options to perform.

10/4/2002: 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.

JCRSSQL - Scan Interactive SQL sessions

The Scan Interactive SQL session utility allows you to 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.

This has been an Open Source project. 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!.

JCRSUBR -Print Subroutine Structure Listing

The Print Subroutine Structure Listing (JCRSUBR) command 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.

JCRUFIND - Search User Space Command

The Search User Space Command (JCRUFIND) command allows you to search for a string contained in selected user space(s) in selected library A subfile of user space names with the selected string is displayed. Note: Extremely useful if you have ASC-SEQUEL.

JCRUSPACE - Display User Space Command

The Display User Space Command (JCRUSPACE) command 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, an excellent freeware (regardless of price) 'Data Base File' utility.

JCR4MAX - Modify RPG source to Eval

The Modify RPG4 Source Code to Eval (JCR4MAX) command is 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

The Generate Prototyped RPGLE (JCR4PROTO) command 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.

JCR5FPRT - Print RPG columnar and /Free source

The Print RPG Columnar and /Free listing command 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

The Generate /FREE from v4 RPGLE (JCR5FREE) command 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 JCR5FPRT 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.

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.

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.

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.

©  1985-2008  Craig Rutledge.  

Back to SiteMap.  Back to Homepage.

Last modified August 4, 2008.