GO-ITEM  - WHEN-BUTTON-PRESSED - SQLAP-10048 - You have not selected a record.

Hi,
I need to use go-item -> execute-trigger(when-button-pressed) personalization in oracle EBS Payables module. However i face certain problem.
When i do 'go-item' to particular 'button', row selection disappear(its a multi row block). In the result i receive an error - 10048 - you have not selected a record.
Manually you just click a button with row selected, and everything goes fine. There must be some kind of a context parameter which is passed from a block/record/row to a button. However how to achieve this through personalization?
Many thanks for every help.
Best regards,
Martin

write a procedure in forms that disables all your items in that record and call this on When-New-Record-Instance and When-Button-Pressed.
PROCEDURE disable_item IS
BEGIN
IF :<block>.indicator = 'X'
THEN
SET_ITEM_INSTANCE_PROPERTY('<block>.<item>, CURRENT_RECORD, INSERT_ALLOWED, PROPERTY_FALSE);
SET_ITEM_INSTANCE_PROPERTY('<block>.<item>, CURRENT_RECORD, UPDATE_ALLOWED, PROPERTY_FALSE);
.. (repeate this t2o Statemnts for every item,
more elegantliy you may write a loop using built-in NEXT_ITEM to get all items and set insert and update off) ...
END IF;
END;
On When-Button-Pressed set the value of :block.indicator to 'X' before calling the disable_item procedure.
Attemtion: This solution assumes that the button is part of your MR block (cited bove as <block>).
... and code is just written down, not tested.

Similar Messages

  • What do you do when iBook downloads a book you did not select?

    What do you do when iBook downloads a book you did not select?

    Welcome to the Apple Community.
    Select the content which is causing a problem and use the 'Report a problem' button in Your Purchase History.

  • Disable items when button pressed

    Hi all,
    I have a master detail form. Users first have to enter the master.
    When finished adding the master they press a button to display the detail region.
    After pressing the button the users are not allowed to edit the master region anymore.
    How can I disable the master region when the button is pressed?
    Thanx,
    Pim

    Hi,
    Please try this,
    create P1_STATUS as hidden
    Set default value = Y
    Set the condition of the master region choose Expression1= Expression2
    Expression 1 = :p1_status
    Expression 2 = Y
    Pass the argument in submit button which one you need to hide the master region -> choose URL and give f?p=&APP_ID.:1:&SESSION.::::P1_STATUS:N
    Now the :p1_status = N value after you submit button.. Your master region will not show.
    Thanks
    Mark Wyatt
    Edited by: Websoft on Sep 22, 2009 4:46 AM

  • FRM-40732 ORA-06502 in when button pressed triger

    I Have a the code below in when button pressed
    If :block1.text_item is not null Then
    :control.title := :block1.text_item
    end if;
    go_block('block2);
    Here the when button-button-pressed unhandled exception Frm-40735 Ora-06502 appears. I know this may be because of datatype problem, but how would I know the culprit item. The form allow the user to save the data. Am using forms 6i 10G database.

    Can check the maximum length of :control.title
    It seems that it can handle the amount of data you are assigning to it

  • How can I call my chart in Forms6i on When Button Press Trigger?

    Hi Friends,
    I have make a chart in Graphic Builder 6i and save on path C:\graph\test.ogd
    Now I want to run this Chart from Form6i on When Button Press trigger.
    I have call my report in forms using this command on When Button Press trigger.
    Run_Product(reports,'C:\Cheema\Qdir_store\reports\pmms\sec_backlog',asynchronous,runtime,filesystem,TO_CHAR(NULL));
    So tell me How can I call my chart in Forms6i?
    Please reply me on urgent.
    Thanks,
    Shahzad

    Just to recall after a long break of couple of years..... Pls check out if not wrong.
    First of all you need to embeed the chart object on your layout window and make it visible = FALSE. This is a design time work. In the button press event, show the chart object by setting the visible property = TRUE.
    Note, i could not paste u the sample code as i don't have forms installation on my PC. The above states is a logic you can apply.

  • Error -- No Such Trigger('when-button-pressed')

    Hi,
    I am getting the error ""No Such Trigger('when-button-pressed')"",
    when I am executing the code EXECUTE_TRIGGER( 'WHEN-BUTTON-PRESSED' );
    on some item(Key-Next-Item), although WHEN-BUTTON-PRESSED trigger exists.
    What could be the problem ?. It worked till yesterday, giving error from today, I havent
    changed any thing.
    Thanks in Advance
    Devender

    Steve's tip is the only good solution for this case.
    The problem in your case for example is:
    Let's say you have a block-trigger, which fires after your execute-trigger.
    Now a colleague of you, which don't know your code, create a WHEN-BUTTON-PRESSED on an item, then the new code is started and not the block-trigger-code.
    So, don't ever do this. Write your code in a package-function or -procedure and call it from the trigger. So you can re-user the functionality
    Gerd

  • When-button-pressed---adding a "select statement"

    Hi friends,
    i have a select statement:
    select count(*) from employees
    where emp_no=:control.emp_no;
    i would like that when i press a button, count for instance, i get the number of employees.
    I need the codes used in oracle in the when-button-pressed.
    Thanks.

    DECLARE
    RESULT NUMBER :=0;
    CURSOR CUR
    select count(*) from employees
    where emp_no=:control.emp_no;
    BEGIN
    OPEN CUR;
    FETCH CUR INTO RESULT;
    :ITEM_NAME := RESULT;
    CLOSE CUR
    END;
    I hope this will help
    This will be shown in item, if you want to show a message then use
    MESSAGE(RESULT);
    Regards
    Abbas
    Edited by: Abbas on Jul 19, 2011 12:37 PM

  • FRM-40735 WHEN-BUTTON-PRESSED TRIGGER RAISED UNHANDLED EXCEPTION ORA-01843

    Hi everyone
    When I run My form in Microsoft Windows Melinem , and I have Button on the form WHEN I press the button it works fine ,but when I run the same form in Microsoft Windows XP and WHEN I press the button it give this message :
    FRM-40735
    WHEN-BUTTON-PRESSED TRIGGER RAISED UNHANDLED EXCEPTION ORA-01843
    AND I RECOMPILE THE FORM IN Microsoft Windows XP BUT STILL I AM GETING THE SAME MESSAGE
    WAITING FOR YOU VALUABLE ANSWER .
    BEST REGARDS
    JAMIL ALSHAIBANI

    Forms [32 Bit] Version 6.0.8.23.2 (Production)
    Oracle9i Enterprise Edition Release 9.0.1.1.1 - Production
    With the Partitioning option
    JServer Release 9.0.1.1.1 - Production
    and the script which is used in the button as the following :
    DECLARE
    CURSOR C1 IS
    SELECT ITEM_CODE,AVERAGE_COST,STORE_CODE,ITEM_QUANTITY,TOTAL_COST
    FROM IM_GOODS_RECIEVE_DETAILS
    WHERE DOC_CODE = :IM_GOODS_RECIEVE_HEADER.DOC_CODE;
    LOC_DOC_CODE VARCHAR2(10);
    LOC_DOC_DATE DATE;
    LOC_ITEM_CODE VARCHAR2(30);
    LOC_ITEM_QUANTITY NUMBER(20,3);
    LOC_CART_QTY NUMBER(20,3);
    LOC_UNIT_CODE VARCHAR2(10);
    LOC_TOTAL_COST NUMBER(20,6);
    LOC_AVERAGE_COST NUMBER(20,6);
    LOC_SUM_QTY NUMBER(20,6);
    LOC_BALANCE NUMBER(20,6);
    LOC_PRICE NUMBER(20,6);
    LOC_BALANCE_COST NUMBER(25,6);
    LOC_ITEM VARCHAR2(30);
    L0C_TOT_COST NUMBER(20,6);
    LOC_TOT_QTY NUMBER(20,6);
    LOC_NEW_AVERAGE NUMBER(20,6);
    LOC_ON_HAND_QTY NUMBER(20,3);
    al_id Alert;
    al_button NUMBER;
    LOC_SYS_DATE DATE;
    BEGIN
    SELECT TO_DATE(TO_CHAR(SYSDATE,'DD/MM/YYYY')) INTO LOC_SYS_DATE FROM DUAL;
    FOR R IN C1
    LOOP
    BEGIN
         SELECT B.ITEM_CODE ,SUM(NVL(ITEM_QUANTITY,0)) INTO LOC_ITEM ,LOC_SUM_QTY
    FROM IM_TRANS_ISSUE_HEADER A,IM_TRANS_ISSUE_DETAILS B
    WHERE A.DOC_CODE = B.DOC_CODE
    AND B.DEL_STORE = R.STORE_CODE
    AND ITEM_CODE = R.ITEM_CODE
    AND DOC_DATE BETWEEN :IM_GOODS_RECIEVE_HEADER.DOC_DATE
    AND LOC_SYS_DATE
    GROUP BY
    ITEM_CODE
    ORDER BY B.ITEM_CODE ;
    exception
         when no_data_found then
         NULL;
         when form_trigger_failure then
    show_message(sqlerrm);
         raise form_trigger_failure;
         when others then
         show_message(sqlerrm);
         raise form_trigger_failure;     
    END;     
         BEGIN
         BEGIN
         SELECT (NVL(QUANTITY_ON_HAND,0) + (NVL(LOC_SUM_QTY,0))),NVL(ITEM_PRICE1,0),
         NVL(QUANTITY_ON_HAND,0)
         INTO LOC_TOT_QTY,LOC_PRICE,LOC_ON_HAND_QTY
         FROM IM_LOCATION A, IM_INVENTORY B
         WHERE A.ITEM_CODE = B.ITEM_CODE
         AND A.ITEM_CODE = R.ITEM_CODE
         AND A.STORE_CODE = R.STORE_CODE;
         LOC_BALANCE := (:IM_GOODS_RECIEVE_DETAILS.ITEM_QUANTITY) - (LOC_TOT_QTY);
         LOC_BALANCE := - (LOC_BALANCE);
         LOC_BALANCE_COST := ((LOC_BALANCE) * (LOC_PRICE));
         L0C_TOT_COST := LOC_BALANCE_COST + :IM_GOODS_RECIEVE_DETAILS.TOTAL_COST;
         LOC_NEW_AVERAGE := ROUND(((L0C_TOT_COST)/(LOC_TOT_QTY)),5);
         exception
         when no_data_found then
         NULL;
         when form_trigger_failure then
    show_message(sqlerrm);
         raise form_trigger_failure;
         when others then
         show_message(sqlerrm);
         raise form_trigger_failure;
         END;
         BEGIN
         SELECT 1 INTO :GLOBAL.DUMMY
         FROM COST_TEMP_SUM
         WHERE S_GOODS_DOC = :IM_GOODS_RECIEVE_HEADER.DOC_CODE
         AND S_GOODS_DATE = :IM_GOODS_RECIEVE_HEADER.DOC_DATE
         AND S_ITEM_CODE = R.ITEM_CODE;
         exception
         when no_data_found then
         INSERT INTO COST_TEMP_SUM
         VALUES(:IM_GOODS_RECIEVE_HEADER.DOC_CODE,
         :IM_GOODS_RECIEVE_HEADER.DOC_DATE,LOC_SUM_QTY,LOC_ON_HAND_QTY,
         LOC_TOT_QTY,LOC_BALANCE,R.ITEM_QUANTITY,
         LOC_PRICE,LOC_BALANCE_COST,R.TOTAL_COST,
         L0C_TOT_COST,LOC_NEW_AVERAGE,R.ITEM_CODE,LOC_SYS_DATE);
         when form_trigger_failure then
    show_message(sqlerrm);
         raise form_trigger_failure;
         when others then
         show_message(sqlerrm);
         raise form_trigger_failure;     
         END;
         END;
    IF LOC_BALANCE_COST = 0 THEN
         UPDATE IM_INVENTORY
              SET ITEM_PRICE1 = R.AVERAGE_COST
              WHERE ITEM_CODE = R.ITEM_CODE;      
    ELSE
         UPDATE IM_INVENTORY
              SET ITEM_PRICE1 = LOC_NEW_AVERAGE,ITEM_PRICE2 = LOC_PRICE
              WHERE ITEM_CODE = R.ITEM_CODE;      
    END IF;
    -- THIS FOR ISSUED ITEMS QUANTITY
    FOR R2 IN (
    SELECT B.ITEM_CODE as LOC_ITEM_CODE, NVL(ITEM_QUANTITY,0) as LOC_ITEM_QUANTITY,
    A.DOC_CODE as LOC_DOC_CODE, AVERAGE_COST as LOC_AVERAGE_COST,
    TOTAL_COST as LOC_TOTAL_COST,A.DOC_DATE as LOC_DOC_DATE,
    CART_QTY as LOC_CART_QTY,UNIT_CODE as LOC_UNIT_CODE
    FROM IM_TRANS_ISSUE_HEADER A,IM_TRANS_ISSUE_DETAILS B
    WHERE A.DOC_CODE = B.DOC_CODE
    AND B.DEL_STORE = R.STORE_CODE
    AND ITEM_CODE = R.ITEM_CODE
    AND DOC_DATE BETWEEN :IM_GOODS_RECIEVE_HEADER.DOC_DATE
    AND LOC_SYS_DATE
    -- AND :EXPENSES_TAB.EXP_DATE
    ORDER BY B.ITEM_CODE )
    LOOP
    BEGIN
    SELECT 1 INTO :GLOBAL.DUMMY
         FROM COST_TEMP
         WHERE T_DOC_CODE = R2.LOC_DOC_CODE
         AND T_DATE = R2.LOC_DOC_DATE
         AND T_ITEM_CODE = R2.LOC_ITEM_CODE;
    exception
         when no_data_found then
    INSERT INTO COST_TEMP
    VALUES(R2.LOC_DOC_CODE,R2.LOC_DOC_DATE,R2.LOC_CART_QTY,R2.LOC_ITEM_QUANTITY,
    R2.LOC_AVERAGE_COST,:IM_GOODS_RECIEVE_HEADER.DOC_CODE,
    :IM_GOODS_RECIEVE_HEADER.DOC_DATE,R.ITEM_CODE,R.STORE_CODE);
    when form_trigger_failure then
    show_message(sqlerrm);
         raise form_trigger_failure;
         when others then
         show_message(sqlerrm);
         raise form_trigger_failure;     
         END;
    Begin
    al_id := Find_Alert('POST_DATA');
    IF Id_Null(al_id) THEN
    Message('User_Warning alert does not exist');
    RAISE Form_Trigger_Failure;
    ELSE
    ** Show the warning alert
    -- jamil al_button := Show_Alert(al_id);
    ** If user pressed OK (button 1) then bring up another
    ** alert to confirm -- button mappings are specified
    ** in the alert design
    -- IF R2.LOC_ITEM_QUANTITY != 0 AND al_button = ALERT_BUTTON1 THEN
         IF R2.LOC_ITEM_QUANTITY != 0 THEN
    BEGIN
    UPDATE IM_TRANS_ISSUE_DETAILS
    SET AVERAGE_COST = LOC_NEW_AVERAGE,
    TOTAL_COST = LOC_NEW_AVERAGE * R2.LOC_ITEM_QUANTITY
    WHERE DOC_CODE = R2.LOC_DOC_CODE
    AND ITEM_CODE = R2.LOC_ITEM_CODE ;
    END;
    END IF;
    END IF;
    END;
    END LOOP;
    END LOOP;
    GO_BLOCK('IM_GOODS_RECIEVE_HEADER');
    :IM_GOODS_RECIEVE_HEADER.FLAG_COST := 1;
    COMMIT;
    SET_ITEM_PROPERTY('IM_GOODS_RECIEVE_HEADER.PUSH_BUTTON152',ENABLED,PROPERTY_FALSE);
    SET_ITEM_PROPERTY('EXPENSES_TAB.PUSH_BUTTON151',ENABLED,PROPERTY_FALSE);
    SHOW_MESSAGE('The New Cost Price updated Successfully !!!');
    END;
    BEGIN
         IF nvl(:IM_GOODS_RECIEVE_HEADER.FLAG_COST,0) = 1 THEN
    Make_Block_Query_Only('IM_GOODS_RECIEVE_DETAILS');
         ELSIF nvl(:IM_GOODS_RECIEVE_HEADER.FLAG_COST,0) = 0 THEN
         Make_Block_Query_Only('IM_GOODS_RECIEVE_DETAILS');
         END IF;          
    END;     
    best regards
    Jamil Alshaibani

  • FRM-40735:when-button-pressed trigger raised unhandled exception ORA-24247

    hi all
    i am using form 10g release2 i am having a problem
    when i use the following stored procedure in form then i am getting this
    error.
    FRM-40735:when-button-pressed trigger raised unhandled exception ORA-24247
    but the same code working fine when i use in SQLPLUS.
    CREATE OR REPLACE PROCEDURE mail_attach (dir1 VARCHAR2, filename VARCHAR2)
    AS
      l_output  utl_file.file_type;
      l_file       RAW(32767);
      l_size       NUMBER;
      BLOCK       NUMBER;
      b          BOOLEAN;
      l_start NUMBER := 1;
      TYPE ARRAY IS TABLE OF VARCHAR2(255);
      l_data ARRAY := ARRAY([email protected]');
    BEGIN
      UTL_FILE.FGETATTR(dir1, filename, b, l_size, BLOCK);
      l_output := utl_file.fopen('BACKUP', 'code.txt', 'r' );
      utl_file.get_raw(l_output, l_file, l_size);
      utl_file.fclose( l_output );
      FOR i IN l_start .. l_data.COUNT
      LOOP
        UTL_MAIL.SEND_ATTACH_RAW (
            sender   => 'Mailer',
            recipients => l_data(i),
            subject   => 'Data for ' || TO_CHAR((SYSDATE-1),'DD-MON-YYYY'),
            attachment => l_file,
            message   => 'Dear User, Please find attached the upload
    data for the period mentioned in the subject line.',
            att_inline => FALSE,
            att_filename => filename);
           l_start := l_start + 1;
      END LOOP;
    END;and this is used in form when-button-pressed trigger.
    BEGIN
      mail_attach('UTL_PATH','code.txt');
         message('FIle send successfully');
         message('File send successfully');
    END;

    hi
    Mehwish now check the following code and its working fine with me in form..........
    declare
         dir1 VARCHAR2(200);
          --filename VARCHAR2(200):='Logon.jpg';
           filename VARCHAR2(200);
      l_output  utl_file.file_type;
      l_file       RAW(32767);
      l_size       NUMBER;
      BLOCK       NUMBER;
      b          BOOLEAN;
      l_start NUMBER := 1;
      TYPE ARRAY IS TABLE OF VARCHAR2(255);
      l_data ARRAY := ARRAY('[email protected]');
    BEGIN
    -- EXECUTE IMMEDIATE 'ALTER SESSION SET smtp_out_server = ''192.168.56.103:25''';-- this is IP address and port of the server
      UTL_FILE.FGETATTR(dir1, :filename, b, l_size, BLOCK);
      --select directory_path into :filepath from dba_directories where directory_name='BACKUP';
      l_output := utl_file.fopen('BACKUP',:filename, 'r' );-- i added :filename as a text item.
      utl_file.get_raw(l_output, l_file, l_size);
      utl_file.fclose( l_output );
      FOR i IN l_start .. l_data.COUNT
      LOOP
        UTL_MAIL.SEND_ATTACH_RAW (
            sender   => 'Mailer',
            recipients => l_data(i),
            subject   => 'Data for ' || TO_CHAR((SYSDATE-1),'DD-MON-YYYY'),
            attachment => l_file,
            message   => :f,-- this is message item.
            att_inline => FALSE,
            att_filename => :filename);--this is attachment file name.
           l_start := l_start + 1;
      END LOOP;
      message('File Send Successfully');
      message('File Send Successfully ');
    END;hope this helps you.
    Attachment and mail are working fine with me, i can send attachment..............
    sarah

  • When Button Pressed: 3171265167539056707

    I have a choice 3171265167539056707 listed under "When Button Pressed". What is that?

    Yeah, I have seen these cases where "foreign keys" are left dangling in the App Builder.
    When you delete a item, all computations based on that item are deleted
    Similarly, when you delete a button, all after-submit components based on that button should be automatically deleted (or at least set to Unconditional).

  • When button pressed: Multiple buttons

    Regarding the 'When Button pressed' condition available in various places (computations, branches, processes, etc), it offers me the option to select exactly one button.
    How can I make it so that I want the thing to fire when either Button 1 or 2 or 3 is pressed?
    Thanks

    Martin - Whenever a page is submitted with a button, the request value is set to a property from the button, either the button name for standard buttons or the request value attribute for item buttons. In either a PL/SQL expression condition or in some of the declarative condition types that look at the request value, you can compare it to a list of values that you're interested in.
    Note that the request value doesn't necessarily tell you which button was pressed. It tells you that some event set the request value. If your page can be submitted with a tab or with javascript that you put somewhere on the page, or if you've given multiple buttons the same request value, it's up to you to prevent ambiguity about the button-to-request mapping.
    Scott

  • WHEN BUTTON PRESSED TRIGGER

    Hi,
    I've created a form with 4 data blocks (each of which has its' own canvas, items, and window). On my first canvas, I've created "push buttons" for the user to select which canvas (block/window) they go to next. I've attached WHEN-BUTTON-PRESSED triggers to each of these buttons (which execute a go_block command), however, when I first run the form and click on a button, nothing happens. If I execute a query BEFORE I click on a button, they all work fine and take me to the correct canvas. Could someone please tell me how I can get these buttons to work WITHOUT having to execute a query first? I've looked at all the property palettes, etc. and can't see any attribute that I can set.....any help would be greatly appreciated. Thank you. (I'm using Forms 9.0.4.0.19)

    Thank you so much for your responses. I had changed the
    Fire In Enter-Query Mode to No, but that didn't help, however, changing the trigger from WHEN-BUTTON-PRESSED to WHEN-MOUSE-CLICK did the trick - it works fine.
    Can you suggest a good reference for determining which type of trigger you should use?
    Thanks again for your responses - I really appreciate it!

  • When-button-pressed---trigger raised unhandled exception ORA-06502

    Dear all,
    I am trying to implement a hierarchical tree using the following codes on
    when-button-pressed
    DECLARE
    htree item;
    my_sql VARCHAR2 (200) := 'select 1, level, hee_name,null, to_char(hee_no)
    from hrm_employee
    connect by prior hee_id=hee_dirsup_id
                   start with hee_dirsup_id is null
                             order siblings by hee_name';
    BEGIN
    htree := FIND_ITEM ('trees.tree10');
    ftree.SET_TREE_PROPERTY (htree, ftree.query_text, my_sql);
    ftree.POPULATE_TREE ('htree');
    END;
    i am unable to see my hierarchical tree and i am having the above error message.
    Can anybody please help me sort this out? Is there any chunks of codes missing resulting to this error.
    I'll be very grateful for any help :)
    sheetal.

    Hi sheetal
    trigger raised unhandled exception ORA-06502
    Cause* :This error occurs when you try to assign a value to a variable, but the value is larger than the variable can handle.
    or if you are trying to assign a non-numeric value to a numeric variable.
    --=========================
    Action*: pls change the my_sql VARCHAR2 *(200)* to my_sql VARCHAR2 *(2000)*
    i am unable to see my hierarchical tree
    Pls have a look here at Andreas Weiden sample code....
    Hope this helps...
    Regards,
    Amatu Allah.

  • How do I execute a 'remote' when-button-pressed trigger?

    I am using Forms 6 in an 8i/10g environment. I have a data block (COMPACT) which is on canvas MAIN. Compact has an item (button) called CREATE_COMPACT, with a when-button-pressed trigger. I also have an error canvas which has a button called RESTART, so they can restart the entire build after an error. The restart code is exactly the same as the create_compact code, and, after the restart, I want the focus to be the main canvas, so I would like to just have the restart when-button-pressed trigger shift focus to the CREATE_COMPACT trigger and execute it. I have tried:
    go_item( 'Compact.Create_Compact' );
    do_key( 'Enter' );
    This switched me to CREATE_COMPACT but did not execute the trigger. I then tried:
    execute_trigger( 'Compact.Create_Compact' );
    and then:
    execute_trigger( 'Create_Compact' );
    but neither of these work. I get error FRM-40700 no such trigger. Is there any way to do this short of copying code or creating a pl/sql procedure?
    thanks

    do_key('ENTER') will execute the code in a KEY-ENTER trigger so I suggest you move your code into the KEY-ENTER trigger. On your when-button-pressed trigger you should also use do_key('ENTER');

  • Looping through a table Help needed ....Forms 10g..... When Button Pressed

    Hye craig, hamid, christian and all ...........
    i have a user access interface which i create where there are two fields username and password and a button,
    i have also created a table USERS for users which have username and password fields ..... On useraccess interface i coded on WHEN BUTTON PRESSED like this
    declare
    go_block('users');
    execute_query;
    declare
    begin
         if :useraccess.username=:users.username and
              :useraccess.password=:users.password then
              go_block('MAINPAGE');
              else
              go_block('USERACCESS');
              MESSAGE('SORRY WRONG PASSWORD OR NOT A REGISTERED USER');
              MESSAGE('SORRY WRONG PASSWORD OR NOT A REGISTERED USER');
              end if;
    end;
    This code works for a single user in USERS table but for multiple users there has to be some looping system
    which matches the USERACCESS and USERS tables fields thoroughly ....

    Hi Majid,
    I can suggest you a workaround for this. raise a ON-LOGON trigger and you can use the LOGON_SCREEN builtin to flash the logon screen at runtime. And then try capturing the username and password.
    DECLARE
      connected BOOLEAN := FALSE;
      tries     NUMBER  := 3;
      un        VARCHAR2(30);
      pw        VARCHAR2(30);
      cs        VARCHAR2(30);
    BEGIN
      SET_APPLICATION_PROPERTY(CURSOR_STYLE, 'DEFAULT');
      WHILE connected = FALSE and tries > 0
      LOOP
        LOGON_SCREEN;
        un := GET_APPLICATION_PROPERTY( USERNAME );
        pw := GET_APPLICATION_PROPERTY( PASSWORD );
        cs := GET_APPLICATION_PROPERTY( CONNECT_STRING );
        LOGON( un, pw || '@' || cs, FALSE );
        IF FORM_SUCCESS
        THEN
          connected := TRUE ;
        END IF;
        tries := tries - 1;
      END LOOP;
      IF NOT CONNECTED THEN
        MESSAGE('Too many tries!');
        RAISE FORM_TRIGGER_FAILURE ;
      END IF;
    END ;   a sample piece of coding to help you out.
    Regards,
    Manoj Chakravarthy

Maybe you are looking for