Home » Developer & Programmer » Forms » oracle connection
oracle connection [message #286910] Mon, 10 December 2007 07:11 Go to next message
roni_a180
Messages: 45
Registered: October 2007
Member
hi all

two input receive from forms level field.

then i click ok button then a oracle database user connection established

ok button code




DECLARE
/*
user_name CHAR(30);
pass_word CHAR(30);
connstr CHAR(30) ;
*/
--following variables are for valid connection check
connection_id EXEC_SQL.CONNTYPE;
bIsConnected BOOLEAN;

BEGIN

:global.logon_now := 'Y';
LOGON(NULL, NULL);
/*
--Check for Cancelled Login Screen
user_name := GET_APPLICATION_PROPERTY(USERNAME);
pass_word := GET_APPLICATION_PROPERTY(PASSWORD);
connstr := GET_APPLICATION_PROPERTY(CONNECT_STRING);
*/
--Check For Connection Validity

connection_id := EXEC_SQL.DEFAULT_CONNECTION;
bIsConnected := EXEC_SQL.IS_CONNECTED(connection_id);

IF bIsConnected = TRUE THEN
:global.v_user := get_application_property(username);

message(:global.v_user);
message(:global.v_user);

call_form('D:\Transaction\TRANSACTION_VIEW.fmx');

:global.v_user := get_application_property(username);

message(:global.v_user);
message(:global.v_user);
ELSE
EXIT_FORM(NO_VALIDATE);
END IF;

EXCEPTION
WHEN EXEC_SQL.PACKAGE_ERROR THEN
message(' connection open failed ');

WHEN OTHERS THEN

RAISE FORM_TRIGGER_FAILURE;


END;



Re: oracle connection [message #286919 is a reply to message #286910] Mon, 10 December 2007 07:38 Go to previous message
Littlefoot
Messages: 21818
Registered: June 2005
Location: Croatia, Europe
Senior Member
Account Moderator
What would you like other Forum members to do with your code? Did you just want to share it with the community, or do you have a question about it? Because, in English language (the one we use in main forum's discussions), questions end with a question (?) mark. I don't see any.

Please, read the OraFAQ Forum Guide before posting your next message (pay attention to proper code formatting).
Previous Topic: Messaging problem
Next Topic: Selection not allowed from the menu
Goto Forum:
  


Current Time: Fri Sep 27 06:19:12 CDT 2024