DB2 Server for VSE & VM: Interactive SQL Guide and Reference


Appendix E. Suppressing the ISQL Sign-On Display for DB2 Server for VSE

In addition to typing isql at a CICS terminal, to start ISQL, you can type the following command at a CICS terminal. This command suppresses the ISQL signon display and related terminal messages.



>>-ISQL--#r_id#-----+-userid/password-------------+------------->
                    '-userid/password/server_name-'
 
>-----+-------------------------------------+------------------><
      '-routine_name--+------------------+--'
                      '-(parameter_list)-'
 

Where:

r_id
Is a 1-4 character CICS transaction identifier or 1 to 4 blanks.

#
Stands for a hexadecimal byte X'FF' positioned immediately before and after r_id to mark the beginning and end of r_id.

userid/password
Is the ISQL signon user ID and password. You must type the slash (/). Since the server_name is not specified, the userid/password will be used to connect to the default server.

userid/password/server_name
Is the ISQL signon user ID, password, and the server-name. You must type the slash (/). The userid/password will be used to connect to the specified server.

routine_name
Is optional. Refer to Using the ISQL Transaction Identifier (DB2 Server for VSE).

(parameter_list)
Is optional. Refer to Using the ISQL Transaction Identifier (DB2 Server for VSE).

This method of invoking ISQL is primarily designed for VSE system programs:

The hexadecimal byte X'FF' is usually not available with terminal keyboards. The sample program, as shown in Figure 74, illustrates one method of displaying the command on the terminal and prompting the user to start ISQL.

Figure 74. Starting ISQL Without the Sign-on Display

         TITLE 'STARTING ISQL WITHOUT THE SIGN-ON SCREEN'
****************************************************************
* THIS PROGRAM WRITES 2 LINES TO THE USER TERMINAL (24X80):    *
* - LINE 1 IS FOR SETTING UP THE INVOCATION OF ISQL WITHOUT    *
*   DISPLAYING THE SIGN-ON SCREEN.                             *
* - LINE 2 PROMPTS THE USER TO EXECUTE LINE 1 WITH THE ENTER   *
*   KEY, OR QUIT WITH THE CLEAR KEY.                           *
****************************************************************
         PRINT GEN
DFHEISTG DSECT
INSTRUCT CSECT
         SPACE
         EXEC CICS SEND FROM(ISQLSTR) FLENGTH(SENDLEN) ERASE
         EXEC CICS RETURN
ISQLSTR  EQU   *
LINE1    DC    X'1140401D4D'   LINE 1: INVISIBLE, MDT ON,
*                                      UNPROTECTED.
         DC    C'ISQL'
         DC    X'FF'           DELIMITER BYTE
         DC    C'TRX0'         TRANS-ID TO BE INVOKED AT ISQL
*                                                        EXIT.
         DC    X'FF'           DELIMITER BYTE
         DC    C'SQLDBA/SQLDBAPW'      USER-ID/PASSWORD TO ISQL
*
LINE2    DC    X'11C1501D40'    LINE 2: VISIBLE, MDT OFF,
*                                       UNPROTECTED.
         DC    C'PRESS ENTER KEY TO INVOKE ISQL,'
         DC    C' OR CLEAR KEY TO QUIT'
STRLEN   EQU   *-ISQLSTR
SENDLEN  DC    A(STRLEN)
         LTORG
         END


[ Top of Page | Previous Page | Next Page | Table of Contents | Index ]