Related Syntax		Other Library Functions

function

SQLSetArrayAsCounterShelf

Library: omodbc - low-level ODBC support Include: omodbc.xin

Declaration

  define external function SQLSetArrayAsCounterShelf
     (  read-only SQL_array_type Array,
        read-only integer InputShelf,
        value integer ItemCount )

Purpose

Sets elements in the SQL_array_type variable's data contents to the specified integer shelf items.

Input arguments:

• Array. The SQL_array_type variable to modify.
• InputShelf. The integer shelf from which the data is copied.
• ItemCount. The total number of integer shelf items, starting from the first, to copy to the SQL_array_type variable's elements. This must not exceed the declared element count of Array or the size of InputShelf. If it does, an exception will be raised and the program terminated.

The following code demonstrates how to use SQLSetArrayAsCounterShelf to set the value of the SQL array integer:

  local SQL_Array_type Array
  local integer ArrayCounterShelf variable
  local integer i

  SQLSetArraySize( Array, 20, 5 )
  ;
  ; Check initial values.
  ;
  SQLGetArrayAsCounterShelf( Array, ArrayCounterShelf, 5 )
  repeat over ArrayCounterShelf
          output "Initial integer shelf value[%d(#ITEM)] = %d(ArrayCounterShelf)%n"
  again
  ;
  ; Set integer values.
  ;
  set i to 0
  repeat
          set ArrayCounterShelf@(i+1) to (2*(i+1))
          increment i
          exit when i=5
  again
  SQLSetArrayAsCounterShelf( Array, ArrayCounterShelf, 5 )
  ;
  ; Check current values.
  ;
  SQLGetArrayAsCounterShelf( Array, ArrayCounterShelf, 5 )
  repeat over ArrayCounterShelf
          output "Current integer shelf value[%d(#ITEM)] = %d(ArrayCounterShelf)%n"
  again

The following code demonstrates how to set the integer values of multiple elements in an SQL array type:

  local SQL_Array_type Array
  local integer ArrayCounterShelf variable
  local integer i

  SQLSetArraySize( Array, 20, 5 )
  ;
  ; Check initial values.
  ;
  SQLGetArrayAsCounterShelf( Array, ArrayCounterShelf, 5 )
  repeat over ArrayCounterShelf
          output "Initial integer shelf value[%d(#ITEM)] = %d(ArrayCounterShelf)%n"
  again
  ;
  ; Set integer values.
  ;
  set i to 0
  repeat
          set ArrayCounterShelf@(i+1) to (2*(i+1))
          increment i
          exit when i=5
  again
  SQLSetArrayAsCounterShelf( Array, ArrayCounterShelf, 5 )
  ;
  ; Check current values.
  ;
  SQLGetArrayAsCounterShelf( Array, ArrayCounterShelf, 5 )
  repeat over ArrayCounterShelf
          output "Current integer shelf value[%d(#ITEM)] = %d(ArrayCounterShelf)%n"
  again

Related Syntax    SQLGetArrayAsCounter    SQLGetArrayAsCounterShelf    SQLGetArrayAsStream    SQLGetArrayAsStreamShelf    SQLGetArrayAsString    SQLSetArrayAsCounter    SQLSetArrayAsStream    SQLSetArrayAsStreamShelf    SQLSetArrayAsString

Other Library Functions    SQL_FUNC_EXISTS    SQL_IsVersionCompatible    SQL_LibraryVersion    SQLAllocConnect    SQLAllocEnv    SQLAllocHandle    SQLAllocStmt    SQLBindCol    SQLBindParameter    SQLBrowseConnect    SQLBulkOperations    SQLCancel    SQLCloseCursor    SQLColAttribute    SQLColAttributes    SQLColumnPrivileges    SQLColumns    SQLConnect    SQLCopyDesc    SQLDataSources    SQLDescribeCol    SQLDescribeParam    SQLDisconnect    SQLDriverConnect    SQLDrivers    SQLEndTran    SQLError    SQLExecDirect    SQLExecute    SQLExtendedFetch    SQLFetch    SQLFetchScroll    SQLForeignKeys    SQLFreeConnect    SQLFreeEnv    SQLFreeHandle    SQLFreeStmt    SQLGetArrayAsCounter    SQLGetArrayAsCounterShelf    SQLGetArrayAsStream    SQLGetArrayAsStreamShelf    SQLGetArrayAsString    SQLGetArrayElementCount    SQLGetArrayElementLen    SQLGetConnectAttr    SQLGetConnectOption    SQLGetCursorName    SQLGetData    SQLGetDescField    SQLGetDescRec    SQLGetDiagField    SQLGetDiagRec    SQLGetEnvAttr    SQLGetFunctions    SQLGetInfo    SQLGetStmtAttr    SQLGetStmtOption    SQLGetTypeInfo    SQLGetVectorAsCounter    SQLGetVectorAsStream    SQLGetVectorAsString    SQLGetVectorSize    SQLMoreResults    SQLNativeSQL    SQLNumParams    SQLNumResultCols    SQLParamData    SQLParamOptions    SQLPrepare    SQLPrimaryKeys    SQLProcedureColumns    SQLProcedures    SQLPutData    SQLRowCount    SQLSetArrayAsCounter    SQLSetArrayAsCounterShelf    SQLSetArrayAsStream    SQLSetArrayAsStreamShelf    SQLSetArrayAsString    SQLSetArraySize    SQLSetConnectAttr    SQLSetConnectOption    SQLSetCursorName    SQLSetDescField    SQLSetDescRec    SQLSetEnvAttr    SQLSetPos    SQLSetScrollOptions    SQLSetStmtAttr    SQLSetStmtOption    SQLSetVectorAsCounter    SQLSetVectorAsStream    SQLSetVectorAsString    SQLSetVectorSize    SQLSpecialColumns    SQLStatistics    SQLTablePrivileges    SQLTables    SQLTransact

----

[ INDEX ] [ CONCEPTS ] [ TASKS ] [ SYNTAX ] [ LIBRARIES ] [ OMX ] [ OMX ] [ ERRORS ]

Copyright © OmniMark Technologies Corporation, 1988-2000.