Remplacement spécifique

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