home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / blackb10.zip / DYNSQL.BND (.txt) < prev    next >
DB2 Bind  |  1995-02-08  |  498b  |  14 lines
  1. DYNSQL  ZBkJLICLDECKKH  0
  2. INCLUDE SQLCA
  3. WHENEVER SQLERROR     CONTINUE
  4. WHENEVER SQLWARNING   CONTINUE
  5. WHENEVER NOT FOUND    CONTINUE
  6. BEGIN DECLARE SECTION
  7. END DECLARE SECTION
  8. prepare st    into :psqlda     from :cmd_sql
  9. declare cur cursor for st
  10. open cur
  11. close cur
  12. fetch cur    using descriptor :psqlda 
  13. cmd_sql
  14.