GoMappingFra

Introduction

Sur iSeries (AS400), GO MAPPINGFRA est l'interface Mapping sous forme de menus, elle comprend :

• La gestion des spools
• L'importation et la gestion de maquettes (format)
• La gestion de fonds de pages, de fonts, d'images
• La gestion des conversions de monnaies
• La gestion de comptes de M-Storage
• Des menus de paramétrage

Lancer le menu Mapping

Ancien menu :

===> GO MAPPINGFRA       

Nouveau menu :

MAPPING

Créer des options JOB BEFORE AFTER

1  OUTQ3      DEVCOM     PRINTER    *MFC       ->                  
+ F10 
8  *MFC       PRINTER    PJLBEFORE  TOTO       ->                  
   *MFC       PRINTER    PJLAFTER   TITI       ->                  
+ option 8 Editer Pré
PRE      434F55434F5500000000000000000000000000000000000000 
         C O U C O U                                                                            

Sachant cela, lorsqu'on compile un programme (au sens UNIX/Windows), il faut donc l'intégrer dans une bibliothèque pour qu'il devienne utilisable.

Enregistrer le contenu d'une OUTQ

Menu 1

P = Transfert vers PC

Qu'importe le nom, il faut obligatoirement l'extension .dmp

Créer une OUTQ (out queue)

Pour que cela fonctionne, les symboles doivent être créés:

CRTOUTQ

Créer OUTQ3 (dans notre exemple) comme File d'attente en sortie.

Charger un spool depuis l'IFS

Prérequis : Convertir tout Spool UCS2 en ASCII avant de le transférer vers l'IBM et de l'importer. Cela est valable quel que soit le réglage de langue de l'AS (ascii ou UCS2).

RESTOREPAG + F4   PATHNAM('/HOME/gbarret/3200/') FILNAM('DEMO1.ansi.PAG') OUTQ(PAG) OUTQLIB(GBAOPALE) SPLFNAME(TEST3200)

Le / à la fin du path est très important.

Path of *.PAG  . . . . . . . . . > '/HOME/gbarret/3200/'              
                                                                      
FILENAME.PAG . . . . . . . . . . > 'DEMO1.ansi.PAG'                    //ne pas laisser * dans le nom
OUTQ Name  . . . . . . . . . . . > PAG           Name of 10 characters
OUTQ LIB   . . . . . . . . . . . > DEVCOM        Name of 10 characters
SPLF NAME  . . . . . . . . . . . > TEST3200      Name of 10 characters

Récupérer les infos d'un Spool

Dans le menu mapping GO MAPPINGFRA

• Option 1 (Spool = COGISPLF)
• Faire une recherche de votre Spool.
• Sur celui qui vous intérersse, utiliser l'option D puis ENTREE.
• Copier les 5 premières valeurs :

Spooled file . . . . . . . . . . > DEUXPAGES 
Spooled file number  . . . . . . > 4         
Job Name . . . . . . . . . . . . > APPLIXIA1 
Job number . . . . . . . . . . . > 772984    
User . . . . . . . . . . . . . . > GBARRET   

Lancer une un mapping mapcpysplf

MAPCPYSPLF + F4

Coller les 5 lignes d'infos de votre Spool.

Et l'Output queue définie dans le menu GO MAPPING 14-14

Spooled file . . . . . . . . . . > DEUXPAGES     Name                          
Spooled file number  . . . . . .   4             *LAST *ONLY     00000-99999   
Job Name . . . . . . . . . . . .   APPLIXIA1     Name, *CURRENT , *DEV         
Job number . . . . . . . . . . .   772984        000000-999999                 
User . . . . . . . . . . . . . .   GBARRET       Name                          
Mapping format . . . . . . . . . > TCK3016       Character value,10 max.       
Sequence . . . . . . . . . . . . > *MRG          *ALL  *MRG      00000-99999   
Processing mode  . . . . . . . . > P             P=Print D=mapping+Mapout O=Map
Output queue . . . . . . . . . . > OUTQGBA       Name ,*DEV, *JOB              
    Library  . . . . . . . . . . >   DEVCOM      Name, *LIBL                   
Delete file  . . . . . . . . . .   N             Y, N                          
Release new spooled file . . . .   Y             Y, N                          
Form type  . . . . . . . . . . .   *STD          Name, *STD, *SPL              
Save new spooled file  . . . . .   Y             Y, N                          
Load overlays  . . . . . . . . .   Y             Y, N                          
Load fonts . . . . . . . . . . .   Y             Y, N                          

Commandes de base

Plusieurs pages donnent ce genre d'infos, il faut donc etre concis et rediriger le plus souvent possible.

QCSRC

WRKLIB

DSPLIBL

• MRG = merge

• ALL

SAVF

Remarques sur les installation

Après une install sans clés.

On peut copier les clés (MAPCLE et MAPCLE2) les actions 'ACTLIG et ACTION)

WRKOBJ OBJ(GBAOPALE/MAPCLE)
WRKOBJ OBJ(GBAOPALE/MAPCLE2)

Suppression avec l'option 4.

WRKOBJ OBJ(FMEOPALE/MAPCLE)
WRKOBJ OBJ(FMEOPALE/MAPCLE2)

Copie avec l'option 3.