DB2 graphic  QMF Version 8

Native z/OS batch, TSO and ISPF

You can customize your system so you can print an object without exiting QMF. You can use a local print utility by simply pressing the Print function key, if you define a command synonym for printing and customize your Print function key.

  1. Create a REXX exec or CLIST to locally print the current object. Here is a sample, using the QMF callable interface:
    /* PRTQMF REXX EXEC for local DSPRINT */
    CALL DSQCIX "PRINT PROC (PRINTER=MYPRINT1"
    DSPRINT '&SYSUID..MYPRINT1.DATA'

    This example assumes you have a MYPRINT1 nickname defined and that it directs print output to a data set called MYPRINT1.DATA.

    Some QMF users prefer to bypass the print command and simply export the object for local printing. In this case your exec looks something like:

    /* PRTQMF REXX EXEC for local print utilities called DSPRINT */
    CALL DSQCIX "EXPORT PROC TO MYPROC"
    DSPRINT '&SYSUID..MYPROC.PROC'
  2. Create a QMF command synonym for printing. Here is a sample query that creates a command synonym PRTQMF to execute the PRTQMF exec:
    INSERT INTO COMMAND_SYNONYMS (VERB, SYNONYM_DEFINITION, REMARKS)
    VALUES('PRTQMF','TSO PRTQMF','Print QMF Proc')
  3. You can now customize a function key on the procedure panel to use this command synonym. You need to customize for each panel. A query to customize function key 4 on the procedure panel looks like this:
    INSERT INTO PFKY__TABLE (PANEL,ENTRY_TYPE,NUMBER,PF_SETTING)
    VALUES('PROC','K', 4, 'PRTQMF')

    This example assumes that the user's profile has the PFKEYS column value set to PFKY_TABLE, the name of the function key customization table. (After running the query, QMF must be restarted to implement the function key change.)


Go to the previous page Go to the next page

Downloads | Library | Support | Support Policy | Terms of use | Feedback
Copyright IBM Corporation 1982,2004 Copyright IBM Corporation 1982, 2004
timestamp Last updated: March, 2004