CONTROL BLOCK NAME = DFHVMDS
NAME OF MATCHING PLS CONTROL BLOCK = None
DESCRIPTIVE NAME = CICS TS Module Identifier.
FUNCTION =
All CICS modules begin with a DFHVM macro that expands to generate
the name of the module, its entry point address, the version,
modification level and the date and time of assembly. The expansion
of the macro is described by DFHVMDS.
Table 1.
| Offset Hex |
Type |
Len |
Name (Dim) |
Description |
| (0) |
STRUCTURE |
0 |
DFHVMDS |
MODULE IDENTIFIER |
| (0) |
CHARACTER |
1 |
VMSTART |
'*' EYECATCHER |
| (1) |
CHARACTER |
8 |
VMNAME |
FULL NAME FIELD |
| (9) |
ADDRESS |
4 |
VMEPA31 |
Entry point |
| (D) |
CHARACTER |
4 |
VMVERS |
VERSION AND MOD LEVEL |
| (11) |
CHARACTER |
1 |
VMASM |
ASSEMBLED BY USER |
| (12) |
CHARACTER |
2 |
VMTIME |
ASSEMBLY TIME |
| (14) |
CHARACTER |
2 |
VMDATE |
ASSEMBLY DATE |
| (16) |
CHARACTER |
8 |
VMPTFNO |
PTF NUMBER |
| (1E) |
BITSTRING |
1 |
VMFLAG1 |
FIRST FLAG FIELD |
| (1E) |
.1.. .... |
|
VMDLIGEN |
"X'40'" DL/I GENERATED |
| (1E) |
...1 .... |
|
VMMVSGEN |
"X'10'" FOR MVS |
| (1E) |
.... 1... |
|
VMSRBGEN |
"X'08'" SRB GENERATED |
| (1E) |
.... .1.. |
|
VMMVS811 |
"X'04'" FOR MVS/811 |
| (1F) |
BITSTRING |
1 |
VMFLAG2 |
SECOND FLAG FIELD |
| (1F) |
1... .... |
|
VMAMODE1 |
"X'80'" AMODE BIT 1 |
| (1F) |
.1.. .... |
|
VMAMODE2 |
"X'40'" AMODE BIT 2 |
| (1F) |
..1. .... |
|
VMRMODE |
"X'20'" RMODE 31 |
| (20) |
HALFWORD |
2 |
(0) |
| (20) |
..1. .... |
|
VMLNGTH |
"*-DFHVMDS" MEMBER-DEPENDENT LENGTH |