PCB record stereotypes

EGL defines four stereotypes that you can use to declare PCB records within a PSB record.

Each platform has its own requirements for the types of PCBs that the PSB must contain. For more information about platform differences, see Data access using PSBs and PCBs.

IO_ PCBRecord

Interacts with an I/O PCB, which takes input from a program or terminal and (if the input came from a terminal) sends output to the same terminal. You can use the I/O PCB to access other IMS™ capabilities; for example, checkpoint and restart of a batch program.

The stereotype has the following record definition:

Record IO_PCBRecord
	10 terminalName char(8);
	10 * char(2);
	10 statusCode char(2);
	10 * char(8);
	  12 localDate decimal(7);
	  12 localTime decimal(7);
	10 inputMsgSegNum int;
	10 userid char(8);
	10 groupName char(8);
	10 * char(12);
	  12 currentDate decimal(7);
	  12 currentTime decimal(11);
	  12 utcOffset hex(4);
	10 userIdIndicator char(1);
end

ALT_PCBRecord

References a teleprocessing PCB other than the I/O PCB. Use this type of record to write output to a message queue that is associated either with another transaction or with a device other than the terminal associated with the I/O PCB. The runtime PCB can be either of the following kinds:

An alternate PCB, in which case the message is sent to its destination only if a commit occurs.
An express alternate PCB, in which case the message is sent to its destination regardless of whether a commit or rollback occurs.

The stereotype has the following record definition:

Record ALT_PCBRecord
	10 terminalName char(8);
	10 * char(2);
	10 statusCode char(2);
end

DB_PCBRecord

References a database PCB, which represents a DL/I database that is accessible from your program. The runtime database PCB specifies the data that can be accessed and the type of access that is valid.

The stereotype has the following record definition:

Record DB_PCBRecord
	10 dbName char(8);
	10 segmentLevel num(2);
	10 statusCode char(2);
	10 procOptions char(4)
	10 * char(4);
	10 segmentName char(8);
	10 keyAreaLen int;
	10 numSensitiveSegs int;
	10 keyArea char(32767);
end

GSAM_PCBRecord

References a GSAM PCB, which is used when a z/OS® batch or IMS™ BMP program accesses a serial file that acts as a root-only DL/I database.

The stereotype has the following record definition:

Record GSAM_PCBRecord
	10 dbName char(8);
	10 * num(2);
	10 statusCode char(2);
	10 procOptions char(4)
	10 * char(20);
	10 recordSearchArg bigint;
	10 undefinedRecordLen int;
end

Define specific characteristics of the PCB through the properties associated with the record. For more information, see Additional properties for PCB records.