1 files changed, 76 insertions, 0 deletions
diff --git a/debian/uncrustify-trinity/uncrustify-trinity-0.78.1/tests/expected/sql/02401-sta-select.sqc b/debian/uncrustify-trinity/uncrustify-trinity-0.78.1/tests/expected/sql/02401-sta-select.sqc
new file mode 100644
index 00000000..1142c3b9
--- /dev/null
+++ b/debian/uncrustify-trinity/uncrustify-trinity-0.78.1/tests/expected/sql/02401-sta-select.sqc
@@ -0,0 +1,76 @@
+/*******************************************************
+**
+** A sample program that demonstrates the use of Static embedded SQL.
+** Before compiling this program, be sure you have created a table
+** called video and inserted some tuples in it.
+**
+********************************************************/
+#include <stdio.h>
+
+/* sqlca: is the sql communications area. All error codes
+ * are returned from db2 in that structure which is filled
+ * each time an interaction with db2 takes place.
+ */
+
+EXEC SQL INCLUDE SQLCA;          /* SQL communication area structure */
+
+EXEC SQL BEGIN DECLARE SECTION;  /* declare host variables    */
+   char db_name[8];              /* database name             */
+   char video_title[30];         /* title of the video        */
+   short video_id;               /* serial number             */
+   char director[20];            /* director name             */
+EXEC SQL END DECLARE SECTION;
+
+/* These lines are redundant here because the default
+ * action is to continue. They just show the kind of
+ * errors that could arise and one way to control them.
+ */
+
+EXEC SQL WHENEVER SQLWARNING CONTINUE;  /* sqlca.sqlcode > 0    */
+EXEC SQL WHENEVER SQLERROR CONTINUE;    /* sqlca.sqlcode < 0    */
+EXEC SQL WHENEVER NOT FOUND CONTINUE;   /* sqlca.sqlcode = 100  */
+                                        /* sqlca.sqlcode = 0 (no error) */
+
+void main()
+{
+   strcpy(db_name, "csc343h");
+
+/* C variables are preceded by a colon when they are passed to DB2 */
+
+   EXEC SQL CONNECT TO :db_name;
+
+   if (sqlca.sqlcode != 0)
+   {
+      printf("Connect failed!: reason %ld\n", sqlca.sqlcode);
+      exit(1);
+   }
+
+/* cursor delcaration. Have to declare a cursor each time you
+ * want tuples back from db2
+ */
+
+   EXEC SQL DECLARE c1 CURSOR FOR
+      SELECT video_title
+      FROM video;
+
+/* you have to open the cursor in order to get tuples back */
+
+   EXEC SQL OPEN c1;
+
+   do
+   {
+      /* fetch tuples from the cursor. This will execute the statement
+       * the cursor implements and will return the results */
+
+      EXEC SQL FETCH c1 into :video_title;
+      if (SQLCODE != 0)
+      {
+         break;                 /* SQLCODE refers to sqlca.sqlcode */
+      }
+      /* host variables should have ':' prefix when they are used in DB2 commands */
+
+      printf("%s\n", video_title);
+   } while (1);
+   EXEC SQL CLOSE c1;
+   EXEC SQL CONNECT RESET;
+}