HP3000-L Archives

September 1998, Week 2

HP3000-L@RAVEN.UTC.EDU

Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
From:
Keven Miller <[log in to unmask]>
Reply To:
Keven Miller <[log in to unmask]>
Date:
Tue, 8 Sep 1998 15:15:35 -0600
Content-Type:
text/plain
Parts/Attachments:
text/plain (61 lines)
I can't find my original reference -- I thought there was some provided
code
that I edited. (Note comments in my code for cex2 -- example2)

---- I found it ! look at the group SAMPLEDB.SYS -- all CEX? files are C
samples !!!

But for now, I have kept in my shelf
   ALLBASE/SQL Advance Application Programming Guide (36216-90100) 1994
   ALLBASE/SQL Release F.0 Application Programming Bulletin for MPE/iX
(36216-90062) 1992
which has some example code, not necessarily complete.

Here is the command file I use to compile my C: SQLPPC.CMD

PARM srcfile, dbefile="", pgmfile, msgfile=$stdlist
COMMENT SQLPPC taken from HPSQLUDC.PUB.SYS from PPC
   setvar _savefence hpmsgfence
   setvar hpmsgfence 2
   continue
   purge !msgfile
   purge sqlout
   purge sqlmod
   purge sqlvar
   purge sqltype
   purge sqlextn
   setvar hpmsgfence _savefence
   deletevar _savefence
   file sqlin  = !srcfile
   file sqlmsg = !msgfile;rec=-80,16,f,ascii
   file sqlout;   disc=10000,32;rec=-80,16,f,ascii
   file sqlmod;   disc=1023,10,1;rec=250,,f,binary
   file sqlvar;   disc=2048,32;rec=-80,16,f,ascii
   file sqltype;  disc=2048,32;rec=-80,16,f,ascii
   file sqlextn;  disc=2048,32;rec=-80,16,f,ascii
   continue
   run psqlc.pub.sys;info="!dbefile (dynamic ANSI)"
   if jcw <= warn  then
      continue
      ccxllk sqlout,!pgmfile,$null
   endif
   reset sqlin
   reset sqlmsg
   reset sqlout
   reset sqlmod
   reset sqlvar
   reset sqltype
   reset sqlextn

When using my example, do not provide a DBE (hence the info=(dynamic
ANSI))"
You will have to change IMAGE database info for your own database.

My example prompts for the DBE, opens, selects, then closes it.
Available on request.

+=====================================
 Keven Miller   KC7LYD
 [log in to unmask]   (Salt Lake City, Utah, USA)
+=====================================

ATOM RSS1 RSS2