< Précédent | Suivant >

Leçon 3 : Créer une méthode Java

La leçon 3 vous guide à travers la création d'une méthode Java™.
Avant de commencer, vous devez effectuer la Leçon 2 : Configurer un projet EJB et créer un bean géré par message.
Dans cette leçon, vous
  1. Dans la page Méthode Java, cliquez sur Ajouter.
  2. Dans la zone Nom de la file d'attente, tapez IVPPIPE4. Le nom de la file d'attente est le nom du canal de transaction où les messages d'appel IMS sont mis en attente. IVPPIPE4 est le canal de transaction prédéfini qui est utilisé par l'exemple d'appel IMS. Pour plus d'informations sur le nom de la file d'attente, voir
    Si vous importez l'exemple entrant IMS au lieu de créer un nouveau projet, le nom de la file d'attente est défini à SYNCTP04. Pour le test de bout en bout, vous avez deux options :
    1. Modifier le nom de la file d'attente pour utiliser l'application IMS qui est fournie dans la procédure de vérification d'installation de l'exemple d'appel IMS : cette option vous permet de tester l'exemple J2C sans devoir créer ou modifier votre propre application IMS ou définir un descripteur de destination OTMA sur le système hôte IMS.
    2. Modifier ou créer une application IMS et définir un descripteur de destination sur le système hôte IMS :
      1. Créez ou modifiez une application IMS pour émettre une demande synchrone sortante à l'aide de l'appel DL/I ICAL. Par exemple :
        ICAL  SENDRECV MYDDTOR1 001000 00050 00100
        où :
        • SENDRECV est le code de la sous-fonction requise
        • MYDDTOR1 est le nom de descripteur que vous devez définir sur le système hôte IMS.
        • 001000 est le temps d'attente de la réponse, exprimé en centièmes de seconde
        • 00050 est la taille en octets des données de la demande
        • 00100 est la taille en octets des données de la réponse
        Cet exemple montre comment envoyer un message de demande synchrone sortante à une destination nommée MYDDTOR1 avec 50 octets de données de demande. L'application attend que 100 octets de données de réponse soient retournés sans valeur de délai d'attente de 1000 (ou 10 secondes).
      2. Cet exemple montre comment envoyer un message de demande synchrone sortante à une destination nommée MYDDTOR1 avec 50 octets de données de demande. L'application attend que 100 octets de données de réponse soient retournés sans valeur de délai d'attente de 1000 (ou 10 secondes).
        D MYDDTOR1 TYPE=IMSCON TMEMBER=HWS1 TPIPE=SYNCTP04 SYNTIMER=1000
        où :
        • MYDDTOR1 est le nom du descripteur qui est spécifié dans l'appel DL/I ICAL
        • HWS1 est le nom TMEMBER approprié dans votre environnement
        • SYNCTP04 est le nom de la file d'attente qui est spécifié dans votre méthode Java et votre spécification d'activation J2C
        • 1000 est la valeur du délai d'attente, exprimée en centièmes de seconde.
        Pour plus d'informations sur la syntaxe des appels DL/I ICAL, le descripteur de destination OTMA et la fonction d'appel synchrone IMS, voir Fonction d'appel synchrone d'IMS version 10
  3. Dans la zone Nom de méthode EJB, tapez invokeCall.
  4. A côté de la zone Type d'entrée de la page Méthode Java, cliquez sur Nouvelle.
  5. Dans la page Importation des données, vérifiez que la zone Sélectionnez un mappage est COBOL vers Java. Cliquez sur Parcourir à côté de la zone Fichier COBOL.
  6. Recherchez l'emplacement du fichier SYCALOUT.cpy. (Vous en trouverez une copie dans le dossier d'installation de votre produit : <rép_install>/IBM/IBMIMShared/plugins/com.ibm.j2c.cheatsheet.content/Samples/IMS/inbound).
    sycalout.cpy
                *
          *    IMS Callout Sample copybook
          *
          *********************************************************************/
          *                                                                   */
          * (c) Copyright IBM Corp. 2008                                      */
          * All Rights Reserved                                               */
          * Licensed Materials - Property of IBM                              */
          *                                                                   */
          * DISCLAIMER OF WARRANTIES.                                         */
          *                                                                   */
          * The following (enclosed) code is provided to you solely for the   */
          * purpose of assisting you in the development of your applications. */
          * The code is provided "AS IS." IBM MAKES NO WARRANTIES, EXPRESS OR */
          * IMPLIED, INCLUDING BUT NOT LIMITED TO THE IMPLIED WARRANTIES OF   */
          * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE, REGARDING   */
          * THE FUNCTION OR PERFORMANCE OF THIS CODE.                         */
          * IBM shall not be liable for any damages arising out of your use   */
          * of the generated code, even if they have been advised of the      */
          * possibility of such damages.                                      */
          *                                                                   */
          * DISTRIBUTION.                                                     */
          *                                                                   */
          * This generated code can be freely distributed, copied, altered,   */
          * and incorporated into other software, provided that:              */
          *   - It bears the above Copyright notice and DISCLAIMER intact     */
          *   - The software is not for resale                                */
          *                                                                   */
          *********************************************************************/
    
            01  CALLOUT-REQUEST.
                05  CALLOUT-REQUEST-STR      PIC X(50).
    
            01  CALLOUT-RESPONSE.
                05  CALLOUT-RESPONSE-STR     PIC X(50).
  7. Cliquez sur Ouvrir.
  8. Cliquez sur Suivant.
  9. Dans la page Importateur COBOL, cliquez sur Afficher les options avancées.
    1. Sélectionnez les options suivantes :
      Tableau 1. Options de configuration des paramètres de l'importateur COBOL
      Paramètre Valeur
      Platform Name Z/OS
      Codepage IBM-037
      Floating point format name Hexadécimal IBM®
      External decimal sign EBCDIC
      Endian name Big
      Remote integer endian name Big
      Quote name DOUBLE
      Trunc name STD
      Nsymbol name DBCS
    2. Cliquez sur Interroger pour charger les données.
    3. Une liste des structures de données s'affiche. Sélectionnez CALLOUT-REQUEST dans la zone Structures de données.
    4. Cliquez sur Suivant.
  10. Dans la page Sauvegarde des propriétés,
    1. Sélectionnez Par défaut pour Style de génération.
    2. Cliquez sur Parcourir à côté de Nom de projet et choisissez le projet Web IMSInbound.
    3. Dans la zone Nom du package, tapez sample.ims.data.
    4. Dans la zone Nom de la classe, acceptez le nom par défaut CALLOUTREQUEST. Cliquez sur Terminer.
  11. A côté de la zone Type de sortie de la page Méthode Java, cliquez sur Nouvelle.
  12. Dans la page Importation des données, vérifiez que la zone Sélectionnez un mappage est COBOL vers Java. Cliquez sur Parcourir à côté de la zone Fichier COBOL.
  13. Recherchez l'emplacement du fichier SYCALOUT.cpy. (Vous en trouverez une copie dans le dossier d'installation de votre produit : <rép_install>/IBM/IBMIMShared/plugins/com.ibm.j2c.cheatsheet.content/Samples/IMS/inbound).
  14. Cliquez sur Ouvrir.
  15. Cliquez sur Suivant.
  16. Dans la page Importateur COBOL, cliquez sur Afficher les options avancées.
    1. Sélectionnez les options suivantes :
      Tableau 2. Options de configuration des paramètres de l'importateur COBOL
      Paramètre Valeur
      Platform Name Z/OS
      Codepage IBM-037
      Floating point format name Hexadécimal IBM
      External decimal sign EBCDIC
      Endian name Big
      Remote integer endian name Big
      Quote name DOUBLE
      Trunc name STD
      Nsymbol name DBCS
    2. Cliquez sur Interroger pour charger les données.
    3. Une liste des structures de données s'affiche. Sélectionnez CALLOUT-RESPONSE dans la zone Structures de données.
    4. Cliquez sur Suivant.
  17. Dans la page Sauvegarde des propriétés,
    1. Sélectionnez Par défaut pour Style de génération.
    2. Cliquez sur Parcourir à côté de Nom de projet et choisissez le projet Web IMSInbound.
    3. Dans la zone Nom du package, tapez sample.ims.data.
    4. Dans la zone Nom de la classe, acceptez le nom par défaut CALLOUTRESPONSE. Cliquez sur Terminer.
  18. Cliquez sur Terminer.
  19. Cliquez sur Terminer pour terminer la définition de la méthode.
  20. Une fois tous les artefacts générés, sélectionnez IMSInbound > ejbModule > sample.ims, faites un clic droit sur CALLOUTSB.java et sélectionnez > Ouvrir avec > Editeur Java. Editez la méthode invokeCall :
      public sample.ims.data.CALLOUTRESPONSE invokeCall(
                  		 		 		 sample.ims.data.CALLOUTREQUEST cALLOUTREQUEST) {
                  		 		 // TODO Need to implement business logic here. 
                  		 		 System.out.println("Synchronous callout request from IMS to WebSphere MDB");		 		 
                  		 		 
                  		 		    
                          System.out.println(cALLOUTREQUEST.getCallout__request__str());
                  
                          sample.ims.data.CALLOUTRESPONSE response = new CALLOUTRESPONSE();
                          System.out.println("Synchronous callout response from WebSphere MDB to IMS");		 		 
                          response.setCallout__response__str("HELLO FROM WAS MDB");
                          return response;
      }
< Précédent | Suivant >

Commentaires