DESCRIPTIVE NAME = CICS TS BMS MESSAGE CONTROL RECORD DSECT
Licensed Materials - Property of IBM
Restricted Materials of IBM
5655-Y04
(C) Copyright IBM Corp. 1993, 2014
FUNCTION = DEFINE THE BMS MESSAGE CONTROL RECORD (MCR). THE MCR
DEFINES A BMS LOGICAL MESSAGE ON TEMPORARY STORAGE.
IT IS OUTPUT BY DFHMCP, AND READ/UPDATED BY DFHTPS,
DFHTPQ, AND DFHTPR.
THE MCR TS QUEUE ID IS RELATED TO THE CORRESPONDING
LOGICAL MESSAGE PAGE TS QUEUE BY A NAMING CONVENTION.
NOTES :
DEPENDENCIES = S/370
RESTRICTIONS = NONE
REGISTER CONVENTIONS = NOT APPLICABLE
MODULE TYPE = DSECT
MODULE SIZE = NOT APPLICABLE
ATTRIBUTES = DSECT
ENTRY POINT = NOT APPLICABLE
PURPOSE = SEE FUNCTION
LINKAGE = NOT APPLICABLE
INPUT = NOT APPLICABLE
OUTPUT = NOT APPLICABLE
EXIT-NORMAL = NOT APPLICABLE
EXIT-ERROR = NOT APPLICABLE
EXTERNAL REFERENCES = NONE
CONTROL BLOCKS = NOT APPLICABLE
TABLES = NOT APPLICABLE
MACROS = NONE
ALL DISPLACEMENTS ARE COMPUTED FROM 'DFHMCRDS'
Table 1.
Offset Hex |
Type |
Len |
Name (Dim) |
Description |
(0) |
STRUCTURE |
0 |
DFHMCRDS |
MCR DUMMY SECTION |
(0) |
DBL WORD |
8 |
MCRSAAP |
STORAGE ACCOUNTING INFORMATION; STORAGE CLASS=USER |
(0) |
.... 1... |
|
MCRSTART |
"*" START OF MCR |
(8) |
FULLWORD |
4 |
MCRLLBB |
VARIABLE-LENGTH RECORD INFORMATION (LLBB) |
(C) |
CHARACTER |
8 |
MCRCBID |
MCR SELF IDENTIFICATION. SET TO 'DFHMCRDS' WHEN MCR CREATED |
(14) |
HALFWORD |
2 |
MCRPGCNT |
TOTAL PAGE COUNT |
(16) |
HALFWORD |
2 |
MCRIDCNT |
COUNT OF TERMINALS TO RECEIVE MESSAGE |
(18) |
HALFWORD |
2 |
MCRLSTRM |
DISPLACEMENT TO LAST TERMINAL ENTRY IN THIS RECORD |
(1A) |
HALFWORD |
2 |
MCRTTLD |
DISPLACEMENT TO TITLE PAGE |
(1C) |
HALFWORD |
2 |
MCRPLTD |
DISPLACEMENT TO THE PAGE/LDC TABLE |
(1E) |
CHARACTER |
2 |
MCRETLDC |
ERROR TERMINAL'S LDC MNEMONIC |
(20) |
CHARACTER |
4 |
MCRERRID |
ID OF TERMINAL TO RECEIVE ERROR NOTIFICATION |
(24) |
CHARACTER |
3 |
MCROPCL |
OPERATOR CLASS |
(27) |
BITSTRING |
1 |
MCRPGCHN |
PAGE CHAIN LEVEL |
(28) |
BITSTRING |
1 |
MCRFLAGS |
FLAGS |
NOTE -- DSECTS FOR THE MCR AND MCB SHOULD HAVE
EQUIVALENT BIT PATTERNS FOR THE FOLLOWING FLAGS --
XXXTITLE - MESSAGE HAS A TITLE
XXXWBCUR WTBRK=CURR (2741)
XXXWBALL WTBRK=ALL (2741)
XXXEODOP EODPURG=OPER
WHERE XXX IS ONE OF MCR OR MCB
|
(28) |
1... .... |
|
MCRTITLE |
"X'80'" ...TITLE RECORD IN THIS MCR |
(28) |
.1.. .... |
|
MCRWBCUR |
"X'40'" ...WTBRK=CURRENT (2741 ONLY) |
(28) |
..1. .... |
|
MCRWBALL |
"X'20'" ...WTBRK=ALL (2741 ONLY) |
(28) |
...1 .... |
|
MCREODOP |
"X'10'" ...EODPURG=OPER |
(28) |
.... 1... |
|
MCRPAGE |
"X'08'" ...MAKE TEMPORARILY PAGING |
(28) |
.... .1.. |
|
MCRAUTOP |
"X'04'" ...MAKE TEMPORARILY AUTOPAGE |
(28) |
.... ..1. |
|
MCRBMSSM |
"X'02'" ...BMS - SYSTEM MESSAGE |
(28) |
.... ...1 |
|
MCRRTAIN |
"X'01'" ...CTRL=RETAIN |
(29) |
BITSTRING |
1 |
MCRSTAT |
STATUS FLAG |
(29) |
1... .... |
|
MCRQKPRG |
"X'80'" MESSAGE ELIGIBLE FOR QUICK PURGE |
(29) |
.1.. .... |
|
MCRMLDC |
"X'40'" MCR CONTAINS MULTIPLE LDC'S |
(29) |
.... 1... |
|
MCRSCSZ |
"X'08'" USE ALTERNATE SCREENSIZE |
(29) |
.... .1.. |
|
MCRTRAN |
"X'04'" PAGES CONTAIN EXTRA BYTE FOR TRANSPARENT MODE |
(29) |
..1. 11.. |
|
MCRIDLST |
"*" START OF TERMINAL LIST TERMINAL ENTRY FOR ONE TERMINAL - |
(2C) |
CHARACTER |
4 |
MCRTRMID |
TERMINAL IDENTIFICATION |
(30) |
CHARACTER |
2 |
MCRLDCMN |
LDC MNEMONIC |
(32) |
HALFWORD |
2 |
MCRLDCPG |
PAGE COUNT PER LDC |
(34) |
BITSTRING |
1 |
MCRLDCCD |
LDC CODE |
(35) |
CHARACTER |
3 |
MCROPID |
OPERATOR ID |
(38) |
BITSTRING |
1 |
MCRSF |
STATUS FLAG |
(38) |
1... .... |
|
MCRSFPG |
"TCTTEPGP" PAGING STATUS |
(38) |
.1.. .... |
|
MCRLFAIL |
"X'40'" LOCATE FAILED - ENTRY IS SKIPPED ONLY IF MCRMLDC IS ON |
(39) |
BITSTRING |
1 |
MCRTETYP |
TYPE OF TERMINAL ENTRY |
(39) |
1... .... |
|
MCRTEREM |
"X'80'" REMOTE TERMINAL |
(3A) |
CHARACTER |
8 |
MCRDSN (0) |
DESTINATION NAME IF LOCALLY OWNED TERMINAL |
(3A) |
CHARACTER |
4 |
MCRSYSID |
ID OF TERMINAL OWNING SYSTEM (OR FIRST IN CHAIN) IF REMOTELY OWNED TERMINAL |
(3E) |
CHARACTER |
4 |
|
RESERVED |
(42) |
BITSTRING |
1 |
MCRDSP |
DATA STREAM PROFILE |
(43) |
BITSTRING |
1 |
|
RESERVED |
(43) |
.1.. .1.. |
|
MCRIDNXT |
"*" LOCATION OF NEXT ID ENTRY |
(43) |
...1 1... |
|
MCRLNTRY |
"MCRIDNXT-MCRIDLST" MCR TERMINAL LIST ENTRY LENGTH |