Displays lines of code from the current routine on the current device.
||Optional A postconditional expression.
||Optional The line to be displayed, or the first line in a range of lines to be displayed. Can be a label name, a numeric offset (+n) or a label name and a numeric offset. If omitted, the entire current routine is displayed.
||Optional The last line in a range of lines to be displayed. To define a range, lineref1 must be specified.
command displays lines of code from the currently loaded routine. The output is sent to the current device. You establish the current device with the USE
command. For the name of the current routine, access the $ZNAME
special variable. For the device ID of the current device, access the $IO
commands are functionally identical.
The displayed lines include all labels, comments, and whitespace, with the exception that entirely blanks lines are neither displayed nor counted. For this reason, PRINT
displays and counts the following multi-line comment as two lines, not three:
/* This comment includes
a blank line */
without arguments displays all the lines of code in the currently loaded routine.
You can use the $TEXT
function to return a single line of code.
An optional postconditional expression. InterSystems IRIS executes the PRINT
command if the postconditional expression is true (evaluates to a nonzero numeric value). InterSystems IRIS does not execute the command if the postconditional expression is false (evaluates to zero). For further details, refer to Command Postconditional Expressions
in Using ObjectScript
The line to be printed or the first in a range of lines to be displayed or printed. Can be specified in either of the following syntactical forms:
is a positive integer specifying the line number within the current routine. +1 is the first line in the routine, which may be a label line. +0 always returns the empty string.
is a label within the routine and offset
is the line number counting from the label (with the label itself counting as offset 0). If you omit the offset
option, or specify label+0
, InterSystems IRIS prints the label line. Note that with this form, offset
actually evaluates to offset+1
because the label itself is counted as line 0. For example, label+1
prints the line after the label.
A label may be longer than 31 characters, but must be unique within the first 31 characters. PRINT
matches only the first 31 characters of a specified label
. Label names are case-sensitive, and may contain Unicode characters.
The last line in a range of lines to be displayed. Specify in the same way as lineref1
must be specified to specify lineref2
are separated by a colon (:) character. No whitespace may appear between the colon and lineref2
Given the following lines of code:
WRITE "A is Abel",!
WRITE "B is Baker",!
WRITE "C is Charlie",!
Def WRITE "D is Delta",!
WRITE "E is Epsilon",!
/* Not sure about E */
WRITE "F is Foxtrot",!
with no lineref
arguments displays all nine lines, including the comment line.
displays from the third line to the end of the routine. Line labels are case-sensitive, so the range endpoint was not found.