MAPUSRDTA
valable uniquement sur AS/400
Pour chaque édition (commande MAPCPYSPLF), lorsqu'une DTAARA portant le nom de MAPUSRDTA existe dans QTEMP, une ligne est insérée en fin de page dans le spool.
(dans ce cas chaque page du spool contiendra donc une ligne supplémentaire).
Cette ligne contient la valeur de la DTAARA.
Cela permet d'utiliser cette valeur dans la maquette Mapdraw / M-Designer.
principe de fonctionnement = trois étapes.
1) création du .PAG:
Pour la création du .PAG, exécuter dans l'ordre les commandes CRTDTAARA puis MAPPAGIFS.
exemple:
CRTDTAARA DTAARA(QTEMP/MAPUSRDTA) TYPE(*CHAR) LEN(200) VALUE(BONJOUR)
MAPPAGIFS SPLF(FA_EP001) SPLNUM(10) JOB(QPRTJOB) JOBNUM(482245) USER(SDANGEL) PATHOUT('/HOME/Mapping/') OUTFILE(TEST.PAG)
http://serveur.mappingsuite.com/web/img/articles/MAPUSRDTA.jpg
2) réalisation /retouche de la maquette avec ce nouveau .PAG.
Le fichier .PAG contient une ligne supplémentaire en bas de page du spool, sur cette ligne on retrouve la valeur de la CRTDTAARA.
Compiler la maquette (génération / importation)
3) maquettage:
Exécuter l'une après l'autre les commandes CRTDTAARA puis MAPCPYSPLF
IMPORTANT: dans la commande MAPCPYSPLF utiliser uniquement le format ci-dessus, ce format tient compte de la ligne supplémentaire ajoutée par le CRTDTAARA.
Possibilité de contenir plusieurs valeurs (par exemple:2):
1ere commande:
CRTDTAARA
(définir par exemple une longeur 200)
2ème commande: (pour concaténer avec tabulation)
CHGDTAARA > choisir une position décallée pour ne pas se superposer sur la valeur précédente.
La longeur est celle de la chaine ajoutée par cette seconde commande CHGDTAARA
______________
AUTRE:
> possibilité d'utiliser les variables du robot, par exemple &USER ou &JOB
> permet de reprendre un attribut de spool, pour un index Mapout ou autre...
_______________
en résumé tout maquettage doit:
_être précédé d'un CRTDTAARA DTAARA(QTEMP/MAPUSRDTA)
_utiliser un format qui tient compte de MAPUSRDTA.