Bilingual Control block
====================================================================
CONTROL BLOCK NAME = DFHTCTWE
DESCRIPTIVE NAME = CICS TS (VTAM) AUTOINSTALL WORK EMEMENT
Licensed Materials - Property of IBM
Restricted Materials of IBM
5655-Y04
(C) Copyright IBM Corp. 1983, 2004
FUNCTION = Provide mapping for autoinstall work element components.
The DSECT is used solely within the ZCP DOMAIN.
There are as many WE's as there are autoinstall requests
in progress.
The WE is used to store the CINIT_RU or BIND so that the
logon may be attempted by DFHZATA.
If the WE contains a TCTTE address then this is a
Postponed autoinstall work elemment (PWE), created by
DFHZLGX when there is a LOGON for a TCTTE which is
currently being deleted.
If the WE has TCTTECWE set then it is a Autoin-
stall Work Element used to autoinstall a
console and to sign-off or sign-on a known
console automatically.
LIFETIME = The WE is created by a GETMAIN issued by DFHZLGX
(LOGON-EXIT) or DFHZSCX (SCIP exit) or DFHZCNA
(Console Input) when an unknown terminal or
console or APPC device attempts to LOGON or BIND
or an unknown console issues an MVS MODIFY. It
is also created if a known console needs to be
signed-off or signed-on automatically.
It is also created for a known terminal subject to
certain restrictions. The WE is freed by DFHZNCA
after DFHZNEP is driven for the OPNDST contition
TWAEC=TCSOPSIN or prior to DFHZNEP being driven for
a CLSDST contition TWAEC=TCZCLSIN.
The WE is freed by DFHZATA when the request has been
processed.
STORAGE CLASS = USER(OS - SUBPOOL 1)
LOCATION = For unknown terminals, each WE is chained off the
previous one and the first one is anchored from
TCTVANWE in the TCT prefix. After the TCTTE is
built by DFHZATA for autoinstall-eligible devices,
the WE address is saved in TCTEAWEA. For known
terminals, DFHZLGX updates TCTEAWEA.
INNER CONTROL BLOCKS = NONE
NOTES :
DEPENDENCIES = S/370
RESTRICTIONS = NONE
MODULE TYPE = DSECT
--------------------------------------------------------------------
EXTERNAL REFERENCES = NONE
DATA AREAS = NONE
CONTROL BLOCKS = NONE
GLOBAL VARIABLES (MACRO PASS) = NONE
--------------------------------------------------------------------
PN= REASON REL YYMMDD HDXIII : REMARKS
====================================================================
====================================================================
AUTOINSTALL WORK - ELEMENT DSECT
====================================================================
Table 1.
Offset Hex |
Type |
Len |
Name (Dim) |
Description |
(0) |
STRUCTURE |
* |
DFHTCTWE |
Autoinstall work element ! |
(0) |
ADDRESS |
4 |
TCTWECHN |
- AWE chain field ! |
(4) |
ADDRESS |
4 |
TCTWE_VTAM_BIND |
- address of VTAM read only bind |
(8) |
UNSIGNED |
1 |
TCTWETYP |
- Data type ID ! |
(9) |
UNSIGNED |
3 |
TCTWELEN |
- Length of this block ! |
(C) |
ADDRESS |
4 |
TCTWETEA |
- TCTTE ptr if PWE. ! |
(10) |
CHARACTER |
8 |
TCTWE_TEMPLATE_ NETNAME |
- NETNAME of GR template |
(18) |
CHARACTER |
8 |
TCTWE_NETNAME |
- NETNAME for CICS use. Possible alias |
(20) |
CHARACTER |
8 |
TCTWE_NETID |
- Network ID |
(28) |
CHARACTER |
8 |
TCTWE_REAL_NETNAME |
- NETNAME from NRINPLU |
(30) |
CHARACTER |
4 |
TCTWECID |
- VTAM CID ! |
(34) |
UNSIGNED |
2 |
TCTWE_RPLSEQNO |
- for opnsec ! |
(36) |
UNSIGNED |
1 |
* |
- flag byte 1 ! |
(36) |
1... .... |
|
TCTWE_BIND_CLONING |
- On if APPC bind input ! |
(36) |
.1.. .... |
|
TCTWE_GR |
- On if both sides are GR registered |
(36) |
..1. .... |
|
TCTWE_GRNAME_CONN |
- On if this GR conn is known by its GR name. Off if this is a GR known by its |
(36) |
...1 .... |
|
TCTWE_USE_OUR_ MEMBER_NAME |
- On if partner knows us partner knows GR name |
(36) |
.... 1... |
|
TCTWE_DIFF_NETWORK |
- Exit found alias from |
(36) |
.... .1.. |
|
TCTWE_INSTALL_UDSS04 |
- inst Netname from udss04 in bind |
(37) |
UNSIGNED |
1 |
* |
- flag byte 1 ! |
(38) |
HALFWORD |
2 |
TCTWE_TNADDR_LENGTH |
- length of tnaddr in AWE |
(3A) |
HALFWORD |
2 |
TCTWECLN |
- length of CINIT_RU or ! |
(3A) |
HALFWORD |
2 |
TCTWE_BIND_LENGTH |
- length of APPC BIND ! |
(3C) |
CHARACTER |
* |
TCTWECRU |
- CINIT_RU or ! |
(3C) |
CHARACTER |
* |
TCTWE_BIND |
- APPC BIND ! |
Table 2.
Offset Hex |
Type |
Len |
Name (Dim) |
Description |
(0) |
STRUCTURE |
* |
TCTWE_TNADDR_S |
TNADDR string after CINIT |
(0) |
CHARACTER |
1 |
* |
|
(1) |
CHARACTER |
* |
TCTWE_TNADDR |
IP addr, port, hostname |
===========================================================
Autoinstall Work Element - Console Overlay
===========================================================
Table 3.
Offset Hex |
Type |
Len |
Name (Dim) |
Description |
(30) |
STRUCTURE |
* |
TCTCWE |
Console work element |
(30) |
HALFWORD |
2 |
TCTCWE_DATAL |
- Length of input |
(32) |
UNSIGNED |
1 |
TCTCWE_FLG |
- Flag byte |
(32) |
1... .... |
|
TCTCWE_EXT |
- Ext cons support |
(32) |
.1.. .... |
|
TCTCWE_SEC |
- Userid present |
(32) |
..1. .... |
|
TCTCWE_SGN |
- Sign-Off/Sign-On |
(32) |
...1 1111 |
|
* |
Reserved |
(33) |
CHARACTER |
1 |
* |
Reserved |
(34) |
CHARACTER |
8 |
TCTCWE_CART |
- Saved CIBXCART |
(3C) |
CHARACTER |
4 |
TCTCWE_CNID |
- CIBXCNID|CIBXOCID |
(40) |
CHARACTER |
8 |
TCTCWE_CNNM |
- Saved CIBXCNNM |
(40) |
CHARACTER |
1 |
TCTCWE_CONID |
- Saved CIBCONID |
(41) |
CHARACTER |
7 |
* |
Reserved |
(48) |
CHARACTER |
10 |
TCTCWE_USERID |
- Userid signed on |
(52) |
HALFWORD |
2 |
TCTCWE_USERID_LEN |
- length of userid |
(54) |
CHARACTER |
4 |
TCTCWE_TERMID |
- Termid for signon |
(58) |
ADDRESS |
4 |
TCTCWE_CHAIN |
- Active WE chain |
(5C) |
CHARACTER |
* |
TCTCWE_DATA |
- Input from console |