An example

You are logged on to your local VM system (SANJOSE) running CMS. You want to write a REXX callable interface program that does the following:

1. Starts a QMF session

   CALL DSQCIX "START"

2. Connects to the remote DB2 database (DALLAS)

   CALL DSQCIX "CONNECT TO DALLAS"

3. Runs a procedure with logic(EARNINGS) that queries the remote database for data, formats the data, and prints the report

   CALL DSQCIX "RUN PROC EARNINGS"

   The procedure EARNINGS contains the following logic:

   
   ·
   ·
   ·
   
   "RUN QUERY EARNQ (FORM=EARNF"
   "PRINT REPORT"
   
   ·
   ·
   ·
   

   This procedure does not contain another CONNECT command.

4. Ends the QMF session

   CALL DSQCIX "EXIT"

When you write this program, be aware of the following:

• Your application program must reside on your local (SANJOSE) VM system.
• The QMF session starts on your local (SANJOSE) VM system.
• Your procedure must reside on the remote database (DALLAS); DALLAS is the current location when the application runs the procedure in step 3.
• Any QMF objects (in this case, the query and the form) used in the application or the procedure after the CONNECT command in step 2 must reside on the remote database (DALLAS).
• The SQL query EARNQ run by the procedure in step 3 runs against the DB2 database in DALLAS.
• The PRINT command in the procedure EARNINGS prints the report on the printer named by the profile at the current location (DALLAS). For this example, assume that the profile at the current location (DALLAS) defines the printer to be at the local VM system (SANJOSE).

For more information about connecting to a remote location with the QMF CONNECT command, see online help.