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 ⇉ 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.