关于blob：急！哪位老兄在用oracle9（Windows），劳驾将\ORACLE_HOME\Oci\Samples目录下的demo发我一份，谢谢！

Question

如果太大的话就只发demolb.c，谢谢！
e-mail:[email protected]我现在用的是10g，没这些demo了，郁闷！

Answer 1

#ifdef RCSID
static char *RCSid =
   "$Header: cdemdpno.c 11-sep-2001.11:23:48 cmlim Exp $ ";
#endif /* RCSID *//*
**      Copyright (c)  2001 Oracle Corporation.  All rights reserved.
*//* 
** Directions:
** 1. make -f demo_rdbms.mk build_dp EXE=cdemdpno OBJS=cdemdpno.o
**        makes the cdemdpno executable
** 2. sqlplus OE/OE @cdemdp9i.sql 
**        creates the Oracle 9.0 types tbl
** 3. cdemdpno < cdemdpno.dat
**        runs the executable
** 4. to retrieve data, select from "dp_api_demo1" as "OE/OE"
**
*//*
    NAME
     cdemdpno.c - An example C program that loads a nested column 
                        object via Direct Path API.   DESCRIPTION
      A client module to be used with the cdemodp.c driver.   NOTES
     This module loads selected types as defined in the Sample Schema.
     Refer to Cdemdp9i.sql for more information on the use of the
     Sample Schema with the DP API demo modules.   MODIFIED   (MM/DD/YY)
   cmlim        09/11/01 - fix lint
   eegolf       04/04/01 - Merged eegolf_demo_update
   eegolf       03/27/01 - Creation
 */#include <sys/types.h>
#include <oci.h>
#include <cdemodp.h>externdef struct col  objx_02_col [] =
{
  {
    (text *)"warehouse_id", 0, SQLT_CHR, (text *)0,
    (sword)0, (sword)0, (ub2)0, (ub1)0, (struct obj *) 0
  },
  {
    (text *)"warehouse_name", 0, SQLT_CHR, (text *)0,
    (sword)0, (sword)0, (ub2)0, (ub1)0, (struct obj *) 0
  },
  {
    (text *)"location_id", 0, SQLT_CHR, (text *)0,
    (sword)0, (sword)0, (ub2)0, (ub1)0, (struct obj *) 0
  }
};externdef struct fld  objx_02_fld [] =
{
  { 45, 47,  3, FLD_INLINE|FLD_STRIP_TRAIL_BLANK },     /* warehouse_id */
  { 48, 82, 35, FLD_INLINE|FLD_STRIP_TRAIL_BLANK },     /* warehouse_name */
  { 83, 86,  4, FLD_INLINE|FLD_STRIP_TRAIL_BLANK }      /* location_id */
};externdef struct obj warehouse_typ =
{
  (text *) "WAREHOUSE_TYP", 3, objx_02_col, objx_02_fld, 0, 0, 
  (OCIDirPathFuncCtx *)0, (OCIDirPathColArray *)0, OBJ_OBJ};
externdef struct col  objx_01_col [] =
{
  {
    (text *)"product_id", 0, SQLT_CHR, (text *)0,
    (sword)0, (sword)0, (ub2)0, (ub1)0, (struct obj *) 0
  },
  {
    (text *)"warehouse", 0, SQLT_NTY, (text *)0,
    (sword)0, (sword)0, (ub2)0, (ub1)0, &warehouse_typ
  },
  {
    (text *)"quantity_on_hand", 0, SQLT_CHR, (text *)0,
    (sword)0, (sword)0, (ub2)0, (ub1)0, (struct obj *) 0
  }
};externdef struct fld  objx_01_fld [] =
{
  { 26, 31,  6, FLD_INLINE|FLD_STRIP_TRAIL_BLANK },     /* product_id */
  { 32, 36,  5, FLD_INLINE|FLD_STRIP_TRAIL_BLANK },     /* warehouse */
  { 37, 44,  8, FLD_INLINE|FLD_STRIP_TRAIL_BLANK }      /* quantiti_on_hand */
};externdef struct obj inventory_typ =
{
  (text *) "INVENTORY_TYP", 3, objx_01_col, objx_01_fld, 0, 0, 
  (OCIDirPathFuncCtx *)0, (OCIDirPathColArray *)0, OBJ_OBJ};
externdef struct col column[] =
{
  {
    (text *)"cust_first_name", 0, SQLT_CHR, (text *)0,
    (sword)0, (sword)0, (ub2)0, (ub1)0
  },
  {
    (text *)"cust_last_name", 0, SQLT_CHR, (text *)0,
    (sword)0, (sword)0, (ub2)0, (ub1)0
  },
  {
    (text *)"current_inventory", 0, SQLT_NTY, (text *)0,
    (sword)0, (sword)0, (ub2)0, (ub1)0, & inventory_typ 
  }
};/* Field descriptor which maps one-to-one with the column descriptor.
 * For this simple example, fields are strictly positional within
 * an input record.
 */
externdef struct fld field[] =
{
  { 1, 10, 10, FLD_INLINE|FLD_STRIP_TRAIL_BLANK },     /* cust_first_name */
  { 11,20, 10, FLD_INLINE|FLD_STRIP_TRAIL_BLANK },     /* cust_last_name */
  { 21,25,  5, FLD_INLINE|FLD_STRIP_TRAIL_BLANK }      /* current_inventory */
};
externdef struct tbl table =
{
  (text *)"OE",                                          /* table owner */
  (text *)"dp_api_demo1",                                 /* table name */
  (text *)""         ,             /* subname (partition, subpartition) */
  (ub2)(sizeof(column) / sizeof(struct col)),      /* number of columns */
  (text *)"DD-MON-YY",                           /* default date format */
  (struct col *)(&column[0]),                     /* column descriptors */
  (struct fld *)(&field[0]),                       /* field descriptors */
  (ub1)0,                                                   /* parallel */
  (ub1)0,                                                      /* nolog */
  (ub4)(64 * 1024)                              /* transfer buffer size */
};externdef struct sess session =
{
  (text *)"OE",                                              /* user */
  (text *)"OE",                                            /* passwd */
  (text *)"",                                          /* instance name */
  (text *)0,                   /* output file name; NULL implies stderr */
  (ub4)130                                   /* max input record length */
};
/* end of file cdemdpno.c */