def __init__(self, **kw):
fields = (
Uint4('error_code'), # 1 CIS return code (0 = OK)
Uint4(
'totobj'), # 1 Total number of objects returned in object list
Uint4(
'curobj'
), # 1 Number of objects returned within current receive block
Uint4('max_sc_len'), # 1 longest SERVER-CLASS value in object list
Uint4('max_sn_len'), # 1 longest SERVER-NAME value in object list
Uint4('max_sv_len'), # 1 longest SERVICE value in object list
Uint4('max_uid_len'), # 1 longest USER-ID value in object list
Uint4('max_tk_len'), # 1 longest TOKEN value in object list
Uint4('max_topic_len'), # 4 longest TOPIC value in object list
Uint4('requesttime', ppfunc=localtime_str
), # 4 time that request was received by broker kernel
Uint4('reserved', opt=T_NONE), # 4
String('etb_error_code',
8), # 5 Secondary error code from broker kernel
String('etb_error_text',
40), # 5 Secondary error text from broker kernel
Uint4('max_ppc_lib_len'), # 6 longest RPC-LIB value in object list
Uint4('max_ppc_pgm_len'), # 6 longest RPC-PGM value in object list
)
Datamap.__init__(self, 'Cishdr', *fields, **kw)
def __init__(self,
send_length=0,
receive_length=0,
use_api_version=API_VERS7,
**kw):
self.__dict__['errtext_buffer'] = Abuf(80)
self.__dict__['send_buffer'] = None
self.__dict__['receive_buffer'] = None
self.__dict__['trace'] = None
self.__dict__['use_api_version'] = use_api_version
Datamap.__init__(self, 'Etbcb', *etbcbfields, **kw)
self.buffer = Abuf(self.dmlen)
self.errtext_length = 80
self.api_type = API_TYPE1
self.api_version = use_api_version
if receive_length > 0:
self.receive_buffer = Abuf(receive_length)
self.receive_length = receive_length
if send_length > 0:
self.send_buffer = Abuf(send_length)
self.send_length = send_length
def __init__(self, **kw):
Datamap.__init__(self, 'SMF Record Header',
Int2('rlen'), # Record length RDW header
Uint1('seg'), # Segment control
Uint1('seg2'), # Segment control 2 (unused)
Bytes('flg',1,caption='System indicator'), # System indicator flags
#q Asfxxx equ x'80' subsystem id follows system id
#q Asfstv equ x'40' subtypes are valid
#q Asfv4 equ x'10' mvs/sp v4 and above
#q Asfv3 equ x'08' mvs/sp v3 and above
#q Asfv2 equ x'04' mvs/sp v2 and above
#q Asfvs2 equ x'02' vs2
Uint1('rty',caption='SMF record type'), # SMF record type
Uint4('tme',ppfunc=dtime100,caption='Record creation time'), # Time since midnight
# when record was moved into smf buffer in 1/100 sec
Packed('dte',4,ppfunc=idate,caption='Record creation date'), # Date when record was
# moved into smf buffer as 0cyydddf
String('sid',4,caption='System identifier'), # smfprmxx sid
# up to here if SMF record withtout subtypes
String('ssi',4,caption='Subsystem identifier'),
Uint2('sty',caption='Subtype'), # Subtype ppfunc=Asbase.assty_str
byteOrder=NETWORKBO,ebcdic=1,**kw)
def __init__(self, **kw):
Datamap.__init__(
self,
'URBG',
Uint2('urbgidx'), # Element index in GFFT
String('urbgfid', 2), # Field short name
Uint1('urbgffmt', ppfunc=urbgffmt_str), # Field format
Uint1('urbgtype', ppfunc=urbgtype_str), # Field type
Uint2('urbgflen'), # Field length
Uint2('urbgfprc'), # Decimal place/precision
Uint1('urbgflag', opt=T_HEX), # ppfunc=urbgflag_str), # Flags
Bytes('filler1', 1, opt=T_NONE), # Reserved area
# 1st level of occurrences:
Uint2('urbgfrno'), # Range number
Uint2('urbgfrfm'), # From-range number
# 2st level of occurrences: 0x10
Uint2('urbgfono'), # Occurrence number
Uint2('urbgfofm'), # From-occurrence number
Uint2('urbgfnml'), # Length of field long name
String('urbgfnam', 32), # Field long name
String('urbgfgrp', 2), # Name of PE group
String('urbgfmtx', 2), # External Format Type (Bytes?)
String('urbgfrpn', 2), # Redefined parent name
String('urbgffon', 2), # Field order number
Bytes('filler2', 2, opt=T_NONE), # Reserved area
**kw)
def __init__(self, **kw):
Datamap.__init__(
self,
'DRL',
String('name', 8),
Bytes('ttr', 3),
Uint1(
'flag'), # Alias flag 0x80 and user half words (max 0x1f * 2)
# --- if length in flag is 0x0f, ie. 30 bytes ISFP statistics follow
Uint1('vv'), # version (set by SCLM?)
Uint1('mm'), # modifications (range 0-99)
Uint1('ind'), # SCLM indicator
Uint1('ss'), # time last modified (second part)
Packed('credate', 4), # ibm creation date 0119001f = 20190101
Packed('moddate', 4), # date last modified 0099032f = 19990201
Uint2('hhmm'), # time last modified 0xhhmm
Uint2('size2'), # current number of lines, 655
Uint2('init2'), # initial number of lines
Uint2('chgd2'), # number of lines changed
String('id', 8), # user id of last modification
# --- the following is only set if hw length in flag is 0x14 (=40 bytes)
# then ind & MIINDXSTA will be set
Uint4('size'), # current number of lines
Uint4('init'), # initial number of lines
Uint4('chgd'), # number of lines changed
byteOrder=NETWORKBO,
**kw)
def __init__(self, **kw):
Datamap.__init__(
self,
'URBSU41',
String('fieldname', 2), # field name
Int4('newlength'), # new field length
**kw)
def __init__(self, **kw):
fields=( # Available with CIS Interface version
String('conv_id', 16), # 1 Conversation ID
String('serveruid', 32), # Server's UserID
Bytes('serverpuid', 28), # Server's physical UserID
String('serverpuidtrans',28,opt=T_NONE), # Server's translated PUID (unused)
String('servertoken', 32), # Server's Token
String('clientuid', 32), # Client's UserID
Bytes('clientpuid', 28), # Client's physical UserID
String('clientpuidtrans',28,opt=T_NONE), # Client's translated PUID
String('clienttoken', 32), # Client's Token
String('server_class', 32,opt=T_NONE),# SERVER-CLASS
String('server', 32,opt=T_NONE), # SERVER-NAME
String('service',32,
ppfunc=lambda svc:'%s/%s/%s' % (self.server_class,self.server,svc)),
# SERVICE = class/server/service
Uint4('conv_nonact',ppfunc=intervalstr), # Conversation timeout
Uint4('last_active',ppfunc=intervalstr), # Seconds since last activity
Uint2('type'), # 1 Conversation type 0: conv, 1: non-conv
Uint2('unused1',opt=T_NONE), # 2 Alignment
Uint4('totaluows'), # 2 Number of active UOWs
String('client_rpc_libname', 128), # 6 Client's
String('client_rpc_progname',128), # 6
String('server_rpc_libname', 128), # 6 Server's
String('server_rpc_progname',128), # 6
)
Datamap.__init__(self, 'Conversation', *fields, **kw)
def __init__(self, **kw):
fields=( # Available with CIS Interface version
String('uow_id', 16), # 2 UOW ID
String('conv_id', 16), # Conversation ID
String('senderuid',32), # Sender UserID
String('sendertoken',32), # Sender User Token
String('senderserver',32), # Sender SERVER-NAME
String('senderclass',32), # Sender SERVER-CLASS
String('senderservice',32), # Sender SERVICE
String('recvruid',32), # Receiver UserID
String('recvrtoken',32), # Receiver User Token
String('recvrserver',32), # Receiver SERVER-NAME
String('recvrclass',32), # Receiver SERVER-CLASS
String('recvrservice',32), # Receiver SERVICE
String('userstatus',32), # User status
Uint1('uowstatus',ppfunc=lambda x:'%-9s'%uowStatus_str(x)), # Unit of work status
Uint1('eoc'), # End of conversation? 0|1
Uint1('store'), # Persistent? 0|1
Uint1('uowstatstore'), # Persistent UOW status? 0|1
Uint4('eocreason'), # EOC reason code
Uint4('deliveries'), # Attempt to delivery count
Uint4('msgcnt'), # Number of messages
Uint4('msgsize'), # Total message size
String('uwstatus_lifetime',32), # Status life time
String('uwcreate_time',32), # Unit of work creation time
Uint4('uw_lifetime',ppfunc=intervalstr),# 2 Unit of work life time
)
Datamap.__init__(self, 'PersistentMessage', *fields, **kw)
def __init__(self, **kw):
Datamap.__init__(
self,
'URBI',
String('urbieye', 4), # URBI eye-catcher 'URBI'
Int4('urbilen'), # Length of URBI + selection data + filler
Int4('urbilenh'), # Length of URBI proper (>= URBIL)
Int4('urbilend'), # Length of selection data (may be zero)
String('urbirtok', 8), # Request ID token (returned in response)
String('urbirnam', 8), # Destination name for response
String('urbirt', 4,
ppfunc=urbirt_str), # Request type: STAT/INST/TRAN
Uint2('urbidbid'), # Database ID (INST request)
Uint2('urbifnr'), # File number (INST request)
String('urbiinam', 8), # Initial-state name (INST request)
String('urbisnam',
8), # Subscription name or blank (STAT/TRAN req)
String('urbidnam', 8), # Destination name or blank (STAT/TRAN req)
Uint4('urbiacod'), # alpha field encoding in selection data
Uint4('urbiwcod'), # wide field encoding in selection data
Bytes('urbiarc', 1), # architecture flags for selection data
String('urbires1', 3, opt=T_NONE), # Reserved area1
Uint4('urbitsnr'), # Transaction seq.no. within
# subscription/destination (TRAN req)
String('urbires2', 16, opt=T_NONE), # Reserved area2
# Optional selection data (INST request)
**kw)
def __init__(self, **kw):
Datamap.__init__(
self,
'URBSU44',
String('status', 2), # Status == 'S' keep FDT
Uint2('anchor'), # Anchor/master file number
**kw)
def __init__(self, **kw):
Datamap.__init__(self, 'Performance section',
Uint2('snf',ppfunc=div256,caption='zIIP normalization factor',pos=0x88),
# to convert between real zIIP times and normalized zIIP times (=equivalent time on normal CP)
# multiply zIIP time with snf and divide by 256
Bytes('prf',0xd8,opt=T_NONE,caption='prf DSECT',pos=0), # todo: define more fields in structure
byteOrder=NETWORKBO,ebcdic=1,**kw)
def __init__(self, **kw):
Datamap.__init__(
self,
'URBSU5C',
String('fieldname', 2), # Field name
String('newformat', 1), # New format
String('filler1', 1),
**kw)
def __init__(self, **kw):
Datamap.__init__(
self,
'URBSU70',
String('fieldname', 2), # Descriptor name
Uint1('reason'), # Reason code
Bytes('filler1', 5),
**kw)
def __init__(self, **kw):
Datamap.__init__(
self,
'URBSU',
String('urbsueye', 6), # URBSU eye-catcher 'URBSU' #
Uint1('urbsutyp', ppfunc=urbsutyp_str,
opt=T_HEX), # Utility function type
Bytes('filler1', 25, opt=T_NONE), # Reserved area
**kw)
def __init__(self, **kw):
Datamap.__init__(
self,
'URBII',
Uint4('urbiisn'), # ISN
# or alternatively:
Int4('urbiirange', repos=-4), # Range indicator
Uint4('urbiisn1'), # from ISN
Uint4('urbiisn2'), # to ISN
**kw)
def __init__(self, **kw):
Datamap.__init__(
self,
'URBE',
String('urbeeye', 4), # URBE eye-catcher 'URBE'
Int4('urbelen'), # Length of URBE
String('urbesnam', 8), # Subscription name
Uint4('urbetsnr'), # Transaction sequence number
# within subscription/destination
String('filler1', 12, opt=T_NONE), # Reserved area
**kw)
def __init__(self, **kw):
fields = ( # Available with CIS Interface version
Uint2('version', opt=T_IN), # 1 Interface version
Uint2(
'object_type', opt=T_IN,
ppfunc=cio_str), # 1 Object type to which the command applies
Uint2('command', opt=T_IN, ppfunc=cic_str), # 1 CIS command
Uint2('option', opt=T_IN, ppfunc=cip_str), # 1 CIS option
Bytes(
'puid', 28, opt=T_HEX
), # 1 internal userid that distinguishes users with same userids
# id obtained from previous call, no translation done
String(
'uowid', 16,
opt=T_IN), # 2 Selector, optional, unit of work to be purged
String(
'topic', 96, opt=T_IN
), # 4 Selector, optional, topic to be subscribed or unsubscribed to
String(
'uid', 32, opt=T_IN
), # 4 Selector, optional, user name for subscription/unsubscription
# and participant shutdown
String(
'token', 32, opt=T_IN
), # 4 Selector, optional, token for subscription/unsubscription
# and participant shutdown
String(
'server_class', 32, opt=T_IN
), # 5 Selector, optional, for command log filter addition or removal
String(
'server', 32, opt=T_IN
), # 5 Selector, optional, for command log filter addition or removal
String(
'service', 32, opt=T_IN
), # 5 Selector, optional, for command log filter addition or removal
Filler('reserved', 32), # 5 Reserved
String(
'conv_id', 16,
opt=T_IN), # 7 Selector, optional, for shutdown conversation
String('transportid', 3, opt=T_IN
), # 7 Selector, optional, for transport task (NET|Snn|Tnn)
# required for RESUME,START,STATUS,STOP,SUSPEND
Uint1(
'exclude_attach', opt=T_IN
), # 7 Optional. Exclude attach servers when shutting down a service
Uint4(
'seqno', opt=T_IN
), # 7 Optional. Sequence number of participant (e.g. client, server,
# publisher) to be shut down. Can be used instead of puid
Uint4(
'error_number', opt=T_IN
), # 7 Optional. Sequence number of participant (e.g. client, server,
)
Datamap.__init__(self, 'Cisreq', *fields, **kw)
def __init__(self, clientserver, **kw):
fields=( # Available with CIS Interface version
String('uid', 32), # 1 UserID
#Bytes('puid', 28), # Physical UserID
String('puid', 28), # Physical UserID
String('puidTrans',28,opt=T_NONE), # Translated physical UserID
String('token', 32), # User's Token
Uint2('charset'), # User's character set: *****
# EBCDIC_IBM ..... 34 ('22')
# EBCDIC_SNI ..... 66 ('42')
# ASCII_PC_386 ... 1 ('01')
# ASCII_PC_OS2 ... 16 ('10')
# ASCII_8859_1 ... 128 ('80')
Uint2('highorderfirst'), # Big Endian = 1
Uint2('status',ppfunc=waiting_str), # User's status: 0: not waiting, 5: waiting
Uint2('unused1',opt=T_NONE), # Alignment
String('waitconvid', 16), # CONVID user is waiting for:
# "NEW"|"OLD"|"ANY"|"NONE"|n
String('server_class', 32,opt=T_NONE),# User waiting for this ....
String('server', 32,opt=T_NONE), #
String('service',32,
ppfunc=lambda svc:'%s/%s/%s' % (self.server_class,self.server,svc)),
# SERVICE = class/server/service
Uint4('conv_act'), # Active conversations of this user
Uint4('service_act'), # Active services by server
Uint4('last_active',ppfunc=intervalstr),# Seconds since last activity
Uint4('nonact',ppfunc=intervalstr), # Nonactivity timeout
Uint4('waited_new',ppfunc=intervalstr), # Accum.wait time CONVID=NEW
Uint4('waits_new'), # Number of waits CONVID=NEW
Uint4('waited_old',ppfunc=intervalstr), # Accum.wait time CONVID!=NEW
Uint4('waits_old'), # Number of waits CONVID!=NEW
Uint4('convs'), # 1 No. of conversations
Uint4('active_uow'), # 2 Total number of active UOWs
String('ipv4_address',16), # 4 IPv4 address client/server
String('host_name',256), # Host name client/server
Uint1('recv_option',ppfunc=option_str), # RECEIVE option
Uint1('attach_mgr'), # Attach manager
Uint2('unused2',opt=T_NONE), # 4 Alignment
String('reserved_etbinfo_v73_1',32,opt=T_NONE),# 5 Reserved for future use
String('app_name',64), # 5
String('app_type',8), # 5
String('reserved_etbinfo_v73_3',32,opt=T_NONE),# 5 Reserved for future use
Uint4('authsucc'), # 5 Counter AUTHORIZ succeeded
Uint4('authfail'), # 5 Counter AUTHORIZ failed
Uint4('created',ppfunc=localtime_str), # 5 Creation time
String('rpclib',128), # 6 ACI RPCLIB
String('rpcpgm',128), # 6 ACI RPCPGM
Uint4('seqno'), # 7 unique client/server sequence number
String('app_version',16), # 7
String('ipv6_address',46), # 8 IPv6 address client/server
String('unused',2,opt=T_NONE), # 8 Alignment
)
Datamap.__init__(self, clientserver, *fields, **kw)
def __init__(self, **kw):
Datamap.__init__(self, 'Product or Subsystem Section',
Uint2('typ',caption='SMF30 sub type',ppfunc=self.subtyp_str),
String('rs1',2,opt=T_NONE),
String('rvn',2,caption='Record version number'),
String('pnm',8,caption='Subsystem product name'),
String('osl',8,caption='MVS product level'),
String('syn',8,caption='System name'),
String('syp',8,caption='Sysplex name'),
byteOrder=NETWORKBO,ebcdic=1,**kw)
def __init__(self, **kw):
fields = ( # Available with CIS Interface version
# 1
String('server_class', 32, opt=T_NONE), # SERVER-CLASS
String('server', 32, opt=T_NONE), # SERVER-NAME
String('service',
32,
ppfunc=lambda x: '%s/%s/%s' %
(self.server_class, self.server, self.service)),
# SERVICE = class/server/service
String('translate', 8), # Name of translation routine
Uint4('conv_nonact',
ppfunc=intervalstr), # Conversation timeout
Uint4('servers_act'), # Active servers
Uint4('conv_act'), # Active conversations
Uint4('conv_high'), # High watermark
Uint4('longbuffer_act'), # Active LONG-BUFFER entries
Uint4('longbuffer_high'), # High watermark
Uint4('shortbuffer_act'), # Active SHORT-BUFFER entries
Uint4('shortbuffer_high'), # High watermark
Uint4('waitserver'), # No. waits for server MSGs
Uint4('server_occupied'), # No. times all servers busy
Uint4('pending'), # No. pending conversations
Uint4('pending_high'), # High watermark
Uint4('total_requests'), # 1 Total number of requests
Uint4('maxuows'), # 2 Max # of active UOWs
Uint4('maxuowmsg'), # Max # of messages per UOW
Uint4('uwtime', ppfunc=intervalstr), # Max UOW life time
Uint4('maxdelcnt'), # Max delivery count
Uint4('maxmsgsize'), # Max message size
Uint4('totaluows'), # Total number of active UOWs
Uint1('store'), # Startup value STORE: 0: off, 1: Broker
Uint1('uwstatp'), # uowStatusLifetime Multiplier
Uint1('deferred'), # 2 default status for UOW 0: no, 1: yes
Uint1('enclevel'), # 3 Encryption Level
Uint4('attachmgrs_act'), # 4 No. active attach managers
Uint4('uwstat_addtime'), # 4 UWSTAT-LIFETIME
Uint4('num_conv'), # 5 No. conversations
Uint4('num_server'), # No. servers
Uint4('longbuffers'), # No. long message buffers
Uint4('shortbuffers'), # No. short message buffers
String('conversion', 8), # Name of conversion routine
String('conversion_parms', 255), # Conversion parameters
String('unused1', 5, opt=T_NONE), # 5 alignment
Uint1('arf'), # 10 Adabas replicator flag
Uint1('scm'), # 10 Single conversation mode
Uint1('prefetch'), # 10 Server: SCM: Prefetch
String('rpc', 5), # 10 Server: RPC: YES|NO|UNDEF
Uint4('maxPostponeAttempts'), # 10
Uint4('postponeDelay'), # 10
)
Datamap.__init__(self, 'Service', *fields, **kw)
def __init__(self, **kw):
Datamap.__init__(
self,
'URBU',
String('urbueye', 4), # URBU eye-catcher 'URBU'
Int4('urbulen'), # Length of URBU
String('urbuvers', 2), # Version indicator
String('urbuname', 8), # Extract name (ADARPE parameter NAME)
Uint8('urbutime', opt=T_STCK), # Time (STCK) of ADARPE execution
String('urbudist', 22,
opt=T_NONE), # Local time displayable of ADARPE exec
String('filler1', 32, opt=T_NONE), # Reserved area
**kw)
def __init__(self, **kw):
Datamap.__init__(
self,
'URBSU55',
Uint2('assopfac'), # Asso padding factor
Uint2('datapfac'), # Data padding factor
Uint4('maxrecl'), # Max. record length
Uint2('maxui'), # Max sec alloc Upper Index
Uint2('maxni'), # Max sec alloc Normal Index
Uint2('maxds'), # Max sec alloc Data storage
String('pgmrefresh', 1), # PGMREFRHESH='Y'/'N' #
String('rplupdateonly', 1), # RPLUPDATEONLY='Y'/'N' #
**kw)
def __init__(self, **kw):
Datamap.__init__(
self,
'URBD',
String('urbdeye', 4), # URBD eye-catcher 'URBD'
Int4('urbdlen'), # Length of URBD + related data + filler
Int4('urbdlenh'), # Length of URBD
Int4('urbdlend'), # Length of related data (at URBDDATA)
Uint4('urbddsnr'), # Data sequence number for record
String('urbdtyp', 1, ppfunc=urbdtyp_str), # Type of data
String('filler1', 11, opt=T_NONE), # Reserved area
# Payload data following (before or after image)
**kw)
def __init__(self, **kw):
Datamap.__init__(
self,
'URBC',
String('urbceye', 4), # URBC eye-catcher 'URBC'
Int4('urbclen'), # Length of URBC
String('urbcsnam', 8), # Subscription name
Uint4('urbctsnr'), # Current transaction sequence number
# within subscription/destination
Uint4('urbcrsnr'), # Current record sequence number
Uint4('urbcdsnr'), # Current data sequence number for record
String('urbccont', 1,
ppfunc=urbcont_str), # Indicator transaction continuation
String('filler1', 19, opt=T_NONE), # Reserved area
**kw)
def __init__(self, **kw):
Datamap.__init__(
self,
'URBS',
String('urbseye', 4), # URBS eye-catcher 'URBS' #
Int4('urbslen'), # Length of URBS + data (C5DA) + filler
String('urbsrtok', 8), # Request ID token (from original request),
String('urbsrt', 4), # Request type (blank if no request):
String('urbsst', 4,
ppfunc=urbsst_str), # Reptor status/response information:
Uint8('urbstime',
opt=T_STCK), # Time (STCK) when this URBS was created
Uint4('urbsrsp'), # Response code for request
Uint4('urbssubc', ppfunc=self.urbssubc_str), # Subcode for request
String('urbserri', 8), # Other pertinent error information
String('urbsinam',
8), # Initial-state name (INIT/CMPL/ERRO message)
String('urbssnam', 8), # Subscription name (ASEC/C5DA/DCMP/DEAC/
# LOST/REAC/REFR/RPLE/RPLS/SUBS/TRSP msg)
String(
'urbsdnam', 8
), # Destination name (DEAC/DERR/FULL/REAC/REFR/SLOF/SLON message)
Uint8('urbsptim', opt=T_STCK), # Time (STCK) transaction processed
# for subscription (SUBS)
Uint8('urbsttim', opt=T_STCK), # Time (STCK) transaction commit
# (ASEC/AUTI/C5DA/SUBS)
Uint4('urbstsnr'), # Transaction sequence number within
# subscription/destination (SUBS/TRSP message)
Uint2('urbsdbid'
), # Database ID //(ASEC/CMPL/DCMP/DEAC/ERRO/INIT/LODS/
Uint2('urbsfnr'
), # File number // LODE/LOST/REAC/SAVS/SAVE/UPDS/UPDE msg)
Int4('urbslenh'), # Length of URBS
Int4('urbslend'), # Length of related data (at URBSDATA)
Uint2('urbsutok'
), # Utility token (CMPL/ERRO/INIT/LODS/LODE/RPLS/RPLE/
# SAVS/SAVE/UPDS/UPDE message)
String('urbsorig', 1,
ppfunc=urborig_str), # Origin of status (C5DA/RPLS/RPLE)
String('filler1', 5, opt=T_NONE), # Reserved area
String('urbsiqnm', 8), # Input Queue name (IQCL/IQOP/REFR msg)
String('filler2', 8, opt=T_NONE), # Reserved area
#urbsdata following here. Add URBSL to the URBS start
# For the RPLS/RPLE message, URBSDATA contains a list of 2-byte
# file numbers of the file(s) associated with the replay process
# for the subscription given in URBSSNAM
**kw)
def __init__(self, **kw):
Datamap.__init__(
self,
'URBH',
String('urbheye', 4), # URBH eye-catcher 'URBH' (in EBCDIC)
Int4('urbhlen'), # Length of URBH
String('urbhvers', 2), # Version indicator for URB* DSECTs:
Int2('urbhbord', opt=T_HEX), # Const 1 to indicate the byte order
Uint4('urbhlent'), # Total message length (including URBH)
Uint4('urbhmsnr'), # Message sequence number per destination
Uint8('urbhtime', opt=T_STCK), # Time (STCK) when message was sent
Uint2('urbhrpid'), # Target ID of originating Reptor
Uint2('urbhrpni'), # Nucleus ID of originating Reptor
String('urbhname', 8), # Sender name ('REPTOR' if sent by Reptor)
String('filler1', 24, opt=T_NONE), # Reserved area
**kw)
def __init__(self, **kw):
fields=( # Available with CIS Interface version EXX 9/10
String('server_class', 32,opt=T_NONE),# SERVER-CLASS
String('server', 32,opt=T_NONE), # SERVER-NAME
String('service',32,
ppfunc=lambda svc:'%s/%s/%s' % (self.server_class,self.server,svc)),
# SERVICE = class/server/service
Uint8('uows'), # Number of active UOWs (active==current)
Uint8('messages'), # Number of active UOW messages
Uint8('Bytes'), # Number of bytes in active UOW messages
Uint4('max_messages'), # Max. number of messages in one UOW
Uint4('max_bytes'), # Max. number of bytes in one UOW
String('oldest_uow',32), # Oldest time of UOW creation
String('newest_uow',32), # Newest time of UOW creation
)
Datamap.__init__(self, 'UOW Statistics', *fields, **kw)
def __init__(self, **kw):
Datamap.__init__(
self,
'URBT',
String('urbteye', 4), # URBT eye-catcher 'URBT' #
Int4('urbtlen'), # Length of URBT
String('urbtsnam', 8), # Subscription name
Uint4('urbttsnr'), # Transaction sequence number
# within subscription/destination
Uint4('urbtrcnt'), # Count of records (URBRs) in transaction
Uint8('urbtttim', opt=T_STCK), # Time (STCK) transaction commit
Uint8('urbtptim', opt=T_STCK), # Time (STCK) end of subscription
Uint2('urbtdbid'), # Originating Adabas database ID
Uint2('urbtnuci'), # Originating Adabas nucleus ID
Bytes('urbtguid', 28), # Originating 28-byte user ID
Uint2('urbtrpid'), # Reptor target ID (DBID parameter)
Uint2('urbtrpni'), # Reptor nucleus ID (not yet used) => zero
String('urbtusrv', 2), # User subscription version indicator,
String('urbtrsnd', 1,
ppfunc=urbrsnd_str), # Ind. possible double delivery
String('urbtinst', 1,
ppfunc=urbtinst_str), # Ind. for initial state
String('urbtrtok', 8), # Request ID token (if initial state)
String(
'urbtcont', 1,
ppfunc=urbcont_str), # Indicator for transaction continuation:
Bytes('urbtarc', 1), # Architecture flags for selection data
String('urbtptrn', 1,
ppfunc=urbtptrn_str), # Prior-transaction request indicator
String('urbtsort', 1,
ppfunc=urbtsort_str), # Transaction records sorted
Uint4('urbtacod'), # alpha field encoding in selection data
Uint4('urbtwcod'), # wide field encoding in selection data
Uint2(
'urbtutok'
), # utility token if data comes from Replay or Adalod Load/Update
String('urbtorig', 1, ppfunc=urborig_str), # Origin of transaction
String('filler1', 1, opt=T_NONE), # Reserved area
String('urbtsuid', 8), # Security system user id
String('filler2', 16, opt=T_NONE), # Reserved area
**kw)
def __init__(self, **kw):
Datamap.__init__(self, 'Job/Session Id Section',
String('jbn',8,caption='Job/session name'), # JMRJOB
String('pgm',8,caption='Program name'), # SCTPGMNM '*.DD.' if backward reference
String('stm',8,caption='Step name'), # SCTSNAME
String('uif',8,caption='User id'), # JMRUSEID taken from the common exit parm
String('jnm',8,caption='JES job id'), # SSIB
Uint2('stn',caption='Step number'), # SCTSNUMB, first step = 1
String('cls',1,caption='Job class'), # JCTJCSMF, zero for TSO/started task
Uint1('jb1',caption='Job/Session Id section flag'),
Uint2('pgn',caption='Job performance group member'), # OUCBNPG
Uint2('jpt',caption='JES input priority'), # JCTJPRTY
Uint4('ast',ppfunc=dtime100,caption='Device allocation start time'), # TCTAST
Uint4('pss',ppfunc=dtime100,caption='Problem program start time'), # TCTPPST
Uint4('sit',ppfunc=dtime100,caption='Time initiator selected step'), # JCTJMRSS
Packed('std',4,ppfunc=idate,caption='Date initiator selected step'), # JCTSSD
Uint4('rst',ppfunc=dtime100,caption='Time reader found job card'), # JMRENTRY
Packed('rsd',4,ppfunc=idate,caption='Date reader found job card'), # JMREDATE
Uint4('ret',ppfunc=dtime100,caption='Time reader found end of job'),
Packed('red',4,ppfunc=idate,caption='Date reader found end of job'),
String('usr',20,caption='Programmers name'),# ACTPRGNM
String('grp',8,caption='RACF group id'), # ACEEGRPN
String('rud',8,caption='RACF user id'), # ACEEUSRI
String('tid',8,caption='RACF terminal id'), # ACEETRMF
String('tsn',8,caption='Terminal sybolic name'), # TSBTRMID
String('psn',8,caption='Step name invoking procedure'), # SCTSCLPC, blanks if step not part of expanded procedure
String('cl8',8,caption='Job class'), # LCTCLASS or JCTJCSMF
Uint8('iss',opt=T_STCK,caption='Interval start time'), # TCTISS for subtype 2, 3 and 6 records
Uint8('iet',opt=T_STCK,caption='Interval end time'), # SMCXINTE for subtype 2, 3 and 6 records
Uint4('ssn',ppfunc=dtime100,caption='Sub-step number'),# SCTSSNUM
String('exn',16,caption='OpenMVS program name'),
Uint2('asi',opt=T_HEX,caption='Address space id'), # ASCBASID
String('cor',64,opt=T_NONE,caption='JES job correlator'), # JMRJOBCORRELATOR
byteOrder=NETWORKBO,ebcdic=1,**kw)
def __init__(self, **kw):
fields = ( # Available with CIS Interface version
String('uow_id', 16), # 2 UOW ID
String('conv_id', 16), # Conversation ID
String('senderuid', 32), # Sender UserID
String('sendertoken', 32), # Sender User Token
String('senderserver', 32), # Sender SERVER-NAME
String('senderclass', 32), # Sender SERVER-CLASS
String('senderservice', 32), # Sender SERVICE
String('recvruid', 32), # Receiver UserID
String('recvrtoken', 32), # Receiver User Token
String('recvrserver', 32), # Receiver SERVER-NAME
String('recvrclass', 32), # Receiver SERVER-CLASS
String('recvrservice', 32), # Receiver SERVICE
String('userstatus', 32), # User status
Uint1('uowstatus', ppfunc=lambda x: '%-9s' % uowStatus_str(x)
), # Unit of work status
Uint1('eoc'), # End of conversation? 0|1
Uint1('store'), # Persistent? 0|1
Uint1('uowstatstore'), # Persistent UOW status? 0|1
Uint4('eocreason'), # EOC reason code
Uint4('deliveries'), # Attempt to delivery count
Uint4('msgcnt'), # Number of messages
Uint4('msgsize'), # Total message size
String('uwstatus_lifetime', 32), # Status life time
String('uwcreate_time', 32), # Unit of work creation time
Uint4('uw_lifetime',
ppfunc=intervalstr), # 2 Unit of work life time
Uint1('arf'), # 10 Adabas replicator flag
Uint1('scm'), # Single conversation mode
String('unused', 2, opt=T_NONE), # Alignment
Uint4('maxPostponeAttempts'), #
Uint4('remainingPostponeAttempts'), #
Uint4('postponeDelay'), #
String('back2accepted',
32), # Unit of work postponed to ACCEPTED
String('commit_time', 32), # Unit of work commit time
String('create_time', 32), # 10 UOW create time (PSTORE V5)
)
Datamap.__init__(self, 'PersistentMessage', *fields, **kw)
