comp.lang.ada
 help / color / mirror / Atom feed
* Oracle Call Interface (OCI) for Ada95
@ 2000-02-08  0:00 Dmitriy Anisimkov
  0 siblings, 0 replies; only message in thread
From: Dmitriy Anisimkov @ 2000-02-08  0:00 UTC (permalink / raw)


Simple thick Ada95 binding of OCI.
http://cgi.tripod.com/vagul/adaoci.html
Programs do to look like :
      Connect := Logon("scott/tiger@any_tns_name");
      Prepare(Connect, Stmt, "begin :result := (sysdate -
:client_time)*60*60*24; end;");
      Bind(Stmt,Numb,":result");
      Bind(Stmt,Date,":client_time");
      Set_Value(Date,Sysdate); -- client local time
      Put_Line(To_String(Get_Value(Date),"DD Mon YY HH24:MI:SS"));
      Execute(Stmt);
      Put_Line(To_String(Get_Value(Numb),"FM999990.099"));






^ permalink raw reply	[flat|nested] only message in thread

only message in thread, other threads:[~2000-02-08  0:00 UTC | newest]

Thread overview: (only message) (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2000-02-08  0:00 Oracle Call Interface (OCI) for Ada95 Dmitriy Anisimkov

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox