急问：execute immediate语句是否在8.0.5中不被支持？

Question

有支持啊
The syntax of the EXECUTE IMMEDIATE statement follows: EXEC SQL EXECUTE IMMEDIATE { :HOST-STRING | STRING-LITERAL }END-EXEC.
In the following example, you use the host variable SQL-STMT to store SQL statements input by the user:      EXEC SQL BEGIN DECLARE SECTION END-EXEC.
     ... 
     01   SQL-STMT  PIC X(120);
     EXEC SQL END DECLARE SECTION END-EXEC.
     ...
 LOOP.
     DISPLAY 'Enter SQL statement: ' WITH NO ADVANCING.
     ACCEPT SQL-STMT END-EXEC.
* --  sql_stmt now contains the text of a SQL statement
     EXEC SQL EXECUTE IMMEDIATE :SQL-STMT END-EXEC.
 NEXT.
     ...
You can also use string literals, as the following example shows:      EXEC SQL
         EXECUTE IMMEDIATE 'REVOKE RESOURCE FROM MILLER'
     END-EXEC.
Because EXECUTE IMMEDIATE parses the input SQL statement before every execution, Method 1 is best for statements that are executed only once. Data definition statements usually fall into this category. An Example
The following fragment of a program prompts the user for a search condition to be used in the WHERE clause of an UPDATE statement, then executes the statement using Method 1:      ...
*    THE RELEASE_CURSOR=YES OPTION INSTRUCTS PRO*COBOL TO
*    RELEASE IMPLICIT CURSORS ASSOCIATED WITH EMBEDDED SQL
*    STATEMENTS.  THIS ENSURES THAT Oracle8 DOES NOT KEEP PARSE
*    LOCKS ON TABLES, SO THAT SUBSEQUENT DATA MANIPULATION
*    OPERATIONS ON THOSE TABLES DO NOT RESULT IN PARSE-LOCK
*    ERRORS.
 
     EXEC ORACLE OPTION (RELEASE_CURSOR=YES) END-EXEC.
 
*   
     EXEC SQL BEGIN DECLARE SECTION END-EXEC.
         01  USERNAME  PIC X(10) VALUE "SCOTT".
         01  PASSWD    PIC X(10) VALUE "TIGER".
         01  DYNSTMT   PIC X(80).
     EXEC SQL END DECLARE SECTION END-EXEC.
         01  UPDATESTMT PIC X(40).
         01  SEARCH-COND PIC X(40).
     ...
     DISPLAY "ENTER A SEARCH CONDITION FOR STATEMENT:".
     MOVE "UPDATE EMP SET COMM = 500 WHERE " TO UPDATESTMT.
     DISPLAY UPDATESTMT.
     ACCEPT SEARCH-COND.
*    Concatenate SEARCH-COND to UPDATESTMT and store result 
*    in DYNSTMT.
     STRING UPDATESTMT DELIMITED BY SIZE 
         SEARCH-COND DELIMITED BY SIZE INTO DYNSTMT.
     EXEC SQL EXECUTE IMMEDIATE :DYNSTMT END-EXEC.