Remplacement spécifique

De MappingDoc
Révision datée du 6 mars 2019 à 09:12 par imported>Admin (1 révision importée)
(diff) ← Version précédente | Voir la version actuelle (diff) | Version suivante → (diff)

utilisation: pour utiliser la valeur d'une zone mapdraw dans une commande autre que Mapping (un autre programme/logiciel comme par exemple pour envoyer des fax directement depuis l'AS400).


1) zone Mapdraw: Outil/remplacement specifique

2) modifier le CL MAP_SPECIF pour créer une data: (faxnumber)

STRPDM / 3(membres) / fichier: QSPECIF - bib: MAP400_syl choisir CL puis: 2 > modifier puis 14 > recompiler


modif' du CL (création d'une DTAARA pour récup valeur de la zone Mapdraw):


CRTDTAARA  DTAARA(QTEMP/faxnumber) TYPE(*CHAR) LEN(10) + 
             VALUE(&STRVAL)                          

3) création d'un CL lancé par le robot, contenu de ce CL:

a) commande MAPCPYSPLF => (implique l'execution du CL MAP_SPECIF) b) RTVDTAARA faxnumber = &numfax => création + alim de la variable du CL "faxnumber" c) commande SNDFAX => FAX: ______ &numfax SPLF: ______ $.&SPLF JOB: ______ *CURRENT USER: ______ *CURRENT


FAX: ______ &numfax SPLF: ______ $.&SPLF JOB: ______ *CURRENT USER: ______ *CURRENT


voir QTXTSRC pour retrouver QSPECIF