© LVM Versicherungen 1

Agenda: Verwaltung von MQ-Objekten in Endevor

Agenda:

1. Vorstellung LVM

2. Endevor - Lotus Notes - MQ

3. MQ Grundlagen

4. Endevor beim LVM

5. MQ System-Objekt Verwaltung im Endevor

6. MQ Applikations-Objekt Verwaltung im Endevor

7. Konsistenz MQ-Definitionen - Endevor

© LVM Versicherungen 2

LVM-Versicherungen: Rund-um-Versicherer

Die LVM-Versicherungen sind ein Rund-um-Versicherer ...

© LVM Versicherungen 3

LVM-Versicherungen: Bunte Palette an Versicherungen

... und wir bieten eine bunte Palette an Versicherungen .....

© LVM Versicherungen 4

LVM-Versicherungen: Markenzeichen Pferd

.... unser Markenzeichen ist das Pferd .....

© LVM Versicherungen 5

LVM-Versicherungen

.... und wir wollen auch noch hoch hinaus.

© LVM Versicherungen 6

LVM-Versicherungen in Zahlen

• Kunden : ca. 3 Millionen

• Verträge: 8,9 Millionen

• Beitragseinnahmen: über 2,27 Milliarden Euro

• Kapitalanlagen: 11,6 Milliarden Euro

• Mitarbeiter in der Unternehmenszentrale in Münster • ca. 2.800 Mitarbeiter • ca. 100 Azubis und Praktikanten

• 2100 Agenturen in Deutschland

• Einer der Top 5 Kfz-Versicherer bundesweit

© LVM Versicherungen 8

Endevor - Lotus Notes - MQ

• Start• 1985 als Anwendungsprogrammierer

• Rail and Fly• seit 1991 Endevor-Administrator

• Die Flucht• 1999 IMS-Administration

• Die Hölle• seit 2000 Notesadministrator

• Die Initiative• seit 2008 MQ-Administrator

© LVM Versicherungen 9

MQ – Grundlagen: QMGR Queues und Datasets

Put

Applikation

Queue Manager

Application Queue

Dead Letter Queue

Transmission Queue QueueHolding

Datasets

LogDatasets

© LVM Versicherungen 10

MQ – Grundlagen: Alias-Konzept für Queues

Put

Applikation

Queue Manager

Local - Queue

Alias-Queue für Put

Alias-Queue für Get

Get

QueueHolding

DatasetsPutPutGet

© LVM Versicherungen 11

RemoteQueue Manager

MQ – Grundlagen: Applikation - Local-QMGR – Remote-QMGR

PutGet

Local Queue Manager

Local Queue

Remote Queue

PutGet

© LVM Versicherungen 12

MQ – Grundlagen: QMGR-Clustering

QMGR1

QMGR 2

QMGR 4

QMGR 3

© LVM Versicherungen 13

MQ – Grundlagen: QMGR-Clustering

QMGR1

QMGR 2

QMGR 3

QMGR 4

Transmission Queue

Cluster Command

Application Queues

ClusterSender Channel

ClusterReceiver Channel

ClusterRepository Queue

Applikationsmessages werden im Cluster über Auto-Defined Sender Channels verschickt.

© LVM Versicherungen 14

MQ – Grundlagen: QMGR-Clustering Vorteile bei 4 QMGR

= 68

= 16

© LVM Versicherungen 15

Z/OSQueue Manager

LVM – MQ-Cluster Infrastruktur

WebsphereApplikation

AIX Queue Manager

BatchPut

Put

IMS

© LVM Versicherungen 16

MQ Batchtriggering auf Z/OS

Websphere MQ Z/OS

1xTrigger-Queue für Batch-Trigger:LVM.BATCH.INITQ

Z/OS Batch

Started Task MQ Batch-Triggerz.B: MQT1BATR Überwacht die MQ-Trigger-Queue und submittet die in der Verarbeitungsmessage enthaltene Procedur

Datenqueues z.B.Lvm.Unfall.Provison

Daten von:MQ-AIXIMS, BatchInternet

1

1000

MQ-Prozeßdefinition je Queue:Prozedurname,ParameterBsp: //MQUO0316 EXEC MQUO316,JCLMEM=U1624003

2

2

6 6

Seq.Bestand

Wird mit Verarbeitungsmessage gefüllt wenn Triggerbedingung derJeweiligen Datenqueue erfüllt ist

Enthält Triggerdefinitionen:Was, wie (Prozeßdefinition) wann (z.B. ab 1000. Satz)ablaufen soll

3

4

Batch-Job: MQT1BAxxProcedur aus MQ-Prozeßdefinitionz.B. MQUO0316

Batch-Jobz.B. U1624003Entladen Lvm.Unfall.Provision

5

© LVM Versicherungen 17

Endevor Infrastruktur des LVM

Eigenständige Environments

ISPF SYSTEM DEMO

TEST

Gemappte Environments

PROD ARCHIVE

PRODFIX

© LVM Versicherungen 18

Endevor Systeme

Systeme Typen

Environments: TEST – PROD - ARCHIVE

PGM

IMS,DB2

VVS,Dope

JCL

Pylon

PLI*,BND*,ASM*,COB* (LVM-Sourcen)

DBD*,PSB*,MFS,SQL*

COBOL (Fremd-Software)

CNTL,INPUT-Anweisungen,Proceduren

C-Sourcen (Fremd-Software)

MQxn QLOCAL, QALIAS, PRO

Environment: System

Util

ZOS

PRZMAC,PROCESS

PROCEDUREN

MQ QMGRDEF,-INP,-PROC, PAGESET etc

© LVM Versicherungen 19

MQ – Endevor Struktur: Applikationsobjekte

TestEnv:

DVI UnfallCTV ...... ...... ......Sub:

Prod

Sys: MQPnMQFn MQQnMQTn

Typ: QLOCAL

QALIAS

PRO

© LVM Versicherungen 20

MQ – Endevor Struktur: Environment System

System

MQ

System

Env:

Sys:

Sub:

QMGRINPQMGRDEF

QMGRPROCQMGRCHG

Typ:CHANNELCLUSTNL

ALIASSTGCLASSPAGESET

© LVM Versicherungen 21

MQ-QMGR System-Verwaltung (1)

System MQ

QMGRINP QMGRDEF QMGRPROC

Stage A Stage B

KeineVerarbeitungNur Source-Vorbereitung

DBS.MQP.

DEFSLVM

MQxxINP1MQ##CHIN

Typ:

Bsp: MQxxBSDSMQxxPAGE

MQxxMSTRMQxxCHIN

Stage A

Endevor. SystempProclib

KeineVerarbeitungNur Source-Vorbereitung

Stage B

JCL-Submit

Stage A

KeineVerarbeitungNur Source-Vorbereitung

Stage B

Endevor-Processor: Submit JCL//*******************************************************//* STEP : SOURCE //* PROGRAMM: CONWRITE //* FUNKTION: ENDEVOR-ELEMENT IN EINE DATEI UEBERTRAGEN //* (C) LVM VERSICHERUNG//******************************************************//SOURCE EXEC PGM=CONWRITE,MAXRC=0,COND=(8,LE), // PARM='EXPINCL(N)' //ELMOUT DD DSN=&&JCLIN, // DISP=(,PASS,DELETE), // UNIT=VIO, // SPACE=(TRK,(15,5),RLSE), // DCB=(RECFM=FB,LRECL=080,BLKSIZE=3200) //*-----------------------------------------------------*** //* SUBMIT DER JCL IM ONLINE *** //*-----------------------------------------------------*** //BC1PTMP0 EXEC PGM=BC1PTMP0,COND=(8,LE), // PARM='ENDEVOR.ISPFPROD.HAUPT.CLIST(ENDJCLSU)' //JCLIN DD DSN=&&JCLIN,DISP=(SHR,PASS) //*-----------------------------------------------------***//* SUBMIT DER JCL IM BATCH ***//*-----------------------------------------------------***//IF IF (BC1PTMP0.RUN & BC1PTMP0.RC = 5) THEN //IKJEFT01 EXEC PGM=IKJEFT01,COND=(8,LE) //JCLIN DD DSN=&&JCLIN,DISP=(SHR,PASS) //SYSPRINT DD SYSOUT=* //SYSTSPRT DD SYSOUT=* //SYSTSIN DD * EXEC 'ENDEVOR.ISPFPROD.HAUPT.CLIST(ENDJCLSU)' /* //ENDIF ENDIF

Allgemein gültige Parameter

QMGR-spezifische Parameter

© LVM Versicherungen 22

MQ-QMGR System-Verwaltung (2)

System MQ

Typ:

Bsp:

QMGRCHG CLUSTNLCHANNEL

MQT1ALTER MQT1LAS MQT1CLNL

Stage A

KeineVerarbeitungNur Source-Vorbereitung

Stage B

MQ-CommandMittels

CSQUTIL

Endevor-Processor://*************************************************//* STEP : CSQUTI//* PROGRAMM: CSQUTIL//* FUNKTION: MQ-DEFINITIONEN DURCHFüHREN//* (C) LVM VERSICHERUNGEN//*************************************************//CSQUTI EXEC PGM=CSQUTIL,MAXRC=4,COND=(8,LE),// PARM='&QMGR'//STEPLIB DD DSN=DBS1.MQP.SCSQANLE,DISP=SHR// DD DSN=DBS1.MQP.SCSQAUTH,DISP=SHR//SYSPRINT DD DSN=&&CSQLST,DISP=(SHR,PASS,DELETE) //SYSIN DD * COMMAND FAILURE(STOP)/*//CSQUCMD DD DSN=&&SRCIN,DISP=(SHR,PASS,DELETE)

© LVM Versicherungen 24

MQx-Applikationsobjekt-Verwaltung Z/OS

MQxn

QLOCAL

OR7023TESTQ#1

KeineVerarbeitungNur Source-Vorbereitung

Stage B

QALIASTyp:

Bsp: OR7023TESTQ#1

MQ-CommandMittels

CSQUTIL

X = T,F,QN = QMGR-Nummer

PRO

OR7023TESTQ#1

TEST PROD

MQPnSystem

Environment

Stage A

Endevor-Processor:1. Source einlesen2. Rexx zur Prüfung ob MQ-Objekt

vorhanden ist.Ggf. Anpassung der Input-Statements(Define statt Alter)

3. MQ-Command durchführen://***********************************************//* STEP : CSQUTI //* PROGRAMM: CSQUTIL//* FUNKTION: MQ-DEFINITIONEN DURCHFüHREN//***********************************************//CSQUTI EXEC PGM=CSQUTIL,MAXRC=4, // COND=(8,LE),PARM='&QMGR‘//STEPLIB DD DSN=DBS1.MQP.SCSQANLE,DISP=SHR// DD DSN=DBS1.MQP.SCSQAUTH,DISP=SHR//SYSPRINT DDDSN=&&CSQLST,DISP=(SHR,PASS,DELETE)//SYSIN DD * COMMAND FAILURE(STOP)/*//CSQUCMD DD DSN=&&SRCIN,DISP=(SHR,PASS,DELETE)

4. Endevor-Listing erstellen

© LVM Versicherungen 25

MQx-Applikationsobjekt-Verwaltung AIX

MQLASxX = (T,F,Q)

QLOCAL

OR7023

QALIASTyp:

Bsp: OR7023

TEST PROD

MQLASPSystem

Environment

KeineVerarbeitungNur Source-Vorbereitung

Stage B

MQ-Commandauf AIX

ausführen

Stage A

Endevor-Processor-Aktivitäten:

1. Source einlesen2. Arbeitsdateien initialisieren3. Mittels FTP ein Script auf der AIX

aktivieren welches eine Liste aller gewünschten MQ-Objekte liefert

4. Erstellte AIX-Liste mittels FTP hochladen5. Rexx zur Auswertung der Liste und ggf

Modifikation des Endevor-Source (Define statt Alter,wenn Objekt nicht auf AIX)

6. Rexx zur Erstellung von FTP-Commands um MQ-Objekte auf der AIX zu definieren

7. Mittels FTP ausführen der MQ-Commands für die Erstellung der MQ-Objekte

8. Mittels FTP AIX-Log der MQ-Aktion hochladen

9. MQ-Log auswerten 10. Mail an MQ-Aix-Administrator versenden 11. Endevor-Listings schreiben

© LVM Versicherungen 26

Beispiel FTP-Commands

//****************************************************************************************** //* STEP : FTPLAS //* PROGRAMM: UCMD, Stonebranch //* FUNKTION: MQ-Definitionen auf AIX des jeweiligen QMGR schieben//* (C) LVM VERSICHERUNGEN //******************************************************************************************//FTPLAS EXEC PGM=UCMD,PARM='&UPARM',MAXRC=0 ://UNVIN DD DSN=&&SRCIN,DISP=(SHR,PASS,DELETE) Endevor-Source //SCRIPT DD DSN=&&MQCMD,DISP=(SHR,PASS,DELETE) AIX-Aktionen//SYSIN DD * -script script -host mqlast -f login -login yes

Inhalt der Datei &&MQCMD erstellt durch Rexxcd /home/mqm/ rm "W1".endv ucopy > /home/mqm/"W1".endv Source aus DD UNVIN chgrp mqm /home/mqm/"W1".endv runmqsc "QMGR" <"W1".endv >"W1".endvlog sleep 10

W1 = Dateiname = Objektname z.B. LVM_UNFALL_PROVISIONQMGR = Endevor-Systemname z.B. MQLAST

© LVM Versicherungen 27

MQ-Applikationsobjektverwaltung : Repository – Endevor - MQ

Repository

Anlegen / Ändern von MQ-Definitionen

je QMGRPlausiprüfung

© LVM Versicherungen 28

MQ-Applikationsobjektverwaltung: Repository – Endevor - MQ

Repository

Anlegen / Ändern von MQ-Definitionen

je QMGRPlausiprüfung

Endevor SystemMQxnGen= Add + Move

MQ-Definitionen

Endevor-Anweisungen

© LVM Versicherungen 29

MQ-Applikationsobjektverwaltung: Repository – Endevor - MQ

Repository

Anlegen / Ändern von MQ-Definitionen

je QMGRPlausiprüfung

Endevor SystemMQxn

Queue ManagerMQxn

Add + Move

Erstellung / UpdateMQ-Definitionen durchEndevor-Processor

© LVM Versicherungen 30

Konsistenz: Repository – Endevor - MQ

Repository

Endevor SystemMQxn

Queue ManagerMQxn

Problemstellung:Was passiert, wenn MQ – Definitionen direkt über die MQ-ISPF-Oberfläche verändert werden ?Wie und durch wen werden diese Änderungen im Endevor bzw. Repository aktualisiert ?

© LVM Versicherungen 31

Konsistenz: Endevor – MQ – Repository

Endevor SystemMQxn

Queue ManagerMQxn

Abgleich Endevor-Source zuMQ-Definition per Rexx

Retrieve

MQ-Display-CMD

© LVM Versicherungen 32

Konsistenz: Endevor – MQ – Repository

Repository

Endevor SystemMQxn

Queue ManagerMQxn

Abgleich Endevor-Source zuMQ-Definition per Rexx

Je Differenz Erstellung von:

Endevor-SourceRepository Source

Update

Source-Updateohne Generierung