Defining a synonym for the print function key for CICS

You can customize to allow a user to print an object (in the following example, a report) without exiting QMF.

Use this technique to invoke a local print utility when the Print function key is pressed.

1. Create a QMF procedure called PRT__QMF. This sends the object to temporary storage, then starts a transaction that prints the object.

   PRINT REPORT (QUEUENAME=QMFREPT,QUEUETYPE=TS)
   CICS QMFP (FROM='QMFREPT')
    

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','RUN PRT_QMF','Print QMF Report')

3. You can now customize a function key on the report panel to use this command synonym. You need to customize a key for each panel. A query to customize function key 4 on the report panel looks like this:

   INSERT INTO PFKY_TABLE (PANEL,ENTRY_TYPE,NUMBER,PF_SETTING)
   VALUES('REPORT','K', 4, 'PRTQMF')

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