This general macro will write a record contained in a storage block to a
real-time tape. It will also return the storage block to the
appropriate pool and make it unavailable to the operational program.
Format
- label
- A symbolic name can be assigned to the macro statement.
- NAME
- Specifies the symbolic real-time tape name. It can be:
- ccc
- A 3-character string representing a symbolic real-time tape name.
The first 2 characters must be alphabetic, and the third character must be
alphabetic or numeric.
- (Rn)
- The number of a register containing a pointer to the symbolic real-time
tape name. n must be a decimal number from 0 through 7, 14, or
15.
- LEVEL=Dx
- A symbolic data level (D0-DF) must be specified.
The following macro format is still supported:
- label
- A symbolic name can be assigned to the macro statement.
- name
- A 3-character symbolic real-time tape name must be specified as the first
parameter.
- Dx
- A symbolic data level (D0-DF) must be specified as the second
parameter.
Entry Requirements
- R9 must contain the address of the ECB being processed.
- A storage block must be held by the ECB on the data level specified by
this macro.
Return Conditions
- Control is returned to the next sequential instruction.
- The contents of R14 and R15 are unknown. The contents of all other
registers are preserved across this macro call.
- The storage block containing the data record is no longer available to the
operational program.
- The file address reference word on the data level specified by this macro
is unchanged.
- The core block reference word on the data level specified by this macro is
updated to indicate that the storage block is no longer held by the
ECB.
Programming Considerations
- This macro can be executed on any I-stream.
- Both keyword and positional parameters may be used in the same macro
call. This practice is not recommended.
- The control program checks to determine if the ECB is holding a storage
block on the data level specified by this macro. If no block is held,
control is transferred to the system error routine.
- The status of the Write operation can never be determined by the
operational program.
- The operational program can use the request level specified by this macro
immediately upon return from the control program.
- The contents of the entire storage block are written to tape.
- The record written to tape will have 16 bytes of appended data containing
the subsystem name, subsystem user name, and value of the TOD clock.
- Note:
- The value of the TOD clock will be the time at which the macro was
issued.
- If the tape is mounted on a buffered device, the operation is performed in
buffered mode.
- If this macro is issued prior to the end of tape restart, the ECB is
exited and a system error issued.
Examples
None.