SET Statement [ESQL]

(back to top)

• Example 1 this code fragment inserts a large text value into the database:

  EXEC SQL BEGIN DECLARE SECTION;
  char buffer[5001];
  EXEC SQL END DECLARE SECTION;
  
  
  EXEC SQL CREATE VARIABLE hold_text VARCHAR;
  EXEC SQL SET hold_text = '';
  for(;;) {
  	/* read some data into buffer ... */
  	size = fread( buffer, 1, 5000, fp );
  	if( size <= 0 ) break;
  	
  	/* buffer must be null-terminated */
  	buffer[size] = '\0';
  	/* add data to blob using concatenation */
  	EXEC SQL SET hold_text = hold_text || :buffer;
  }
  EXEC SQL INSERT INTO some_table VALUES ( 1, hold_text );
  EXEC SQL DROP VARIABLE hold_text;

• Example 2 this code fragment inserts a large binary value into the database:

  EXEC SQL BEGIN DECLARE SECTION;
  DECL_BINARY( 5000 ) buffer;
  EXEC SQL END DECLARE SECTION;
  EXEC SQL CREATE VARIABLE hold_blob LONG BINARY;
  EXEC SQL SET hold_blob = '';
  for(;;) {
  	/* read some data into buffer ... */
  	size = fread( &(buffer.array), 1, 5000, fp );
  	if( size <= 0 ) break;
  	buffer.len = size;
  
  
  	/* add data to blob using concatenation
  		Note that concatenation works for 
  		binary data too! */
  	EXEC SQL SET hold_blob = hold_blob || :buffer;
  }
  EXEC SQL INSERT INTO some_table VALUES ( 1, hold_blob );
  EXEC SQL DROP VARIABLE hold_blob;