1 © LVM Versicherungen Agenda: Verwaltung von MQ-Objekten in Endevor Agenda: 1.Vorstellung LVM...
-
Upload
adalric-mullenbach -
Category
Documents
-
view
112 -
download
6
Transcript of 1 © LVM Versicherungen Agenda: Verwaltung von MQ-Objekten in Endevor Agenda: 1.Vorstellung LVM...
© 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