|
Re: logon logout screen? [message #544827 is a reply to message #542022] |
Fri, 24 February 2012 03:11 |
|
GoGreen
Messages: 28 Registered: February 2012 Location: Java Island
|
Junior Member |
|
|
create 1 item ( list item, for ex. group )),
ELEMENTS IN LIST
INSERT LIST ELEMENS
A
INSERT LIST ITEM VALUE
A
INSERT LIST ELEMENS
B
INSERT LIST ITEM VALUE
B
INSERT LIST ELEMENS
C
INSERT LIST ITEM VALUE
C
1. trigger "on logon"
IF :blk_login. group = 'A' THEN
LOGOUT;
LOGON('A','A@XE',FALSE);
ELSIF :blk_login. group = 'B' THEN
LOGOUT;
LOGON('B','B@XE',FALSE);
ELSIF :blk_login. group = 'C' THEN
LOGOUT;
LOGON('C','C@XE',FALSE);
END IF;
2. create procedure :
PROCEDURE Login IS
begin
IF :blk_login. group = 'A' THEN
LOGOUT;
LOGON('A','A@XE',FALSE);
ELSIF :blk_login. group = 'B' THEN
LOGOUT;
LOGON('B','B@XE',FALSE);
ELSIF :blk_login. group = 'C' THEN
LOGOUT;
LOGON('C','C@XE',FALSE);
END IF;
End;
3. CREATE item button to login
4. Create trigger "WHEN-BUTTON-PRESSED"
in trigger
login;
|
|
|