COBOL 应用程序中的嵌入式 SQL 语句

COBOL 应用程序中的嵌入式 SQL 语句由下面这三个元素组成：

正确的 COBOL 元素语法

语句初始化符

EXEC SQL

语句字符串

任何有效的 SQL 语句

语句终止符

END-EXEC.

例如：

    EXEC SQL SELECT col INTO :hostvar FROM table END-EXEC.

下列规则适用于 COBOL 应用程序中的嵌入式 SQL 语句：

• 必须将可执行的 SQL 语句放入 PROCEDURE DIVISION 节。就像 COBOL 语句一样，可以在 SQL 语句前面指定段名称。
• SQL 语句可以开始于区域 A（第 8 至 11 列）或区域 B（第 12 至 72 列）。
• 请使用语句初始化符 EXEC SQL 来开始每个 SQL 语句，并使用语句终止符 END-EXEC 来结束该语句。SQL 预编译器会将每个 SQL 语句作为注释包括在经过修改的源文件中。
• 必须使用 SQL 语句终止符。如果未使用此终止符，那么预编译器将一直处理到应用程序中的下一个终止符。这可能会导致不确定的错误。
• 允许在嵌入式 SQL 语句所包含的任何行中包括 SQL 注释。在以动态方式执行的语句中，不允许包括这些注释。SQL 注释的格式是，以两个短划线（--）开头，后跟由零个或零个以上字符组成的字符串，并终止于行尾。请不要在 SQL 语句终止符之后放置 SQL 注释，这是因为，它们会由于似乎是 COBOL 语言的组成部分而导致编译错误。
• 在大多数位置，允许包括 COBOL 注释。例外情况如下所示：
  • 不允许在 EXEC 与 SQL 之间包括注释。
  • 在以动态方式执行的语句中，不允许包括注释。
• SQL 语句与 COBOL 语言遵循相同的行延续规则。但是，请不要使 EXEC SQL 语句初始化符跨行。
• 不要使用 COBOL COPY 语句来包括那些包含 SQL 语句的文件。系统将在编译模块前对 SQL 语句进行预编译。预编译器将忽略 COBOL COPY 语句。而是，请使用 SQL INCLUDE 语句来导入包含文件。
• 要使字符串常量在下一行延续，延续行的第 7 列必须包含“-”，第 12 列或之后的列必须包含字符串定界符。
• SQL 算术运算符必须由空格定界。
• 空格字符（例如行尾符和制表符）的替换如下所示：
  • 当它们出现在引号外部但在 SQL 语句内部时，行尾符和制表符被替换为单个空格。
  • 当它们出现在引号内时，行尾符将消失，条件是字符串对于 COBOL 程序能够正确地延续。制表符不会被修改。

  注意，随平台不同，用作行尾符和制表符的实际字符也将有所变化。例如，基于 Windows 的平台使用回车符/换行符作为行尾符，而基于 UNIX 和 Linux 的系统只使用换行符。