SVC 29 (0A1D)

SCRATCH macro - is type 3, gets LOCAL lock.

Calls module IGC0002I.

GTF data is:

R15

No applicable data.

R0

Zeros or the address of a UCB for a device upon which volumes can be mounted.

R1

Address of the SCRATCH parameter list (PLIST).

PLIST

The parameter list is 16 bytes long; the format is:

Bytes	Bits		Description
0	0100	0001	Operation code (set to X'41' for SCRATCH).
1	1...	....	Dynamic Unallocation by job or step ending.
	.1..	....	When set to 1 and JSCBPASS is 1, the RACDEF macro is not issued. In all other cases, except VSAM data sets, the RACDEF TYPE=DELETE will be issued.
	..xx	xxxx	Reserved set to zeros.
2	1...	....	Dynamic Unallocation; TIOT is enqueued by the caller.
	.1.0	....	Check purge date.
	.1.1	....	Override purge date.
	....	1...	When set to 1 and the caller is in supervisor state, RACF® processing will be bypassed. This allows the catalog to continue RACF processing and to eliminate redundant RACF processing.
	....	.1..	When set to 1, all DASD tracks occupied by the data set will be erased (made unreadable) before being released for reuse.
	..x.	..xx	Reserved set to zeros.
3	xxxx	xxxx	Reserved set to zeros.
4-7			Address of data set name.
8-11			Reserved set to zeros.
12-15			Address of the volume list.

DSN

ccccc....

data set name.

VOLIST The volume list is variable in length; format is:

Bytes: Contents
0-1: Number of 12-byte volume list entries to follow.
2-5: UCB device code.
6-11: Volume serial number.
12: SCRATCH secondary status code. (X'80' if SCRATCH successful and the user has RACF authority).
13: Scratch status byte.

Note: Each succeeding volume list entry (if any) has the same format as offset 2-13.