IBM S544-5285-01 manual PFATTR@ Bytes, Sample Input Record Exit Dsect

PARMLIST	DSECT		Parameters for the input record exit
WORK@	DS	A	Address of 16-byte static work area
PFATTR@	DS	A	Address of print-file-attribute information
RECORD@	DS	A	Address of the input record
	DS	A	Reserved for future use
RECORDLN	DS	H	Length of the input record
	DS	H	Reserved for future use
REQUEST	DS	X	Add, delete, or process the record
EOF	DS	C	EOF indicator

Figure 30.		Sample Input Record Exit DSECT
The	address		of	the control block containing the		following parameters	is
the	input	record		exit in a standard	parameter	list pointed to by	re
WORK@	(Bytes	1–4)
A	pointer to a static, 16-byte memory block. The exit program can u
parameter			to	save information across	calls (for example, pointers		to

areas). The 16-byte work area is			aligned on a full word boundary a
initialized	to binary	zeros prior	to the first call. The user-writt
must provide	the code	required to	manage this work area.

PFATTR@ (Bytes 5–8)

A pointer to the print-file-attribute data structure. See “Attributes Print File” on page 130 for more information on the format of this d and the information it contains.

RECORD@	(Bytes	9–12)
A	pointer to the first byte of the input record, including the ca
character. The			record	is	in a	buffer that resides	in storage al
but the		exit	program	is	allowed	to modify the input	record.

RECORDLN (Bytes 17–18)

Specifies the number of bytes (length) of the input record. If t modified, this parameter must also be updated to reflect the act record.

REQUEST (Byte 21)

Specifies how the record is to be processed by ACIF. On entry t program, this parameter'00 '.is WhenX the exit program returns control to ACIF, this parameter must have the'00 ', value'X01', Xor'02X', where:

X '00

'

Specifies

that

the

record

be

processed

by

ACIF.

X '01'

Specifies

that

the

record

not

be processed

by

ACIF.

X '02

'

Specifies that the record

be

processed

by

ACIF

with

control

the exit program

to

allow

it to

insert the

next

record.

The

can set this value to save the

current

record,

insert

a

rec

supply the saved record at the next call. After

the

exit in

record,

the exit

program

mustREQUESTreset bytethe '00to'.X

A value of'00 'X on entry to the exit program specifies that the rec

processed. If you want to ignore the record,REQUEST changebyte valuthe

to 'X01'. If you want the record to be processed, and you want additional record, changeREQUEST the byte value'02to'. XAny value

greater than'02 'X is interpreted'00 ',asandX the exit processes the record

124 ACIF User’s Guide