2a3,7
> ;; == Changes == 
> ;; Tom Popovich enhanced the Oracle support. Now you will get a as-sysdba
> ;; prompt so you can log in as "as sysdba"  or "as sysoper"
> ;;
> 
271a277,284
> (defcustom sql-as-sysdba ""
>   "*Default value of as-sysdba (used for oracle) to login as sys or system."
>   :type 'string
>   :group 'SQL)
> 
> ;; Below we test   (equal sql-as-sysdba "")  and if not "" will add that to the
> ;; sqlplus command; you can enter as sysdba  if you want that mode of login
> 
342c355
<      :sqli-login (user password database)
---
>      :sqli-login (user password database as-sysdba)
516c529
< (defcustom sql-oracle-program "sqlplus"
---
> (defcustom sql-oracle-program (if nil  "/apps/ora_instant_client/sqlplus2.exe"  "sqlplus")  ;; we specify a specific binary to always use by changing nil to t ; tjp
726a740,742
> (defvar sql-as-sysdba-history nil
>   "History of as-sysdba response used.")
> 
1965c1981,1985
< 				  sql-database-history))))
---
> 				  sql-database-history)))
>      ((eq (car what) 'as-sysdba)		; database
>       (setq sql-as-sysdba
> 	    (read-from-minibuffer "as-sysdba: " sql-as-sysdba nil nil
> 				  sql-as-sysdba-history))))
2484a2505,2506
>     (if (not (equal sql-as-sysdba ""))
> 	(setq parameter (concat parameter " " sql-as-sysdba)))
2996d3017
<