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)
MACRO PACBASE DB2 SOUS IMS PAGINATION HORIZONTALE VERTICALE DOCUMENTATION LISTES 
Laisser un commentaire