|
|
Lists a procedure which is stored in the current Proc-file.
D[ISPLAY] procedure name [,m [,n] [,file name]]
For example:
>D PROCA,2,4
Where procedure name = PROCA, m = 2, n = 4
>DISPLAY GETIT
Where procedure name = GETIT
>DISPLAY REP4,FILEB
Where procedure name = REP4, file name = FILEB
- procedure name
is the name of a procedure in the current Proc-file. Refer to
Table 2-2 "Procedure Commands" for a
list of commands which can be used in procedures.
- m and n
are the first and last line of the procedure (respectively) to be
displayed. m must be an integer less than or equal to
n and greater than or equal to 1.
- file name
is the name of an MPE ASCII file into which the displayed procedure is
to be written.
When you use this command, QUERY searches the current Proc-file
for the named procedure. If the procedure does not exist or if no
Proc-file has been declared, you are informed and prompted for another command.
If the procedure does exist, it is listed with line numbers for reference when
editing the procedure with the ALTER command. If line numbers
(m,n) are included in the DISPLAY command, only those lines
specified will be listed. If only m is included, the procedure
will be listed from line m to the end of the procedure.
If a file name is included in this command, QUERY writes the
procedure statements (excluding line numbers and header which appear as part
of the procedure listing) to the specified file. The entire procedure
must be transferred. Any existing information in the file is overwritten.
If you have access to save files and file name does not exist
in your log-on group, QUERY creates a new file using file name
as the formal designator (name of the file). The file size will be 200 records.
The maximum Proc-file record size is 125 words. The following message is
printed when this situation occurs.
FILE DOES NOT EXIST, BEING CREATED
>DISPLAY FIND1,FINDSET
>DISPLAY FIND1
PROCEDURE: FIND1
001 FIND
002 CUSTOMER.ACCOUNT IS ""
003 END
In the example above, the FIND1 procedure is written to file
FINDSET. Then FIND1 is listed on the terminal.
>OUT=LP
>D FINDCH
>OUT=TERM
>D FINDCH
PROCEDURE: FINDCH
001 FIND CHAIN
002 CUSTOMER.ACCOUNT,SALES.ACCOUNT
003 IS "" END
When OUTPUT=LP, the list is printed on the QSLIST device.
When OUTPUT=TERM, the list is printed on the terminal.
>D FINDCH,2
PROCEDURE: FINCH
002 CUSTOMER.ACCOUNT,SALES.ACCOUNT
003 IS "" END
A single line or a range of lines can be displayed.
|