Select a simple large object into an open file

EXEC SQL BEGIN DECLARE SECTION;
   char db_name[30];
   mlong cat_num;
   loc_t cat_descr;
EXEC SQL END DECLARE SECTION;


if((fd = open(descfl, O_WRONLY)) < 0)
   {
   printf("\nCan't open file: %s, errno: %d\n", descfl, errno);
   EXEC SQL disconnect current;
   printf("GETCD_OF Sample Program over.\n\n"):
        exit(1);
   }
/*
 * Prepare locator structure for select of cat_descr
 */
cat_descr.loc_loctype = LOCFILE;           /* set loctype for open file */
cat_descr.loc_fd = fd;                     /* load the file descriptor */
cat_descr.loc_oflags = LOC_APPEND;         /* set loc_oflags to append */
EXEC SQL select catalog_num, cat_descr     /* verify catalog number */
   into :cat_num, :cat_descr from catalog
   where catalog_num = :cat_num;
if(exp_chk2("SELECT", WARNNOTIFY) != 100)    /* if not found */
   printf("\nCatalog number %ld not found in catalog table\n", 
      cat_num);
else
   {
   if(ret < 0)
      {
      


      exit(1);
      }
   }