• SUB MONITOR IMS IS NOT DESCRIBED HERE. IT’S ONLY A SUBPROGRAM CALLED A PROGRAM
    IF YOU PRETEND TO SUPPRESSION OF COSTS WITH “THE ORIGINAL PACDIALOGUE CYCLE” SO NOT USING THE 3.5 RECENT VERSION
    THIS IS NOT A SPECIALIST AFFAIR : NOT EVEN…
    BECAUSE THIS IS NOT EVEN CODE…WE ARE TALKING ABOUT PARAMETERS ONLY
    AND IMPLEMENTATION IS NOTHING (USING .C1 .C2)
    THIS IS NATURAL CONTINUITY FROM PARTIAL GENERATION SYSTEM CALLED MSP (MACRO STRUCTURE PARAMETRABLE) TO TOTAL GENERATION SYSTEM…
    PERFECT TRACABILITY WITHOUT ABENDS WITH “XPEDITER”, “INTERTEST”, “EZTEST” OR “SMARTEST” OF COBOL IMS GENERATED MEMBER FROM PAC IS NOT SUFFICIENT AND NOT A PROOF THAT THE PROGRAM WORKS…
    BECAUSE “DISSENTIONS INTO IMS SYSTEM REGIONS” CAN GENERATE ABENDS…ANYWAY…(A JOKE !!!)…WHEN YOU EXECUTE A PROGRAM…
    IN FACT MAY BE THAT ALL KEYS SAVED IN 2 DIMENSIONS COBOL TABLE/ARRAY AND INDEXES MANAGEMENT IS NOT PROBABLE…SO ONLY PICTURES AND MOVIES ARE PROOFS THAT THE PROGRAM WORKS
    BECAUSE HERE ONLY PICTURES AND MOVIES ARE PROOFS
    THIS COMPLEX PROGRAM (WHO EXISTS “NO MORE !!!”) WORKS…
    FIND MORE POWERPOINT PRESENTATIONS WITH SIGNIFICATIVE PICTURES ABOVE

  • TRAVAIL A FAIRE

    REDIGEZ LE –CE (CALL OF ELEMENTS), LA MAP

    REDIGEZ LE –CS (CALL OF SEGMENTS), UN SEGMENT EN REPETITIVE

    REDIGEZ LE –G DU DIALOGUE, LES MESSAGES D’ERREURS

    IMPLMENTEZ LA MACRO EN –CP EN UTILISANT LE DICTIONNAIRE DE DONNEES

    PUIS CHANGEZ CHAQUE VALEUR 1 A 1, EN UTILISANT LA COMMANDE .C1 OU .C2

    MACRO-STRUCTURES UTILISEES DANS L’ECRAN                        AI1907 LISTE TITULAIRES CONTRAT

    **************************************************************************************************

    * MACRO. * NL *  S * COMMENTAIRES OU VALEURS DES PARAMETRES                                               * D * V *               

    ************************************************************************************************** AAAI20   *       *     * +0 / 10 / IDPES / NBPTA / 3 / 07 / AASCP /  CDACSD /  ZA0433 /  ZA0432  /                    *

    * AAAI20   *       *     * V909 / AI / V909-CURSOR / V2C1101 / 1907 /  AI2400 / 3 / ZI08 / ACCDA / QPRPI /              *

    **************************************************************************************************

    DANS LE –CP :

    1ERE LIGNE DE PARAMETRES

    $1  =   +0                         :    INITIALISATION DU CRITERE DE TRI (SPACES OU ZEROES)

    $2   =  10                         :    NBRE DE LIGNES PAR PAGE (IRR)

    $3   =  IDPES                  :    1 SEUL CRITERE DE TRI

           =  EXLIB                 :    (Ex N=2 CRITERES TRIES CONCATENES EN 1 SEUL)

           =  ZA043                 :    (Ex N=5  CRITERES TRIES CONCATENES EN 1 SEUL)

    $4  =   NBPTA                :    INDICE I de la TABLE (I,J)

    $5   =  3                           :    INDICE I MAXIMUM

    $6   =  07                         :    2 DERNIERS CARACTERES DU CODE ECRAN

    $7   =  AASCP                :    INDICE J de la TABLE (I,J)

    $8   =  CDACSD             :   CODE ACTION SELECTION LIGNE

    $9   =  ZA0433                :   CLE SELECTIONNEE (OU CLE CONCATENEE) A TRAITER DANS LE PROGRAMME                                                                  SUIVANT

    $10 =  ZA0432                :   CLE SAUVEGARDEE A UTILISER LORS DU RETOUR SUR LISTE

    2EME LIGNE DE PARAMETRES

    $A   =  V909                     :   TABLE DB2

    $B   =  AI                          :   CODE DIALOGUE

    $C   =  V909-CURSOR    :   NOM CURSEUR DB2

    $D   =  V2C1101                 :   NOM VUE DB2

    $E   =   1907                     :   CODE ECRAN

    $F   =   AI2400                    :   CODE ECRAN SUIVANT

    $G  =   3                            :   INDICE J MAXIMUM

    $H  =   ZI08                      :   CODE SEGMENT SPA (IMS) / COMMAREA (CICS)

    $I   =   ACCDA                 :   INDICE I MAXIMUM (DERNIER POSTE ALIMENTE)

    $J   =   QPRPI                   :   INDICE J MAXIMUM (DERNIER POSTE ALIMENTE)