Your Browser is not longer supported

Please use Google Chrome, Mozilla Firefox or Microsoft Edge to view the page correctly
Loading...

{{viewport.spaceProperty.prod}}

WRITE-TEXT

&pagelevel(3)&pagelevel

Write text to SYSOUT or SYSLST

Component:

SDF                                                                                                         

Functional area:

Job processing

Domain:

JOB
PROCEDURE
SDF

Privileges:

STD-PROCESSING
HARDWARE-MAINTENANCE
SAT-FILE-EVALUATION
SAT-FILE-MANAGEMENT
SECURITY-ADMINISTRATION

Function

The WRITE-TEXT command outputs the specified text to SYSOUT or SYSLST.

In programs with an SDF interface, WRITE-TEXT is available as a standard statement with identical syntax and functionality.

Format

WRITE-TEXT                                                                                                                 

Alias: WRTX

TEXT = ' ' / <c-string 1..1024 with-low>

,OUTPUT = *SYSOUT / *SYSLST(...)


*SYSLST(...)



|

SYSLST-NUMBER = *STD / <integer 1..99>

Operands

TEXT = ' ' / <c-string 1..1024 with-low>
Text to be output to SYSOUT or SYSLST. The default value is a string containing a blank.

OUTPUT = *SYSOUT / *SYSLST(...) 
Specifies where the information is to be output.

OUTPUT = *SYSOUT
The information is output to the system file SYSOUT.

OUTPUT = *SYSLST(...)
The information is output to the system file SYSLST.

SYSLST-NUMBER = *STD / <integer 1..99>
Specifies whether the information is to be output to the system file SYSLST or to a SYSLST file from the set SYSLST01 through SYSLST99. The default is *STD, i.e. output is directed to the system file SYSLST. 

Return codes

(SC2)

SC1

Maincode

Meaning


0

CMD0001

Command executed without error

Example

A procedure file (PROC.1) begins with the following commands:

/BEGIN-PROC PAR=*YES(PROC-PAR=(&FILE=))
/WRITE-TEXT 'procedure for linking'
...
...
...
/WRITE-TEXT 'procedure ended without error'
/END-PROC

When the procedure is run, the text specified in WRITE-TEXT will be output to SYSOUT:

/call-proc name=proc.1

procedure for linking
 .
 .
 .
procedure ended without error