Skip to content
Thoroughbred Software InternationalThoroughbred Software InternationalThoroughbred DocumentationDocs

*XPSD - Channel Cross-Reference

Purpose

This utility produces a cross-reference listing of all I/O statements that reference an I/O channel. A listing containing the following is sent to the printer:

  • Channel number
  • Program name
  • Directive
  • Line number
  • The name of the file being opened (for OPEN statements)

In addition, the utility has the capability of cross-referencing all programs that run as overlays to the requested program.

Procedure

To run this utility from Thoroughbred Basic Console Mode, type:

RUN “*XPSD” and press Enter.

To select this utility from the Thoroughbred Basic Utilities Menu, type one of the following:

X and press Enter.

*X and press Enter.

*XPSD and press Enter.

Menu option # and press Enter.

The system prompts:

SELECT PRINTER xx xx (where: xx is a configured printer.)

Make your selection from the list of available printers displayed in the prompt. Printers displayed in background mode are currently being used by another task and, therefore, are unavailable. If the requested printer cannot be opened, the user is prompted to make another selection. If only one printer is configured, this prompt is not displayed.

DISK NAME OR NUMBER

Type the name or number of a configured, enabled disk and press Enter. If the specified disk cannot be opened, the user is asked to supply another disk name or number.

ENTER FILE NAME OR MASK; (@) FOR ALL, (CR) TO END

Type up to 48 file names or masks and press Enter. Type @ and press Enter to copy all of the names in the directory into the SORT file. If a specified file does not exist on the disk, or if a specified file does not match the file type selected, the name is rejected. After entering each name or mask, press Enter once. After you have entered all the names or masks, press Enter again to continue with the procedure. Press F4 to end the utility program without building the SORT file (see notes on masks under the *BPSD Utility).

CROSS REFERENCE CALLED PROGRAMS (Y/N)

Type Y and press Enter to cross reference programs called as overlays to the program being processed. Type N and press Enter to cross-reference only the requested program.

Notes

Directives with variables as channel numbers appear after explicitly specified channel numbers.

All RUN statements contained in the program appear at the end of the listing.

For RUN and OPEN statements, the name of the file being opened or run appears on the listing; if the name is contained in a variable, the word VARIABLE appears.

Error Messages

ERROR xx DEFINING WORK FILE
The utility program was unable to create a SORT file. The run is aborted. This message is displayed if the directory is full or permission does not allow you to read/write.
ERROR xx HAS OCCURRED, CR TO RETRY
An unexpected error has occurred, probably I/O related. Retry the procedure.
LIMIT IS 48 NAMES/MASKS
You have entered the maximum number of filenames and masks. The utility begins to process.
PRINTER IN USE
The requested printer is being used by another task; select another.
PRINTER NOT READY
The requested printer is off-line (i.e., not turned on, out of paper, out of toner, etc.). You can correct the problem, select another printer, or press F4 to exit to the Thoroughbred Basic Utilities Menu.
xxxxxxxx IS INITIALIZED OR BLANK
The specified program is empty. The utility proceeds to the next program.
xxxxxxxx WAS REFERENCED IN A RUN STATEMENT BUT DOES NOT EXIST
The utility could not locate a program that was called as an overlay. It proceeds to cross reference the next program.
xxxxxxxx WAS REFERENCED IN A RUN STATEMENT BUT IS NOT A PROGRAM
The utility opened a file that was named in a RUN statement and found that it was not a program. The process continues with the next program.
xxxxxxxx ENCRYPTED PROGRAM
The program is encrypted.

From the Thoroughbred Basic Utilities, version 8.9.1. Open this page in the PDF